From e0d4376f0d3bf80c3f2895a88a515ea9d54aef85 Mon Sep 17 00:00:00 2001 From: Don Syme Date: Fri, 24 Apr 2020 13:33:55 +0100 Subject: [PATCH 001/112] nullness implementation squashed --- DEVGUIDE.md | 11 + FSharp.Profiles.props | 3 + .../FSharp.Compiler.Service.Tests.fsproj | 1 + fcs/FSharp.Compiler.Service/AssemblyInfo.fs | 10 +- .../FSharp.Compiler.Service.fsproj | 1 + src/absil/bytes.fs | 5 + src/absil/bytes.fsi | 4 + src/absil/illib.fs | 59 +- src/absil/ilread.fs | 30 +- src/absil/ilreflect.fs | 93 ++-- src/absil/ilsign.fs | 17 +- src/absil/ilsupp.fs | 25 +- src/absil/ilwritepdb.fs | 14 +- src/fsharp/AccessibilityLogic.fs | 15 +- src/fsharp/AugmentWithHashCompare.fs | 37 +- src/fsharp/CheckFormatStrings.fs | 12 +- src/fsharp/CompileOps.fs | 235 ++++++-- src/fsharp/CompileOps.fsi | 37 +- src/fsharp/CompileOptions.fs | 3 + src/fsharp/ConstraintSolver.fs | 467 +++++++++++++--- src/fsharp/ConstraintSolver.fsi | 15 +- src/fsharp/DetupleArgs.fs | 6 +- src/fsharp/ErrorLogger.fs | 7 +- src/fsharp/ExtensionTyping.fs | 460 +++++++++++---- src/fsharp/ExtensionTyping.fsi | 95 +++- src/fsharp/FSComp.txt | 15 + src/fsharp/FSStrings.resx | 12 + src/fsharp/FSharp.Build/FSharp.Build.fsproj | 1 + .../FSharp.Build/FSharpCommandLineBuilder.fs | 14 +- .../FSharp.Build/FSharpEmbedResXSource.fs | 9 +- .../FSharp.Build/FSharpEmbedResourceText.fs | 5 + src/fsharp/FSharp.Build/Fsc.fs | 186 ++++--- src/fsharp/FSharp.Build/Fsi.fs | 83 ++- src/fsharp/FSharp.Build/SubstituteText.fs | 8 +- src/fsharp/FSharp.Build/WriteCodeFragment.fs | 39 +- .../FSharp.Compiler.Private.fsproj | 1 + .../FSharp.Compiler.Server.Shared.fsproj | 1 + src/fsharp/FSharp.Core/FSharp.Core.fsproj | 4 + src/fsharp/FSharp.Core/array.fs | 16 +- src/fsharp/FSharp.Core/async.fs | 2 +- .../FSharp.Core/fslib-extra-pervasives.fs | 2 +- src/fsharp/FSharp.Core/local.fs | 4 + src/fsharp/FSharp.Core/mailbox.fs | 2 +- src/fsharp/FSharp.Core/option.fs | 20 + src/fsharp/FSharp.Core/option.fsi | 20 + src/fsharp/FSharp.Core/prim-types.fs | 108 +++- src/fsharp/FSharp.Core/prim-types.fsi | 114 +++- src/fsharp/FSharp.Core/reflect.fsi | 25 +- src/fsharp/FindUnsolved.fs | 4 +- src/fsharp/IlxGen.fs | 160 +++--- src/fsharp/InfoReader.fs | 30 +- src/fsharp/InnerLambdasToTopLevelFuncs.fs | 18 +- .../DependencyProvider.fs | 18 +- .../DependencyProvider.fsi | 12 +- src/fsharp/LanguageFeatures.fs | 4 + src/fsharp/LanguageFeatures.fsi | 1 + src/fsharp/LegacyHostedCompilerForTesting.fs | 7 +- src/fsharp/LegacyMSBuildReferenceResolver.fs | 4 +- src/fsharp/LexFilter.fs | 23 + src/fsharp/MethodCalls.fs | 41 +- src/fsharp/MethodOverrides.fs | 8 +- src/fsharp/NameResolution.fs | 84 +-- src/fsharp/NicePrint.fs | 57 +- src/fsharp/Optimizer.fs | 24 +- src/fsharp/PatternMatchCompilation.fs | 5 +- src/fsharp/PostInferenceChecks.fs | 52 +- src/fsharp/PrettyNaming.fs | 4 + src/fsharp/QuotationTranslator.fs | 309 ++++++----- src/fsharp/SignatureConformance.fs | 8 +- src/fsharp/SyntaxTree.fs | 17 + src/fsharp/TcGlobals.fs | 189 ++++--- src/fsharp/TypeChecker.fs | 470 +++++++++------- src/fsharp/TypeRelations.fs | 11 +- src/fsharp/TypedTree.fs | 155 ++++-- src/fsharp/TypedTreeBasics.fs | 83 ++- src/fsharp/TypedTreeOps.fs | 525 +++++++++++------- src/fsharp/TypedTreeOps.fsi | 60 +- src/fsharp/TypedTreePickle.fs | 395 ++++++++----- src/fsharp/TypedTreePickle.fsi | 4 +- src/fsharp/autobox.fs | 2 +- src/fsharp/fsc.fs | 13 +- src/fsharp/fsi/console.fs | 34 +- src/fsharp/fsi/fsi.fs | 60 +- src/fsharp/fsi/fsi.fsproj | 1 + src/fsharp/import.fs | 73 ++- src/fsharp/import.fsi | 4 + src/fsharp/infos.fs | 125 +++-- src/fsharp/lex.fsl | 4 +- src/fsharp/lexhelp.fs | 2 + src/fsharp/lib.fs | 42 +- src/fsharp/pars.fsy | 23 +- src/fsharp/service/FSharpCheckerResults.fs | 24 +- src/fsharp/service/IncrementalBuild.fs | 19 +- src/fsharp/service/ItemKey.fs | 6 +- src/fsharp/service/QuickParse.fs | 29 +- src/fsharp/service/QuickParse.fsi | 14 +- src/fsharp/service/SemanticClassification.fs | 6 +- src/fsharp/service/ServiceAssemblyContent.fs | 27 +- src/fsharp/service/ServiceDeclarationLists.fs | 10 +- src/fsharp/service/ServiceLexing.fs | 18 +- .../service/ServiceParamInfoLocations.fs | 5 +- src/fsharp/service/ServiceUntypedParse.fs | 1 + src/fsharp/service/service.fs | 2 +- src/fsharp/symbols/Exprs.fs | 116 ++-- src/fsharp/symbols/SymbolHelpers.fs | 48 +- src/fsharp/symbols/Symbols.fs | 84 ++- src/fsharp/symbols/Symbols.fsi | 8 +- src/fsharp/tainted.fs | 25 +- src/fsharp/tainted.fsi | 11 +- src/utils/CompilerLocationUtils.fs | 5 +- src/utils/reshapedmsbuild.fs | 4 + src/utils/sformat.fs | 11 +- .../ProvidedTypes/ProvidedTypes.fs | 1 - .../Microsoft.FSharp.Core/BigIntType.fs | 2 +- .../Microsoft.FSharp.Core/OptionModule.fs | 4 +- .../SurfaceArea.coreclr.fs | 14 + .../SurfaceArea.net40.fs | 14 + tests/fsharp/core/nullness/test.fsx | 412 ++++++++++++++ tests/fsharp/core/syntax/test.fsx | 6 +- .../literal-value-bug-1/test.il.bsl | 10 + tests/fsharp/tests.fs | 88 +++ ...n_return_type_and_known_type_arguments.bsl | 2 - ...n_return_type_and_known_type_arguments.fsx | 6 +- tests/fsharp/typecheck/sigs/neg04.bsl | 4 +- tests/fsharp/typecheck/sigs/neg20.bsl | 6 +- .../AsyncExpressionSteppingTest1.il.bsl | 16 +- .../AsyncExpressionSteppingTest2.il.bsl | 16 +- .../AsyncExpressionSteppingTest3.il.bsl | 18 +- .../AsyncExpressionSteppingTest4.il.bsl | 18 +- .../AsyncExpressionSteppingTest5.il.bsl | 16 +- .../AsyncExpressionSteppingTest6.il.bsl | 230 ++++---- .../EmittedIL/AttributeTargets/Default.il.bsl | 22 +- .../EmittedIL/AttributeTargets/Field.il.bsl | 28 +- .../AttributeTargets/Property.il.bsl | 28 +- .../CCtorDUWithMember01.il.bsl | 24 +- .../CCtorDUWithMember02.il.bsl | 18 +- .../CCtorDUWithMember03.il.bsl | 28 +- .../CCtorDUWithMember04.il.bsl | 20 +- .../Source/CodeGen/EmittedIL/CompareIL.cmd | 6 + .../CompiledNameAttribute01.il.bsl | 18 +- .../CompiledNameAttribute02.il.bsl | 22 +- .../CompiledNameAttribute03.il.bsl | 16 +- .../CompiledNameAttribute04.il.bsl | 22 +- .../ComputationExpr01.il.bsl | 18 +- .../ComputationExpr02.il.bsl | 18 +- .../ComputationExpr03.il.bsl | 38 +- .../ComputationExpr04.il.bsl | 18 +- .../ComputationExpr05.il.bsl | 18 +- .../ComputationExpr06.il.bsl | 18 +- .../ComputationExpr07.il.bsl | 18 +- ...tBoxStruct_ArrayOfArray_CSInterface.il.bsl | 18 +- ...tBoxStruct_ArrayOfArray_FSInterface.il.bsl | 28 +- ..._ArrayOfArray_FSInterface_NoExtMeth.il.bsl | 18 +- .../DoNotBoxStruct_Array_CSInterface.il.bsl | 18 +- .../DoNotBoxStruct_Array_FSInterface.il.bsl | 28 +- ...xStruct_Array_FSInterface_NoExtMeth.il.bsl | 32 +- .../DoNotBoxStruct_MDArray_CSInterface.il.bsl | 18 +- .../DoNotBoxStruct_MDArray_FSInterface.il.bsl | 28 +- ...truct_MDArray_FSInterface_NoExtMeth.il.bsl | 32 +- .../DoNotBoxStruct_NoArray_CSInterface.il.bsl | 18 +- .../DoNotBoxStruct_NoArray_FSInterface.il.bsl | 28 +- ...truct_NoArray_FSInterface_NoExtMeth.il.bsl | 32 +- .../DoNotBoxStruct_ToString.il.bsl | 16 +- .../GeneratedIterators/GenIter01.il.bsl | 18 +- .../GeneratedIterators/GenIter02.il.bsl | 18 +- .../GeneratedIterators/GenIter03.il.bsl | 18 +- .../GeneratedIterators/GenIter04.il.bsl | 18 +- .../InequalityComparison01.il.bsl | 18 +- .../InequalityComparison02.il.bsl | 18 +- .../InequalityComparison03.il.bsl | 18 +- .../InequalityComparison04.il.bsl | 18 +- .../InequalityComparison05.il.bsl | 18 +- .../ListExpressionSteppingTest1.il.bsl | 16 +- .../ListExpressionSteppingTest2.il.bsl | 16 +- .../ListExpressionSteppingTest3.il.bsl | 18 +- .../ListExpressionSteppingTest4.il.bsl | 18 +- .../ListExpressionSteppingTest5.il.bsl | 18 +- .../ListExpressionSteppingTest6.il.bsl | 16 +- ...hodImplAttribute.AggressiveInlining.il.bsl | 18 +- .../MethodImplAttribute.ForwardRef.il.bsl | 18 +- .../MethodImplAttribute.InternalCall.il.bsl | 18 +- .../MethodImplAttribute.NoInlining.il.bsl | 18 +- .../MethodImplAttribute.NoOptimization.il.bsl | 18 +- .../MethodImplAttribute.PreserveSig.il.bsl | 18 +- .../MethodImplAttribute.Synchronized.il.bsl | 18 +- .../MethodImplAttribute.Unmanaged.il.bsl | 18 +- .../EmittedIL/Misc/AbstractClass.il.bsl | 22 +- .../CodeGen/EmittedIL/Misc/AnonRecd.il.bsl | 18 +- .../Misc/ArgumentNamesInClosures01.il.bsl | 22 +- .../EmittedIL/Misc/CodeGenRenamings01.il.bsl | 18 +- .../CustomAttributeGenericParameter01.il.bsl | 18 +- .../CodeGen/EmittedIL/Misc/Decimal01.il.bsl | 14 +- .../EmittedIL/Misc/EntryPoint01.il.bsl | 18 +- .../EmittedIL/Misc/EqualsOnUnions01.il.bsl | 22 +- .../CodeGen/EmittedIL/Misc/ForLoop01.il.bsl | 14 +- .../CodeGen/EmittedIL/Misc/ForLoop02.il.bsl | 14 +- .../CodeGen/EmittedIL/Misc/ForLoop03.il.bsl | 18 +- .../Misc/GeneralizationOnUnions01.il.bsl | 22 +- .../Misc/GenericTypeStaticField01.il.bsl | 22 +- .../EmittedIL/Misc/IfThenElse01.il.bsl | 18 +- .../EmittedIL/Misc/LetIfThenElse01.il.bsl | 16 +- .../CodeGen/EmittedIL/Misc/Lock01.il.bsl | 18 +- .../CodeGen/EmittedIL/Misc/Marshal.il.bsl | 16 +- .../EmittedIL/Misc/MethodImplNoInline.il.bsl | 20 +- .../Misc/MethodImplNoInline02.il.bsl | 20 +- .../Misc/ModuleWithExpression01.il.bsl | 16 +- .../EmittedIL/Misc/NoBoxingOnDispose01.il.bsl | 18 +- .../Misc/NonEscapingArguments02.il.bsl | 22 +- .../CodeGen/EmittedIL/Misc/PreserveSig.il.bsl | 16 +- .../EmittedIL/Misc/Seq_for_all01.il.bsl | 18 +- .../CodeGen/EmittedIL/Misc/Structs01.il.bsl | 22 +- .../CodeGen/EmittedIL/Misc/Structs02.il.bsl | 22 +- .../Misc/StructsAsArrayElements01.il.bsl | 22 +- .../Misc/TryWith_NoFilterBlocks01.il.bsl | 14 +- .../Source/CodeGen/EmittedIL/Misc/cas.il.bsl | 22 +- .../Operators/comparison_decimal01.il.bsl | 14 +- .../Linq101Aggregates01.il.bsl | 18 +- .../Linq101ElementOperators01.il.bsl | 30 +- .../Linq101Grouping01.il.bsl | 36 +- .../Linq101Joins01.il.bsl | 30 +- .../Linq101Ordering01.il.bsl | 36 +- .../Linq101Partitioning01.il.bsl | 30 +- .../Linq101Quantifiers01.il.bsl | 36 +- .../Linq101Select01.il.bsl | 110 ++-- .../Linq101SetOperators01.il.bsl | 116 ++-- .../Linq101Where01.il.bsl | 82 +-- .../SeqExpressionSteppingTest1.il.bsl | 16 +- .../SeqExpressionSteppingTest2.il.bsl | 16 +- .../SeqExpressionSteppingTest3.il.bsl | 18 +- .../SeqExpressionSteppingTest4.il.bsl | 18 +- .../SeqExpressionSteppingTest5.il.bsl | 18 +- .../SeqExpressionSteppingTest6.il.bsl | 18 +- .../SeqExpressionSteppingTest7.il.bsl | 18 +- .../SeqExpressionTailCalls01.il.bsl | 16 +- .../SeqExpressionTailCalls02.il.bsl | 18 +- .../ToplevelModule.il.bsl | 2 +- .../ToplevelNamespace.il.bsl | 2 +- .../EmittedIL/StaticInit/LetBinding01.il.bsl | 18 +- .../StaticInit/StaticInit_Class01.il.bsl | 28 +- .../StaticInit/StaticInit_Module01.il.bsl | 22 +- .../StaticInit/StaticInit_Struct01.il.bsl | 22 +- .../SteppingMatch/SteppingMatch01.il.bsl | 18 +- .../SteppingMatch/SteppingMatch02.il.bsl | 18 +- .../SteppingMatch/SteppingMatch03.il.bsl | 18 +- .../SteppingMatch/SteppingMatch04.il.bsl | 18 +- .../SteppingMatch/SteppingMatch05.il.bsl | 18 +- .../SteppingMatch/SteppingMatch06.il.bsl | 22 +- .../SteppingMatch/SteppingMatch07.il.bsl | 22 +- .../SteppingMatch/SteppingMatch08.il.bsl | 16 +- .../SteppingMatch/SteppingMatch09.il.bsl | 18 +- .../TestFunctions/TestFunction1.il.bsl | 18 +- .../TestFunctions/TestFunction10.il.bsl | 18 +- .../TestFunctions/TestFunction13.il.bsl | 16 +- .../TestFunctions/TestFunction14.il.bsl | 18 +- .../TestFunctions/TestFunction16.il.bsl | 22 +- .../TestFunctions/TestFunction17.il.bsl | 22 +- .../TestFunctions/TestFunction19.il.bsl | 22 +- .../TestFunctions/TestFunction20.il.bsl | 22 +- .../TestFunctions/TestFunction21.il.bsl | 22 +- .../TestFunctions/TestFunction23.il.bsl | 22 +- .../TestFunctions/TestFunction24.il.bsl | 22 +- .../TestFunctions/TestFunction3b.il.bsl | 18 +- .../TestFunctions/TestFunction3c.il.bsl | 18 +- .../TestFunctions/TestFunction9b4.il.bsl | 18 +- .../TestFunctions/Testfunction11.il.bsl | 16 +- .../TestFunctions/Testfunction12.il.bsl | 18 +- .../TestFunctions/Testfunction15.il.bsl | 18 +- .../TestFunctions/Testfunction18.il.bsl | 18 +- .../TestFunctions/Testfunction2.il.bsl | 18 +- .../TestFunctions/Testfunction22.il.bsl | 12 +- .../TestFunctions/Testfunction22b.il.bsl | 14 +- .../TestFunctions/Testfunction22c.il.bsl | 14 +- .../TestFunctions/Testfunction22d.il.bsl | 14 +- .../TestFunctions/Testfunction22e.il.bsl | 14 +- .../TestFunctions/Testfunction22f.il.bsl | 14 +- .../TestFunctions/Testfunction22g.il.bsl | 14 +- .../TestFunctions/Testfunction22h.il.bsl | 14 +- .../TestFunctions/Testfunction3.il.bsl | 18 +- .../TestFunctions/Testfunction4.il.bsl | 18 +- .../TestFunctions/Testfunction5.il.bsl | 18 +- .../TestFunctions/Testfunction6.il.bsl | 16 +- .../TestFunctions/Testfunction7.il.bsl | 16 +- .../TestFunctions/Testfunction8.il.bsl | 16 +- .../TestFunctions/Testfunction9.il.bsl | 16 +- .../TestFunctions/Testfunction9b.il.bsl | 16 +- .../TestFunctions/Testfunction9b1.il.bsl | 16 +- .../TestFunctions/Testfunction9b2.il.bsl | 16 +- .../TestFunctions/Testfunction9b3.il.bsl | 16 +- .../EmittedIL/Tuples/OptionalArg01.il.bsl | 20 +- .../CodeGen/EmittedIL/Tuples/Tuple01.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple02.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple03.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple04.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple05.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple06.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple07.il.bsl | 14 +- .../CodeGen/EmittedIL/Tuples/Tuple08.il.bsl | 14 +- .../EmittedIL/Tuples/TupleElimination.il.bsl | 16 +- .../EmittedIL/Tuples/TupleMonster.il.bsl | 12 +- .../Tuples/ValueTupleAliasConstructor.il.bsl | 25 +- .../Source/CodeGen/LazyNoInline01.il.bsl | 8 + .../fsc/help/help40.437.1033.bsl | 2 + .../fsc/nologo/logo.437.1033.bsl | 2 +- .../fsi/exename/help40.437.1033.bsl | 2 + .../fsi/help/help40-nologo.437.1033.bsl | 4 +- .../fsi/help/help40.437.1033.bsl | 4 +- .../BindingExpressions/Binding/in05.fs | 2 +- .../E_Sealed_Member_Override02.fsx | 8 +- .../E_Sealed_Member_Override03.fsx | 4 +- .../fsharpqa/Source/Import/E_SealedMethod.fs | 2 +- .../Source/Optimizations/CompareIL.cmd | 7 + .../ForLoop/ForEachOnArray01.il.bsl | 16 +- .../ForLoop/ForEachOnList01.il.bsl | 18 +- .../ForLoop/ForEachOnString01.il.bsl | 18 +- .../ForLoop/NoAllocationOfTuple01.il.bsl | 16 +- .../ForLoop/NoIEnumerable01.il.bsl | 18 +- .../ForLoop/NoIEnumerable02.il.bsl | 18 +- .../ForLoop/NoIEnumerable03.il.bsl | 18 +- .../ForLoop/ZeroToArrLength01.il.bsl | 16 +- .../ForLoop/ZeroToArrLength02.il.bsl | 16 +- .../GenericComparison/Compare01.il.bsl | 16 +- .../GenericComparison/Compare02.il.bsl | 18 +- .../GenericComparison/Compare03.il.bsl | 16 +- .../GenericComparison/Compare04.il.bsl | 16 +- .../GenericComparison/Compare05.il.bsl | 22 +- .../GenericComparison/Compare06.il.bsl | 22 +- .../GenericComparison/Compare07.il.bsl | 22 +- .../GenericComparison/Compare08.il.bsl | 16 +- .../GenericComparison/Compare09.il.bsl | 16 +- .../GenericComparison/Compare10.il.bsl | 22 +- .../GenericComparison/Compare11.il.bsl | 16 +- .../GenericComparison/Equals01.il.bsl | 18 +- .../GenericComparison/Equals02.il.bsl | 24 +- .../GenericComparison/Equals03.il.bsl | 16 +- .../GenericComparison/Equals04.il.bsl | 22 +- .../GenericComparison/Equals05.il.bsl | 22 +- .../GenericComparison/Equals06.il.bsl | 22 +- .../GenericComparison/Equals07.il.bsl | 16 +- .../GenericComparison/Equals08.il.bsl | 16 +- .../GenericComparison/Equals09.il.bsl | 22 +- .../GenericComparison/Hash01.il.bsl | 18 +- .../GenericComparison/Hash02.il.bsl | 20 +- .../GenericComparison/Hash03.il.bsl | 16 +- .../GenericComparison/Hash04.il.bsl | 16 +- .../GenericComparison/Hash05.il.bsl | 22 +- .../GenericComparison/Hash06.il.bsl | 22 +- .../GenericComparison/Hash07.il.bsl | 18 +- .../GenericComparison/Hash08.il.bsl | 22 +- .../GenericComparison/Hash09.il.bsl | 22 +- .../GenericComparison/Hash10.il.bsl | 18 +- .../GenericComparison/Hash11.il.bsl | 18 +- .../GenericComparison/Hash12.il.bsl | 22 +- .../Optimizations/Inlining/Match01.il.bsl | 20 +- .../Optimizations/Inlining/Match02.il.bsl | 20 +- .../Inlining/StructUnion01.il.bsl | 20 +- tests/fsharpqa/Source/test.lst | 2 - tests/service/ExprTests.fs | 6 + tests/service/data/TestTP/ProvidedTypes.fs | 14 +- .../BraceCompletionSessionProvider.fs | 30 +- .../ClassificationDefinitions.fs | 10 +- .../CodeLens/CodeLensProvider.fs | 4 +- .../CodeLens/FSharpCodeLensService.fs | 24 +- .../Commands/FsiCommandService.fs | 5 +- .../src/FSharp.Editor/Common/Extensions.fs | 4 +- .../src/FSharp.Editor/Common/Logging.fs | 4 +- vsintegration/src/FSharp.Editor/Common/Vs.fs | 6 +- .../Completion/CompletionProvider.fs | 4 +- .../src/FSharp.Editor/FSharp.Editor.fsproj | 1 + .../LanguageService/FSharpEditorFactory.fs | 6 +- .../LanguageService/LanguageService.fs | 4 +- .../LegacyProjectWorkspaceMap.fs | 2 +- .../Navigation/GoToDefinition.fs | 8 +- .../Navigation/NavigableSymbolsService.fs | 7 +- .../Navigation/NavigationBarItemService.fs | 2 +- .../QuickInfo/QuickInfoProvider.fs | 6 +- .../src/FSharp.VS.FSI/fsiPackageHooks.fs | 2 +- vsintegration/src/FSharp.VS.FSI/sessions.fs | 6 +- .../ProvidedTypes.fs | 14 +- .../Tests.LanguageService.ErrorList.fs | 4 + 379 files changed, 7548 insertions(+), 3835 deletions(-) create mode 100644 tests/fsharp/core/nullness/test.fsx diff --git a/DEVGUIDE.md b/DEVGUIDE.md index 712ac7eb5f0..6b4eb413d4e 100644 --- a/DEVGUIDE.md +++ b/DEVGUIDE.md @@ -113,6 +113,17 @@ If your changes involve modifying the list of language keywords in any way, (e.g This only works on Windows/.NETStandard framework, so changing this from any other platform requires editing and syncing all of the XLF files manually. +## Updating baselines in tests + +Some tests use "baseline" files. There is sometimes a way to update these baselines en-masse in your local build, +useful when some change affects many baselines. For example, in the 'fsharpqa' tests the baselines +are updated using scripts or utilities that allow the following environment variable to be set: + +``` +set TEST_UPDATE_BSL=1 +``` + + ## Developing the F# tools for Visual Studio As you would expect, doing this requires both Windows and Visual Studio are installed. diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props index 65cfa205e64..7aaf0e342cc 100644 --- a/FSharp.Profiles.props +++ b/FSharp.Profiles.props @@ -1,6 +1,9 @@ + + BUILDING_WITH_LKG;$(DefineConstants) + $(DefineConstants);CROSS_PLATFORM_COMPILER diff --git a/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj b/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj index a070bb8cdac..96d45773268 100644 --- a/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj +++ b/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj @@ -11,6 +11,7 @@ false true true + $(DefineConstants);USES_FSHARP_CORE_45_PACKAGE diff --git a/fcs/FSharp.Compiler.Service/AssemblyInfo.fs b/fcs/FSharp.Compiler.Service/AssemblyInfo.fs index 90521fefd5a..0381c7d51d1 100644 --- a/fcs/FSharp.Compiler.Service/AssemblyInfo.fs +++ b/fcs/FSharp.Compiler.Service/AssemblyInfo.fs @@ -53,10 +53,10 @@ open System.Runtime.InteropServices [] // Until dotnet sdk can version assemblies, use this -#if BUILD_FROM_SOURCE -[] -[] -[] -#endif +//#if BUILD_FROM_SOURCE +//[] +//[] +//[] +//#endif do() \ No newline at end of file diff --git a/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj b/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj index 0fa0a2a53ca..c6ccf20a4db 100644 --- a/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj +++ b/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj @@ -7,6 +7,7 @@ true $(DefineConstants);COMPILER_SERVICE_AS_DLL $(DefineConstants);COMPILER + $(DefineConstants);BUILD_FROM_SOURCE $(DefineConstants);ENABLE_MONO_SUPPORT $(DefineConstants);NO_STRONG_NAMES $(DefineConstants);LOCALIZATION_FSCOMP diff --git a/src/absil/bytes.fs b/src/absil/bytes.fs index 52d041c367a..11e37b6c669 100644 --- a/src/absil/bytes.fs +++ b/src/absil/bytes.fs @@ -391,10 +391,15 @@ type ByteMemory with static member FromArray bytes = ByteArrayMemory.FromArray(bytes, 0, bytes.Length) + static member Empty with get() = ByteMemory.FromArray [| |] + type internal ByteStream = { bytes: ReadOnlyByteMemory mutable pos: int max: int } + + member b.IsEOF = (b.pos >= b.max) + member b.ReadByte() = if b.pos >= b.max then failwith "end of stream" let res = b.bytes.[b.pos] diff --git a/src/absil/bytes.fsi b/src/absil/bytes.fsi index 55a48e3e461..7e2090fdd93 100644 --- a/src/absil/bytes.fsi +++ b/src/absil/bytes.fsi @@ -104,6 +104,9 @@ type ByteMemory with /// Creates a ByteMemory object that is backed by a byte array. static member FromArray: bytes: byte[] -> ByteMemory + /// Gets a ByteMemory object that is empty + static member Empty: ByteMemory + /// Imperative buffers and streams of byte[] [] type internal ByteBuffer = @@ -125,6 +128,7 @@ type internal ByteBuffer = [] type internal ByteStream = + member IsEOF : bool member ReadByte : unit -> byte member ReadBytes : int -> ReadOnlyByteMemory member ReadUtf8String : int -> string diff --git a/src/absil/illib.fs b/src/absil/illib.fs index 33e0566a6c2..6d4d71fb9dd 100644 --- a/src/absil/illib.fs +++ b/src/absil/illib.fs @@ -20,6 +20,11 @@ let notlazy v = Lazy<_>.CreateFromValue v let inline isNil l = List.isEmpty l +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v +let inline nonNull<'T> (x: 'T) = x +#endif + /// Returns true if the list has less than 2 elements. Otherwise false. let inline isNilOrSingleton l = match l with @@ -34,9 +39,6 @@ let inline isSingleton l = | _ -> false let inline isNonNull x = not (isNull x) - -let inline nonNull msg x = if isNull x then failwith ("null: " + msg) else x - let inline (===) x y = LanguagePrimitives.PhysicalEquality x y /// Per the docs the threshold for the Large Object Heap is 85000 bytes: https://docs.microsoft.com/en-us/dotnet/standard/garbage-collection/large-object-heap#how-an-object-ends-up-on-the-large-object-heap-and-how-gc-handles-them @@ -66,14 +68,17 @@ let reportTime = type InlineDelayInit<'T when 'T : not struct> = new (f: unit -> 'T) = {store = Unchecked.defaultof<'T>; func = Func<_>(f) } val mutable store : 'T +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val mutable func : Func<'T> - +#else + val mutable func : Func<'T> ? +#endif member x.Value = match x.func with | null -> x.store | _ -> let res = LazyInitializer.EnsureInitialized(&x.store, x.func) - x.func <- Unchecked.defaultof<_> + x.func <- null res //------------------------------------------------------------------------- @@ -197,9 +202,7 @@ module Array = /// ~0.8x slower for ints let inline areEqual (xs: 'T []) (ys: 'T []) = match xs, ys with - | null, null -> true | [||], [||] -> true - | null, _ | _, null -> false | _ when xs.Length <> ys.Length -> false | _ -> let mutable break' = false @@ -223,8 +226,7 @@ module Array = /// check if subArray is found in the wholeArray starting /// at the provided index let inline isSubArray (subArray: 'T []) (wholeArray:'T []) index = - if isNull subArray || isNull wholeArray then false - elif subArray.Length = 0 then true + if subArray.Length = 0 then true elif subArray.Length > wholeArray.Length then false elif subArray.Length = wholeArray.Length then areEqual subArray wholeArray else let rec loop subidx idx = @@ -536,9 +538,6 @@ module String = String strArr let extractTrailingIndex (str: string) = - match str with - | null -> null, None - | _ -> let charr = str.ToCharArray() Array.revInPlace charr let digits = Array.takeWhile Char.IsDigit charr @@ -548,13 +547,9 @@ module String = | "" -> str, None | index -> str.Substring (0, str.Length - index.Length), Some (int index) - /// Remove all trailing and leading whitespace from the string - /// return null if the string is null - let trim (value: string) = if isNull value then null else value.Trim() - /// Splits a string into substrings based on the strings in the array separators let split options (separator: string []) (value: string) = - if isNull value then null else value.Split(separator, options) + value.Split(separator, options) let (|StartsWith|_|) pattern value = if String.IsNullOrWhiteSpace value then @@ -1008,7 +1003,7 @@ type LazyWithContext<'T, 'ctxt> = /// This field holds either the function to run or a LazyWithContextFailure object recording the exception raised /// from running the function. It is null if the thunk has been evaluated successfully. - mutable funcOrException: obj + mutable funcOrException: obj /// A helper to ensure we rethrow the "original" exception findOriginalException : exn -> exn } @@ -1331,14 +1326,32 @@ module Shim = member __.IsPathRootedShim (path: string) = Path.IsPathRooted path member __.IsInvalidPathShim(path: string) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let isInvalidPath(p: string) = - String.IsNullOrEmpty p || p.IndexOfAny(Path.GetInvalidPathChars()) <> -1 - +#else + let isInvalidPath(p: string?) = +#endif + match p with + | null | "" -> true + | NonNull p -> p.IndexOfAny(Path.GetInvalidPathChars()) <> -1 + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let isInvalidFilename(p: string) = - String.IsNullOrEmpty p || p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1 - +#else + let isInvalidFilename(p: string?) = +#endif + match p with + | null | "" -> true + | NonNull p -> p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1 + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let isInvalidDirectory(d: string) = - d=null || d.IndexOfAny(Path.GetInvalidPathChars()) <> -1 +#else + let isInvalidDirectory(d: string?) = +#endif + match d with + | null -> true + | NonNull d -> d.IndexOfAny(Path.GetInvalidPathChars()) <> -1 isInvalidPath path || let directory = Path.GetDirectoryName path diff --git a/src/absil/ilread.fs b/src/absil/ilread.fs index c5338db90f4..3b73a5ab8f7 100644 --- a/src/absil/ilread.fs +++ b/src/absil/ilread.fs @@ -683,7 +683,11 @@ type GenericParamsIdx = GenericParamsIdx of int * TypeOrMethodDefTag * int let mkCacheInt32 lowMem _inbase _nm _sz = if lowMem then (fun f x -> f x) else +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let cache = ref null +#else + let cache : Dictionary<_,_>? ref = ref null // TODO NULLNESS: this explicit annotation should not be needed +#endif let count = ref 0 #if STATISTICS addReport (fun oc -> if !count <> 0 then oc.WriteLine ((_inbase + string !count + " "+ _nm + " cache hits"): string)) @@ -691,9 +695,12 @@ let mkCacheInt32 lowMem _inbase _nm _sz = fun f (idx: int32) -> let cache = match !cache with - | null -> cache := new Dictionary(11) - | _ -> () - !cache + | null -> + let c = new Dictionary(11) + cache := c + c + | NonNull c -> c + match cache.TryGetValue idx with | true, res -> incr count @@ -705,7 +712,11 @@ let mkCacheInt32 lowMem _inbase _nm _sz = let mkCacheGeneric lowMem _inbase _nm _sz = if lowMem then (fun f x -> f x) else +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let cache = ref null +#else + let cache : Dictionary<_,_>? ref = ref null // TODO NULLNESS: this explicit annotation should not be needed +#endif let count = ref 0 #if STATISTICS addReport (fun oc -> if !count <> 0 then oc.WriteLine ((_inbase + string !count + " " + _nm + " cache hits"): string)) @@ -713,10 +724,13 @@ let mkCacheGeneric lowMem _inbase _nm _sz = fun f (idx :'T) -> let cache = match !cache with - | null -> cache := new Dictionary<_, _>(11 (* sz: int *) ) - | _ -> () - !cache - match cache.TryGetValue idx with + | null -> + let c = new Dictionary<_, _>(11) + cache := c + c + | NonNull c -> c + + match cache.TryGetValue(idx) with | true, v -> incr count v @@ -3030,7 +3044,7 @@ and seekReadManifestResources (ctxt: ILMetadataReader) canReduceMemory (mdv: Bin let bytes = let bytes = pevEager.Slice(offsetOfBytesFromStartOfPhysicalPEFile, resourceLength) // If we are trying to reduce memory, create a memory mapped file based on the contents. - if canReduceMemory then + if canReduceMemory && resourceLength > 0 then ByteMemory.CreateMemoryMappedFile bytes else ByteMemory.FromArray(bytes.ToArray()) diff --git a/src/absil/ilreflect.fs b/src/absil/ilreflect.fs index 7f048dd5b96..28cdf1601dd 100644 --- a/src/absil/ilreflect.fs +++ b/src/absil/ilreflect.fs @@ -393,10 +393,15 @@ let emEnv0 = emEntryPts = [] delayedFieldInits = [] } -let envBindTypeRef emEnv (tref: ILTypeRef) (typT, typB, typeDef) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type, typB, typeDef)= +#else +let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type?, typB, typeDef)= +#endif match typT with | null -> failwithf "binding null type in envBindTypeRef: %s\n" tref.Name - | _ -> {emEnv with emTypMap = Zmap.add tref (typT, typB, typeDef, None) emEnv.emTypMap} + | NonNull typT -> + {emEnv with emTypMap = Zmap.add tref (typT, typB, typeDef, None) emEnv.emTypMap} let envUpdateCreatedTypeRef emEnv (tref: ILTypeRef) = // The tref's TypeBuilder has been created, so we have a Type proper. @@ -425,14 +430,10 @@ let envUpdateCreatedTypeRef emEnv (tref: ILTypeRef) = emEnv let convTypeRef cenv emEnv preferCreated (tref: ILTypeRef) = - let res = - match Zmap.tryFind tref emEnv.emTypMap with - | Some (_typT, _typB, _typeDef, Some createdTy) when preferCreated -> createdTy - | Some (typT, _typB, _typeDef, _) -> typT - | None -> convTypeRefAux cenv tref - match res with - | null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tref.QualifiedName, tref.Scope.QualifiedName), range0)) - | _ -> res + match Zmap.tryFind tref emEnv.emTypMap with + | Some (_typT, _typB, _typeDef, Some createdTy) when preferCreated -> createdTy + | Some (typT, _typB, _typeDef, _) -> typT + | None -> convTypeRefAux cenv tref let envBindConsRef emEnv (mref: ILMethodRef) consB = {emEnv with emConsMap = Zmap.add mref consB emEnv.emConsMap} @@ -534,7 +535,7 @@ let rec convTypeSpec cenv emEnv preferCreated (tspec: ILTypeSpec) = | _, false -> null match res with | null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tspec.TypeRef.QualifiedName, tspec.Scope.QualifiedName), range0)) - | _ -> res + | NonNull res -> res and convTypeAux cenv emEnv preferCreated ty = match ty with @@ -673,7 +674,7 @@ let queryableTypeGetField _emEnv (parentT: Type) (fref: ILFieldRef) = let res = parentT.GetField(fref.Name, BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance ||| BindingFlags.Static ) match res with | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fref.Name, fref.DeclaringTypeRef.FullName, fref.DeclaringTypeRef.Scope.QualifiedName), range0)) - | _ -> res + | NonNull res -> res let nonQueryableTypeGetField (parentTI: Type) (fieldInfo: FieldInfo) : FieldInfo = let res = @@ -681,10 +682,10 @@ let nonQueryableTypeGetField (parentTI: Type) (fieldInfo: FieldInfo) : FieldInfo else fieldInfo match res with | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fieldInfo.Name, parentTI.AssemblyQualifiedName, parentTI.Assembly.FullName), range0)) - | _ -> res + | NonNull res -> res -let convFieldSpec cenv emEnv fspec = +let convFieldSpec cenv emEnv fspec : FieldInfo = let fref = fspec.FieldRef let tref = fref.DeclaringTypeRef let parentTI = convType cenv emEnv fspec.DeclaringType @@ -776,8 +777,8 @@ let queryableTypeGetMethodBySearch cenv emEnv parentT (mref: ILMethodRef) = failwithf "convMethodRef: could not bind to method '%A' of type '%s'" (System.String.Join(", ", methNames)) parentT.AssemblyQualifiedName | Some methInfo -> methInfo (* return MethodInfo for (generic) type's (generic) method *) -let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) = - assert(not (typeIsNotQueryable parentT)) +let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo = + assert(not (typeIsNotQueryable(parentT))) if mref.GenericArity = 0 then let tyargTs = getGenericArgumentsOfType parentT let argTs, resT = @@ -792,7 +793,11 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) = parentT.GetMethod(mref.Name, cconv ||| BindingFlags.Public ||| BindingFlags.NonPublic, null, argTs, +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE (null: ParameterModifier[])) +#else + (null:ParameterModifier[]?)) +#endif // This can fail if there is an ambiguity w.r.t. return type with _ -> null if (isNonNull methInfo && equalTypes resT methInfo.ReturnType) then @@ -802,13 +807,17 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) = else queryableTypeGetMethodBySearch cenv emEnv parentT mref -let nonQueryableTypeGetMethod (parentTI: Type) (methInfo: MethodInfo) : MethodInfo = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo = +#else +let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo? = +#endif if (parentTI.IsGenericType && not (equalTypes parentTI (getTypeConstructor parentTI))) then TypeBuilder.GetMethod(parentTI, methInfo ) else methInfo -let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) = +let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) : MethodInfo = let parent = mref.DeclaringTypeRef let res = if isEmittedTypeRef emEnv parent then @@ -826,7 +835,7 @@ let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) = queryableTypeGetMethod cenv emEnv parentTI mref match res with | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("method", mref.Name, parentTI.FullName, parentTI.Assembly.FullName), range0)) - | _ -> res + | NonNull res -> res //---------------------------------------------------------------------------- // convMethodSpec @@ -844,19 +853,26 @@ let convMethodSpec cenv emEnv (mspec: ILMethodSpec) = methInfo methInfo -/// Get a constructor on a non-TypeBuilder type -let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) = - let tyargTs = getGenericArgumentsOfType parentT - let reqArgTs = +//---------------------------------------------------------------------------- +// - QueryableTypeGetConstructors: get a constructor on a non-TypeBuilder type +//---------------------------------------------------------------------------- + +let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) : ConstructorInfo = + let tyargTs = getGenericArgumentsOfType parentT + let reqArgTs = let emEnv = envPushTyvars emEnv tyargTs convTypesToArray cenv emEnv mref.ArgTypes let res = parentT.GetConstructor(BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance, null, reqArgTs, null) match res with | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName), range0)) - | _ -> res + | NonNull res -> res -let nonQueryableTypeGetConstructor (parentTI: Type) (consInfo: ConstructorInfo) : ConstructorInfo = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo = +#else +let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo? = +#endif if parentTI.IsGenericType then TypeBuilder.GetConstructor(parentTI, consInfo) else consInfo /// convConstructorSpec (like convMethodSpec) @@ -877,7 +893,7 @@ let convConstructorSpec cenv emEnv (mspec: ILMethodSpec) = queryableTypeGetConstructor cenv emEnv parentTI mref match res with | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", "", parentTI.FullName, parentTI.Assembly.FullName), range0)) - | _ -> res + | NonNull res -> res let emitLabelMark emEnv (ilG: ILGenerator) (label: ILCodeLabel) = let lab = envGetLabel emEnv label @@ -950,17 +966,17 @@ let getGenericMethodDefinition q (ty: Type) = let getArrayMethInfo n ty = match n with - | 2 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.GetArray2D null 0 0 @@> ty - | 3 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.GetArray3D null 0 0 0 @@> ty - | 4 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.GetArray4D null 0 0 0 0 @@> ty + | 2 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.GetArray2D Unchecked.defaultof<_> 0 0 @@> ty + | 3 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.GetArray3D Unchecked.defaultof<_> 0 0 0 @@> ty + | 4 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.GetArray4D Unchecked.defaultof<_> 0 0 0 0 @@> ty | _ -> invalidArg "n" "not expecting array dimension > 4" let setArrayMethInfo n ty = match n with - | 2 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray2D null 0 0 0 @@> ty - | 3 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray3D null 0 0 0 0 @@> ty - | 4 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray4D null 0 0 0 0 0 @@> ty - | _ -> invalidArg "n" "not expecting array dimension > 4" + | 2 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray2D Unchecked.defaultof<_> 0 0 0 @@> ty + | 3 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray3D Unchecked.defaultof<_> 0 0 0 0 @@> ty + | 4 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray4D Unchecked.defaultof<_> 0 0 0 0 0 @@> ty + | _ -> invalidArg "n" "not expecting array dimension > 4" //---------------------------------------------------------------------------- @@ -1266,15 +1282,15 @@ let rec emitInstr cenv (modB: ModuleBuilder) emEnv (ilG: ILGenerator) instr = setArrayMethInfo shape.Rank ety else #endif - modB.GetArrayMethodAndLog (aty, "Set", System.Reflection.CallingConventions.HasThis, (null: Type), Array.append (Array.create shape.Rank (typeof)) (Array.ofList [ ety ])) + modB.GetArrayMethodAndLog(aty, "Set", System.Reflection.CallingConventions.HasThis, null, Array.append (Array.create shape.Rank (typeof)) (Array.ofList [ ety ])) ilG.EmitAndLog (OpCodes.Call, meth) | I_newarr (shape, ty) -> if (shape = ILArrayShape.SingleDimensional) then ilG.EmitAndLog (OpCodes.Newarr, convType cenv emEnv ty) else - let aty = convType cenv emEnv (ILType.Array(shape, ty)) - let meth = modB.GetArrayMethodAndLog (aty, ".ctor", System.Reflection.CallingConventions.HasThis, (null: Type), Array.create shape.Rank (typeof)) + let aty = convType cenv emEnv (ILType.Array(shape, ty)) + let meth = modB.GetArrayMethodAndLog(aty, ".ctor", System.Reflection.CallingConventions.HasThis, null, Array.create shape.Rank (typeof)) ilG.EmitAndLog (OpCodes.Newobj, meth) | I_ldlen -> ilG.EmitAndLog OpCodes.Ldlen @@ -1405,10 +1421,7 @@ let emitMethodBody cenv modB emEnv ilG _name (mbody: ILLazyMethodBody) = | MethodBody.NotAvailable -> failwith "emitMethodBody: metadata only" let convCustomAttr cenv emEnv (cattr: ILAttribute) = - let methInfo = - match convConstructorSpec cenv emEnv cattr.Method with - | null -> failwithf "convCustomAttr: %+A" cattr.Method - | res -> res + let methInfo = convConstructorSpec cenv emEnv cattr.Method let data = getCustomAttrData cenv.ilg cattr (methInfo, data) diff --git a/src/absil/ilsign.fs b/src/absil/ilsign.fs index 6fbc1ca4525..1061f542c70 100644 --- a/src/absil/ilsign.fs +++ b/src/absil/ilsign.fs @@ -10,6 +10,7 @@ open System.Collections.Immutable open System.Reflection.PortableExecutable open System.Security.Cryptography open System.Runtime.InteropServices +open FSharp.Compiler.AbstractIL.Internal.Library type KeyType = | Public @@ -141,10 +142,18 @@ open System.Runtime.InteropServices key.D <- reader.ReadBigInteger byteLen key - let toCLRKeyBlob (rsaParameters:RSAParameters) (algId:int) : byte[] = - let validateRSAField (field:byte[]) expected (name:string) = - if field <> null && field.Length <> expected then - raise (CryptographicException(String.Format(getResourceString(FSComp.SR.ilSignInvalidRSAParams()), name))) + let toCLRKeyBlob (rsaParameters: RSAParameters) (algId: int) : byte[] = + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let validateRSAField (field: byte[]) expected (name: string) = +#else + let validateRSAField (field: byte[]?) expected (name: string) = +#endif + match field with + | null -> () + | NonNull field -> + if field.Length <> expected then + raise (CryptographicException(String.Format(getResourceString(FSComp.SR.ilSignInvalidRSAParams()), name))) // The original FCall this helper emulates supports other algId's - however, the only algid we need to support is CALG_RSA_KEYX. We will not port the codepaths dealing with other algid's. if algId <> CALG_RSA_KEYX then raise (CryptographicException(getResourceString(FSComp.SR.ilSignInvalidAlgId()))) diff --git a/src/absil/ilsupp.fs b/src/absil/ilsupp.fs index 57734863883..0eca9578335 100644 --- a/src/absil/ilsupp.fs +++ b/src/absil/ilsupp.fs @@ -808,7 +808,11 @@ type ISymUnmanagedWriter2 = abstract GetDebugInfo: iDD: ImageDebugDirectory byref * cData: int * pcData: int byref * - []data: byte[] -> unit +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + []data : byte[] -> unit +#else + []data : byte[]? -> unit +#endif abstract DefineSequencePoints: document: ISymUnmanagedDocumentWriter * spCount: int * []offsets: int [] * @@ -1020,17 +1024,14 @@ let pdbReadOpen (moduleName: string) (path: string) : PdbReader = let importerPtr = Marshal.GetComInterfaceForObject(o, typeof) try #if ENABLE_MONO_SUPPORT - // ISymWrapper.dll is not available as a compile-time dependency for the cross-platform compiler, since it is Windows-only - // Access it via reflection instead.System.Diagnostics.SymbolStore.SymBinder - try - let isym = System.Reflection.Assembly.Load("ISymWrapper, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") - let symbolBinder = isym.CreateInstance("System.Diagnostics.SymbolStore.SymBinder") - let symbolBinderTy = symbolBinder.GetType() - let reader = symbolBinderTy.InvokeMember("GetReader", BindingFlags.Public ||| BindingFlags.InvokeMethod ||| BindingFlags.Instance, null, symbolBinder, [| box importerPtr; box moduleName; box path |]) - { symReader = reader :?> ISymbolReader } - with _ -> - { symReader = null } -#else + // ISymWrapper.dll is not available as a compile-time dependency for the cross-platform compiler, since it is Windows-only + // Access it via reflection instead.System.Diagnostics.SymbolStore.SymBinder + let isym = System.Reflection.Assembly.Load("ISymWrapper, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") + let symbolBinder = isym.CreateInstance("System.Diagnostics.SymbolStore.SymBinder") + let symbolBinderTy = symbolBinder.GetType() + let reader = symbolBinderTy.InvokeMember("GetReader",BindingFlags.Public ||| BindingFlags.InvokeMethod ||| BindingFlags.Instance, null,symbolBinder,[| box importerPtr; box moduleName; box path |]) + { symReader = reader :?> ISymbolReader } +#else let symbolBinder = new System.Diagnostics.SymbolStore.SymBinder() { symReader = symbolBinder.GetReader(importerPtr, moduleName, path) } #endif diff --git a/src/absil/ilwritepdb.fs b/src/absil/ilwritepdb.fs index 564cd99083d..89ac7cc596b 100644 --- a/src/absil/ilwritepdb.fs +++ b/src/absil/ilwritepdb.fs @@ -267,10 +267,7 @@ let getRowCounts tableRowCounts = let generatePortablePdb (embedAllSource: bool) (embedSourceList: string list) (sourceLink: string) checksumAlgorithm showTimes (info: PdbData) (pathMap: PathMap) = sortMethods showTimes info let externalRowCounts = getRowCounts info.TableRowCounts - let docs = - match info.Documents with - | null -> Array.empty - | _ -> info.Documents + let docs = info.Documents let metadata = MetadataBuilder() let serializeDocumentName (name: string) = @@ -369,12 +366,9 @@ let generatePortablePdb (embedAllSource: bool) (embedSourceList: string list) (s info.Methods |> Array.iter (fun minfo -> let docHandle, sequencePointBlob = let sps = - match minfo.SequencePoints with - | null -> Array.empty - | _ -> - match minfo.Range with - | None -> Array.empty - | Some (_,_) -> minfo.SequencePoints + match minfo.Range with + | None -> Array.empty + | Some (_,_) -> minfo.SequencePoints let builder = new BlobBuilder() builder.WriteCompressedInteger(minfo.LocalSignatureToken) diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs index 8a8fe702846..421f0bc82fd 100644 --- a/src/fsharp/AccessibilityLogic.fs +++ b/src/fsharp/AccessibilityLogic.fs @@ -11,6 +11,7 @@ open FSharp.Compiler.TypedTree open FSharp.Compiler.TypedTreeBasics open FSharp.Compiler.TypedTreeOps open FSharp.Compiler.TcGlobals +open FSharp.Compiler.AbstractIL.Internal.Library #if !NO_EXTENSIONTYPING open FSharp.Compiler.ExtensionTyping @@ -82,7 +83,7 @@ let private IsILMemberAccessible g amap m (tcrefOfViewedItem : TyconRef) ad acce match tcrefViewedFromOption with | None -> false | Some tcrefViewedFrom -> - ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef tcrefViewedFrom) tcrefOfViewedItem) + ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef g tcrefViewedFrom) tcrefOfViewedItem) let accessibleByInternalsVisibleTo = (access = ILMemberAccess.Assembly || access = ILMemberAccess.FamilyOrAssembly) && @@ -94,7 +95,7 @@ let private IsILMemberAccessible g amap m (tcrefOfViewedItem : TyconRef) ad acce match tcrefViewedFromOption with | None -> false | Some tcrefViewedFrom -> - ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef tcrefViewedFrom) tcrefOfViewedItem + ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef g tcrefViewedFrom) tcrefOfViewedItem (access = ILMemberAccess.Public) || accessibleByFamily || accessibleByInternalsVisibleTo || accessibleByFamilyAndAssembly @@ -328,10 +329,16 @@ let IsPropInfoAccessible g amap m ad = function | ProvidedProp (amap, tppi, m) as pp-> let access = let a = tppi.PUntaint((fun ppi -> - let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodBase) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo) = +#else + let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo?) = // TODO NULLNESS: using ProvidedMethodBase? gives a nullness warning +#endif match mi with | null -> None - | mi -> Some(ComputeILAccess mi.IsPublic mi.IsFamily mi.IsFamilyOrAssembly mi.IsFamilyAndAssembly) + | NonNull mi -> + Some(ComputeILAccess mi.IsPublic mi.IsFamily mi.IsFamilyOrAssembly mi.IsFamilyAndAssembly) + match tryGetILAccessForProvidedMethodBase(ppi.GetGetMethod()) with | None -> tryGetILAccessForProvidedMethodBase(ppi.GetSetMethod()) | x -> x), m) diff --git a/src/fsharp/AugmentWithHashCompare.fs b/src/fsharp/AugmentWithHashCompare.fs index 0e00a302720..3a0386a5b3b 100644 --- a/src/fsharp/AugmentWithHashCompare.fs +++ b/src/fsharp/AugmentWithHashCompare.fs @@ -45,21 +45,21 @@ let mkEqualsSlotSig (g: TcGlobals) = let mkThisTy g ty = if isStructTy g ty then mkByrefTy g ty else ty -let mkCompareObjTy g ty = (mkThisTy g ty) --> (g.obj_ty --> g.int_ty) +let mkCompareObjTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.obj_ty g.int_ty) -let mkCompareTy g ty = (mkThisTy g ty) --> (ty --> g.int_ty) +let mkCompareTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g ty g.int_ty) -let mkCompareWithComparerTy g ty = (mkThisTy g ty) --> ((mkRefTupledTy g [g.obj_ty ; g.IComparer_ty]) --> g.int_ty) +let mkCompareWithComparerTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g (mkRefTupledTy g [g.obj_ty ; g.IComparer_ty]) g.int_ty) -let mkEqualsObjTy g ty = (mkThisTy g ty) --> (g.obj_ty --> g.bool_ty) +let mkEqualsObjTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.obj_ty g.bool_ty) -let mkEqualsTy g ty = (mkThisTy g ty) --> (ty --> g.bool_ty) +let mkEqualsTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g ty g.bool_ty) -let mkEqualsWithComparerTy g ty = (mkThisTy g ty) --> ((mkRefTupledTy g [g.obj_ty ; g.IEqualityComparer_ty]) --> g.bool_ty) +let mkEqualsWithComparerTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g (mkRefTupledTy g [g.obj_ty ; g.IEqualityComparer_ty]) g.bool_ty) -let mkHashTy g ty = (mkThisTy g ty) --> (g.unit_ty --> g.int_ty) +let mkHashTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.unit_ty g.int_ty) -let mkHashWithComparerTy g ty = (mkThisTy g ty) --> (g.IEqualityComparer_ty --> g.int_ty) +let mkHashWithComparerTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.IEqualityComparer_ty g.int_ty) //------------------------------------------------------------------------- // Polymorphic comparison @@ -176,7 +176,7 @@ let mkEqualsTestConjuncts g m exprs = let mkMinimalTy (g: TcGlobals) (tcref: TyconRef) = if tcref.Deref.IsExceptionDecl then [], g.exn_ty - else generalizeTyconRef tcref + else generalizeTyconRef g tcref // check for nulls let mkBindNullComparison g m thise thate expr = @@ -781,7 +781,7 @@ let CheckAugmentationAttribs isImplementation g amap (tycon: Tycon) = errorR(Error(FSComp.SR.augInvalidAttrs(), m)) let hasNominalInterface tcref = - let ty = generalizedTyconRef (mkLocalTyconRef tycon) + let ty = generalizedTyconRef g (mkLocalTyconRef tycon) ExistsHeadTypeInEntireHierarchy g amap tycon.Range ty tcref let hasExplicitICompare = @@ -952,10 +952,10 @@ let MakeBindingsForCompareAugmentation g (tycon: Tycon) = mkApps g ((exprForValRef m vref2, vref2.Type), (if isNil tinst then [] else [tinst]), [thise;thate], m) - mkLambdas m tps [thisv;thatobjv] (comparee, g.int_ty) + mkLambdas g m tps [thisv; thatobjv] (comparee, g.int_ty) let rhs2 = let thisv, thatv, comparee = comparef g tcref tycon - mkLambdas m tps [thisv;thatv] (comparee, g.int_ty) + mkLambdas g m tps [thisv; thatv] (comparee, g.int_ty) [ // This one must come first because it may be inlined into the second mkCompGenBind vspec2 rhs2 mkCompGenBind vspec1 rhs1; ] @@ -983,7 +983,7 @@ let MakeBindingsForCompareWithComparerAugmentation g (tycon: Tycon) = let rhs = let comparee = comparef g tcref tycon (thisv, thise) (thatobjv, thate) compe let comparee = if isUnitTy g ty then mkZero g m else comparee - mkMultiLambdas m tps [[thisv];[thatobjv;compv]] (comparee, g.int_ty) + mkMultiLambdas g m tps [[thisv]; [thatobjv; compv]] (comparee, g.int_ty) [mkCompGenBind vspec rhs] if tycon.IsUnionTycon then mkCompare mkUnionCompareWithComparer elif tycon.IsRecordTycon || tycon.IsStructOrEnumTycon then mkCompare mkRecdCompareWithComparer @@ -1002,7 +1002,7 @@ let MakeBindingsForEqualityWithComparerAugmentation (g: TcGlobals) (tycon: Tycon let withcGetHashCodeExpr = let compv, compe = mkCompGenLocal m "comp" g.IEqualityComparer_ty let thisv, hashe = hashf g tcref tycon compe - mkLambdas m tps [thisv;compv] (hashe, g.int_ty) + mkLambdas g m tps [thisv; compv] (hashe, g.int_ty) // build the equals rhs let withcEqualsExpr = @@ -1012,8 +1012,7 @@ let MakeBindingsForEqualityWithComparerAugmentation (g: TcGlobals) (tycon: Tycon let thatv, thate = mkCompGenLocal m "that" ty let compv, compe = mkCompGenLocal m "comp" g.IEqualityComparer_ty let equalse = equalsf g tcref tycon (thisv, thise) thatobje (thatv, thate) compe - mkMultiLambdas m tps [[thisv];[thatobjv;compv]] (equalse, g.bool_ty) - + mkMultiLambdas g m tps [[thisv];[thatobjv; compv]] (equalse, g.bool_ty) let objGetHashCodeExpr = let tinst, ty = mkMinimalTy g tcref @@ -1026,7 +1025,7 @@ let MakeBindingsForEqualityWithComparerAugmentation (g: TcGlobals) (tycon: Tycon let compe = mkILCallGetEqualityComparer g m mkApps g ((exprForValRef m withcGetHashCodeVal, withcGetHashCodeVal.Type), (if isNil tinst then [] else [tinst]), [thise; compe], m) - mkLambdas m tps [thisv; unitv] (hashe, g.int_ty) + mkLambdas g m tps [thisv; unitv] (hashe, g.int_ty) [(mkCompGenBind withcGetHashCodeVal.Deref withcGetHashCodeExpr) (mkCompGenBind objGetHashCodeVal.Deref objGetHashCodeExpr) @@ -1047,7 +1046,7 @@ let MakeBindingsForEqualsAugmentation (g: TcGlobals) (tycon: Tycon) = // this is the body of the real strongly typed implementation let nocEqualsExpr = let thisv, thatv, equalse = equalsf g tcref tycon - mkLambdas m tps [thisv;thatv] (equalse, g.bool_ty) + mkLambdas g m tps [thisv;thatv] (equalse, g.bool_ty) // this is the body of the override let objEqualsExpr = @@ -1063,7 +1062,7 @@ let MakeBindingsForEqualsAugmentation (g: TcGlobals) (tycon: Tycon) = (mkApps g ((exprForValRef m nocEqualsVal, nocEqualsVal.Type), (if isNil tinst then [] else [tinst]), [thise;thate], m)) (mkFalse g m) - mkLambdas m tps [thisv;thatobjv] (equalse, g.bool_ty) + mkLambdas g m tps [thisv;thatobjv] (equalse, g.bool_ty) [ mkCompGenBind nocEqualsVal.Deref nocEqualsExpr diff --git a/src/fsharp/CheckFormatStrings.fs b/src/fsharp/CheckFormatStrings.fs index 4b09c88665e..93b07748467 100644 --- a/src/fsharp/CheckFormatStrings.fs +++ b/src/fsharp/CheckFormatStrings.fs @@ -258,27 +258,27 @@ let parseFormatStringInternal (m:range) (g: TcGlobals) (context: FormatStringChe | 'O' -> checkOtherFlags ch collectSpecifierLocation relLine relCol 1 - parseLoop ((posi, NewInferenceType ()) :: acc) (i+1, relLine, relCol+1) + parseLoop ((posi, NewInferenceType g) :: acc) (i+1, relLine, relCol+1) | 'A' -> match info.numPrefixIfPos with | None // %A has BindingFlags=Public, %+A has BindingFlags=Public | NonPublic | Some '+' -> collectSpecifierLocation relLine relCol 1 - parseLoop ((posi, NewInferenceType ()) :: acc) (i+1, relLine, relCol+1) + parseLoop ((posi, NewInferenceType g) :: acc) (i+1, relLine, relCol+1) | Some _ -> failwithf "%s" <| FSComp.SR.forDoesNotSupportPrefixFlag(ch.ToString(), (Option.get info.numPrefixIfPos).ToString()) | 'a' -> checkOtherFlags ch - let xty = NewInferenceType () - let fty = bty --> (xty --> cty) + let xty = NewInferenceType g + let fty = mkFunTy g bty (mkFunTy g xty cty) collectSpecifierLocation relLine relCol 2 parseLoop ((Option.map ((+)1) posi, xty) :: (posi, fty) :: acc) (i+1, relLine, relCol+1) | 't' -> checkOtherFlags ch collectSpecifierLocation relLine relCol 1 - parseLoop ((posi, bty --> cty) :: acc) (i+1, relLine, relCol+1) + parseLoop ((posi, mkFunTy g bty cty) :: acc) (i+1, relLine, relCol+1) | c -> failwithf "%s" <| FSComp.SR.forBadFormatSpecifierGeneral(String.make 1 c) @@ -290,7 +290,7 @@ let parseFormatStringInternal (m:range) (g: TcGlobals) (context: FormatStringChe let ParseFormatString m g formatStringCheckContext fmt bty cty dty = let argtys, specifierLocations = parseFormatStringInternal m g formatStringCheckContext fmt bty cty - let aty = List.foldBack (-->) argtys dty + let aty = List.foldBack (mkFunTy g) argtys dty let ety = mkRefTupledTy g argtys (aty, ety), specifierLocations diff --git a/src/fsharp/CompileOps.fs b/src/fsharp/CompileOps.fs index 161b6731950..4429d4a078d 100644 --- a/src/fsharp/CompileOps.fs +++ b/src/fsharp/CompileOps.fs @@ -197,7 +197,11 @@ let GetRangeOfDiagnostic(err: PhasedDiagnostic) = | NonRigidTypar(_, _, _, _, _, m) | ConstraintSolverTupleDiffLengths(_, _, _, m, _) | ConstraintSolverInfiniteTypes(_, _, _, _, m, _) - | ConstraintSolverMissingConstraint(_, _, _, m, _) + | ConstraintSolverMissingConstraint(_, _, _, m, _) + | ConstraintSolverNullnessWarningEquivWithTypes(_, _, _, _, _, m, _) + | ConstraintSolverNullnessWarningWithTypes(_, _, _, _, _, m, _) + | ConstraintSolverNullnessWarningWithType(_, _, _, m, _) + | ConstraintSolverNonNullnessWarningWithType(_, _, _, m, _) | ConstraintSolverTypesNotInEqualityRelation(_, _, _, m, _, _) | ConstraintSolverError(_, m, _) | ConstraintSolverTypesNotInSubsumptionRelation(_, _, _, m, _) @@ -374,6 +378,10 @@ let GetDiagnosticNumber(err: PhasedDiagnostic) = | :? TypeProviderError as e -> e.Number #endif | ErrorsFromAddingSubsumptionConstraint (_, _, _, _, _, ContextInfo.DowncastUsedInsteadOfUpcast _, _) -> fst (FSComp.SR.considerUpcast("", "")) + | ConstraintSolverNullnessWarningEquivWithTypes _ -> 3261 + | ConstraintSolverNullnessWarningWithTypes _ -> 3262 + | ConstraintSolverNullnessWarningWithType _ -> 3263 + | ConstraintSolverNonNullnessWarningWithType _ -> 3264 | _ -> 193 GetFromException err.Exception @@ -442,6 +450,10 @@ let ConstraintSolverTupleDiffLengthsE() = DeclareResourceString("ConstraintSolve let ConstraintSolverInfiniteTypesE() = DeclareResourceString("ConstraintSolverInfiniteTypes", "%s%s") let ConstraintSolverMissingConstraintE() = DeclareResourceString("ConstraintSolverMissingConstraint", "%s") let ConstraintSolverTypesNotInEqualityRelation1E() = DeclareResourceString("ConstraintSolverTypesNotInEqualityRelation1", "%s%s") +let ConstraintSolverNullnessWarningEquivWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningEquivWithTypes", "%s%s%s%s") +let ConstraintSolverNullnessWarningWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningWithTypes", "%s%s%s%s") +let ConstraintSolverNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNullnessWarningWithType", "%s") +let ConstraintSolverNonNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNonNullnessWarningWithType", "%s") let ConstraintSolverTypesNotInEqualityRelation2E() = DeclareResourceString("ConstraintSolverTypesNotInEqualityRelation2", "%s%s") let ConstraintSolverTypesNotInSubsumptionRelationE() = DeclareResourceString("ConstraintSolverTypesNotInSubsumptionRelation", "%s%s%s") let ErrorFromAddingTypeEquation1E() = DeclareResourceString("ErrorFromAddingTypeEquation1", "%s%s%s") @@ -642,11 +654,45 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa if m.StartLine <> m2.StartLine then os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore + | ConstraintSolverNullnessWarningEquivWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) -> + + let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2 + + os.Append(ConstraintSolverNullnessWarningEquivWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore + + if m.StartLine <> m2.StartLine then + os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore + + | ConstraintSolverNullnessWarningWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) -> + + let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2 + + os.Append(ConstraintSolverNullnessWarningWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore + + if m.StartLine <> m2.StartLine then + os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore + + | ConstraintSolverNullnessWarningWithType(denv, ty, _nullness, m, m2) -> + + let t = NicePrint.minimalStringOfType denv ty + os.Append(ConstraintSolverNullnessWarningWithTypeE().Format (t)) |> ignore + + if m.StartLine <> m2.StartLine then + os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore + + | ConstraintSolverNonNullnessWarningWithType(denv, ty, _nullness, m, m2) -> + + let t = NicePrint.minimalStringOfType denv ty + os.Append(ConstraintSolverNonNullnessWarningWithTypeE().Format (t)) |> ignore + + if m.StartLine <> m2.StartLine then + os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore + | ConstraintSolverTypesNotInEqualityRelation(denv, (TType_measure _ as t1), (TType_measure _ as t2), m, m2, _) -> // REVIEW: consider if we need to show _cxs (the type parameter constraints) let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv t1 t2 - os.Append(ConstraintSolverTypesNotInEqualityRelation1E().Format t1 t2 ) |> ignore + os.Append(ConstraintSolverTypesNotInEqualityRelation1E().Format t1 t2) |> ignore if m.StartLine <> m2.StartLine then os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore @@ -783,7 +829,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa let retTy = knownReturnType - |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked())) + |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked(), KnownAmbivalentToNull)) let argRepr = callerArgs.ArgumentNamesAndTypes @@ -1333,7 +1379,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa // we need to check if unit was used as a type argument let rec hasUnitTType_app (types: TType list) = match types with - | TType_app (maybeUnit, []) :: ts -> + | TType_app (maybeUnit, [], _) :: ts -> match maybeUnit.TypeAbbrev with | Some ttype when isUnitTy g ttype -> true | _ -> hasUnitTType_app ts @@ -1341,7 +1387,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa | [] -> false match minfoVirt.ApparentEnclosingType with - | TType_app (t, types) when t.IsFSharpInterfaceTycon && hasUnitTType_app types -> + | TType_app (t, types, _) when t.IsFSharpInterfaceTycon && hasUnitTType_app types -> // match abstract member with 'unit' passed as generic argument os.Append(OverrideDoesntOverride4E().Format sig1) |> ignore | _ -> @@ -1964,24 +2010,35 @@ type VersionFlag = /// Represents a reference to an assembly. May be backed by a real assembly on disk, or a cross-project /// reference backed by information generated by the the compiler service. type IRawFSharpAssemblyData = + /// The raw list AutoOpenAttribute attributes in the assembly abstract GetAutoOpenAttributes: ILGlobals -> string list + /// The raw list InternalsVisibleToAttribute attributes in the assembly abstract GetInternalsVisibleToAttributes: ILGlobals -> string list + /// The raw IL module definition in the assembly, if any. This is not present for cross-project references /// in the language service abstract TryGetILModuleDef: unit -> ILModuleDef option + /// The raw F# signature data in the assembly, if any - abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list + abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list + /// The raw F# optimization data in the assembly, if any - abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list + abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list + /// The table of type forwarders in the assembly abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders + /// The identity of the module abstract ILScopeRef: ILScopeRef + abstract ILAssemblyRefs: ILAssemblyRef list + abstract ShortAssemblyName: string + abstract HasAnyFSharpSignatureDataAttribute: bool + abstract HasMatchingFSharpSignatureDataAttribute: ILGlobals -> bool /// Cache of time stamps as we traverse a project description @@ -2116,6 +2173,8 @@ type TcConfigBuilder = mutable embedResources: string list mutable errorSeverityOptions: FSharpErrorSeverityOptions mutable mlCompatibility: bool + mutable assumeNullOnImport: bool + mutable checkNullness: bool mutable checkOverflow: bool mutable showReferenceResolutions: bool mutable outputDir : string option @@ -2170,7 +2229,7 @@ type TcConfigBuilder = mutable win32manifest: string mutable includewin32manifest: bool mutable linkResources: string list - mutable legacyReferenceResolver: ReferenceResolver.Resolver + mutable legacyReferenceResolver: ReferenceResolver.Resolver mutable showFullPaths: bool mutable errorStyle: ErrorStyle @@ -2251,7 +2310,7 @@ type TcConfigBuilder = mutable dependencyProvider: DependencyProvider } - static member Initial = + static member Initial(legacyReferenceResolver) = { primaryAssembly = PrimaryAssembly.Mscorlib // default value, can be overridden using the command line switch light = None @@ -2282,6 +2341,8 @@ type TcConfigBuilder = subsystemVersion = 4, 0 // per spec for 357994 useHighEntropyVA = false mlCompatibility = false + assumeNullOnImport = false + checkNullness = false checkOverflow = false showReferenceResolutions = false outputDir = None @@ -2340,7 +2401,7 @@ type TcConfigBuilder = win32manifest = "" includewin32manifest = true linkResources = [] - legacyReferenceResolver = null + legacyReferenceResolver = legacyReferenceResolver showFullPaths = false errorStyle = ErrorStyle.DefaultErrors @@ -2416,7 +2477,7 @@ type TcConfigBuilder = failwith "Expected a valid defaultFSharpBinariesDir" let tcConfigBuilder = - { TcConfigBuilder.Initial with + { TcConfigBuilder.Initial(legacyReferenceResolver) with implicitIncludeDir = implicitIncludeDir defaultFSharpBinariesDir = defaultFSharpBinariesDir reduceMemoryUsage = reduceMemoryUsage @@ -2762,6 +2823,8 @@ type TcConfig private (data: TcConfigBuilder, validate: bool) = member x.embedResources = data.embedResources member x.errorSeverityOptions = data.errorSeverityOptions member x.mlCompatibility = data.mlCompatibility + member x.assumeNullOnImport = data.assumeNullOnImport + member x.checkNullness = data.checkNullness member x.checkOverflow = data.checkOverflow member x.showReferenceResolutions = data.showReferenceResolutions member x.outputDir = data.outputDir @@ -3704,13 +3767,21 @@ let IsSignatureDataResource (r: ILResource) = r.Name.StartsWithOrdinal FSharpSignatureDataResourceName || r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 +let IsSignatureDataResourceB (r: ILResource) = + r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB + let IsOptimizationDataResource (r: ILResource) = - r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName|| + r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName || r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2 +let IsOptimizationDataResourceB (r: ILResource) = + r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB + let GetSignatureDataResourceName (r: ILResource) = if r.Name.StartsWithOrdinal FSharpSignatureDataResourceName then String.dropPrefix r.Name FSharpSignatureDataResourceName + elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB then + String.dropPrefix r.Name FSharpSignatureDataResourceNameB elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 then String.dropPrefix r.Name FSharpSignatureDataResourceName2 else failwith "GetSignatureDataResourceName" @@ -3718,12 +3789,14 @@ let GetSignatureDataResourceName (r: ILResource) = let GetOptimizationDataResourceName (r: ILResource) = if r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName then String.dropPrefix r.Name FSharpOptimizationDataResourceName + elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB then + String.dropPrefix r.Name FSharpOptimizationDataResourceNameB elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2 then String.dropPrefix r.Name FSharpOptimizationDataResourceName2 else failwith "GetOptimizationDataResourceName" let IsReflectedDefinitionsResource (r: ILResource) = - r.Name.StartsWithOrdinal(QuotationPickler.SerializedReflectedDefinitionsResourceNameBase) + r.Name.StartsWithOrdinal QuotationPickler.SerializedReflectedDefinitionsResourceNameBase let MakeILResource rName bytes = { Name = rName @@ -3732,24 +3805,37 @@ let MakeILResource rName bytes = CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs MetadataIndex = NoMetadataIdx } -let PickleToResource inMem file (g: TcGlobals) scope rName p x = +let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x = let file = PathMap.apply g.pathMap file - + let bytes, bytesB = pickleObjWithDanglingCcus inMem file g scope p x { Name = rName - Location = (let bytes = pickleObjWithDanglingCcus inMem file g scope p x in ILResourceLocation.Local(ByteMemory.FromArray(bytes).AsReadOnly())) + Location = ILResourceLocation.Local(ByteMemory.FromArray(bytes).AsReadOnly()) Access = ILResourceAccess.Public CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs - MetadataIndex = NoMetadataIdx } + MetadataIndex = NoMetadataIdx }, + if bytesB.Length > 0 then + Some + { Name = rNameB + Location = ILResourceLocation.Local(ByteMemory.FromArray(bytesB).AsReadOnly()) + Access = ILResourceAccess.Public + CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs + MetadataIndex = NoMetadataIdx + } + else + None -let GetSignatureData (file, ilScopeRef, ilModule, byteReader) : PickledDataWithReferences = - unpickleObjWithDanglingCcus file ilScopeRef ilModule unpickleCcuInfo (byteReader()) +let GetSignatureData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) : PickledDataWithReferences = + let memA = byteReaderA() + let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br()) + unpickleObjWithDanglingCcus file ilScopeRef ilModule unpickleCcuInfo memA memB -let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: CcuThunk, file, inMem) : ILResource = +let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: CcuThunk, file, inMem) = let mspec = ccu.Contents let mspec = ApplyExportRemappingToEntity tcGlobals exportRemapping mspec // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers // don't complain when they see the resource. - let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpSignatureDataResourceName2 else FSharpSignatureDataResourceName + let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpSignatureDataResourceName2 else FSharpSignatureDataResourceName + let rNameB = FSharpSignatureDataResourceNameB let includeDir = if String.IsNullOrEmpty tcConfig.implicitIncludeDir then "" @@ -3758,19 +3844,22 @@ let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: Ccu |> System.IO.Path.GetFullPath |> PathMap.applyDir tcGlobals.pathMap - PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) pickleCcuInfo + PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) (rNameB+ccu.AssemblyName) pickleCcuInfo { mspec=mspec compileTimeWorkingDir=includeDir usesQuotations = ccu.UsesFSharp20PlusQuotations } -let GetOptimizationData (file, ilScopeRef, ilModule, byteReader) = - unpickleObjWithDanglingCcus file ilScopeRef ilModule Optimizer.u_CcuOptimizationInfo (byteReader()) +let GetOptimizationData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) = + let memA = byteReaderA() + let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br()) + unpickleObjWithDanglingCcus file ilScopeRef ilModule Optimizer.u_CcuOptimizationInfo memA memB let WriteOptimizationData (tcGlobals, file, inMem, ccu: CcuThunk, modulInfo) = // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers // don't complain when they see the resource. let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpOptimizationDataResourceName2 else FSharpOptimizationDataResourceName - PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) Optimizer.p_CcuOptimizationInfo modulInfo + let rNameB = FSharpOptimizationDataResourceNameB + PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) (rNameB+ccu.AssemblyName) Optimizer.p_CcuOptimizationInfo modulInfo //---------------------------------------------------------------------------- // Abstraction for project reference @@ -3778,30 +3867,61 @@ let WriteOptimizationData (tcGlobals, file, inMem, ccu: CcuThunk, modulInfo) = type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyRefs) = let externalSigAndOptData = ["FSharp.Core"] interface IRawFSharpAssemblyData with + member __.GetAutoOpenAttributes ilg = GetAutoOpenAttributes ilg ilModule + member __.GetInternalsVisibleToAttributes ilg = GetInternalsVisibleToAttributes ilg ilModule + member __.TryGetILModuleDef() = Some ilModule + member __.GetRawFSharpSignatureData(m, ilShortAssemName, filename) = let resources = ilModule.Resources.AsList + let sigDataReaders = [ for iresource in resources do if IsSignatureDataResource iresource then let ccuName = GetSignatureDataResourceName iresource - yield (ccuName, fun () -> iresource.GetBytes()) ] - + let readerA = fun () -> iresource.GetBytes() + let readerB = + resources |> List.tryPick (fun iresourceB -> + if IsSignatureDataResourceB iresourceB then + let ccuNameB = GetSignatureDataResourceName iresourceB + if ccuName = ccuNameB then + Some (fun () -> iresourceB.GetBytes() ) + else None + else None) + yield (ccuName, (readerA, readerB)) ] + let sigDataReaders = if sigDataReaders.IsEmpty && List.contains ilShortAssemName externalSigAndOptData then let sigFileName = Path.ChangeExtension(filename, "sigdata") if not (FileSystem.SafeExists sigFileName) then error(Error(FSComp.SR.buildExpectedSigdataFile (FileSystem.GetFullPathShim sigFileName), m)) - [ (ilShortAssemName, fun () -> ByteMemory.FromFile(sigFileName, FileAccess.Read, canShadowCopy=true).AsReadOnly())] + let readerA () = ByteMemory.FromFile(sigFileName, FileAccess.Read, canShadowCopy=true).AsReadOnly() + [ (ilShortAssemName, (readerA, None)) ] else sigDataReaders sigDataReaders + member __.GetRawFSharpOptimizationData(m, ilShortAssemName, filename) = + let resources = ilModule.Resources.AsList let optDataReaders = - ilModule.Resources.AsList - |> List.choose (fun r -> if IsOptimizationDataResource r then Some(GetOptimizationDataResourceName r, (fun () -> r.GetBytes())) else None) + resources + |> List.choose (fun r -> + if IsOptimizationDataResource r then + let ccuName = GetOptimizationDataResourceName r + let readerA = (fun () -> r.GetBytes()) + let readerB = + resources |> List.tryPick (fun iresourceB -> + if IsOptimizationDataResourceB iresourceB then + let ccuNameB = GetOptimizationDataResourceName iresourceB + if ccuName = ccuNameB then + Some (fun () -> iresourceB.GetBytes() ) + else None + else None) + Some(ccuName, (readerA, readerB)) + else + None) // Look for optimization data in a file let optDataReaders = @@ -3809,14 +3929,17 @@ type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyR let optDataFile = Path.ChangeExtension(filename, "optdata") if not (FileSystem.SafeExists optDataFile) then error(Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore(optDataFile, FileSystem.GetFullPathShim optDataFile), m)) - [ (ilShortAssemName, (fun () -> ByteMemory.FromFile(optDataFile, FileAccess.Read, canShadowCopy=true).AsReadOnly()))] + let readerA () = ByteMemory.FromFile(optDataFile, FileAccess.Read, canShadowCopy=true).AsReadOnly() + [ (ilShortAssemName, (readerA, None))] else optDataReaders optDataReaders + member __.GetRawTypeForwarders() = match ilModule.Manifest with | Some manifest -> manifest.ExportedTypes | None -> mkILExportedTypes [] + member __.ShortAssemblyName = GetNameOfILModule ilModule member __.ILScopeRef = MakeScopeRefForILModule ilModule member __.ILAssemblyRefs = ilAssemblyRefs @@ -4082,11 +4205,19 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse #if !NO_EXTENSIONTYPING +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) = - let anameOpt = assembly.PUntaint((fun assembly -> match assembly with null -> None | a -> Some (a.GetName())), m) - match anameOpt with - | None -> false, None - | Some aname -> +#else + member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) = +#endif + match assembly with + | Tainted.Null -> false,None +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + | assembly -> +#else + | Tainted.NonNull assembly -> +#endif + let aname = assembly.PUntaint((fun a -> a.GetName()), m) let ilShortAssemName = aname.Name match tcImports.FindCcu (ctok, m, ilShortAssemName, lookupOnly=true) with | ResolvedCcu ccu -> @@ -4324,7 +4455,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse member tcImportsStrong.ImportTypeProviderExtensions (ctok, tcConfig: TcConfig, - fileNameOfRuntimeAssembly, + fileNameOfRuntimeAssembly: string, ilScopeRefOfRuntimeAssembly, runtimeAssemblyAttributes: ILAttribute list, entityToInjectInto, invalidateCcu: Event<_>, m) = @@ -4337,7 +4468,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse runtimeAssemblyAttributes |> List.choose (TryDecodeTypeProviderAssemblyAttr (defaultArg ilGlobalsOpt EcmaMscorlibILGlobals)) // If no design-time assembly is specified, use the runtime assembly - |> List.map (function null -> fileNameOfRuntimeAssembly | s -> s) + |> List.map (function null -> fileNameOfRuntimeAssembly | NonNull s -> s) // For each simple name of a design-time assembly, we take the first matching one in the order they are // specified in the attributes |> List.distinctBy (fun s -> try Path.GetFileNameWithoutExtension s with _ -> s) @@ -4527,8 +4658,8 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse let ccuRawDataAndInfos = ilModule.GetRawFSharpSignatureData(m, ilShortAssemName, filename) - |> List.map (fun (ccuName, sigDataReader) -> - let data = GetSignatureData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader) + |> List.map (fun (ccuName, (sigDataReader, sigDataReaderB)) -> + let data = GetSignatureData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB) let optDatas = Map.ofList optDataReaders @@ -4566,8 +4697,8 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse | None -> if verbose then dprintf "*** no optimization data for CCU %s, was DLL compiled with --no-optimization-data??\n" ccuName None - | Some info -> - let data = GetOptimizationData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), info) + | Some (readerA, readerB) -> + let data = GetOptimizationData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), readerA, readerB) let res = data.OptionalFixup(fun nm -> availableToOptionalCcu(tcImports.FindCcu(ctok, m, nm, lookupOnly=false))) if verbose then dprintf "found optimization data for CCU %s\n" ccuName Some res) @@ -4893,7 +5024,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse // OK, now we have both mscorlib.dll and FSharp.Core.dll we can create TcGlobals let tcGlobals = TcGlobals(tcConfig.compilingFslib, ilGlobals, fslibCcu, tcConfig.implicitIncludeDir, tcConfig.mlCompatibility, - tcConfig.isInteractive, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations, + tcConfig.isInteractive, tcConfig.assumeNullOnImport, tcConfig.checkNullness, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations, tcConfig.noDebugData, tcConfig.pathMap, tcConfig.langVersion) #if DEBUG @@ -5011,21 +5142,25 @@ let ProcessMetaCommandsFromInput let output = tcConfig.outputDir |> Option.defaultValue "" let dm = tcConfig.dependencyProvider.TryFindDependencyManagerInPath(tcConfig.compilerToolPaths, output , reportError, path) match dm with - | _, dependencyManager when not(isNull dependencyManager) -> - if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then - packageRequireF state (dependencyManager, m, path) - else - errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m)) - state + | null, null -> + errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m)) + state // #r "Assembly" - | path, _ -> + | NonNull path, null -> let p = if String.IsNullOrWhiteSpace(path) then "" else path dllRequireF state (m, p) + | _, NonNull dependencyManager -> + if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then + packageRequireF state (dependencyManager, m, path) + else + errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m)) + state + | _ -> errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m)) state @@ -5310,7 +5445,7 @@ module ScriptPreprocessClosure = | null -> errorR(Error(tcConfig.dependencyProvider.CreatePackageManagerUnknownError(tcConfig.compilerToolPaths, outputDir, packageManagerKey, reportError), m)) - | dependencyManager -> + | NonNull dependencyManager -> let inline snd3 (_, b, _) = b let packageManagerTextLines = packageManagerLines |> List.map snd3 let result = tcConfig.dependencyProvider.Resolve(dependencyManager, ".fsx", packageManagerTextLines, reportError, executionTfm, executionRid, tcConfig.implicitIncludeDir, mainFile, scriptName) diff --git a/src/fsharp/CompileOps.fsi b/src/fsharp/CompileOps.fsi index 3c78b376628..62347bce5b8 100644 --- a/src/fsharp/CompileOps.fsi +++ b/src/fsharp/CompileOps.fsi @@ -151,24 +151,35 @@ exception HashLoadedScriptConsideredSource of range /// Represents a reference to an F# assembly. May be backed by a real assembly on disk (read by Abstract IL), or a cross-project /// reference in FSharp.Compiler.Service. type IRawFSharpAssemblyData = + /// The raw list AutoOpenAttribute attributes in the assembly abstract GetAutoOpenAttributes: ILGlobals -> string list + /// The raw list InternalsVisibleToAttribute attributes in the assembly abstract GetInternalsVisibleToAttributes: ILGlobals -> string list + /// The raw IL module definition in the assembly, if any. This is not present for cross-project references /// in the language service abstract TryGetILModuleDef: unit -> ILModuleDef option + abstract HasAnyFSharpSignatureDataAttribute: bool + abstract HasMatchingFSharpSignatureDataAttribute: ILGlobals -> bool + /// The raw F# signature data in the assembly, if any - abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list + abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list + /// The raw F# optimization data in the assembly, if any - abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list + abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list + /// The table of type forwarders in the assembly abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders + /// The identity of the module abstract ILScopeRef: ILScopeRef + abstract ILAssemblyRefs: ILAssemblyRef list + abstract ShortAssemblyName: string type TimeStampCache = @@ -288,6 +299,8 @@ type TcConfigBuilder = mutable embedResources: string list mutable errorSeverityOptions: FSharpErrorSeverityOptions mutable mlCompatibility:bool + mutable assumeNullOnImport: bool + mutable checkNullness: bool mutable checkOverflow:bool mutable showReferenceResolutions:bool mutable outputDir: string option @@ -400,7 +413,7 @@ type TcConfigBuilder = } - static member Initial: TcConfigBuilder + static member Initial: ReferenceResolver.Resolver -> TcConfigBuilder static member CreateNew: legacyReferenceResolver: ReferenceResolver.Resolver * @@ -454,6 +467,8 @@ type TcConfig = member embedResources: string list member errorSeverityOptions: FSharpErrorSeverityOptions member mlCompatibility:bool + member assumeNullOnImport: bool + member checkNullness: bool member checkOverflow:bool member showReferenceResolutions:bool member outputDir: string option @@ -667,22 +682,22 @@ type TcImports = /// Determine if an IL resource attached to an F# assembly is an F# signature data resource val IsSignatureDataResource: ILResource -> bool +/// Determine if an IL resource attached to an F# assembly is an F# signature data resource (data stream B) +val IsSignatureDataResourceB: ILResource -> bool + /// Determine if an IL resource attached to an F# assembly is an F# optimization data resource val IsOptimizationDataResource: ILResource -> bool /// Determine if an IL resource attached to an F# assembly is an F# quotation data resource for reflected definitions val IsReflectedDefinitionsResource: ILResource -> bool -val GetSignatureDataResourceName: ILResource -> string -/// Write F# signature data as an IL resource -val WriteSignatureData: TcConfig * TcGlobals * Remap * CcuThunk * filename: string * inMem: bool -> ILResource +val GetSignatureDataResourceName: ILResource -> string -/// Write F# optimization data as an IL resource -val WriteOptimizationData: TcGlobals * filename: string * inMem: bool * CcuThunk * Optimizer.LazyModuleInfo -> ILResource +/// Write F# signature data as one or more IL resources +val WriteSignatureData: TcConfig * TcGlobals * Remap * CcuThunk * filename: string * inMem: bool -> ILResource * ILResource option -//---------------------------------------------------------------------------- -// #r and other directives -//-------------------------------------------------------------------------- +/// Write F# optimization data as an IL resource(s) +val WriteOptimizationData: TcGlobals * filename: string * inMem: bool * CcuThunk * Optimizer.LazyModuleInfo -> ILResource * ILResource option //---------------------------------------------------------------------------- // #r and other directives diff --git a/src/fsharp/CompileOptions.fs b/src/fsharp/CompileOptions.fs index 91005c3124e..204a1a82d4e 100644 --- a/src/fsharp/CompileOptions.fs +++ b/src/fsharp/CompileOptions.fs @@ -630,6 +630,8 @@ let errorsAndWarningsFlags (tcConfigB: TcConfigBuilder) = CompilerOption("warnon", tagWarnList, OptionStringList (fun n -> tcConfigB.TurnWarningOn(rangeCmdArgs, trimFS n)), None, Some (FSComp.SR.optsWarnOn())) + CompilerOption("checknulls", tagNone, OptionSwitch (fun switch -> tcConfigB.checkNullness <- (switch = OptionSwitch.On)), None, Some (FSComp.SR.optsCheckNulls())) + CompilerOption("consolecolors", tagNone, OptionSwitch (fun switch -> enableConsoleColoring <- switch = OptionSwitch.On), None, Some (FSComp.SR.optsConsoleColors())) ] @@ -1024,6 +1026,7 @@ let testFlag tcConfigB = ("test", tagString, OptionString (fun s -> match s with + | "AssumeNullOnImport" -> tcConfigB.assumeNullOnImport <- true | "StackSpan" -> tcConfigB.internalTestSpanStackReferring <- true | "ErrorRanges" -> tcConfigB.errorStyle <- ErrorStyle.TestErrors | "Tracking" -> Lib.tracking <- true (* general purpose on/off diagnostics flag *) diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs index 00c54db4cf5..8fef9170ef1 100644 --- a/src/fsharp/ConstraintSolver.fs +++ b/src/fsharp/ConstraintSolver.fs @@ -67,6 +67,10 @@ open FSharp.Compiler.TypedTreeOps open FSharp.Compiler.TcGlobals open FSharp.Compiler.TypeRelations +#if !NO_EXTENSIONTYPING +open FSharp.Compiler.ExtensionTyping +#endif + //------------------------------------------------------------------------- // Generate type variables and record them in within the scope of the // compilation environment, which currently corresponds to the scope @@ -86,30 +90,33 @@ let NewAnonTypar (kind, m, rigid, var, dyn) = let NewNamedInferenceMeasureVar (_m, rigid, var, id) = Construct.NewTypar(TyparKind.Measure, rigid, Typar(id, var, false), false, TyparDynamicReq.No, [], false, false) -let NewInferenceMeasurePar () = +let NewInferenceMeasurePar () = NewCompGenTypar (TyparKind.Measure, TyparRigidity.Flexible, NoStaticReq, TyparDynamicReq.No, false) -let NewErrorTypar () = +let NewErrorTypar () = NewCompGenTypar (TyparKind.Type, TyparRigidity.Flexible, NoStaticReq, TyparDynamicReq.No, true) -let NewErrorMeasureVar () = +let NewErrorMeasureVar () = NewCompGenTypar (TyparKind.Measure, TyparRigidity.Flexible, NoStaticReq, TyparDynamicReq.No, true) -let NewInferenceType () = - mkTyparTy (Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, Typar(compgenId, NoStaticReq, true), false, TyparDynamicReq.No, [], false, false)) - -let NewErrorType () = +let NewInferenceType (g: TcGlobals) = + let tp = Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, Typar(compgenId, NoStaticReq, true), false, TyparDynamicReq.No, [], false, false) + let nullness = if g.langFeatureNullness then NewNullnessVar() else KnownAmbivalentToNull + TType_var (tp, nullness) + +let NewErrorType () = mkTyparTy (NewErrorTypar ()) -let NewErrorMeasure () = Measure.Var (NewErrorMeasureVar ()) +let NewErrorMeasure () = + Measure.Var (NewErrorMeasureVar ()) let NewByRefKindInferenceType (g: TcGlobals) m = let tp = Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, Typar(compgenId, HeadTypeStaticReq, true), false, TyparDynamicReq.No, [], false, false) if g.byrefkind_InOut_tcr.CanDeref then - tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, []), m)] + tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, [], g.knownWithoutNull), m)] mkTyparTy tp -let NewInferenceTypes l = l |> List.map (fun _ -> NewInferenceType ()) +let NewInferenceTypes g l = l |> List.map (fun _ -> NewInferenceType g) // QUERY: should 'rigid' ever really be 'true'? We set this when we know // we are going to have to generalize a typar, e.g. when implementing a @@ -122,9 +129,11 @@ let FreshenAndFixupTypars m rigid fctps tinst tpsorig = let renaming, tinst = FixupNewTypars m fctps tinst tpsorig tps tps, renaming, tinst -let FreshenTypeInst m tpsorig = FreshenAndFixupTypars m TyparRigidity.Flexible [] [] tpsorig +let FreshenTypeInst m tpsorig = + FreshenAndFixupTypars m TyparRigidity.Flexible [] [] tpsorig -let FreshMethInst m fctps tinst tpsorig = FreshenAndFixupTypars m TyparRigidity.Flexible fctps tinst tpsorig +let FreshMethInst m fctps tinst tpsorig = + FreshenAndFixupTypars m TyparRigidity.Flexible fctps tinst tpsorig let FreshenTypars m tpsorig = match tpsorig with @@ -214,7 +223,15 @@ exception ConstraintSolverTypesNotInEqualityRelation of displayEnv: DisplayEnv * exception ConstraintSolverTypesNotInSubsumptionRelation of displayEnv: DisplayEnv * argTy: TType * paramTy: TType * callRange: range * parameterRange: range -exception ConstraintSolverMissingConstraint of displayEnv: DisplayEnv * Typar * TyparConstraint * range * range +exception ConstraintSolverMissingConstraint of displayEnv: DisplayEnv * Typar * TyparConstraint * range * range + +exception ConstraintSolverNullnessWarningEquivWithTypes of DisplayEnv * TType * TType * NullnessInfo * NullnessInfo * range * range + +exception ConstraintSolverNullnessWarningWithTypes of DisplayEnv * TType * TType * NullnessInfo * NullnessInfo * range * range + +exception ConstraintSolverNullnessWarningWithType of DisplayEnv * TType * NullnessInfo * range * range + +exception ConstraintSolverNonNullnessWarningWithType of DisplayEnv * TType * NullnessInfo * range * range exception ConstraintSolverError of string * range * range @@ -297,11 +314,11 @@ let MakeConstraintSolverEnv contextInfo css m denv = let rec occursCheck g un ty = match stripTyEqns g ty with | TType_ucase(_, l) - | TType_app (_, l) + | TType_app (_, l, _) | TType_anon(_, l) | TType_tuple (_, l) -> List.exists (occursCheck g un) l - | TType_fun (d, r) -> occursCheck g un d || occursCheck g un r - | TType_var r -> typarEq un r + | TType_fun (d, r, _nullness) -> occursCheck g un d || occursCheck g un r + | TType_var (r, _) -> typarEq un r | TType_forall (_, tau) -> occursCheck g un tau | _ -> false @@ -732,11 +749,11 @@ let SimplifyMeasure g vars ms = let rec SimplifyMeasuresInType g resultFirst ((generalizable, generalized) as param) ty = match stripTyparEqns ty with | TType_ucase(_, l) - | TType_app (_, l) - | TType_anon (_,l) + | TType_app (_, l, _) + | TType_anon (_, l) | TType_tuple (_, l) -> SimplifyMeasuresInTypes g param l - | TType_fun (d, r) -> if resultFirst then SimplifyMeasuresInTypes g param [r;d] else SimplifyMeasuresInTypes g param [d;r] + | TType_fun (d, r, _nullness) -> if resultFirst then SimplifyMeasuresInTypes g param [r;d] else SimplifyMeasuresInTypes g param [d;r] | TType_var _ -> param | TType_forall (_, tau) -> SimplifyMeasuresInType g resultFirst param tau | TType_measure unt -> @@ -770,11 +787,11 @@ let rec SimplifyMeasuresInConstraints g param cs = let rec GetMeasureVarGcdInType v ty = match stripTyparEqns ty with | TType_ucase(_, l) - | TType_app (_, l) - | TType_anon (_,l) + | TType_app (_, l, _) + | TType_anon (_, l) | TType_tuple (_, l) -> GetMeasureVarGcdInTypes v l - | TType_fun (d, r) -> GcdRational (GetMeasureVarGcdInType v d) (GetMeasureVarGcdInType v r) + | TType_fun (d, r, _nullness) -> GcdRational (GetMeasureVarGcdInType v d) (GetMeasureVarGcdInType v r) | TType_var _ -> ZeroRational | TType_forall (_, tau) -> GetMeasureVarGcdInType v tau | TType_measure unt -> MeasureVarExponent v unt @@ -865,7 +882,7 @@ let rec SolveTyparEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: Optio let m = csenv.m do! DepthCheck ndeep m match ty1 with - | TType_var r | TType_measure (Measure.Var r) -> + | TType_var (r, _) | TType_measure (Measure.Var r) -> // The types may still be equivalent due to abbreviations, which we are trying not to eliminate if typeEquiv csenv.g ty1 ty then () else // The famous 'occursCheck' check to catch "infinite types" like 'a = list<'a> - see also https://github.com/Microsoft/visualfsharp/issues/1170 @@ -917,7 +934,8 @@ and solveTypMeetsTyparConstraints (csenv: ConstraintSolverEnv) ndeep m2 trace ty | ValueSome destTypar -> AddConstraint csenv ndeep m2 trace destTypar (TyparConstraint.DefaultsTo(priority, dty, m)) - | TyparConstraint.SupportsNull m2 -> SolveTypeSupportsNull csenv ndeep m2 trace ty + | TyparConstraint.NotSupportsNull m2 -> SolveTypeDefnNotSupportsNull csenv ndeep m2 trace ty + | TyparConstraint.SupportsNull m2 -> SolveTypeDefnSupportsNull csenv ndeep m2 trace ty | TyparConstraint.IsEnum(underlying, m2) -> SolveTypeIsEnum csenv ndeep m2 trace ty underlying | TyparConstraint.SupportsComparison(m2) -> SolveTypeSupportsComparison csenv ndeep m2 trace ty | TyparConstraint.SupportsEquality(m2) -> SolveTypeSupportsEquality csenv ndeep m2 trace ty @@ -932,6 +950,73 @@ and solveTypMeetsTyparConstraints (csenv: ConstraintSolverEnv) ndeep m2 trace ty SolveMemberConstraint csenv false PermitWeakResolution.No ndeep m2 trace traitInfo |> OperationResult.ignore } +// nullness1: actual +// nullness2: expected +and SolveNullnessEquiv (csenv:ConstraintSolverEnv) m2 (trace: OptionalTrace) ty1 ty2 nullness1 nullness2 = + match nullness1, nullness2 with + | Nullness.Variable nv1, Nullness.Variable nv2 when nv1 === nv2 -> + CompleteD + | Nullness.Variable nv1, _ when nv1.IsSolved -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nv1.Solution nullness2 + | _, Nullness.Variable nv2 when nv2.IsSolved -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nv2.Solution + | Nullness.Variable nv1, _ -> + trace.Exec (fun () -> nv1.Set nullness2) (fun () -> nv1.Unset()) + CompleteD + | _, Nullness.Variable nv2 -> + trace.Exec (fun () -> nv2.Set nullness1) (fun () -> nv2.Unset()) + CompleteD + | Nullness.Known n1, Nullness.Known n2 -> + match n1, n2 with + | NullnessInfo.AmbivalentToNull, _ -> CompleteD + | _, NullnessInfo.AmbivalentToNull -> CompleteD + | NullnessInfo.WithNull, NullnessInfo.WithNull -> CompleteD + | NullnessInfo.WithoutNull, NullnessInfo.WithoutNull -> CompleteD + // Allow expected of WithNull and actual of WithoutNull + // TODO NULLNESS: this is not sound in contravariant cases etc. + | NullnessInfo.WithNull, NullnessInfo.WithoutNull -> CompleteD + | _ -> + // NOTE: we never give nullness warnings for the 'obj' type + if csenv.g.checkNullness then + if not (isObjTy csenv.g ty1) && not (isObjTy csenv.g ty2) then + WarnD(ConstraintSolverNullnessWarningEquivWithTypes(csenv.DisplayEnv, ty1, ty2, n1, n2, csenv.m, m2)) + else + CompleteD + else + CompleteD + +// nullness1: target +// nullness2: source +and SolveNullnessSubsumesNullness (csenv:ConstraintSolverEnv) m2 (trace: OptionalTrace) ty1 ty2 nullness1 nullness2 = + match nullness1, nullness2 with + | Nullness.Variable nv1, Nullness.Variable nv2 when nv1 === nv2 -> + CompleteD + | Nullness.Variable nv1, _ when nv1.IsSolved -> + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nv1.Solution nullness2 + | _, Nullness.Variable nv2 when nv2.IsSolved -> + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nullness1 nv2.Solution + | Nullness.Variable nv1, _ -> + trace.Exec (fun () -> nv1.Set nullness2) (fun () -> nv1.Unset()) + CompleteD + | _, Nullness.Variable nv2 -> + trace.Exec (fun () -> nv2.Set nullness1) (fun () -> nv2.Unset()) + CompleteD + | Nullness.Known n1, Nullness.Known n2 -> + match n1, n2 with + | NullnessInfo.AmbivalentToNull, _ -> CompleteD + | _, NullnessInfo.AmbivalentToNull -> CompleteD + | NullnessInfo.WithNull, NullnessInfo.WithNull -> CompleteD + | NullnessInfo.WithoutNull, NullnessInfo.WithoutNull -> CompleteD + // Allow target of WithNull and actual of WithoutNull + | NullnessInfo.WithNull, NullnessInfo.WithoutNull -> CompleteD + | NullnessInfo.WithoutNull, NullnessInfo.WithNull -> + if csenv.g.checkNullness then + if not (isObjTy csenv.g ty1) && not (isObjTy csenv.g ty2) then + WarnD(ConstraintSolverNullnessWarningWithTypes(csenv.DisplayEnv, ty1, ty2, n1, n2, csenv.m, m2)) + else + CompleteD + else + CompleteD and SolveAnonInfoEqualsAnonInfo (csenv: ConstraintSolverEnv) m2 (anonInfo1: AnonRecdTypeInfo) (anonInfo2: AnonRecdTypeInfo) = if evalTupInfoIsStruct anonInfo1.TupInfo <> evalTupInfoIsStruct anonInfo2.TupInfo then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m,m2)) else @@ -972,7 +1057,7 @@ and SolveAnonInfoEqualsAnonInfo (csenv: ConstraintSolverEnv) m2 (anonInfo1: Anon /// Add the constraint "ty1 = ty2" to the constraint problem. /// Propagate all effects of adding this constraint, e.g. to solve type variables -and SolveTypeEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTrace) (cxsln:(TraitConstraintInfo * TraitConstraintSln) option) ty1 ty2 = +and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTrace) (cxsln:(TraitConstraintInfo * TraitConstraintSln) option) ty1 ty2 = let ndeep = ndeep + 1 let aenv = csenv.EquivEnv let g = csenv.g @@ -991,30 +1076,100 @@ and SolveTypeEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTr match sty1, sty2 with // type vars inside forall-types may be alpha-equivalent - | TType_var tp1, TType_var tp2 when typarEq tp1 tp2 || (match aenv.EquivTypars.TryFind tp1 with | Some v when typeEquiv g v ty2 -> true | _ -> false) -> CompleteD + | TType_var (tp1, nullness1), TType_var (tp2, nullness2) when typarEq tp1 tp2 || (match aenv.EquivTypars.TryFind tp1 with | Some v when typeEquiv g v ty2 -> true | _ -> false) -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullness2 + + | TType_var (tp1, nullness1), TType_var (tp2, nullness2) when PreferUnifyTypar tp1 tp2 -> + match nullness1.TryEvaluate(), nullness2.TryEvaluate() with + // Unifying 'T1? and 'T2? + | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull -> + SolveTyparEqualsType csenv ndeep m2 trace sty1 (TType_var (tp2, g.knownWithoutNull)) + //// Unifying 'T1 % and 'T2 % + //| ValueSome NullnessInfo.AmbivalentToNull, ValueSome NullnessInfo.AmbivalentToNull -> + // SolveTyparEqualsType csenv ndeep m2 trace sty1 (TType_var (tp2, g.knownWithoutNull)) + | _ -> + SolveTyparEqualsType csenv ndeep m2 trace sty1 ty2 ++ (fun () -> + let nullnessAfterSolution1 = combineNullness (nullnessOfTy g sty1) nullness1 + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullnessAfterSolution1 nullness2 + ) + + | TType_var (tp1, nullness1), TType_var (tp2, nullness2) when not csenv.MatchingOnly && PreferUnifyTypar tp2 tp1 -> + match nullness1.TryEvaluate(), nullness2.TryEvaluate() with + // Unifying 'T1? and 'T2? + | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull -> + SolveTyparEqualsType csenv ndeep m2 trace sty2 (TType_var (tp1, g.knownWithoutNull)) + //// Unifying 'T1 % and 'T2 % + //| ValueSome NullnessInfo.AmbivalentToNull, ValueSome NullnessInfo.AmbivalentToNull -> + // SolveTyparEqualsType csenv ndeep m2 trace sty2 (TType_var (tp1, g.knownWithoutNull)) + | _ -> + // Unifying 'T1 ? and 'T2 % + // Unifying 'T1 % and 'T2 ? + SolveTyparEqualsType csenv ndeep m2 trace sty2 ty1 ++ (fun () -> + let nullnessAfterSolution2 = combineNullness (nullnessOfTy g sty2) nullness2 + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullnessAfterSolution2 + ) + + | TType_var (tp1, nullness1), _ when (tp1.Rigidity <> TyparRigidity.Rigid) -> + match nullness1.TryEvaluate(), (nullnessOfTy g sty2).TryEvaluate() with + // Unifying 'T1? and 'T2? + | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull -> + SolveTyparEqualsType csenv ndeep m2 trace sty1 (replaceNullnessOfTy g.knownWithoutNull sty2) + //// Unifying 'T1 % and 'T2 % + //| ValueSome NullnessInfo.AmbivalentToNull, ValueSome NullnessInfo.AmbivalentToNull -> + // SolveTyparEqualsType csenv ndeep m2 trace sty1 (replaceNullnessOfTy g.knownWithoutNull sty2) + | _ -> + SolveTyparEqualsType csenv ndeep m2 trace sty1 ty2 ++ (fun () -> + let nullnessAfterSolution1 = combineNullness (nullnessOfTy g sty1) nullness1 + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullnessAfterSolution1 (nullnessOfTy g sty2) + ) + + | _, TType_var (tp2, nullness2) when (tp2.Rigidity <> TyparRigidity.Rigid) && not csenv.MatchingOnly -> + match (nullnessOfTy g sty1).TryEvaluate(), nullness2.TryEvaluate() with + // Unifying 'T1? and 'T2? + | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull -> + SolveTyparEqualsType csenv ndeep m2 trace sty2 (replaceNullnessOfTy g.knownWithoutNull sty1) + //// Unifying 'T1 % and 'T2 % + //| ValueSome NullnessInfo.AmbivalentToNull, ValueSome NullnessInfo.AmbivalentToNull -> + // SolveTyparEqualsType csenv ndeep m2 trace sty2 (replaceNullnessOfTy g.knownWithoutNull sty1) + | _ -> + SolveTyparEqualsType csenv ndeep m2 trace sty2 ty1 ++ (fun () -> + let nullnessAfterSolution2 = combineNullness (nullnessOfTy g sty2) nullness2 + SolveNullnessEquiv csenv m2 trace ty1 ty2 (nullnessOfTy g sty1) nullnessAfterSolution2 + ) - | TType_var tp1, TType_var tp2 when PreferUnifyTypar tp1 tp2 -> SolveTyparEqualsType csenv ndeep m2 trace sty1 ty2 - | TType_var tp1, TType_var tp2 when not csenv.MatchingOnly && PreferUnifyTypar tp2 tp1 -> SolveTyparEqualsType csenv ndeep m2 trace sty2 ty1 + // Catch float<_>=float<1>, float32<_>=float32<1> and decimal<_>=decimal<1> + | (_, TType_app (tc2, [ms2], nullness2)) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms2])) -> + SolveTypeEqualsType csenv ndeep m2 trace None (TType_measure Measure.One) ms2 ++ (fun () -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 (nullnessOfTy g sty1) nullness2 + ) - | TType_var r, _ when (r.Rigidity <> TyparRigidity.Rigid) -> SolveTyparEqualsType csenv ndeep m2 trace sty1 ty2 - | _, TType_var r when (r.Rigidity <> TyparRigidity.Rigid) && not csenv.MatchingOnly -> SolveTyparEqualsType csenv ndeep m2 trace sty2 ty1 + | (TType_app (tc1, [ms1], nullness1), _) when (tc1.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc1 [ms1])) -> + SolveTypeEqualsType csenv ndeep m2 trace None ms1 (TType_measure Measure.One) ++ (fun () -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 (nullnessOfTy g sty2) + ) - // Catch float<_>=float<1>, float32<_>=float32<1> and decimal<_>=decimal<1> - | (_, TType_app (tc2, [ms])) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) - -> SolveTypeEqualsType csenv ndeep m2 trace None ms (TType_measure Measure.One) - | (TType_app (tc2, [ms]), _) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) - -> SolveTypeEqualsType csenv ndeep m2 trace None ms (TType_measure Measure.One) + | TType_app (tc1, l1, nullness1), TType_app (tc2, l2, nullness2) when tyconRefEq g tc1 tc2 -> + SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2 ++ (fun () -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullness2 + ) - | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2 -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2 - | TType_app (_, _), TType_app (_, _) -> localAbortD - | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2) -> + | TType_app _, TType_app _ -> localAbortD + + | TType_tuple (tupInfo1, l1) , TType_tuple (tupInfo2, l2) -> if evalTupInfoIsStruct tupInfo1 <> evalTupInfoIsStruct tupInfo2 then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m, m2)) else SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2 + + | TType_fun (d1, r1, nullness1) , TType_fun (d2, r2, nullness2) -> + SolveFunTypeEqn csenv ndeep m2 trace None d1 d2 r1 r2 ++ (fun () -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullness2 + ) + + | TType_measure ms1 , TType_measure ms2 -> + UnifyMeasures csenv trace ms1 ms2 + | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2) -> SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2) - | TType_fun (d1, r1), TType_fun (d2, r2) -> SolveFunTypeEqn csenv ndeep m2 trace None d1 d2 r1 r2 - | TType_measure ms1, TType_measure ms2 -> UnifyMeasures csenv trace ms1 ms2 | TType_forall(tps1, rty1), TType_forall(tps2, rty2) -> if tps1.Length <> tps2.Length then localAbortD else let aenv = aenv.BindEquivTypars tps1 tps2 @@ -1022,11 +1177,14 @@ and SolveTypeEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTr if not (typarsAEquiv g aenv tps1 tps2) then localAbortD else SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace rty1 rty2 - | TType_ucase (uc1, l1), TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2 -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2 + | TType_ucase (uc1, l1) , TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2 -> + SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2 + | _ -> localAbortD -and SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace ty1 ty2 = SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace None ty1 ty2 +and SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace ty1 ty2 = + SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace None ty1 ty2 and private SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ty1 ty2 = // Back out of expansions of type abbreviations to give improved error messages. @@ -1051,7 +1209,9 @@ and SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln origl1 origl2 = loop origl1 origl2 and SolveFunTypeEqn csenv ndeep m2 trace cxsln d1 d2 r1 r2 = trackErrors { - do! SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln d1 d2 + // TODO NULLNESS: consider whether flipping the actual and expected in argument position + // causes other problems, e.g. better/worse diagnostics + do! SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln d2 d1 return! SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln r1 r2 } @@ -1074,51 +1234,71 @@ and SolveTypeSubsumesType (csenv: ConstraintSolverEnv) ndeep m2 (trace: Optional let denv = csenv.DisplayEnv match sty1, sty2 with - | TType_var tp1, _ -> + | TType_var (tp1, nullness1) , _ -> match aenv.EquivTypars.TryFind tp1 with | Some v -> SolveTypeSubsumesType csenv ndeep m2 trace cxsln v ty2 | _ -> match sty2 with - | TType_var r2 when typarEq tp1 r2 -> CompleteD - | TType_var r when not csenv.MatchingOnly -> SolveTyparSubtypeOfType csenv ndeep m2 trace r ty1 + | TType_var (r2, nullness2) when typarEq tp1 r2 -> + SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullness2 + | TType_var (r2, nullness2) when not csenv.MatchingOnly -> + SolveTyparSubtypeOfType csenv ndeep m2 trace r2 ty1 ++ (fun () -> + let nullnessAfterSolution2 = combineNullness (nullnessOfTy g sty2) nullness2 + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nullness1 nullnessAfterSolution2 + ) | _ -> SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ty1 ty2 - | _, TType_var r when not csenv.MatchingOnly -> SolveTyparSubtypeOfType csenv ndeep m2 trace r ty1 + | _, TType_var (r2, nullness2) when not csenv.MatchingOnly -> + SolveTyparSubtypeOfType csenv ndeep m2 trace r2 ty1 ++ (fun () -> + let nullnessAfterSolution2 = combineNullness (nullnessOfTy g sty2) nullness2 + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 (nullnessOfTy g sty1) nullnessAfterSolution2 + ) | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2) -> if evalTupInfoIsStruct tupInfo1 <> evalTupInfoIsStruct tupInfo2 then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m, m2)) else SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2 (* nb. can unify since no variance *) + | TType_fun (d1, r1, nullness1), TType_fun (d2, r2, nullness2) -> + // nb. can unify since no variance + SolveFunTypeEqn csenv ndeep m2 trace cxsln d1 d2 r1 r2 ++ (fun () -> + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nullness1 nullness2 + ) + | TType_anon (anonInfo1, l1), TType_anon (anonInfo2, l2) -> SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2) (* nb. can unify since no variance *) - | TType_fun (d1, r1), TType_fun (d2, r2) -> SolveFunTypeEqn csenv ndeep m2 trace cxsln d1 d2 r1 r2 (* nb. can unify since no variance *) - - | TType_measure ms1, TType_measure ms2 -> UnifyMeasures csenv trace ms1 ms2 + | TType_measure ms1, TType_measure ms2 -> + UnifyMeasures csenv trace ms1 ms2 // Enforce the identities float=float<1>, float32=float32<1> and decimal=decimal<1> - | (_, TType_app (tc2, [ms])) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) - -> SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms (TType_measure Measure.One) + | (_, TType_app (tc2, [ms2], nullness2)) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms2])) -> + SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms2 (TType_measure Measure.One) ++ (fun () -> + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 (nullnessOfTy g sty1) nullness2 + ) - | (TType_app (tc2, [ms]), _) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) - -> SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms (TType_measure Measure.One) + | (TType_app (tc1, [ms1], nullness1), _) when (tc1.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc1 [ms1])) -> + SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms1 (TType_measure Measure.One) ++ (fun () -> + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nullness1 (nullnessOfTy g sty2) + ) // Special subsumption rule for byref tags - | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2 && g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tc1 -> + | TType_app (tc1, l1, _nullness1) , TType_app (tc2, l2, _nullness2) when tyconRefEq g tc1 tc2 && g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tc1 -> match l1, l2 with | [ h1; tag1 ], [ h2; tag2 ] -> trackErrors { do! SolveTypeEqualsType csenv ndeep m2 trace None h1 h2 match stripTyEqnsA csenv.g canShortcut tag1, stripTyEqnsA csenv.g canShortcut tag2 with - | TType_app(tagc1, []), TType_app(tagc2, []) + | TType_app(tagc1, [], _), TType_app(tagc2, [], _) when (tyconRefEq g tagc2 g.byrefkind_InOut_tcr && (tyconRefEq g tagc1 g.byrefkind_In_tcr || tyconRefEq g tagc1 g.byrefkind_Out_tcr) ) -> () | _ -> return! SolveTypeEqualsType csenv ndeep m2 trace cxsln tag1 tag2 } | _ -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2 - | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2 -> - SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2 + | TType_app (tc1, l1, nullness1) , TType_app (tc2, l2, nullness2) when tyconRefEq g tc1 tc2 -> + SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2 ++ (fun () -> + SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nullness1 nullness2 + ) | TType_ucase (uc1, l1), TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2 -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2 @@ -1657,15 +1837,15 @@ and MemberConstraintSolutionOfMethInfo css m minfo minst = let allArgVars, allArgs = minfo.GetParamTypes(amap, m, minst) |> List.concat |> List.mapi (fun i ty -> mkLocal m ("arg"+string i) ty) |> List.unzip let objArgVars, objArgs = (if minfo.IsInstance then [mkLocal m "this" minfo.ApparentEnclosingType] else []) |> List.unzip let callMethInfoOpt, callExpr, callExprTy = ProvidedMethodCalls.BuildInvokerExpressionForProvidedMethodCall css.TcVal (g, amap, mi, objArgs, NeverMutates, false, ValUseFlag.NormalValUse, allArgs, m) - let closedExprSln = ClosedExprSln (mkLambdas m [] (objArgVars@allArgVars) (callExpr, callExprTy) ) + let closedExprSln = ClosedExprSln (mkLambdas g m [] (objArgVars@allArgVars) (callExpr, callExprTy) ) // If the call is a simple call to an IL method with all the arguments in the natural order, then revert to use ILMethSln. // This is important for calls to operators on generated provided types. There is an (unchecked) condition // that generative providers do not re=order arguments or insert any more information into operator calls. match callMethInfoOpt, callExpr with | Some methInfo, Expr.Op (TOp.ILCall (_useCallVirt, _isProtected, _, _isNewObj, NormalValUse, _isProp, _noTailCall, ilMethRef, _actualTypeInst, actualMethInst, _ilReturnTys), [], args, m) - when (args, (objArgVars@allArgVars)) ||> List.lengthsEqAndForall2 (fun a b -> match a with Expr.Val (v, _, _) -> valEq v.Deref b | _ -> false) -> - let declaringType = Import.ImportProvidedType amap m (methInfo.PApply((fun x -> x.DeclaringType), m)) + when (args, (objArgVars@allArgVars)) ||> List.lengthsEqAndForall2 (fun a b -> match a with Expr.Val(v, _, _) -> valEq v.Deref b | _ -> false) -> + let declaringType = Import.ImportProvidedType amap m (methInfo.PApply((fun x -> nonNull x.DeclaringType), m)) if isILAppTy g declaringType then let extOpt = None // EXTENSION METHODS FROM TYPE PROVIDERS: for extension methods coming from the type providers we would have something here. ILMethSln(declaringType, extOpt, ilMethRef, actualMethInst) @@ -1864,12 +2044,21 @@ and AddConstraint (csenv: ConstraintSolverEnv) ndeep m2 trace tp newConstraint } | TyparConstraint.SupportsComparison _, TyparConstraint.IsDelegate _ - | TyparConstraint.IsDelegate _, TyparConstraint.SupportsComparison _ + | TyparConstraint.IsDelegate _ , TyparConstraint.SupportsComparison _ -> + ErrorD (Error(FSComp.SR.csDelegateComparisonConstraintInconsistent(), m)) + + | TyparConstraint.NotSupportsNull _, TyparConstraint.SupportsNull _ + | TyparConstraint.SupportsNull _, TyparConstraint.NotSupportsNull _ -> + ErrorD (Error(FSComp.SR.csNullNotNullConstraintInconsistent(), m)) + + | TyparConstraint.SupportsNull _, TyparConstraint.IsNonNullableStruct _ + | TyparConstraint.IsNonNullableStruct _, TyparConstraint.SupportsNull _ -> + ErrorD (Error(FSComp.SR.csStructNullConstraintInconsistent(), m)) + | TyparConstraint.IsNonNullableStruct _, TyparConstraint.IsReferenceType _ | TyparConstraint.IsReferenceType _, TyparConstraint.IsNonNullableStruct _ -> ErrorD (Error(FSComp.SR.csStructConstraintInconsistent(), m)) - | TyparConstraint.SupportsComparison _, TyparConstraint.SupportsComparison _ | TyparConstraint.SupportsEquality _, TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _, TyparConstraint.SupportsNull _ @@ -1905,6 +2094,7 @@ and AddConstraint (csenv: ConstraintSolverEnv) ndeep m2 trace tp newConstraint // comparison implies equality | TyparConstraint.SupportsComparison _, TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _, TyparConstraint.SupportsNull _ + | TyparConstraint.NotSupportsNull _, TyparConstraint.NotSupportsNull _ | TyparConstraint.IsNonNullableStruct _, TyparConstraint.IsNonNullableStruct _ | TyparConstraint.IsUnmanaged _, TyparConstraint.IsUnmanaged _ | TyparConstraint.IsReferenceType _, TyparConstraint.IsReferenceType _ @@ -1972,20 +2162,129 @@ and AddConstraint (csenv: ConstraintSolverEnv) ndeep m2 trace tp newConstraint } -and SolveTypeSupportsNull (csenv: ConstraintSolverEnv) ndeep m2 trace ty = +and SolveNullnessSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTrace) ty nullness = trackErrors { let g = csenv.g let m = csenv.m let denv = csenv.DisplayEnv - match tryDestTyparTy g ty with - | ValueSome destTypar -> - AddConstraint csenv ndeep m2 trace destTypar (TyparConstraint.SupportsNull m) - | ValueNone -> - if TypeSatisfiesNullConstraint g m ty then CompleteD else + match nullness with + | Nullness.Variable nv -> + if nv.IsSolved then + do! SolveNullnessSupportsNull csenv ndeep m2 trace ty nv.Solution + else + trace.Exec (fun () -> nv.Set KnownWithNull) (fun () -> nv.Unset()) + | Nullness.Known n1 -> + match n1 with + | NullnessInfo.AmbivalentToNull -> () + | NullnessInfo.WithNull -> () + | NullnessInfo.WithoutNull -> + if g.checkNullness then + if not (isObjTy g ty) then + return! WarnD(ConstraintSolverNullnessWarningWithType(denv, ty, n1, m, m2)) + } + +and SolveTypeSupportsNullCore (csenv:ConstraintSolverEnv) ndeep m2 trace ty = trackErrors { + let g = csenv.g + let m = csenv.m + let denv = csenv.DisplayEnv + if TypeNullIsExtraValueNew g m ty then + () + else match ty with | NullableTy g _ -> - ErrorD (ConstraintSolverError(FSComp.SR.csNullableTypeDoesNotHaveNull(NicePrint.minimalStringOfType denv ty), m, m2)) + return! ErrorD (ConstraintSolverError(FSComp.SR.csNullableTypeDoesNotHaveNull(NicePrint.minimalStringOfType denv ty), m, m2)) | _ -> - ErrorD (ConstraintSolverError(FSComp.SR.csTypeDoesNotHaveNull(NicePrint.minimalStringOfType denv ty), m, m2)) + // If langFeatureNullness is on then solve, maybe give warnings + if g.langFeatureNullness then + let nullness = nullnessOfTy g ty + do! SolveNullnessSupportsNull csenv ndeep m2 trace ty nullness + + // If langFeatureNullness or checkNullness are off give the same errors as F# 4.5 + if not g.langFeatureNullness || not g.checkNullness then + if not (TypeNullIsExtraValueOld g m ty) then + return! ErrorD (ConstraintSolverError(FSComp.SR.csTypeDoesNotHaveNull(NicePrint.minimalStringOfType denv ty), m, m2)) + } + +// This version prefers to constrain a type parameter definiton +and SolveTypeDefnSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 trace ty = + let g = csenv.g + let m = csenv.m + match stripTyparEqns ty with + // If you set a type variable constrained with a T: null to U? then you don't induce an inference constraint + // of U: null. + // TODO: what about Obsolete? + | TType_var(_, nullness) when nullness.Evaluate() = NullnessInfo.WithNull -> CompleteD + | _ -> + match tryDestTyparTy g ty with + | ValueSome tp -> + AddConstraint csenv ndeep m2 trace tp (TyparConstraint.SupportsNull m) + | ValueNone -> + SolveTypeSupportsNullCore csenv ndeep m2 trace ty + +// This version prefers to constrain the nullness annotation +and SolveTypeUseSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 trace ty = + let m = csenv.m + match stripTyparEqns ty with + | TType_var(tp, nullness) -> + AddConstraint csenv ndeep m2 trace tp (TyparConstraint.IsReferenceType m) ++ (fun () -> + SolveNullnessSupportsNull csenv ndeep m2 trace ty nullness) + | _ -> + SolveTypeSupportsNullCore csenv ndeep m2 trace ty + +and SolveNullnessNotSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTrace) ty nullness = trackErrors { + let g = csenv.g + let m = csenv.m + let denv = csenv.DisplayEnv + match nullness with + | Nullness.Variable nv -> + if nv.IsSolved then + do! SolveNullnessNotSupportsNull csenv ndeep m2 trace ty nv.Solution + else + trace.Exec (fun () -> nv.Set KnownWithoutNull) (fun () -> nv.Unset()) + | Nullness.Known n1 -> + match n1 with + | NullnessInfo.AmbivalentToNull -> () + | NullnessInfo.WithoutNull -> () + | NullnessInfo.WithNull -> + if g.checkNullness then + if not (isObjTy g ty) then + return! WarnD(ConstraintSolverNonNullnessWarningWithType(denv, ty, n1, m, m2)) + else + if TypeNullIsExtraValueOld g m ty then + return! ErrorD (ConstraintSolverError(FSComp.SR.csTypeHasNullAsExtraValue(NicePrint.minimalStringOfType denv ty), m, m2)) + } + +and SolveTypeNotSupportsNullCore (csenv:ConstraintSolverEnv) ndeep m2 trace ty = trackErrors { + let g = csenv.g + let m = csenv.m + let denv = csenv.DisplayEnv + if TypeNullIsTrueValue g ty then + // We can only give warnings here as F# 5.0 introduces these constraints into existing + // code via Option.ofObj and Option.toObj + do! WarnD (ConstraintSolverError(FSComp.SR.csTypeHasNullAsTrueValue(NicePrint.minimalStringOfType denv ty), m, m2)) + elif TypeNullIsExtraValueNew g m ty then + if g.checkNullness || TypeNullIsExtraValueOld g m ty then + do! WarnD (ConstraintSolverError(FSComp.SR.csTypeHasNullAsExtraValue(NicePrint.minimalStringOfType denv ty), m, m2)) + else + if g.checkNullness then + let nullness = nullnessOfTy g ty + do! SolveNullnessNotSupportsNull csenv ndeep m2 trace ty nullness + } + +// This version prefers to constrain a type parameter definiton +and SolveTypeDefnNotSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 trace ty = + let g = csenv.g + let m = csenv.m + //match stripTyparEqns ty with + //// If you set a type variable constrained with a T: not null to U then you don't induce an inference constraint + //// of U: not null. + //// TODO: what about Obsolete? + //| TType_var(_, nullness) when nullness.TryEvaluate() = Some NullnessInfo.WithoutNull || nullness.TryEvaluate() = Some NullnessInfo.AmbivalentToNull -> CompleteD + //| _ -> + match tryDestTyparTy g ty with + | ValueSome tp -> + AddConstraint csenv ndeep m2 trace tp (TyparConstraint.NotSupportsNull m) + | ValueNone -> + SolveTypeNotSupportsNullCore csenv ndeep m2 trace ty and SolveTypeSupportsComparison (csenv: ConstraintSolverEnv) ndeep m2 trace ty = let g = csenv.g @@ -2168,7 +2467,7 @@ and SolveTypeRequiresDefaultConstructor (csenv: ConstraintSolverEnv) ndeep m2 tr | ValueSome destTypar -> AddConstraint csenv ndeep m2 trace destTypar (TyparConstraint.RequiresDefaultConstructor m) | _ -> - if isStructTy g ty && TypeHasDefaultValue g m ty then + if isStructTy g ty && TypeHasDefaultValueOld g m ty then CompleteD else if GetIntrinsicConstructorInfosOfType csenv.InfoReader m ty @@ -2231,12 +2530,16 @@ and CanMemberSigsMatchUpToCheck else return! ErrorD(Error (FSComp.SR.csMemberIsNotInstance(minfo.LogicalName), m)) else - do! Iterate2D subsumeTypes calledObjArgTys callerObjArgTys + // The object types must be non-null + let nonNullCalledObjArgTys = calledObjArgTys |> List.map (replaceNullnessOfTy g.knownWithoutNull) + do! Iterate2D subsumeTypes nonNullCalledObjArgTys callerObjArgTys + for argSet in calledMeth.ArgSets do if argSet.UnnamedCalledArgs.Length <> argSet.UnnamedCallerArgs.Length then return! ErrorD(Error(FSComp.SR.csArgumentLengthMismatch(), m)) else do! Iterate2D subsumeArg argSet.UnnamedCalledArgs argSet.UnnamedCallerArgs + match calledMeth.ParamArrayCalledArgOpt with | Some calledArg -> if isArray1DTy g calledArg.CalledArgumentType then @@ -2962,10 +3265,24 @@ let AddCxMethodConstraint denv css m trace traitInfo = (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m))) |> RaiseOperationResult -let AddCxTypeMustSupportNull denv css m trace ty = +let AddCxTypeDefnSupportsNull denv css m trace ty = + let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv + TryD_IgnoreAbortForFailedOverloadResolution + (fun () -> SolveTypeDefnSupportsNull csenv 0 m trace ty) + (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m))) + |> RaiseOperationResult + +let AddCxTypeDefnNotSupportsNull denv css m trace ty = + let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv + TryD_IgnoreAbortForFailedOverloadResolution + (fun () -> SolveTypeDefnNotSupportsNull csenv 0 m trace ty) + (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m))) + |> RaiseOperationResult + +let AddCxTypeUseSupportsNull denv css m trace ty = let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv TryD_IgnoreAbortForFailedOverloadResolution - (fun () -> SolveTypeSupportsNull csenv 0 m trace ty) + (fun () -> SolveTypeUseSupportsNull csenv 0 m trace ty) (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m))) |> RaiseOperationResult diff --git a/src/fsharp/ConstraintSolver.fsi b/src/fsharp/ConstraintSolver.fsi index 864dd0a539d..47f4f1528b1 100644 --- a/src/fsharp/ConstraintSolver.fsi +++ b/src/fsharp/ConstraintSolver.fsi @@ -1,3 +1,4 @@ + // Copyright (c) Microsoft Corporation. All Rights Reserved. See License.txt in the project root for license information. /// Solves constraints using a mutable constraint-solver state @@ -20,7 +21,7 @@ open FSharp.Compiler.TypedTreeOps val NewAnonTypar: TyparKind * range * TyparRigidity * TyparStaticReq * TyparDynamicReq -> Typar /// Create an inference type variable -val NewInferenceType: unit -> TType +val NewInferenceType: TcGlobals -> TType /// Create an inference type variable for the kind of a byref pointer val NewByRefKindInferenceType: TcGlobals -> range -> TType @@ -32,7 +33,7 @@ val NewErrorType: unit -> TType val NewErrorMeasure: unit -> Measure /// Create a list of inference type variables, one for each element in the input list -val NewInferenceTypes: 'a list -> TType list +val NewInferenceTypes: TcGlobals -> 'a list -> TType list /// Given a set of formal type parameters and their constraints, make new inference type variables for /// each and ensure that the constraints on the new type variables are adjusted to refer to these. @@ -112,6 +113,10 @@ exception ConstraintSolverInfiniteTypes of displayEnv: DisplayEn exception ConstraintSolverTypesNotInEqualityRelation of displayEnv: DisplayEnv * TType * TType * range * range * ContextInfo exception ConstraintSolverTypesNotInSubsumptionRelation of displayEnv: DisplayEnv * argTy: TType * paramTy: TType * callRange: range * parameterRange: range exception ConstraintSolverMissingConstraint of displayEnv: DisplayEnv * Typar * TyparConstraint * range * range +exception ConstraintSolverNullnessWarningEquivWithTypes of DisplayEnv * TType * TType * NullnessInfo * NullnessInfo * range * range +exception ConstraintSolverNullnessWarningWithTypes of DisplayEnv * TType * TType * NullnessInfo * NullnessInfo * range * range +exception ConstraintSolverNullnessWarningWithType of DisplayEnv * TType * NullnessInfo * range * range +exception ConstraintSolverNonNullnessWarningWithType of DisplayEnv * TType * NullnessInfo * range * range exception ConstraintSolverError of string * range * range exception ConstraintSolverRelatedInformation of string option * range * exn @@ -167,7 +172,11 @@ val AddCxTypeMustSubsumeTypeMatchingOnlyUndoIfFailed: DisplayEnv -> ConstraintSo val AddCxMethodConstraint: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TraitConstraintInfo -> unit -val AddCxTypeMustSupportNull: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit +val AddCxTypeDefnNotSupportsNull: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit + +val AddCxTypeDefnSupportsNull: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit + +val AddCxTypeUseSupportsNull: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit val AddCxTypeMustSupportComparison: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit diff --git a/src/fsharp/DetupleArgs.fs b/src/fsharp/DetupleArgs.fs index 511e5cdc03f..7e378b54ae3 100644 --- a/src/fsharp/DetupleArgs.fs +++ b/src/fsharp/DetupleArgs.fs @@ -467,7 +467,7 @@ let mkTransform g (f: Val) m tps x1Ntys rty (callPattern, tyfringes: (TType list let tys1r = List.collect fst tyfringes (* types for collapsed initial r args *) let tysrN = List.drop tyfringes.Length x1Ntys (* types for remaining args *) let argtys = tys1r @ tysrN - let fCty = mkLambdaTy tps argtys rty + let fCty = mkLambdaTy g tps argtys rty let transformedVal = // Ensure that we have an g.CompilerGlobalState assert(g.CompilerGlobalState |> Option.isSome) @@ -792,8 +792,8 @@ let passBind penv (TBind(fOrig, repr, letSeqPtOpt) as bind) = let rebinds = List.concat (List.map2 transRebind transformedFormals x1ps) // fCBody - rebuild // fCBody = TLambda tps. Lam formals. let rebinds in body - let rbody, rt = mkLetsBind m rebinds body, rty - let bind = mkMultiLambdaBind transformedVal letSeqPtOpt m tps formals (rbody, rt) + let rbody, rt = mkLetsBind m rebinds body, rty + let bind = mkMultiLambdaBind penv.g transformedVal letSeqPtOpt m tps formals (rbody, rt) // result bind diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs index 3e345ea4abf..9647d64012c 100755 --- a/src/fsharp/ErrorLogger.fs +++ b/src/fsharp/ErrorLogger.fs @@ -232,7 +232,6 @@ type PhasedDiagnostic = | BuildPhaseSubcategory.Parameter | BuildPhaseSubcategory.Parse | BuildPhaseSubcategory.TypeCheck -> true - | null | BuildPhaseSubcategory.DefaultPhase | BuildPhaseSubcategory.CodeGen | BuildPhaseSubcategory.Optimize @@ -627,8 +626,14 @@ let NewlineifyErrorString (message:string) = message.Replace(stringThatIsAProxyF /// fixes given string by replacing all control chars with spaces. /// NOTE: newlines are recognized and replaced with stringThatIsAProxyForANewlineInFlatErrors (ASCII 29, the 'group separator'), /// which is decoded by the IDE with 'NewlineifyErrorString' back into newlines, so that multi-line errors can be displayed in QuickInfo +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let NormalizeErrorString (text : string) = if isNull text then nullArg "text" +#else +let NormalizeErrorString (text : string?) = + let text = nullArgCheck "text" text +#endif + let text = text.Trim() let buf = System.Text.StringBuilder() diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs index 034ac810b99..db7f74e2f3f 100644 --- a/src/fsharp/ExtensionTyping.fs +++ b/src/fsharp/ExtensionTyping.fs @@ -59,8 +59,11 @@ module internal ExtensionTyping = let filtered = [ for t in exportedTypes do let ca = t.GetCustomAttributes(typeof, true) - if ca <> null && ca.Length > 0 then - yield t ] + match ca with + | null -> () + | NonNull ca -> + if ca.Length > 0 then + yield t ] filtered with e -> let folder = System.IO.Path.GetDirectoryName loadedDesignTimeAssembly.Location @@ -178,7 +181,7 @@ module internal ExtensionTyping = let unmarshal (t: Tainted<_>) = t.PUntaintNoFailure id /// Try to access a member on a provided type, catching and reporting errors - let TryTypeMember(st: Tainted<_>, fullName, memberName, m, recover, f) = + let TryTypeMember<'T,'U>(st: Tainted<'T>, fullName, memberName, m, recover, f: 'T -> 'U) = try st.PApply (f, m) with :? TypeProviderError as tpe -> @@ -187,16 +190,11 @@ module internal ExtensionTyping = /// Try to access a member on a provided type, where the result is an array of values, catching and reporting errors let TryTypeMemberArray (st: Tainted<_>, fullName, memberName, m, f) = - let result = - try - st.PApplyArray(f, memberName, m) - with :? TypeProviderError as tpe -> - tpe.Iter (fun e -> error(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m))) - [||] - - match result with - | null -> error(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m)); [||] - | r -> r + try + st.PApplyArray(f, memberName, m) + with :? TypeProviderError as tpe -> + tpe.Iter (fun e -> error(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m))) + [||] /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, let TryTypeMemberNonNull (st: Tainted<_>, fullName, memberName, m, recover, f) = @@ -204,7 +202,7 @@ module internal ExtensionTyping = | Tainted.Null -> errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m)); st.PApplyNoFailure(fun _ -> recover) - | r -> r + | Tainted.NonNull r -> r /// Try to access a property or method on a provided member, catching and reporting errors let TryMemberMember (mi: Tainted<_>, typeName, memberName, memberMemberName, m, recover, f) = @@ -219,8 +217,14 @@ module internal ExtensionTyping = resolver.PUntaint((fun tp -> tp.GetType().Name), m) /// Validate a provided namespace name - let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string) = - if nsp<>null then // Null namespace designates the global namespace. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string) = +#else + let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string?) = +#endif + match nsp with + | null -> () + | NonNull nsp -> if String.IsNullOrWhiteSpace nsp then // Empty namespace is not allowed errorR(Error(FSComp.SR.etEmptyNamespaceOfTypeNotAllowed(name, typeProvider.PUntaint((fun tp -> tp.GetType().Name), m)), m)) @@ -304,7 +308,10 @@ module internal ExtensionTyping = type CustomAttributeNamedArgument = System.Reflection.CustomAttributeNamedArgument type CustomAttributeTypedArgument = System.Reflection.CustomAttributeTypedArgument - [] + [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif type ProvidedType (x: System.Type, ctxt: ProvidedTypeContext) = inherit ProvidedMemberInfo(x, ctxt) let isMeasure = @@ -327,7 +334,11 @@ module internal ExtensionTyping = member __.IsSuppressRelocate = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.SuppressRelocate)) <> enum 0 member __.IsErased = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.IsErased)) <> enum 0 member __.IsGenericType = x.IsGenericType - member __.Namespace = x.Namespace +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + member __.Namespace : string = x.Namespace +#else + member __.Namespace : string? = x.Namespace +#endif member __.FullName = x.FullName member __.IsArray = x.IsArray member __.Assembly = x.Assembly |> ProvidedAssembly.Create @@ -370,6 +381,7 @@ module internal ExtensionTyping = member __.GetArrayRank() = x.GetArrayRank() member __.GenericParameterPosition = x.GenericParameterPosition member __.RawSystemType = x + /// Type.GetEnumUnderlyingType either returns type or raises exception, null is not permitted member __.GetEnumUnderlyingType() = x.GetEnumUnderlyingType() @@ -381,13 +393,36 @@ module internal ExtensionTyping = member __.MakeGenericType (args: ProvidedType[]) = let argTypes = args |> Array.map (fun arg -> arg.RawSystemType) ProvidedType.CreateNoContext(x.MakeGenericType(argTypes)) + member __.AsProvidedVar name = ProvidedVar.Create ctxt (Quotations.Var(name, x)) - static member Create ctxt x = match x with null -> null | t -> ProvidedType (t, ctxt) - static member CreateWithNullCheck ctxt name x = match x with null -> nullArg name | t -> ProvidedType (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedType.Create ctxt) - static member CreateNoContext (x: Type) = ProvidedType.Create ProvidedTypeContext.Empty x + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt x : ProvidedType = +#else + static member Create ctxt x : ProvidedType? = +#endif + match x with + | null -> null + | NonNull t -> ProvidedType (t, ctxt) + + static member CreateNonNull ctxt x = ProvidedType (x, ctxt) + + static member CreateWithNullCheck ctxt name x = + match x with + | null -> nullArg name + | t -> ProvidedType (t, ctxt) + + static member CreateArray ctxt xs = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedType.CreateNonNull ctxt) + + static member CreateNoContext (x:Type) = ProvidedType.Create ProvidedTypeContext.Empty x + static member Void = ProvidedType.CreateNoContext typeof + member __.Handle = x + override __.Equals y = assert false; match y with :? ProvidedType as y -> x.Equals y.Handle | _ -> false override __.GetHashCode() = assert false; x.GetHashCode() member __.TryGetILTypeRef() = ctxt.TryGetILTypeRef x @@ -397,12 +432,22 @@ module internal ExtensionTyping = static member TaintedEquals (pt1: Tainted, pt2: Tainted) = Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle)) - and [] + and +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif IProvidedCustomAttributeProvider = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string * int * int) option +#else + abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string? * int * int) option +#endif + abstract GetXmlDocAttributes : provider: ITypeProvider -> string[] - abstract GetHasTypeProviderEditorHideMethodsAttribute : provider: ITypeProvider -> bool - abstract GetAttributeConstructorArgs: provider: ITypeProvider * attribName: string -> (obj option list * (string * obj option) list) option + + abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool + + abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option and ProvidedCustomAttributeProvider = static member Create (attributes :(ITypeProvider -> seq)) : IProvidedCustomAttributeProvider = @@ -448,7 +493,10 @@ module internal ExtensionTyping = None) |> Seq.toArray } - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedMemberInfo (x: System.Reflection.MemberInfo, ctxt) = let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes) member __.Name = x.Name @@ -460,39 +508,72 @@ module internal ExtensionTyping = member __.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider member __.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName) - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedParameterInfo (x: System.Reflection.ParameterInfo, ctxt) = let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes) - member __.Name = x.Name + member __.Name = let nm = x.Name in match box nm with null -> "" | _ -> nm member __.IsOut = x.IsOut member __.IsIn = x.IsIn member __.IsOptional = x.IsOptional member __.RawDefaultValue = x.RawDefaultValue member __.HasDefaultValue = x.Attributes.HasFlag(System.Reflection.ParameterAttributes.HasDefault) /// ParameterInfo.ParameterType cannot be null - member __.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType - static member Create ctxt x = match x with null -> null | t -> ProvidedParameterInfo (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedParameterInfo.Create ctxt) // TODO null wrong? + member __.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt (x: ParameterInfo) : ProvidedParameterInfo = +#else + static member Create ctxt (x: ParameterInfo?) : ProvidedParameterInfo? = +#endif + match x with + | null -> null + | NonNull x -> ProvidedParameterInfo (x, ctxt) + + static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt) + + static member CreateArray ctxt (xs: ParameterInfo[]) : ProvidedParameterInfo[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt) + interface IProvidedCustomAttributeProvider with member __.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider member __.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider member __.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider member __.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName) + member __.Handle = x override __.Equals y = assert false; match y with :? ProvidedParameterInfo as y -> x.Equals y.Handle | _ -> false override __.GetHashCode() = assert false; x.GetHashCode() - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedAssembly (x: System.Reflection.Assembly) = member __.GetName() = x.GetName() member __.FullName = x.FullName member __.GetManifestModuleContents(provider: ITypeProvider) = provider.GetGeneratedAssemblyContents x - static member Create (x: System.Reflection.Assembly) = match x with null -> null | t -> ProvidedAssembly (t) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create x : ProvidedAssembly = match x with null -> null | t -> ProvidedAssembly (t) +#else + static member Create x : ProvidedAssembly? = match x with null -> null | t -> ProvidedAssembly (t) +#endif + member __.Handle = x + override __.Equals y = assert false; match y with :? ProvidedAssembly as y -> x.Equals y.Handle | _ -> false + override __.GetHashCode() = assert false; x.GetHashCode() - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedMethodBase (x: System.Reflection.MethodBase, ctxt) = inherit ProvidedMemberInfo(x, ctxt) member __.Context = ctxt @@ -510,8 +591,12 @@ module internal ExtensionTyping = member __.GetParameters() = x.GetParameters() |> ProvidedParameterInfo.CreateArray ctxt member __.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt member __.Handle = x + static member TaintedGetHashCode (x: Tainted) = - Tainted.GetHashCodeTainted (x.PApplyNoFailure(fun st -> (st.Name, st.DeclaringType.Assembly.FullName, st.DeclaringType.FullName))) + Tainted.GetHashCodeTainted + (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, + (nonNull st.DeclaringType).FullName))) + static member TaintedEquals (pt1: Tainted, pt2: Tainted) = Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle)) @@ -561,16 +646,34 @@ module internal ExtensionTyping = | :? System.Reflection.MethodBase as mb -> mb | _ -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented()) match mb with - | :? System.Reflection.MethodInfo as mi -> (mi |> ProvidedMethodInfo.Create ctxt : ProvidedMethodInfo) :> ProvidedMethodBase - | :? System.Reflection.ConstructorInfo as ci -> (ci |> ProvidedConstructorInfo.Create ctxt : ProvidedConstructorInfo) :> ProvidedMethodBase + | :? System.Reflection.MethodInfo as mi -> (mi |> ProvidedMethodInfo.CreateNonNull ctxt : ProvidedMethodInfo) :> ProvidedMethodBase + | :? System.Reflection.ConstructorInfo as ci -> (ci |> ProvidedConstructorInfo.CreateNonNull ctxt : ProvidedConstructorInfo) :> ProvidedMethodBase | _ -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented()) - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedFieldInfo (x: System.Reflection.FieldInfo, ctxt) = inherit ProvidedMemberInfo(x, ctxt) - static member Create ctxt x = match x with null -> null | t -> ProvidedFieldInfo (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedFieldInfo.Create ctxt) + + static member CreateNonNull ctxt x = ProvidedFieldInfo (x, ctxt) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt x : ProvidedFieldInfo = +#else + static member Create ctxt x : ProvidedFieldInfo? = +#endif + match x with + | null -> null + | NonNull x -> ProvidedFieldInfo (x, ctxt) + + static member CreateArray ctxt xs : ProvidedFieldInfo[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt) + member __.IsInitOnly = x.IsInitOnly member __.IsStatic = x.IsStatic member __.IsSpecialName = x.IsSpecialName @@ -591,21 +694,41 @@ module internal ExtensionTyping = - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedMethodInfo (x: System.Reflection.MethodInfo, ctxt) = inherit ProvidedMethodBase(x, ctxt) member __.ReturnType = x.ReturnType |> ProvidedType.CreateWithNullCheck ctxt "ReturnType" - static member Create ctxt x = match x with null -> null | t -> ProvidedMethodInfo (t, ctxt) + static member CreateNonNull ctxt (x: MethodInfo) : ProvidedMethodInfo = + ProvidedMethodInfo (x, ctxt) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt (x: MethodInfo) : ProvidedMethodInfo = +#else + static member Create ctxt (x: MethodInfo?) : ProvidedMethodInfo? = +#endif + match x with + | null -> null + | NonNull x -> ProvidedMethodInfo (x, ctxt) + + static member CreateArray ctxt (xs: MethodInfo[]) : ProvidedMethodInfo[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedMethodInfo.Create ctxt) member __.Handle = x member __.MetadataToken = x.MetadataToken override __.Equals y = assert false; match y with :? ProvidedMethodInfo as y -> x.Equals y.Handle | _ -> false override __.GetHashCode() = assert false; x.GetHashCode() - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedPropertyInfo (x: System.Reflection.PropertyInfo, ctxt) = inherit ProvidedMemberInfo(x, ctxt) member __.GetGetMethod() = x.GetGetMethod() |> ProvidedMethodInfo.Create ctxt @@ -615,38 +738,101 @@ module internal ExtensionTyping = member __.GetIndexParameters() = x.GetIndexParameters() |> ProvidedParameterInfo.CreateArray ctxt /// PropertyInfo.PropertyType cannot be null member __.PropertyType = x.PropertyType |> ProvidedType.CreateWithNullCheck ctxt "PropertyType" - static member Create ctxt x = match x with null -> null | t -> ProvidedPropertyInfo (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedPropertyInfo.Create ctxt) + + static member CreateNonNull ctxt x = ProvidedPropertyInfo (x, ctxt) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt x : ProvidedPropertyInfo = +#else + static member Create ctxt x : ProvidedPropertyInfo? = +#endif + match x with + | null -> null + | NonNull x -> ProvidedPropertyInfo (x, ctxt) + + static member CreateArray ctxt xs : ProvidedPropertyInfo[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt) + member __.Handle = x + override __.Equals y = assert false; match y with :? ProvidedPropertyInfo as y -> x.Equals y.Handle | _ -> false + override __.GetHashCode() = assert false; x.GetHashCode() + static member TaintedGetHashCode (x: Tainted) = - Tainted.GetHashCodeTainted (x.PApplyNoFailure(fun st -> (st.Name, st.DeclaringType.Assembly.FullName, st.DeclaringType.FullName))) + Tainted.GetHashCodeTainted + (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, + (nonNull st.DeclaringType).FullName))) + static member TaintedEquals (pt1: Tainted, pt2: Tainted) = Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle)) - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedEventInfo (x: System.Reflection.EventInfo, ctxt) = inherit ProvidedMemberInfo(x, ctxt) member __.GetAddMethod() = x.GetAddMethod() |> ProvidedMethodInfo.Create ctxt member __.GetRemoveMethod() = x.GetRemoveMethod() |> ProvidedMethodInfo.Create ctxt /// EventInfo.EventHandlerType cannot be null member __.EventHandlerType = x.EventHandlerType |> ProvidedType.CreateWithNullCheck ctxt "EventHandlerType" - static member Create ctxt x = match x with null -> null | t -> ProvidedEventInfo (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedEventInfo.Create ctxt) + + static member CreateNonNull ctxt x = ProvidedEventInfo (x, ctxt) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt x : ProvidedEventInfo = +#else + static member Create ctxt x : ProvidedEventInfo? = +#endif + match x with + | null -> null + | NonNull x -> ProvidedEventInfo (x, ctxt) + + static member CreateArray ctxt xs : ProvidedEventInfo[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt) + member __.Handle = x + override __.Equals y = assert false; match y with :? ProvidedEventInfo as y -> x.Equals y.Handle | _ -> false + override __.GetHashCode() = assert false; x.GetHashCode() + static member TaintedGetHashCode (x: Tainted) = - Tainted.GetHashCodeTainted (x.PApplyNoFailure(fun st -> (st.Name, st.DeclaringType.Assembly.FullName, st.DeclaringType.FullName))) + Tainted.GetHashCodeTainted + (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, + (nonNull st.DeclaringType).FullName))) + static member TaintedEquals (pt1: Tainted, pt2: Tainted) = Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle)) - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedConstructorInfo (x: System.Reflection.ConstructorInfo, ctxt) = inherit ProvidedMethodBase(x, ctxt) - static member Create ctxt x = match x with null -> null | t -> ProvidedConstructorInfo (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedConstructorInfo.Create ctxt) + + static member CreateNonNull ctxt x = ProvidedConstructorInfo (x, ctxt) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt (x: ConstructorInfo) : ProvidedConstructorInfo = +#else + static member Create ctxt (x: ConstructorInfo?) : ProvidedConstructorInfo? = +#endif + match x with + | null -> null + | NonNull x -> ProvidedConstructorInfo (x, ctxt) + + static member CreateArray ctxt xs : ProvidedConstructorInfo[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt) + member __.Handle = x override __.Equals y = assert false; match y with :? ProvidedConstructorInfo as y -> x.Equals y.Handle | _ -> false override __.GetHashCode() = assert false; x.GetHashCode() @@ -676,7 +862,11 @@ module internal ExtensionTyping = | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr | ProvidedVarExpr of ProvidedVar +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE and [] +#else + and [] +#endif ProvidedExpr (x: Quotations.Expr, ctxt) = member __.Type = x.Type |> ProvidedType.Create ctxt member __.Handle = x @@ -685,65 +875,93 @@ module internal ExtensionTyping = member __.GetExprType() = match x with | Quotations.Patterns.NewObject(ctor, args) -> - Some (ProvidedNewObjectExpr (ProvidedConstructorInfo.Create ctxt ctor, [| for a in args -> ProvidedExpr.Create ctxt a |])) + Some (ProvidedNewObjectExpr (ProvidedConstructorInfo.CreateNonNull ctxt ctor, [| for a in args -> ProvidedExpr.CreateNonNull ctxt a |])) | Quotations.Patterns.WhileLoop(guardExpr, bodyExpr) -> - Some (ProvidedWhileLoopExpr (ProvidedExpr.Create ctxt guardExpr, ProvidedExpr.Create ctxt bodyExpr)) + Some (ProvidedWhileLoopExpr (ProvidedExpr.CreateNonNull ctxt guardExpr, ProvidedExpr.CreateNonNull ctxt bodyExpr)) | Quotations.Patterns.NewDelegate(ty, vs, expr) -> - Some (ProvidedNewDelegateExpr(ProvidedType.Create ctxt ty, ProvidedVar.CreateArray ctxt (List.toArray vs), ProvidedExpr.Create ctxt expr)) + Some (ProvidedNewDelegateExpr(ProvidedType.CreateNonNull ctxt ty, ProvidedVar.CreateArray ctxt (List.toArray vs), ProvidedExpr.CreateNonNull ctxt expr)) | Quotations.Patterns.Call(objOpt, meth, args) -> - Some (ProvidedCallExpr((match objOpt with None -> None | Some obj -> Some (ProvidedExpr.Create ctxt obj)), - ProvidedMethodInfo.Create ctxt meth, [| for a in args -> ProvidedExpr.Create ctxt a |])) + Some (ProvidedCallExpr((match objOpt with None -> None | Some obj -> Some (ProvidedExpr.CreateNonNull ctxt obj)), + ProvidedMethodInfo.CreateNonNull ctxt meth, [| for a in args -> ProvidedExpr.CreateNonNull ctxt a |])) | Quotations.Patterns.DefaultValue ty -> - Some (ProvidedDefaultExpr (ProvidedType.Create ctxt ty)) + Some (ProvidedDefaultExpr (ProvidedType.CreateNonNull ctxt ty)) | Quotations.Patterns.Value(obj, ty) -> - Some (ProvidedConstantExpr (obj, ProvidedType.Create ctxt ty)) + Some (ProvidedConstantExpr (obj, ProvidedType.CreateNonNull ctxt ty)) | Quotations.Patterns.Coerce(arg, ty) -> - Some (ProvidedTypeAsExpr (ProvidedExpr.Create ctxt arg, ProvidedType.Create ctxt ty)) + Some (ProvidedTypeAsExpr (ProvidedExpr.CreateNonNull ctxt arg, ProvidedType.CreateNonNull ctxt ty)) | Quotations.Patterns.NewTuple args -> Some (ProvidedNewTupleExpr(ProvidedExpr.CreateArray ctxt (Array.ofList args))) | Quotations.Patterns.TupleGet(arg, n) -> - Some (ProvidedTupleGetExpr (ProvidedExpr.Create ctxt arg, n)) + Some (ProvidedTupleGetExpr (ProvidedExpr.CreateNonNull ctxt arg, n)) | Quotations.Patterns.NewArray(ty, args) -> - Some (ProvidedNewArrayExpr(ProvidedType.Create ctxt ty, ProvidedExpr.CreateArray ctxt (Array.ofList args))) + Some (ProvidedNewArrayExpr(ProvidedType.CreateNonNull ctxt ty, ProvidedExpr.CreateArray ctxt (Array.ofList args))) | Quotations.Patterns.Sequential(e1, e2) -> - Some (ProvidedSequentialExpr(ProvidedExpr.Create ctxt e1, ProvidedExpr.Create ctxt e2)) + Some (ProvidedSequentialExpr(ProvidedExpr.CreateNonNull ctxt e1, ProvidedExpr.CreateNonNull ctxt e2)) | Quotations.Patterns.Lambda(v, body) -> - Some (ProvidedLambdaExpr (ProvidedVar.Create ctxt v, ProvidedExpr.Create ctxt body)) + Some (ProvidedLambdaExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt body)) | Quotations.Patterns.TryFinally(b1, b2) -> - Some (ProvidedTryFinallyExpr (ProvidedExpr.Create ctxt b1, ProvidedExpr.Create ctxt b2)) + Some (ProvidedTryFinallyExpr (ProvidedExpr.CreateNonNull ctxt b1, ProvidedExpr.CreateNonNull ctxt b2)) | Quotations.Patterns.TryWith(b, v1, e1, v2, e2) -> - Some (ProvidedTryWithExpr (ProvidedExpr.Create ctxt b, ProvidedVar.Create ctxt v1, ProvidedExpr.Create ctxt e1, ProvidedVar.Create ctxt v2, ProvidedExpr.Create ctxt e2)) + Some (ProvidedTryWithExpr (ProvidedExpr.CreateNonNull ctxt b, ProvidedVar.CreateNonNull ctxt v1, ProvidedExpr.CreateNonNull ctxt e1, ProvidedVar.CreateNonNull ctxt v2, ProvidedExpr.CreateNonNull ctxt e2)) #if PROVIDED_ADDRESS_OF - | Quotations.Patterns.AddressOf e -> Some (ProvidedAddressOfExpr (ProvidedExpr.Create ctxt e)) + | Quotations.Patterns.AddressOf e -> Some (ProvidedAddressOfExpr (ProvidedExpr.CreateNonNull ctxt e)) #endif | Quotations.Patterns.TypeTest(e, ty) -> - Some (ProvidedTypeTestExpr(ProvidedExpr.Create ctxt e, ProvidedType.Create ctxt ty)) + Some (ProvidedTypeTestExpr(ProvidedExpr.CreateNonNull ctxt e, ProvidedType.CreateNonNull ctxt ty)) | Quotations.Patterns.Let(v, e, b) -> - Some (ProvidedLetExpr (ProvidedVar.Create ctxt v, ProvidedExpr.Create ctxt e, ProvidedExpr.Create ctxt b)) + Some (ProvidedLetExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e, ProvidedExpr.CreateNonNull ctxt b)) | Quotations.Patterns.ForIntegerRangeLoop (v, e1, e2, e3) -> - Some (ProvidedForIntegerRangeLoopExpr (ProvidedVar.Create ctxt v, ProvidedExpr.Create ctxt e1, ProvidedExpr.Create ctxt e2, ProvidedExpr.Create ctxt e3)) + Some (ProvidedForIntegerRangeLoopExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e1, ProvidedExpr.CreateNonNull ctxt e2, ProvidedExpr.CreateNonNull ctxt e3)) | Quotations.Patterns.VarSet(v, e) -> - Some (ProvidedVarSetExpr (ProvidedVar.Create ctxt v, ProvidedExpr.Create ctxt e)) + Some (ProvidedVarSetExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e)) | Quotations.Patterns.IfThenElse(g, t, e) -> - Some (ProvidedIfThenElseExpr (ProvidedExpr.Create ctxt g, ProvidedExpr.Create ctxt t, ProvidedExpr.Create ctxt e)) + Some (ProvidedIfThenElseExpr (ProvidedExpr.CreateNonNull ctxt g, ProvidedExpr.CreateNonNull ctxt t, ProvidedExpr.CreateNonNull ctxt e)) | Quotations.Patterns.Var v -> - Some (ProvidedVarExpr (ProvidedVar.Create ctxt v)) + Some (ProvidedVarExpr (ProvidedVar.CreateNonNull ctxt v)) | _ -> None - static member Create ctxt t = match box t with null -> null | _ -> ProvidedExpr (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedExpr.Create ctxt) +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + static member Create ctxt t : ProvidedExpr = +#else + static member Create ctxt t : ProvidedExpr? = +#endif + match box t with + | null -> null + | _ -> ProvidedExpr (t, ctxt) + + static member CreateNonNull ctxt t : ProvidedExpr = + ProvidedExpr (t, ctxt) + + static member CreateArray ctxt xs : ProvidedExpr[] = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedExpr.CreateNonNull ctxt) + override __.Equals y = match y with :? ProvidedExpr as y -> x.Equals y.Handle | _ -> false + override __.GetHashCode() = x.GetHashCode() +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE and [] +#else + and [] +#endif ProvidedVar (x: Quotations.Var, ctxt) = member __.Type = x.Type |> ProvidedType.Create ctxt member __.Name = x.Name member __.IsMutable = x.IsMutable member __.Handle = x member __.Context = ctxt - static member Create ctxt t = match box t with null -> null | _ -> ProvidedVar (t, ctxt) - static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedVar.Create ctxt) + + static member CreateNonNull ctxt t = + ProvidedVar (t, ctxt) + + static member CreateArray ctxt xs = + match box xs with + | null -> [| |] + | _ -> xs |> Array.map (ProvidedVar.CreateNonNull ctxt) + override __.Equals y = match y with :? ProvidedVar as y -> x.Equals y.Handle | _ -> false + override __.GetHashCode() = x.GetHashCode() /// Get the provided invoker expression for a particular use of a method. @@ -768,7 +986,7 @@ module internal ExtensionTyping = errorR(Error(FSComp.SR.etMustNotBeGeneric fullName, m)) if TryTypeMember(st, fullName, "IsArray", m, false, fun st->st.IsArray) |> unmarshal then errorR(Error(FSComp.SR.etMustNotBeAnArray fullName, m)) - TryTypeMemberNonNull(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore + TryTypeMember(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore /// Verify that a provided type has the expected name @@ -777,15 +995,21 @@ module internal ExtensionTyping = if name <> expectedName then raise (TypeProviderError(FSComp.SR.etProvidedTypeHasUnexpectedName(expectedName, name), st.TypeProviderDesignation, m)) +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let namespaceName = TryTypeMember(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal +#else + let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal // TODO NULLNESS: why is this explicit instantiation needed? +#endif + let rec declaringTypes (st: Tainted) accu = match TryTypeMember(st, name, "DeclaringType", m, null, fun st -> st.DeclaringType) with - | Tainted.Null -> accu - | dt -> declaringTypes dt (CheckAndComputeProvidedNameProperty(m, dt, (fun dt -> dt.Name), "Name") :: accu) + | Tainted.Null -> accu + | Tainted.NonNull dt -> declaringTypes dt (CheckAndComputeProvidedNameProperty(m, dt, (fun dt -> dt.Name), "Name") :: accu) + let path = [| match namespaceName with | null -> () - | _ -> yield! namespaceName.Split([|'.'|]) + | NonNull namespaceName -> yield! namespaceName.Split([|'.'|]) yield! declaringTypes st [] |] if path <> expectedPath then @@ -798,7 +1022,11 @@ module internal ExtensionTyping = // Do all the calling into st up front with recovery let fullName, namespaceName, usedMembers = let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name") +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal +#else + let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal +#endif let fullName = TryTypeMemberNonNull(st, name, "FullName", m, FSComp.SR.invalidFullNameForProvidedType(), fun st -> st.FullName) |> unmarshal ValidateExpectedName m expectedPath expectedName st // Must be able to call (GetMethods|GetEvents|GetProperties|GetNestedTypes|GetConstructors)(bindingFlags). @@ -823,7 +1051,7 @@ module internal ExtensionTyping = for mi in usedMembers do match mi with | Tainted.Null -> errorR(Error(FSComp.SR.etNullMember fullName, m)) - | _ -> + | Tainted.NonNull _ -> let memberName = TryMemberMember(mi, fullName, "Name", "Name", m, "invalid provided type member name", fun mi -> mi.Name) |> unmarshal if String.IsNullOrEmpty memberName then errorR(Error(FSComp.SR.etNullOrEmptyMemberName fullName, m)) @@ -834,7 +1062,7 @@ module internal ExtensionTyping = | Tainted.Null when (mi.OfType().IsSome) -> () | Tainted.Null -> errorR(Error(FSComp.SR.etNullMemberDeclaringType(fullName, memberName), m)) - | _ -> + | Tainted.NonNull miDeclaringType -> let miDeclaringTypeFullName = TryMemberMember (miDeclaringType, fullName, memberName, "FullName", m, "invalid declaring type full name", @@ -903,7 +1131,11 @@ module internal ExtensionTyping = // Validate the Name, Namespace and FullName properties let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name") +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let _namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal +#else + let _namespaceName = TryTypeMember<_, (string?)>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal +#endif let _fullname = TryTypeMemberNonNull(st, name, "FullName", m, FSComp.SR.invalidFullNameForProvidedType(), fun st -> st.FullName) |> unmarshal ValidateExpectedName m expectedPath expectedName st @@ -922,7 +1154,11 @@ module internal ExtensionTyping = /// Resolve a (non-nested) provided type given a full namespace name and a type name. /// May throw an exception which will be turned into an error message by one of the 'Try' function below. /// If resolution is successful the type is then validated. - let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted = +#else + let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted = +#endif let displayName = String.Join(".", moduleOrNamespace) // Try to find the type in the given provided namespace @@ -935,8 +1171,8 @@ module internal ExtensionTyping = if displayName = providedNamespaceName then let resolvedType = providedNamespace.PApply((fun providedNamespace -> ProvidedType.CreateNoContext(providedNamespace.ResolveTypeName typeName)), range=m) match resolvedType with - | Tainted.Null -> None - | result -> + | Tainted.Null -> None + | Tainted.NonNull result -> ValidateProvidedTypeDefinition(m, result, moduleOrNamespace, typeName) Some result else @@ -958,7 +1194,7 @@ module internal ExtensionTyping = try match ResolveProvidedType(resolver, m, moduleOrNamespace, typeName) with | Tainted.Null -> None - | ty -> Some ty + | Tainted.NonNull ty -> Some ty with e -> errorRecovery e m None @@ -970,13 +1206,13 @@ module internal ExtensionTyping = | Tainted.Null -> match st.PUntaint((fun st -> st.Namespace), m) with | null -> typeName - | ns -> ns + "." + typeName + | NonNull ns -> ns + "." + typeName | _ -> typeName let rec encContrib (st: Tainted) = match st.PApply((fun st ->st.DeclaringType), m) with | Tainted.Null -> [] - | enc -> encContrib enc @ [ nameContrib enc ] + | Tainted.NonNull enc -> encContrib enc @ [ nameContrib enc ] encContrib st, nameContrib st @@ -1000,7 +1236,7 @@ module internal ExtensionTyping = match methBeforeArgs.PApplyWithProvider((fun (mb, provider) -> mb.ApplyStaticArgumentsForMethod(provider, mangledName, staticArgs)), range=m) with | Tainted.Null -> None - | methWithArguments -> + | Tainted.NonNull methWithArguments -> let actualName = methWithArguments.PUntaint((fun x -> x.Name), m) if actualName <> mangledName then error(Error(FSComp.SR.etProvidedAppliedMethodHadWrongName(methWithArguments.TypeProviderDesignation, mangledName, actualName), m)) @@ -1027,7 +1263,7 @@ module internal ExtensionTyping = match typeBeforeArguments.PApplyWithProvider((fun (typeBeforeArguments, provider) -> typeBeforeArguments.ApplyStaticArguments(provider, Array.ofList fullTypePathAfterArguments, staticArgs)), range=m) with | Tainted.Null -> None - | typeWithArguments -> + | Tainted.NonNull typeWithArguments -> let actualName = typeWithArguments.PUntaint((fun x -> x.Name), m) let checkTypeName() = let expectedTypeNameAfterArguments = fullTypePathAfterArguments.[fullTypePathAfterArguments.Length-1] @@ -1051,7 +1287,7 @@ module internal ExtensionTyping = match typeBeforeArguments with | Tainted.Null -> None - | _ -> + | Tainted.NonNull typeBeforeArguments -> // Take the static arguments (as strings, taken from the text in the reference we're relinking), // and convert them to objects of the appropriate type, based on the expected kind. let staticParameters = @@ -1106,27 +1342,43 @@ module internal ExtensionTyping = | None -> None /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let GetPartsOfNamespaceRecover(namespaceName: string) = - if namespaceName=null then [] - elif namespaceName.Length = 0 then [""] - else splitNamespace namespaceName +#else + let GetPartsOfNamespaceRecover(namespaceName: string?) = +#endif + match namespaceName with + | null -> [] + | NonNull namespaceName -> + if namespaceName.Length = 0 then [""] + else splitNamespace (nonNull namespaceName) /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed. - let GetProvidedNamespaceAsPath (m, resolver: Tainted, namespaceName: string) = - if namespaceName<>null && namespaceName.Length = 0 then - errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m)) - - GetPartsOfNamespaceRecover namespaceName +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string) = +#else + let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string?) = +#endif + match namespaceName with + | null -> [] + | NonNull namespaceName -> + if namespaceName.Length = 0 then + errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m)) + GetPartsOfNamespaceRecover namespaceName /// Get the parts of the name that encloses the .NET type including nested types. let GetFSharpPathToProvidedType (st: Tainted, m) = // Can't use st.Fullname because it may be like IEnumerable // We want [System;Collections;Generic] let namespaceParts = GetPartsOfNamespaceRecover(st.PUntaint((fun st -> st.Namespace), m)) +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let rec walkUpNestedClasses(st: Tainted, soFar) = +#else + let rec walkUpNestedClasses(st: Tainted, soFar) = +#endif match st with | Tainted.Null -> soFar - | st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), m), soFar) @ [st.PUntaint((fun st -> st.Name), m)] + | Tainted.NonNull st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), m), soFar) @ [st.PUntaint((fun st -> st.Name), m)] walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), m), namespaceParts) @@ -1141,7 +1393,7 @@ module internal ExtensionTyping = /// any type relocations or static linking for generated types. let GetOriginalILTypeRefOfProvidedType (st: Tainted, m) = - let aref = GetOriginalILAssemblyRefOfProvidedAssembly (st.PApply((fun st -> st.Assembly), m), m) + let aref = GetOriginalILAssemblyRefOfProvidedAssembly (st.PApply((fun st -> nonNull st.Assembly), m), m) // TODO: why is explicit instantiation needed here let scoperef = ILScopeRef.Assembly aref let enc, nm = ILPathToProvidedType (st, m) let tref = ILTypeRef.Create(scoperef, enc, nm) diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi index 95715ad1fcf..00910bb17b8 100755 --- a/src/fsharp/ExtensionTyping.fsi +++ b/src/fsharp/ExtensionTyping.fsi @@ -87,18 +87,29 @@ module internal ExtensionTyping = /// Map the TyconRef objects, if any member RemapTyconRefs : (obj -> obj) -> ProvidedTypeContext - type [] + type [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedType = inherit ProvidedMemberInfo member IsSuppressRelocate : bool member IsErased : bool member IsGenericType : bool +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member Namespace : string +#else + member Namespace : string? +#endif member FullName : string member IsArray : bool member GetInterfaces : unit -> ProvidedType[] member Assembly : ProvidedAssembly +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member BaseType : ProvidedType +#else + member BaseType : ProvidedType? +#endif member GetNestedType : string -> ProvidedType member GetNestedTypes : unit -> ProvidedType[] member GetAllNestedTypes : unit -> ProvidedType[] @@ -146,27 +157,47 @@ module internal ExtensionTyping = interface IProvidedCustomAttributeProvider static member TaintedEquals : Tainted * Tainted -> bool - and [] + and +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif IProvidedCustomAttributeProvider = abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string * int * int) option +#else + abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string? * int * int) option +#endif abstract GetXmlDocAttributes : provider:ITypeProvider -> string[] abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedAssembly = member GetName : unit -> System.Reflection.AssemblyName member FullName : string member GetManifestModuleContents : ITypeProvider -> byte[] member Handle : System.Reflection.Assembly - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedMemberInfo = member Name :string +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member DeclaringType : ProvidedType +#else + member DeclaringType : ProvidedType? +#endif interface IProvidedCustomAttributeProvider - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedMethodBase = inherit ProvidedMemberInfo member IsGenericMethod : bool @@ -186,15 +217,21 @@ module internal ExtensionTyping = static member TaintedGetHashCode : Tainted -> int static member TaintedEquals : Tainted * Tainted -> bool - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedMethodInfo = inherit ProvidedMethodBase member ReturnType : ProvidedType member MetadataToken : int - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedParameterInfo = - member Name :string + member Name : string member ParameterType : ProvidedType member IsIn : bool member IsOut : bool @@ -203,7 +240,10 @@ module internal ExtensionTyping = member HasDefaultValue : bool interface IProvidedCustomAttributeProvider - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedFieldInfo = inherit ProvidedMemberInfo member IsInitOnly : bool @@ -219,19 +259,39 @@ module internal ExtensionTyping = member IsPrivate : bool static member TaintedEquals : Tainted * Tainted -> bool - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedPropertyInfo = inherit ProvidedMemberInfo + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member GetGetMethod : unit -> ProvidedMethodInfo + member GetSetMethod : unit -> ProvidedMethodInfo +#else + member GetGetMethod : unit -> ProvidedMethodInfo? + + member GetSetMethod : unit -> ProvidedMethodInfo? +#endif + member GetIndexParameters : unit -> ProvidedParameterInfo[] + member CanRead : bool + member CanWrite : bool + member PropertyType : ProvidedType + static member TaintedGetHashCode : Tainted -> int + static member TaintedEquals : Tainted * Tainted -> bool - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedEventInfo = inherit ProvidedMemberInfo member GetAddMethod : unit -> ProvidedMethodInfo @@ -240,7 +300,10 @@ module internal ExtensionTyping = static member TaintedGetHashCode : Tainted -> int static member TaintedEquals : Tainted * Tainted -> bool - and [] + and [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + [] +#endif ProvidedConstructorInfo = inherit ProvidedMethodBase @@ -269,14 +332,22 @@ module internal ExtensionTyping = | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr | ProvidedVarExpr of ProvidedVar +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE and [] +#else + and [] +#endif ProvidedExpr = member Type : ProvidedType /// Convert the expression to a string for diagnostics member UnderlyingExpressionString : string member GetExprType : unit -> ProvidedExprType option +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE and [] +#else + and [] +#endif ProvidedVar = member Type : ProvidedType member Name : string diff --git a/src/fsharp/FSComp.txt b/src/fsharp/FSComp.txt index 16248437142..75a3df04a2a 100644 --- a/src/fsharp/FSComp.txt +++ b/src/fsharp/FSComp.txt @@ -1482,6 +1482,19 @@ notAFunctionButMaybeDeclaration,"This value is not a function and cannot be appl 3247,couldNotLoadDependencyManagerExtension,"The dependency manager extension %s could not be loaded. Message: %s" 3250,expressionHasNoName,"Expression does not have a name." 3251,chkNoFirstClassNameOf,"Using the 'nameof' operator as a first-class function value is not permitted." +3260,tcTypeDoesNotHaveAnyNull,"The type '%s' does not support a nullness qualitification." +#3261 reserved for ConstraintSolverNullnessWarningEquivWithTypes +#3262 reserved for ConstraintSolverNullnessWarningWithTypes +#3263 reserved for ConstraintSolverNullnessWarningWithType +#3264 reserved for ConstraintSolverNonNullnessWarningWithType +3266,tcDefaultStructConstructorCallNulls,"Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable." +3267,chkValueWithDefaultValueMustHaveDefaultValueNulls,"Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable." +3268,csNullNotNullConstraintInconsistent,"The constraints 'null' and 'not null' are inconsistent" +3269,csStructNullConstraintInconsistent,"The constraints 'struct' and 'null' are inconsistent" +3270,csDelegateComparisonConstraintInconsistent,"The constraints 'delegate' and 'comparison' are inconsistent" +3271,tcNullnessCheckingNotEnabled,"The /checknulls language feature is not enabled" +csTypeHasNullAsTrueValue,"The type '%s' has 'null' as a true representation value but a constraint does not permit this" +csTypeHasNullAsExtraValue,"The type '%s' has 'null' as an extra value but a constraint does not permit this" 3300,chkInvalidFunctionParameterType,"The parameter '%s' has an invalid type '%s'. This is not permitted by the rules of Common IL." 3301,chkInvalidFunctionReturnType,"The function or method has an invalid return type '%s'. This is not permitted by the rules of Common IL." 3302,packageManagementRequiresVFive,"The package management feature requires language version 5.0 use /langversion:preview" @@ -1493,6 +1506,7 @@ notAFunctionButMaybeDeclaration,"This value is not a function and cannot be appl 3351,chkFeatureNotRuntimeSupported,"Feature '%s' is not supported by target runtime." 3352,typrelInterfaceMemberNoMostSpecificImplementation,"Interface member '%s' does not have a most specific implementation." useSdkRefs,"Use reference assemblies for .NET framework references when available (Enabled by default)." +optsCheckNulls,"Enable nullness declarations and checks" fSharpBannerVersion,"%s for F# %s" optsLangVersion,"Display the allowed values for language version, specify language version such as 'latest' or 'preview'" optsSupportedLangVersions,"Supported language versions:" @@ -1510,5 +1524,6 @@ featurePackageManagement,"package management" featureFromEndSlicing,"from-end slicing" featureFixedIndexSlice3d4d,"fixed-index slice 3d/4d" featureAndBang,"applicative computation expressions" +featureNullnessChecking,"nullness checking" featureNullableOptionalInterop,"nullable optional interop" featureDefaultInterfaceMemberConsumption,"default interface member consumption" diff --git a/src/fsharp/FSStrings.resx b/src/fsharp/FSStrings.resx index e755b590b49..647711bb357 100644 --- a/src/fsharp/FSStrings.resx +++ b/src/fsharp/FSStrings.resx @@ -129,6 +129,18 @@ A type parameter is missing a constraint '{0}' + + Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'. + + + Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'. + + + Nullness warning: The type '{0}' does not support nullness. + + + Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null. + The unit of measure '{0}' does not match the unit of measure '{1}' diff --git a/src/fsharp/FSharp.Build/FSharp.Build.fsproj b/src/fsharp/FSharp.Build/FSharp.Build.fsproj index 68023b91bf2..6ba1bfd6495 100644 --- a/src/fsharp/FSharp.Build/FSharp.Build.fsproj +++ b/src/fsharp/FSharp.Build/FSharp.Build.fsproj @@ -10,6 +10,7 @@ FSharp.Build $(NoWarn);45;55;62;75;1204 true + $(OtherFlags) --checknulls $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1 true $(DefineConstants);LOCALIZATION_FSBUILD diff --git a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs index 0ea056694c6..c4f33c0e922 100644 --- a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs +++ b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs @@ -32,7 +32,7 @@ type FSharpCommandLineBuilder () = /// Return a full command line (with quoting for the cmd.exe shell) override x.ToString() = builder.ToString() - member x.AppendFileNamesIfNotNull(filenames:ITaskItem array, sep:string) = + member x.AppendFileNamesIfNotNull(filenames:ITaskItem[], sep:string) = builder.AppendFileNamesIfNotNull(filenames, sep) // do not update "args", not used for item in filenames do @@ -42,7 +42,7 @@ type FSharpCommandLineBuilder () = if s <> String.Empty then srcs <- tmp.ToString() :: srcs - member x.AppendSwitchIfNotNull(switch:string, values:string array, sep:string) = + member x.AppendSwitchesIfNotNull(switch:string, values:string[], sep:string) = builder.AppendSwitchIfNotNull(switch, values, sep) let tmp = new CommandLineBuilder() tmp.AppendSwitchUnquotedIfNotNull(switch, values, sep) @@ -50,7 +50,11 @@ type FSharpCommandLineBuilder () = if s <> String.Empty then args <- s :: args - member x.AppendSwitchIfNotNull(switch:string, value:string, ?metadataNames:string array) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + member x.AppendSwitchIfNotNull(switch:string, value:string, ?metadataNames:string[]) = +#else + member x.AppendSwitchIfNotNull(switch:string, value:string?, ?metadataNames:string[]) = +#endif let metadataNames = defaultArg metadataNames [||] builder.AppendSwitchIfNotNull(switch, value) let tmp = new CommandLineBuilder() @@ -65,7 +69,11 @@ type FSharpCommandLineBuilder () = if s <> String.Empty then args <- s :: args +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string) = +#else + member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string?) = +#endif assert(switch = "") // we only call this method for "OtherFlags" // Unfortunately we still need to mimic what cmd.exe does, but only for "OtherFlags". let ParseCommandLineArgs(commandLine:string) = // returns list in reverse order diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs index 80ab03249f0..fe0e3862b3e 100644 --- a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs +++ b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs @@ -13,8 +13,13 @@ open Microsoft.Build.Framework open Microsoft.Build.Utilities type FSharpEmbedResXSource() = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let mutable _buildEngine : IBuildEngine = null let mutable _hostObject : ITaskHost = null +#else + let mutable _buildEngine : IBuildEngine? = null + let mutable _hostObject : ITaskHost? = null +#endif let mutable _embeddedText : ITaskItem[] = [||] let mutable _generatedSource : ITaskItem[] = [||] let mutable _outputPath : string = "" @@ -27,9 +32,9 @@ namespace {0} open System.Reflection module internal {1} = - type private C (_dummy:System.Object) = class end + type private C (_dummy:System.Int32) = class end let mutable Culture = System.Globalization.CultureInfo.CurrentUICulture - let ResourceManager = new System.Resources.ResourceManager(""{2}"", C(null).GetType().GetTypeInfo().Assembly) + let ResourceManager = new System.Resources.ResourceManager(""{2}"", C(0).GetType().GetTypeInfo().Assembly) let GetString(name:System.String) : System.String = ResourceManager.GetString(name, Culture)" let boilerplateGetObject = " let GetObject(name:System.String) : System.Object = ResourceManager.GetObject(name, Culture)" diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs index 3428d60ad8f..3dd2c3f749d 100644 --- a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs +++ b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs @@ -8,8 +8,13 @@ open Microsoft.Build.Framework open Microsoft.Build.Utilities type FSharpEmbedResourceText() = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let mutable _buildEngine : IBuildEngine = null let mutable _hostObject : ITaskHost = null +#else + let mutable _buildEngine : IBuildEngine? = null + let mutable _hostObject : ITaskHost? = null +#endif let mutable _embeddedText : ITaskItem[] = [||] let mutable _generatedSource : ITaskItem[] = [||] let mutable _generatedResx : ITaskItem[] = [||] diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs index a6e262089b5..52d328cf96e 100644 --- a/src/fsharp/FSharp.Build/Fsc.fs +++ b/src/fsharp/FSharp.Build/Fsc.fs @@ -11,6 +11,12 @@ open Microsoft.Build.Framework open Microsoft.Build.Utilities open Internal.Utilities +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +[] +module Utils = + let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v +#endif + //There are a lot of flags on fsc.exe. //For now, not all of them are represented in the "Fsc class" object model. //The goal is to have the most common/important flags available via the Fsc class, and the @@ -21,68 +27,102 @@ type public Fsc () as this = inherit ToolTask () - let mutable baseAddress : string = null let mutable capturedArguments : string list = [] // list of individual args, to pass to HostObject Compile() let mutable capturedFilenames : string list = [] // list of individual source filenames, to pass to HostObject Compile() - let mutable checksumAlgorithm: string = null - let mutable codePage : string = null let mutable commandLineArgs : ITaskItem list = [] let mutable compilerTools: ITaskItem [] = [||] let mutable debugSymbols = false - let mutable debugType : string = null let mutable defineConstants : ITaskItem[] = [||] let mutable delaySign : bool = false let mutable deterministic : bool = false - let mutable disabledWarnings : string = null - let mutable documentationFile : string = null - let mutable dotnetFscCompilerPath : string = null let mutable embedAllSources = false let mutable embeddedFiles : ITaskItem[] = [||] - let mutable generateInterfaceFile : string = null let mutable highEntropyVA : bool = false - let mutable keyFile : string = null - let mutable langVersion : string = null let mutable noFramework = false let mutable optimize : bool = true - let mutable otherFlags : string = null - let mutable outputAssembly : string = null - let mutable pathMap : string = null - let mutable pdbFile : string = null - let mutable platform : string = null let mutable prefer32bit : bool = false - let mutable preferredUILang : string = null let mutable publicSign : bool = false let mutable provideCommandLineArgs : bool = false let mutable references : ITaskItem[] = [||] - let mutable referencePath : string = null let mutable resources : ITaskItem[] = [||] let mutable skipCompilerExecution : bool = false let mutable sources : ITaskItem[] = [||] - let mutable sourceLink : string = null - let mutable subsystemVersion : string = null let mutable tailcalls : bool = true - let mutable targetProfile : string = null - let mutable targetType : string = null let mutable toolExe : string = "fsc.exe" - let mutable toolPath : string = - let locationOfThisDll = - try Some(Path.GetDirectoryName(typeof.Assembly.Location)) - with _ -> None - match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with - | Some s -> s - | None -> "" let mutable treatWarningsAsErrors : bool = false let mutable useStandardResourceNames : bool = false + let mutable vserrors : bool = false + let mutable utf8output : bool = false + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let mutable baseAddress : string = null + let mutable codePage : string = null + let mutable debugType : string = null + let mutable disabledWarnings : string = null + let mutable documentationFile : string = null + let mutable dotnetFscCompilerPath : string = null + let mutable generateInterfaceFile : string = null + let mutable keyFile : string = null + let mutable langVersion : string = null + let mutable otherFlags : string = null + let mutable outputAssembly : string = null + let mutable pathMap : string = null + let mutable pdbFile : string = null + let mutable platform : string = null + let mutable preferredUILang : string = null + let mutable referencePath : string = null + let mutable sourceLink : string = null + let mutable subsystemVersion : string = null + let mutable targetProfile : string = null + let mutable targetType : string = null let mutable warningsAsErrors : string = null let mutable warningsNotAsErrors : string = null let mutable versionFile : string = null let mutable warningLevel : string = null let mutable win32res : string = null let mutable win32manifest : string = null - let mutable vserrors : bool = false let mutable vslcid : string = null - let mutable utf8output : bool = false + let mutable checksumAlgorithm: string = null + let mutable codePage : string = null +#else + let mutable baseAddress : string? = null + let mutable codePage : string? = null + let mutable debugType : string? = null + let mutable disabledWarnings : string? = null + let mutable documentationFile : string? = null + let mutable dotnetFscCompilerPath : string? = null + let mutable generateInterfaceFile : string? = null + let mutable keyFile : string? = null + let mutable langVersion : string? = null + let mutable otherFlags : string? = null + let mutable outputAssembly : string? = null + let mutable pathMap : string? = null + let mutable pdbFile : string? = null + let mutable platform : string? = null + let mutable preferredUILang : string? = null + let mutable referencePath : string? = null + let mutable sourceLink : string? = null + let mutable subsystemVersion : string? = null + let mutable targetProfile : string? = null + let mutable targetType : string? = null + let mutable warningsAsErrors : string? = null + let mutable warningsNotAsErrors : string? = null + let mutable versionFile : string? = null + let mutable warningLevel : string? = null + let mutable win32res : string? = null + let mutable win32manifest : string? = null + let mutable vslcid : string? = null + let mutable checksumAlgorithm: string? = null + let mutable codePage : string? = null +#endif + let mutable toolPath : string = + let locationOfThisDll = + try Some(Path.GetDirectoryName(typeof.Assembly.Location)) + with _ -> None + match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with + | Some s -> s + | None -> "" // See bug 6483; this makes parallel build faster, and is fine to set unconditionally do this.YieldDuringToolExecution <- true @@ -97,7 +137,9 @@ type public Fsc () as this = builder.AppendSwitch("-g") // DebugType builder.AppendSwitchIfNotNull("--debug:", - if debugType = null then null else + match debugType with + | null -> null + | NonNull debugType -> match debugType.ToUpperInvariant() with | "NONE" -> null | "PORTABLE" -> "portable" @@ -105,10 +147,10 @@ type public Fsc () as this = | "EMBEDDED" -> "embedded" | "FULL" -> "full" | _ -> null) - if embedAllSources then builder.AppendSwitch("--embed+") - if embeddedFiles <> null then - for item in embeddedFiles do - builder.AppendSwitchIfNotNull("--embed:", item.ItemSpec) + if embedAllSources then + builder.AppendSwitch("--embed+") + for item in embeddedFiles do + builder.AppendSwitchIfNotNull("--embed:", item.ItemSpec) builder.AppendSwitchIfNotNull("--sourcelink:", sourceLink) builder.AppendSwitchIfNotNull("--langversion:", langVersion) // NoFramework @@ -117,9 +159,8 @@ type public Fsc () as this = // BaseAddress builder.AppendSwitchIfNotNull("--baseaddress:", baseAddress) // DefineConstants - if defineConstants <> null then - for item in defineConstants do - builder.AppendSwitchIfNotNull("--define:", item.ItemSpec) + for item in defineConstants do + builder.AppendSwitchIfNotNull("--define:", item.ItemSpec) // DocumentationFile builder.AppendSwitchIfNotNull("--doc:", documentationFile) // GenerateInterfaceFile @@ -139,7 +180,12 @@ type public Fsc () as this = builder.AppendSwitchIfNotNull("--pdb:", pdbFile) // Platform builder.AppendSwitchIfNotNull("--platform:", - let ToUpperInvariant (s:string) = if s = null then null else s.ToUpperInvariant() +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let ToUpperInvariant (s:string) = +#else + let ToUpperInvariant (s:string?) = +#endif + match s with null -> null | NonNull s -> s.ToUpperInvariant() match ToUpperInvariant(platform), prefer32bit, ToUpperInvariant(targetType) with | "ANYCPU", true, "EXE" | "ANYCPU", true, "WINEXE" -> "anycpu32bitpreferred" @@ -149,40 +195,45 @@ type public Fsc () as this = | _ -> null) // checksumAlgorithm builder.AppendSwitchIfNotNull("--checksumalgorithm:", - let ToUpperInvariant (s:string) = if s = null then null else s.ToUpperInvariant() - match ToUpperInvariant(checksumAlgorithm) with + match checksumAlgorithm with + | null -> null + | NonNull checksumAlgorithm -> + match checksumAlgorithm.ToUpperInvariant() with | "SHA1" -> "Sha1" | "SHA256" -> "Sha256" | _ -> null) + // Resources - if resources <> null then - for item in resources do - match useStandardResourceNames with - | true -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec, [|item.GetMetadata("LogicalName"); item.GetMetadata("Access")|]) - | false -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec) + for item in resources do + match useStandardResourceNames with + | true -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec, [|item.GetMetadata("LogicalName"); item.GetMetadata("Access")|]) + | false -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec) // VersionFile builder.AppendSwitchIfNotNull("--versionfile:", versionFile) // CompilerTools - if compilerTools <> null then - for item in compilerTools do - builder.AppendSwitchIfNotNull("--compilertool:", item.ItemSpec) + for item in compilerTools do + builder.AppendSwitchIfNotNull("--compilertool:", item.ItemSpec) // References - if references <> null then - for item in references do - builder.AppendSwitchIfNotNull("-r:", item.ItemSpec) + for item in references do + builder.AppendSwitchIfNotNull("-r:", item.ItemSpec) + // ReferencePath let referencePathArray = // create a array of strings match referencePath with | null -> null - | _ -> referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries) + | NonNull referencePath -> + referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries) + + builder.AppendSwitchesIfNotNull("--lib:", referencePathArray, ",") - builder.AppendSwitchIfNotNull("--lib:", referencePathArray, ",") // TargetType builder.AppendSwitchIfNotNull("--target:", - if targetType = null then null else + match targetType with + | null -> null + | NonNull targetType -> match targetType.ToUpperInvariant() with | "LIBRARY" -> "library" | "EXE" -> "exe" @@ -193,7 +244,8 @@ type public Fsc () as this = // NoWarn match disabledWarnings with | null -> () - | _ -> builder.AppendSwitchIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",") + | NonNull disabledWarnings -> + builder.AppendSwitchesIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",") // WarningLevel builder.AppendSwitchIfNotNull("--warn:", warningLevel) @@ -208,14 +260,15 @@ type public Fsc () as this = let warningsAsErrorsArray = match warningsAsErrors with | null -> [|"76"|] - | _ -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries) + | NonNull warningsAsErrors -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries) - builder.AppendSwitchIfNotNull("--warnaserror:", warningsAsErrorsArray, ",") + builder.AppendSwitchesIfNotNull("--warnaserror:", warningsAsErrorsArray, ",") // WarningsNotAsErrors match warningsNotAsErrors with | null -> () - | _ -> builder.AppendSwitchIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",") + | NonNull warningsNotAsErrors -> + builder.AppendSwitchesIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",") // Win32ResourceFile builder.AppendSwitchIfNotNull("--win32res:", win32res) @@ -251,9 +304,13 @@ type public Fsc () as this = builder.AppendSwitch("--nocopyfsharpcore") - match pathMap with - | null -> () - | _ -> builder.AppendSwitchIfNotNull("--pathmap:", pathMap.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",") + let pathMapArray = // create a array of strings + match pathMap with + | null -> null + | NonNull pathMap -> + pathMap.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries) + + builder.AppendSwitchesIfNotNull("--pathmap:", pathMapArray, ",") if deterministic then builder.AppendSwitch("--deterministic+") @@ -584,7 +641,10 @@ type public Fsc () as this = override fsc.GenerateCommandLineCommands() = let builder = new FSharpCommandLineBuilder() - if not (String.IsNullOrEmpty(dotnetFscCompilerPath)) then builder.AppendSwitch(dotnetFscCompilerPath) + match dotnetFscCompilerPath with + | null | "" -> () + | NonNull dotnetFscCompilerPath -> + builder.AppendSwitch(dotnetFscCompilerPath) builder.ToString() override fsc.GenerateResponseFileCommands() = diff --git a/src/fsharp/FSharp.Build/Fsi.fs b/src/fsharp/FSharp.Build/Fsi.fs index ed1aae5e132..9ada72edb1a 100644 --- a/src/fsharp/FSharp.Build/Fsi.fs +++ b/src/fsharp/FSharp.Build/Fsi.fs @@ -11,6 +11,12 @@ open Microsoft.Build.Framework open Microsoft.Build.Utilities open Internal.Utilities +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +[] +module UtilsFsi = + let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v +#endif + //There are a lot of flags on fsi.exe. //For now, not all of them are represented in the "Fsi class" object model. //The goal is to have the most common/important flags available via the Fsi class, and the @@ -23,28 +29,19 @@ type public Fsi () as this = let mutable capturedArguments : string list = [] // list of individual args, to pass to HostObject Compile() let mutable capturedFilenames : string list = [] // list of individual source filenames, to pass to HostObject Compile() - let mutable codePage : string = null let mutable commandLineArgs : ITaskItem list = [] let mutable defineConstants : ITaskItem[] = [||] - let mutable disabledWarnings : string = null - let mutable dotnetFsiCompilerPath : string = null let mutable fsiExec = false - let mutable langVersion : string = null let mutable noFramework = false let mutable optimize = true - let mutable otherFlags : string = null - let mutable preferredUILang = null let mutable provideCommandLineArgs = false let mutable references : ITaskItem[] = [||] - let mutable referencePath : string = null let mutable resources : ITaskItem[] = [||] let mutable skipCompilerExecution = false let mutable sources : ITaskItem[] = [||] let mutable loadSources : ITaskItem[] = [||] let mutable useSources : ITaskItem[] = [||] let mutable tailcalls : bool = true - let mutable targetProfile : string = null - let mutable targetType : string = null let mutable toolExe : string = "fsi.exe" let mutable toolPath : string = let locationOfThisDll = @@ -54,11 +51,37 @@ type public Fsi () as this = | Some s -> s | None -> "" let mutable treatWarningsAsErrors : bool = false + let mutable utf8output : bool = false + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let mutable codePage : string = null + let mutable disabledWarnings : string = null + let mutable dotnetFsiCompilerPath : string = null + let mutable otherFlags : string = null + let mutable langVersion : string = null + let mutable preferredUILang : string = null + let mutable targetProfile : string = null + let mutable targetType : string = null + let mutable referencePath : string = null let mutable warningsAsErrors : string = null let mutable warningsNotAsErrors : string = null let mutable warningLevel : string = null let mutable vslcid : string = null - let mutable utf8output : bool = false +#else + let mutable codePage : string? = null + let mutable disabledWarnings : string? = null + let mutable dotnetFsiCompilerPath : string? = null + let mutable otherFlags : string? = null + let mutable langVersion : string? = null + let mutable preferredUILang : string? = null + let mutable targetProfile : string? = null + let mutable targetType : string? = null + let mutable referencePath : string? = null + let mutable warningsAsErrors : string? = null + let mutable warningsNotAsErrors : string? = null + let mutable warningLevel : string? = null + let mutable vslcid : string? = null +#endif // See bug 6483; this makes parallel build faster, and is fine to set unconditionally do this.YieldDuringToolExecution <- true @@ -71,9 +94,8 @@ type public Fsi () as this = builder.AppendSwitchIfNotNull("--langversion:", langVersion) if noFramework then builder.AppendSwitch("--noframework") - if defineConstants <> null then - for item in defineConstants do - builder.AppendSwitchIfNotNull("--define:", item.ItemSpec) + for item in defineConstants do + builder.AppendSwitchIfNotNull("--define:", item.ItemSpec) if optimize then builder.AppendSwitch("--optimize+") else builder.AppendSwitch("--optimize-") @@ -81,19 +103,18 @@ type public Fsi () as this = if not tailcalls then builder.AppendSwitch("--tailcalls-") - if references <> null then - for item in references do - builder.AppendSwitchIfNotNull("-r:", item.ItemSpec) + for item in references do + builder.AppendSwitchIfNotNull("-r:", item.ItemSpec) let referencePathArray = // create a array of strings match referencePath with | null -> null - | _ -> referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries) + | NonNull referencePath -> referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries) // NoWarn match disabledWarnings with | null -> () - | _ -> builder.AppendSwitchIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",") + | NonNull disabledWarnings -> builder.AppendSwitchesIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",") builder.AppendSwitchIfNotNull("--warn:", warningLevel) @@ -103,13 +124,13 @@ type public Fsi () as this = let warningsAsErrorsArray = match warningsAsErrors with | null -> [| "76" |] - | _ -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries) + | NonNull warningsAsErrors -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries) - builder.AppendSwitchIfNotNull("--warnaserror:", warningsAsErrorsArray, ",") + builder.AppendSwitchesIfNotNull("--warnaserror:", warningsAsErrorsArray, ",") match warningsNotAsErrors with | null -> () - | _ -> builder.AppendSwitchIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",") + | NonNull warningsNotAsErrors -> builder.AppendSwitchesIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",") builder.AppendSwitchIfNotNull("--LCID:", vslcid) @@ -122,13 +143,11 @@ type public Fsi () as this = builder.AppendSwitchIfNotNull("--targetprofile:", targetProfile) - if loadSources <> null then - for item in loadSources do - builder.AppendSwitchIfNotNull("--load:", item.ItemSpec) + for item in loadSources do + builder.AppendSwitchIfNotNull("--load:", item.ItemSpec) - if useSources <> null then - for item in useSources do - builder.AppendSwitchIfNotNull("--use:", item.ItemSpec) + for item in useSources do + builder.AppendSwitchIfNotNull("--use:", item.ItemSpec) // OtherFlags - must be second-to-last builder.AppendSwitchUnquotedIfNotNull("", otherFlags) @@ -266,15 +285,20 @@ type public Fsi () as this = // ToolTask methods override fsi.ToolName = "fsi.exe" + override fsi.StandardErrorEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardErrorEncoding + override fsi.StandardOutputEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardOutputEncoding + override fsi.GenerateFullPathToTool() = if toolPath = "" then raise (new System.InvalidOperationException(FSBuild.SR.toolpathUnknown())) System.IO.Path.Combine(toolPath, fsi.ToolExe) + override fsi.LogToolCommand (message:string) = fsi.Log.LogMessageFromText(message, MessageImportance.Normal) |>ignore member internal fsi.InternalGenerateFullPathToTool() = fsi.GenerateFullPathToTool() // expose for unit testing + member internal fsi.BaseExecuteTool(pathToTool, responseFileCommands, commandLineCommands) = // F# does not allow protected members to be captured by lambdas, this is the standard workaround base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands) @@ -317,7 +341,10 @@ type public Fsi () as this = override fsi.GenerateCommandLineCommands() = let builder = new FSharpCommandLineBuilder() - if not (String.IsNullOrEmpty(dotnetFsiCompilerPath)) then builder.AppendSwitch(dotnetFsiCompilerPath) + match dotnetFsiCompilerPath with + | null | "" -> () + | NonNull dotnetFsiCompilerPath -> + builder.AppendSwitch(dotnetFsiCompilerPath) builder.ToString() override fsi.GenerateResponseFileCommands() = diff --git a/src/fsharp/FSharp.Build/SubstituteText.fs b/src/fsharp/FSharp.Build/SubstituteText.fs index 16b8eab5245..b87dad5b34a 100644 --- a/src/fsharp/FSharp.Build/SubstituteText.fs +++ b/src/fsharp/FSharp.Build/SubstituteText.fs @@ -10,11 +10,17 @@ open Microsoft.Build.Utilities type SubstituteText () = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let mutable _buildEngine : IBuildEngine = null let mutable _hostObject : ITaskHost = null + let mutable embeddedResources : ITaskItem[] = [||] +#else + let mutable _buildEngine : IBuildEngine? = null + let mutable _hostObject : ITaskHost? = null + let mutable embeddedResources : ITaskItem[]? = [||] +#endif let mutable copiedFiles = new ResizeArray() - let mutable embeddedResources : ITaskItem[] = [||] [] member this.EmbeddedResources diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs index b878dadaba0..10fde48de20 100644 --- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs +++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs @@ -12,13 +12,26 @@ open System.Text open Microsoft.Build.Framework open Microsoft.Build.Utilities +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +[] +module UtilsWriteCodeFragment = + let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v +#endif + type WriteCodeFragment() = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let mutable _buildEngine : IBuildEngine = null let mutable _hostObject : ITaskHost = null - let mutable _language : string = "" - let mutable _assemblyAttributes : ITaskItem[] = [||] let mutable _outputDirectory : ITaskItem = null let mutable _outputFile : ITaskItem = null +#else + let mutable _buildEngine : IBuildEngine? = null + let mutable _hostObject : ITaskHost? = null + let mutable _outputDirectory : ITaskItem? = null + let mutable _outputFile : ITaskItem? = null +#endif + let mutable _language : string = "" + let mutable _assemblyAttributes : ITaskItem[] = [||] static let escapeString (str:string) = let sb = str.ToCharArray() |> Seq.fold (fun (sb:StringBuilder) (c:char) -> @@ -109,7 +122,10 @@ type WriteCodeFragment() = member this.Execute() = try - if isNull _outputFile && isNull _outputDirectory then failwith "Output location must be specified" + match _outputFile with + | null -> failwith "Output location must be specified" + | NonNull outputFile -> + let boilerplate = match _language.ToLowerInvariant() with | "f#" -> "// \n// Generated by the FSharp WriteCodeFragment class.\n// \nnamespace FSharp\n\nopen System\nopen System.Reflection\n" @@ -121,16 +137,27 @@ type WriteCodeFragment() = let code = Array.fold (fun (sb:StringBuilder) (item:ITaskItem) -> sb.AppendLine(WriteCodeFragment.GenerateAttribute (item, _language.ToLowerInvariant()))) sb _assemblyAttributes if _language.ToLowerInvariant() = "f#" then code.AppendLine("do()") |> ignore + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let fileName = _outputFile.ItemSpec let outputFileItem = if not (isNull _outputFile) && not (isNull _outputDirectory) && not (Path.IsPathRooted(fileName)) then TaskItem(Path.Combine(_outputDirectory.ItemSpec, fileName)) :> ITaskItem - elif isNull _outputFile then - let tempFile = Path.Combine(Path.GetTempPath(), sprintf "tmp%s.fs" (Guid.NewGuid().ToString("N"))) - TaskItem(tempFile) :> ITaskItem else _outputFile +#else + let fileName = outputFile.ItemSpec + + let outputFileItem = + match _outputDirectory with + | null -> outputFile + | NonNull outputDirectory -> + if Path.IsPathRooted(fileName) then + outputFile + else + TaskItem(Path.Combine(outputDirectory.ItemSpec, fileName)) :> ITaskItem +#endif let codeText = code.ToString() File.WriteAllText(fileName, codeText) diff --git a/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj b/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj index 9b33f948815..3d207ab75ad 100644 --- a/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj +++ b/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj @@ -9,6 +9,7 @@ FSharp.Compiler.Private $(NoWarn);45;55;62;75;1204 true + $(OtherFlags) --checknulls $(DefineConstants);COMPILER $(DefineConstants);MSBUILD_AT_LEAST_15 $(DefineConstants);LOCALIZATION_FCOMP diff --git a/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj b/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj index 75a7353bb96..417f4456918 100644 --- a/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj +++ b/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj @@ -7,6 +7,7 @@ net472 FSharp.Compiler.Server.Shared true + $(OtherFlags) --checknulls diff --git a/src/fsharp/FSharp.Core/FSharp.Core.fsproj b/src/fsharp/FSharp.Core/FSharp.Core.fsproj index f7f046c4d7d..e20b3177417 100644 --- a/src/fsharp/FSharp.Core/FSharp.Core.fsproj +++ b/src/fsharp/FSharp.Core/FSharp.Core.fsproj @@ -8,7 +8,11 @@ netstandard2.0 $(NoWarn);45;55;62;75;1204 true + $(OtherFlags) --warnon:3218 + $(OtherFlags) --compiling-fslib-40 + $(DefineConstants);FSHARP_CORE + $(OtherFlags) --warnon:1182 --compiling-fslib --compiling-fslib-40 --maxerrors:20 --extraoptimizationloops:1 BUILDING_WITH_LKG;$(DefineConstants) $(OtherFlags) --warnon:1182 --compiling-fslib --compiling-fslib-40 --maxerrors:20 --extraoptimizationloops:1 --nowarn:57 true diff --git a/src/fsharp/FSharp.Core/array.fs b/src/fsharp/FSharp.Core/array.fs index 0ac47bd39a6..8a65559c796 100644 --- a/src/fsharp/FSharp.Core/array.fs +++ b/src/fsharp/FSharp.Core/array.fs @@ -560,12 +560,16 @@ namespace Microsoft.FSharp.Collections maskArray.[maskIdx] <- mask count +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref>) (leftoverMaskOut: byref) = +#else + let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref?>) (leftoverMaskOut: byref) = +#endif let maskArrayLength = src.Length / 0x20 // null when there are less than 32 items in src array. let maskArray = - if maskArrayLength = 0 then Unchecked.defaultof<_> + if maskArrayLength = 0 then null else Microsoft.FSharp.Primitives.Basics.Array.zeroCreateUnchecked maskArrayLength let mutable count = @@ -646,7 +650,11 @@ namespace Microsoft.FSharp.Collections dstIdx +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let private filterViaMask (maskArray: array) (leftoverMask: uint32) (count: int) (src: array<_>) = +#else + let private filterViaMask (maskArray: array?) (leftoverMask: uint32) (count: int) (src: array<_>) = +#endif let dst = Microsoft.FSharp.Primitives.Basics.Array.zeroCreateUnchecked count let mutable dstIdx = 0 @@ -665,10 +673,10 @@ namespace Microsoft.FSharp.Collections dst let filter f (src: array<_>) = - let mutable maskArray = Unchecked.defaultof<_> - let mutable leftOverMask = Unchecked.defaultof<_> + let mutable maskArray = null + let mutable leftOverMask = 0u match createMask f src &maskArray &leftOverMask with - | 0 -> empty + | 0 -> empty | count -> filterViaMask maskArray leftOverMask count src [] diff --git a/src/fsharp/FSharp.Core/async.fs b/src/fsharp/FSharp.Core/async.fs index 4655b0d73f3..29281bbb0e8 100644 --- a/src/fsharp/FSharp.Core/async.fs +++ b/src/fsharp/FSharp.Core/async.fs @@ -1772,7 +1772,7 @@ namespace Microsoft.FSharp.Control event.RemoveHandler handle if args.Cancelled then ccont (new OperationCanceledException()) - elif isNotNull args.Error then + elif isNonNull args.Error then econt args.Error else cont (result args) diff --git a/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs b/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs index b3fa821511a..2048457b88f 100644 --- a/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs +++ b/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs @@ -359,7 +359,7 @@ namespace Microsoft.FSharp.Core.CompilerServices type ITypeProvider = inherit System.IDisposable abstract GetNamespaces : unit -> IProvidedNamespace[] - abstract GetStaticParameters : typeWithoutArguments:Type -> ParameterInfo[] + abstract GetStaticParameters : typeWithoutArguments:Type -> ParameterInfo[] abstract ApplyStaticArguments : typeWithoutArguments:Type * typePathWithArguments:string[] * staticArguments:obj[] -> Type abstract GetInvokerExpression : syntheticMethodBase:MethodBase * parameters:Microsoft.FSharp.Quotations.Expr[] -> Microsoft.FSharp.Quotations.Expr diff --git a/src/fsharp/FSharp.Core/local.fs b/src/fsharp/FSharp.Core/local.fs index 3d812fc72c4..c8966fe5b66 100644 --- a/src/fsharp/FSharp.Core/local.fs +++ b/src/fsharp/FSharp.Core/local.fs @@ -1093,7 +1093,11 @@ module internal Array = if len < 2 then () else Array.Sort<_>(array, fastComparerForArraySort()) +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let stableSortWithKeysAndComparer (cFast:IComparer<'Key>) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>) = +#else + let stableSortWithKeysAndComparer (cFast:IComparer<'Key>?) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>) = +#endif // 'places' is an array or integers storing the permutation performed by the sort let places = zeroCreateUnchecked array.Length for i = 0 to array.Length - 1 do diff --git a/src/fsharp/FSharp.Core/mailbox.fs b/src/fsharp/FSharp.Core/mailbox.fs index b2bec129719..cd11db9b09a 100644 --- a/src/fsharp/FSharp.Core/mailbox.fs +++ b/src/fsharp/FSharp.Core/mailbox.fs @@ -312,7 +312,7 @@ namespace Microsoft.FSharp.Control interface System.IDisposable with member __.Dispose() = - if isNotNull pulse then (pulse :> IDisposable).Dispose() + if isNonNull pulse then (pulse :> IDisposable).Dispose() #if DEBUG member x.UnsafeContents = diff --git a/src/fsharp/FSharp.Core/option.fs b/src/fsharp/FSharp.Core/option.fs index 552d1c9231f..1c8907810b5 100644 --- a/src/fsharp/FSharp.Core/option.fs +++ b/src/fsharp/FSharp.Core/option.fs @@ -85,11 +85,21 @@ module Option = [] let ofNullable (value:System.Nullable<'T>) = if value.HasValue then Some value.Value else None +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE [] let ofObj value = match value with null -> None | _ -> Some value [] let toObj value = match value with None -> null | Some x -> x +#else + [] + let ofObj (value: 'T?) : 'T option when 'T: not struct and 'T : not null = + match value with null -> None | _ -> Some value + + [] + let toObj (value: 'T option) : 'T? when 'T: not struct (* and 'T : not null *) = + match value with None -> null | Some x -> x +#endif module ValueOption = @@ -171,8 +181,18 @@ module ValueOption = [] let ofNullable (value:System.Nullable<'T>) = if value.HasValue then ValueSome value.Value else ValueNone +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE [] let ofObj value = match value with null -> ValueNone | _ -> ValueSome value [] let toObj value = match value with ValueNone -> null | ValueSome x -> x +#else + [] + let ofObj (value: 'T?) : 'T voption when 'T: not struct and 'T : not null = + match value with null -> ValueNone | _ -> ValueSome value + + [] + let toObj (value : 'T voption) : 'T? when 'T: not struct (* and 'T : not null *) = + match value with ValueNone -> null | ValueSome x -> x +#endif \ No newline at end of file diff --git a/src/fsharp/FSharp.Core/option.fsi b/src/fsharp/FSharp.Core/option.fsi index 96d4ab74bf6..9d8e4e8d138 100644 --- a/src/fsharp/FSharp.Core/option.fsi +++ b/src/fsharp/FSharp.Core/option.fsi @@ -189,13 +189,23 @@ module Option = /// The input value. /// The result option. [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val ofObj: value: 'T -> 'T option when 'T : null +#else + // TODO NULLNESS: assess this change - is it a breaking change? + val ofObj: value: 'T? -> 'T option when 'T : not struct and 'T : not null +#endif /// Convert an option to a potentially null value. /// The input value. /// The result value, which is null if the input was None. [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val toObj: value: 'T option -> 'T when 'T : null +#else + // TODO NULLNESS: assess this change - is it a breaking change? + val toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : not null *) +#endif /// Basic operations on value options. module ValueOption = @@ -378,10 +388,20 @@ module ValueOption = /// The input value. /// The result value option. [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val ofObj: value: 'T -> 'T voption when 'T : null +#else + // TODO NULLNESS: assess this change - is it a breaking change? + val ofObj: value: 'T? -> 'T voption when 'T : not struct and 'T : not null +#endif /// Convert an option to a potentially null value. /// The input value. /// The result value, which is null if the input was ValueNone. [] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val toObj: value: 'T voption -> 'T when 'T : null +#else + // TODO NULLNESS: assess this change - is it a breaking change? + val toObj: value: 'T voption -> 'T? when 'T : not struct (* and 'T : not null *) +#endif diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs index 78441e75df8..0c4adbac15c 100644 --- a/src/fsharp/FSharp.Core/prim-types.fs +++ b/src/fsharp/FSharp.Core/prim-types.fs @@ -9,6 +9,8 @@ #nowarn "69" // Interface implementations in augmentations are now deprecated. Interface implementations should be given on the initial declaration... #nowarn "77" // Member constraints with the name 'Exp' are given special status by the F# compiler... #nowarn "3218" // mismatch of parameter name for 'fst' and 'snd' +#nowarn "3244" // no nullness checking +#nowarn "3245" // no nullness checking namespace Microsoft.FSharp.Core @@ -832,7 +834,8 @@ namespace Microsoft.FSharp.Core /// Implements generic comparison between two objects. This corresponds to the pseudo-code in the F# /// specification. The treatment of NaNs is governed by "comp". - let rec GenericCompare (comp:GenericComparer) (xobj:obj,yobj:obj) = + let rec GenericCompare (comp:GenericComparer) (xobj:obj, yobj:obj) = + (*if objEq xobj yobj then 0 else *) match xobj,yobj with | null,null -> 0 | null,_ -> -1 @@ -2280,9 +2283,7 @@ namespace Microsoft.FSharp.Core Convert.ToUInt64(s, 8) let inline removeUnderscores (s:string) = - match s with - | null -> null - | s -> s.Replace("_", "") + s.Replace("_", "") let ParseUInt32 (s:string) = if System.Object.ReferenceEquals(s,null) then @@ -3259,17 +3260,67 @@ namespace Microsoft.FSharp.Core | _ -> None [] - let inline isNull (value : 'T) = - match value with + let inline isNull (value : 'T when 'T : null) = + match box value with | null -> true | _ -> false - [] - let inline internal isNotNull (value : 'T) = + [] + let inline internal isNonNull (value : 'T) = match value with | null -> false | _ -> true +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + + [] + let inline isNullV (value : Nullable<'T>) = not value.HasValue + + [] + let inline nonNull (value : 'T? when 'T : not struct and 'T : not null) = + match box value with + | null -> raise (System.NullReferenceException()) + | _ -> (# "" value : 'T #) + + [] + let inline nonNullV (value : Nullable<'T>) = + if value.HasValue then + value.Value + else + raise (System.NullReferenceException()) + + [] + let inline (|Null|NotNull|) (value : 'T? when 'T : not null) = + match value with + | null -> Null () + | _ -> NotNull (# "" value : 'T #) + + [] + let inline (|NullV|NotNullV|) (value : Nullable<'T>) = + if value.HasValue then NotNullV value.Value + else NullV () + + [] + let inline (|NonNull|) (value : 'T? when 'T : not null) = + match box value with + | null -> raise (System.NullReferenceException()) + | _ -> (# "" value : 'T #) + + [] + let inline (|NonNullV|) (value : Nullable<'T>) = + if value.HasValue then value.Value + else raise (System.NullReferenceException()) + + [] + let inline withNull (value : 'T when 'T : not struct) = (# "" value : 'T? #) + + [] + let inline withNullV (value : 'T) : Nullable<'T> = Nullable<'T>(value) + + [] + let inline nullV<'T when 'T : struct and 'T : (new : unit -> 'T) and 'T :> ValueType> = Nullable<'T>() +#endif + [] let inline raise (exn: exn) = (# "throw" exn : 'T #) @@ -3311,6 +3362,14 @@ namespace Microsoft.FSharp.Core let inline nullArg (argumentName:string) = raise (new System.ArgumentNullException(argumentName)) +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + [] + let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : not null) = + match value with + | null -> raise (new System.ArgumentNullException(argumentName)) + | _ -> (# "" value : 'T #) +#endif + [] [] let inline invalidOp message = raise (System.InvalidOperationException(message)) @@ -3361,10 +3420,26 @@ namespace Microsoft.FSharp.Core let (^) (s1: string) (s2: string) = System.String.Concat(s1, s2) [] - let defaultArg arg defaultValue = match arg with None -> defaultValue | Some v -> v + let inline defaultArg arg defaultValue = + match arg with None -> defaultValue | Some v -> v [] - let defaultValueArg arg defaultValue = match arg with ValueNone -> defaultValue | ValueSome v -> v + let inline defaultValueArg arg defaultValue = + match arg with ValueNone -> defaultValue | ValueSome v -> v + + [] + let inline defaultIfNone defaultValue arg = + match arg with None -> defaultValue | Some v -> v + +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + [] + let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : not null) = + match arg with null -> defaultValue | _ -> (# "" arg : 'T #) + + [] + let inline defaultIfNullV defaultValue (arg: Nullable<'T>) = + if arg.HasValue then arg.Value else defaultValue +#endif [] let inline (~-) (n: ^T) : ^T = @@ -3610,9 +3685,16 @@ namespace Microsoft.FSharp.Core let inline ParseUInt16 (s:string) = (# "conv.ovf.u2" (ParseUInt32 s) : uint16 #) let inline ParseIntPtr (s:string) = (# "conv.ovf.i" (ParseInt64 s) : nativeint #) let inline ParseUIntPtr (s:string) = (# "conv.ovf.u" (ParseInt64 s) : unativeint #) - let inline ParseDouble (s:string) = Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture) - let inline ParseSingle (s:string) = Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture) - + + let inline ParseDouble (s:string) = + if System.Object.ReferenceEquals(s,null) then + raise( new System.ArgumentNullException("s") ) + Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture) + + let inline ParseSingle (s:string) = + if System.Object.ReferenceEquals(s,null) then + raise( new System.ArgumentNullException("s") ) + Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture) [] [] diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi index afa0719602c..f317466f8c3 100644 --- a/src/fsharp/FSharp.Core/prim-types.fsi +++ b/src/fsharp/FSharp.Core/prim-types.fsi @@ -952,7 +952,11 @@ namespace Microsoft.FSharp.Core val inline FastGenericComparer<'T> : System.Collections.Generic.IComparer<'T> when 'T : comparison /// Make an F# comparer object for the given type, where it can be null if System.Collections.Generic.Comparer<'T>.Default +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val internal FastGenericComparerCanBeNull<'T> : System.Collections.Generic.IComparer<'T> when 'T : comparison +#else + val internal FastGenericComparerCanBeNull<'T> : System.Collections.Generic.IComparer<'T>? when 'T : comparison +#endif /// Make an F# hash/equality object for the given type val inline FastGenericEqualityComparer<'T> : System.Collections.Generic.IEqualityComparer<'T> when 'T : equality @@ -2138,19 +2142,42 @@ namespace Microsoft.FSharp.Core /// The function result. val inline (<|||): func:('T1 -> 'T2 -> 'T3 -> 'U) -> arg1:'T1 * arg2:'T2 * arg3:'T3 -> 'U + /// Used to specify a default value for an optional argument in the implementation of a function + /// The default value of the argument. + /// An option representing the argument. + /// The argument value. If it is None, the defaultValue is returned. + [] + val inline defaultIfNone : defaultValue:'T -> arg:'T option -> 'T + +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + /// Used to specify a default value for a nullable reference argument in the implementation of a function + /// The default value of the argument. + /// A nullable value representing the argument. + /// The argument value. If it is null, the defaultValue is returned. + [] + val inline defaultIfNull : defaultValue:'T -> arg:'T? -> 'T when 'T : not struct and 'T : not null + + /// Used to specify a default value for an nullable value argument in the implementation of a function + /// The default value of the argument. + /// A nullable value representing the argument. + /// The argument value. If it is null, the defaultValue is returned. + [] + val inline defaultIfNullV : defaultValue:'T -> arg:Nullable<'T> -> 'T +#endif + /// Used to specify a default value for an optional argument in the implementation of a function /// An option representing the argument. /// The default value of the argument. /// The argument value. If it is None, the defaultValue is returned. [] - val defaultArg : arg:'T option -> defaultValue:'T -> 'T + val inline defaultArg : arg:'T option -> defaultValue:'T -> 'T /// Used to specify a default value for an optional argument in the implementation of a function /// A value option representing the argument. /// The default value of the argument. /// The argument value. If it is None, the defaultValue is returned. [] - val defaultValueArg : arg:'T voption -> defaultValue:'T -> 'T + val inline defaultValueArg : arg:'T voption -> defaultValue:'T -> 'T /// Concatenate two strings. The operator '+' may also be used. [] @@ -2246,17 +2273,80 @@ namespace Microsoft.FSharp.Core /// The value to check. /// True when value is null, false otherwise. [] - val inline isNull : value:'T -> bool when 'T : null + val inline isNull : value: 'T -> bool when 'T : null +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + /// Determines whether the given value is null. + /// The value to check. + /// A choice indicating whether the value is null or not-null. + [] + val inline (|Null|NotNull|) : value: 'T? -> Choice when 'T : not null + + /// Determines whether the given value is null. + /// The value to check. + /// A choice indicating whether the value is null or not-null. + [] + val inline (|NullV|NotNullV|) : value: Nullable<'T> -> Choice + + /// When used in a pattern checks the given value is not null. + /// The value to check. + /// The non-null value. + [] + val inline (|NonNull|) : value: 'T? -> 'T when 'T : not null + + /// When used in a pattern checks the given value is not null. + /// The value to check. + /// The non-null value. + [] + val inline (|NonNullV|) : value: Nullable<'T> -> 'T + + /// Determines whether the given value is null. + /// The value to check. + /// True when value is null, false otherwise. + [] + val inline isNullV : value:Nullable<'T> -> bool +#endif + /// Determines whether the given value is not null. /// The value to check. /// True when value is not null, false otherwise. - [] - val inline internal isNotNull : value:'T -> bool when 'T : null + [] + val inline internal isNonNull : value:'T -> bool when 'T : null + +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + /// Get the null value for a value type. + /// The null value for a value type. + [] + val inline nullV<'T when 'T : struct and 'T : (new : unit -> 'T) and 'T :> ValueType> : Nullable<'T> + + /// Asserts that the value is non-null. + /// The value to check. + /// True when value is null, false otherwise. + [] + val inline nonNull : value: 'T? -> 'T when 'T : not struct and 'T : not null + + /// Asserts that the value is non-null. + /// The value to check. + /// True when value is null, false otherwise. + [] + val inline nonNullV : value:Nullable<'T> -> 'T + + /// Asserts that the value is non-null. + /// The value to check. + /// True when value is null, false otherwise. + [] + val inline withNull : value:'T -> 'T? when 'T : not struct (* and 'T : not null *) + + /// Asserts that the value is non-null. + /// The value to check. + /// True when value is null, false otherwise. + [] + val inline withNullV : value:'T -> Nullable<'T> +#endif /// Throw a System.Exception exception. /// The exception message. - /// The result value. + /// Never returns. [] val inline failwith : message:string -> 'T @@ -2264,16 +2354,24 @@ namespace Microsoft.FSharp.Core /// the given argument name and message. /// The argument name. /// The exception message. - /// The result value. + /// Never returns. [] val inline invalidArg : argumentName:string -> message:string -> 'T /// Throw a System.ArgumentNullException exception /// The argument name. - /// The result value. + /// Never returns. [] val inline nullArg : argumentName:string -> 'T +#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE + /// Throw a System.ArgumentNullException if the given value is null exception + /// The argument name. + /// The result value. + [] + val inline nullArgCheck : argumentName:string -> 'T? -> 'T when 'T : not struct and 'T : not null +#endif + /// Throw a System.InvalidOperationException exception /// The exception message. /// The result value. diff --git a/src/fsharp/FSharp.Core/reflect.fsi b/src/fsharp/FSharp.Core/reflect.fsi index 465529677a7..e1949edb397 100644 --- a/src/fsharp/FSharp.Core/reflect.fsi +++ b/src/fsharp/FSharp.Core/reflect.fsi @@ -18,12 +18,14 @@ open Microsoft.FSharp.Collections type UnionCaseInfo = /// The name of the case. member Name : string + /// The type in which the case occurs. member DeclaringType: Type /// Returns the custom attributes associated with the case. /// An array of custom attributes. member GetCustomAttributes: unit -> obj[] + /// Returns the custom attributes associated with the case matching the given attribute type. /// The type of attributes to return. /// An array of custom attributes. @@ -54,7 +56,7 @@ type FSharpValue = /// Thrown when the input type is not a record type. /// The field from the record. static member GetRecordField: record:obj * info:PropertyInfo -> obj - + /// Precompute a function for reading a particular field from a record. /// Assumes the given type is a RecordType with a field of the given name. /// If not, ArgumentException is raised during pre-computation. @@ -101,6 +103,7 @@ type FSharpValue = /// Thrown when the input type is not a record type. /// An optimized reader for the given record type. static member PreComputeRecordReader : recordType:Type * ?bindingFlags:BindingFlags -> (obj -> obj[]) + /// Precompute a function for constructing a record value. /// /// Assumes the given type is a RecordType. @@ -137,7 +140,7 @@ type FSharpValue = /// Thrown when the input type is not a union case value. /// The description of the union case and its fields. static member GetUnionFields: value:obj * unionType:Type * ?bindingFlags:BindingFlags -> UnionCaseInfo * obj [] - + /// Assumes the given type is a union type. /// If not, ArgumentException is raised during pre-computation. /// @@ -207,8 +210,8 @@ type FSharpValue = /// The input tuple. /// Thrown when the input is not a tuple value. /// An array of the fields from the given tuple. - static member GetTupleFields: tuple:obj -> obj [] - + static member GetTupleFields: tuple:obj -> obj[] + /// Precompute a function for reading the values of a particular tuple type /// /// Assumes the given type is a TupleType. @@ -217,7 +220,7 @@ type FSharpValue = /// Thrown when the given type is not a tuple type. /// A function to read values of the given tuple type. static member PreComputeTupleReader : tupleType:Type -> (obj -> obj[]) - + /// Gets information that indicates how to read a field of a tuple /// The input tuple type. /// The index of the tuple element to describe. @@ -362,7 +365,8 @@ module FSharpReflectionExtensions = /// Optional flags that denotes accessibility of the private representation. /// Thrown when the input type is not a record type. /// The created record. - static member MakeRecord: recordType:Type * values:obj [] * ?allowAccessToPrivateRepresentation : bool -> obj + static member MakeRecord: recordType:Type * values:obj[] * ?allowAccessToPrivateRepresentation : bool -> obj + /// Reads all the fields from a record value. /// /// Assumes the given input is a record value. If not, ArgumentException is raised. @@ -387,6 +391,7 @@ module FSharpReflectionExtensions = /// Thrown when the input type is not a record type. /// An optimized reader for the given record type. static member PreComputeRecordReader : recordType:Type * ?allowAccessToPrivateRepresentation : bool -> (obj -> obj[]) + /// Precompute a function for constructing a record value. /// /// Assumes the given type is a RecordType. @@ -402,13 +407,13 @@ module FSharpReflectionExtensions = /// Optional flag that denotes accessibility of the private representation. /// A ConstructorInfo for the given record type. static member PreComputeRecordConstructorInfo: recordType:Type * ?allowAccessToPrivateRepresentation : bool-> ConstructorInfo - + /// Create a union case value. /// The description of the union case to create. /// The array of arguments to construct the given case. /// Optional flag that denotes accessibility of the private representation. /// The constructed union case. - static member MakeUnion: unionCase:UnionCaseInfo * args:obj [] * ?allowAccessToPrivateRepresentation : bool-> obj + static member MakeUnion: unionCase:UnionCaseInfo * args:obj[] * ?allowAccessToPrivateRepresentation : bool-> obj /// Identify the union case and its fields for an object /// @@ -422,8 +427,8 @@ module FSharpReflectionExtensions = /// Optional flag that denotes accessibility of the private representation. /// Thrown when the input type is not a union case value. /// The description of the union case and its fields. - static member GetUnionFields: value:obj * unionType:Type * ?allowAccessToPrivateRepresentation : bool -> UnionCaseInfo * obj [] - + static member GetUnionFields: value:obj * unionType:Type * ?allowAccessToPrivateRepresentation : bool -> UnionCaseInfo * obj[] + /// Assumes the given type is a union type. /// If not, ArgumentException is raised during pre-computation. /// diff --git a/src/fsharp/FindUnsolved.fs b/src/fsharp/FindUnsolved.fs index a5cf703516c..d70eb860158 100644 --- a/src/fsharp/FindUnsolved.fs +++ b/src/fsharp/FindUnsolved.fs @@ -77,8 +77,8 @@ let rec accExpr (cenv:cenv) (env:env) expr = accExprs cenv env argsl | Expr.Lambda (_, _ctorThisValOpt, _baseValOpt, argvs, _body, m, rty) -> - let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) - let ty = mkMultiLambdaTy m argvs rty + let topValInfo = ValReprInfo ([],[argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)],ValReprInfo.unnamedRetVal) + let ty = mkMultiLambdaTy cenv.g m argvs rty accLambdas cenv env topValInfo expr ty | Expr.TyLambda (_, tps, _body, _m, rty) -> diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs index be61821291e..40cd863c1b2 100644 --- a/src/fsharp/IlxGen.fs +++ b/src/fsharp/IlxGen.fs @@ -112,7 +112,7 @@ type AttributeDecoder(namedArgs) = let nameMap = namedArgs |> List.map (fun (AttribNamedArg(s, _, _, c)) -> s, c) |> NameMap.ofList let findConst x = match NameMap.tryFind x nameMap with | Some(AttribExpr(_, Expr.Const (c, _, _))) -> Some c | _ -> None - let findAppTr x = match NameMap.tryFind x nameMap with | Some(AttribExpr(_, Expr.App (_, _, [TType_app(tr, _)], _, _))) -> Some tr | _ -> None + let findAppTr x = match NameMap.tryFind x nameMap with | Some(AttribExpr(_, Expr.App (_, _, [TType_app(tr, _, _)], _, _))) -> Some tr | _ -> None member __.FindInt16 x dflt = match findConst x with | Some(Const.Int16 x) -> x | _ -> dflt @@ -520,12 +520,14 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty = ignore voidOK #endif match stripTyEqnsAndMeasureEqns g ty with - | TType_app (tcref, tinst) -> GenNamedTyAppAux amap m tyenv ptrsOK tcref tinst + | TType_app (tcref, tinst, _nullness) -> + GenNamedTyAppAux amap m tyenv ptrsOK tcref tinst + | TType_tuple (tupInfo, args) -> + GenTypeAux amap m tyenv VoidNotOK ptrsOK (mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) args) - | TType_tuple (tupInfo, args) -> GenTypeAux amap m tyenv VoidNotOK ptrsOK (mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) args) - - | TType_fun (dty, returnTy) -> EraseClosures.mkILFuncTy g.ilxPubCloEnv (GenTypeArgAux amap m tyenv dty) (GenTypeArgAux amap m tyenv returnTy) + | TType_fun (dty, returnTy, _nullness) -> + EraseClosures.mkILFuncTy g.ilxPubCloEnv (GenTypeArgAux amap m tyenv dty) (GenTypeArgAux amap m tyenv returnTy) | TType_anon (anonInfo, tinst) -> let tref = anonInfo.ILTypeRef @@ -541,7 +543,7 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty = if tps.IsEmpty then GenTypeAux amap m tyenv VoidNotOK ptrsOK tau else EraseClosures.mkILTyFuncTy g.ilxPubCloEnv - | TType_var tp -> mkILTyvarTy tyenv.[tp, m] + | TType_var (tp, _nullness) -> mkILTyvarTy tyenv.[tp, m] | TType_measure _ -> g.ilg.typ_Int32 @@ -1507,7 +1509,7 @@ type AssemblyBuilder(cenv: cenv, anonTypeTable: AnonTypeGenerationTable) as mgbu Construct.NewRecdField false None (mkSynId m propName) false (mkTyparTy tp) true false [] [] XmlDoc.Empty taccessPublic false ]) let tcref = mkLocalTyconRef tycon - let _, typ = generalizeTyconRef tcref + let _, typ = generalizeTyconRef cenv.g tcref let tcaug = tcref.TypeContents tcaug.tcaug_interfaces <- @@ -3045,7 +3047,6 @@ and GenUntupledArgExpr cenv cgbuf eenv m argInfos expr sequel = GenBinding cenv cgbuf eenvinner bind let tys = destRefTupleTy g ty assert (tys.Length = numRequiredExprs) - // TODO - tupInfoRef argInfos |> List.iteri (fun i _ -> GenGetTupleField cenv cgbuf eenvinner (tupInfoRef, loce, tys, i, m) Continue) GenSequel cenv eenv.cloc cgbuf sequel ) @@ -6132,10 +6133,10 @@ and GenBindingRhs cenv cgbuf eenv sp (vspec: Val) e = | Expr.TyLambda (_, tyargs, body, _, ttype) when ( tyargs |> List.forall (fun tp -> tp.IsErased) && - (match StorageForVal g vspec.Range vspec eenv with Local _ -> true | _ -> false) && - (isLocalTypeFunc || - (match ttype with - TType_var typar -> match typar.Solution with Some(TType_app(t, _))-> t.IsStructOrEnumTycon | _ -> false + (match StorageForVal g vspec.Range vspec eenv with Local _ -> true | _ -> false) && + (isLocalTypeFunc || + (match ttype with + TType_var (typar, _) -> match typar.Solution with Some (TType_app (t, _, _))-> t.IsStructOrEnumTycon | _ -> false | _ -> false)) ) -> // type lambda with erased type arguments that is stored as local variable (not method or property)- inline body @@ -6859,10 +6860,10 @@ and GenAbstractBinding cenv eenv tref (vref: ValRef) = [], [], [] /// Generate a ToString method that calls 'sprintf "%A"' -and GenToStringMethod cenv eenv ilThisTy m = +and GenToStringMethod cenv eenv ilThisTy m = let g = cenv.g - [ match (eenv.valsInScope.TryFind g.sprintf_vref.Deref, - eenv.valsInScope.TryFind g.new_format_vref.Deref) with + [ match (eenv.valsInScope.TryFind cenv.g.sprintf_vref.Deref, + eenv.valsInScope.TryFind cenv.g.new_format_vref.Deref) with | Some(Lazy(Method(_, _, sprintfMethSpec, _, _, _, _))), Some(Lazy(Method(_, _, newFormatMethSpec, _, _, _, _))) -> // The type returned by the 'sprintf' call let funcTy = EraseClosures.mkILFuncTy g.ilxPubCloEnv ilThisTy g.ilg.typ_String @@ -6871,18 +6872,18 @@ and GenToStringMethod cenv eenv ilThisTy m = [// 'T -> string' funcTy // rest follow from 'StringFormat' - GenUnitTy cenv eenv m - g.ilg.typ_String - g.ilg.typ_String + GenUnitTy cenv eenv m + g.ilg.typ_String + g.ilg.typ_String ilThisTy], []) // Instantiate with our own type let sprintfMethSpec = mkILMethSpec(sprintfMethSpec.MethodRef, AsObject, [], [funcTy]) // Here's the body of the method. Call printf, then invoke the function it returns let callInstrs = EraseClosures.mkCallFunc g.ilxPubCloEnv (fun _ -> 0us) eenv.tyenv.Count Normalcall (Apps_app(ilThisTy, Apps_done g.ilg.typ_String)) - let mdef = + let mdef = mkILNonGenericVirtualMethod ("ToString", ILMemberAccess.Public, [], mkILReturn g.ilg.typ_String, - mkMethodBody (true, [], 2, nonBranchingInstrsToCode + mkMethodBody (true, [], 2, nonBranchingInstrsToCode ([ // load the hardwired format string yield I_ldstr "%+A" // make the printf format object @@ -6912,7 +6913,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = | TAsmRepr _ | TILObjectRepr _ | TMeasureableRepr _ -> () | TFSharpObjectRepr _ | TRecdRepr _ | TUnionRepr _ -> let eenvinner = ReplaceTyenv (TypeReprEnv.ForTycon tycon) eenv - let thisTy = generalizedTyconRef tcref + let thisTy = generalizedTyconRef g tcref let ilThisTy = GenType cenv.amap m eenvinner.tyenv thisTy let tref = ilThisTy.TypeRef @@ -6996,10 +6997,10 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = let name = vref.DisplayName match vref.MemberInfo with | None -> None - | Some memberInfo -> - match name, memberInfo.MemberFlags.MemberKind with - | ("Item" | "op_IndexedLookup"), (MemberKind.PropertyGet | MemberKind.PropertySet) when not (isNil (ArgInfosOfPropertyVal g vref.Deref)) -> - Some( mkILCustomAttribute g.ilg (g.FindSysILTypeRef "System.Reflection.DefaultMemberAttribute", [g.ilg.typ_String], [ILAttribElem.String(Some name)], []) ) + | Some memberInfo -> + match name, memberInfo.MemberFlags.MemberKind with + | ("Item" | "op_IndexedLookup"), (MemberKind.PropertyGet | MemberKind.PropertySet) when not (isNil (ArgInfosOfPropertyVal g vref.Deref)) -> + Some( mkILCustomAttribute g.ilg (g.FindSysILTypeRef "System.Reflection.DefaultMemberAttribute", [g.ilg.typ_String], [ILAttribElem.String(Some(name))], []) ) | _ -> None) |> Option.toList @@ -7009,8 +7010,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = let debugDisplayAttrs, normalAttrs = tycon.Attribs |> List.partition (IsMatchingFSharpAttribute g g.attrib_DebuggerDisplayAttribute) let securityAttrs, normalAttrs = normalAttrs |> List.partition (fun a -> IsSecurityAttribute g cenv.amap cenv.casApplied a m) let generateDebugDisplayAttribute = not g.compilingFslib && tycon.IsUnionTycon && isNil debugDisplayAttrs - let generateDebugProxies = (not (tyconRefEq g tcref g.unit_tcr_canon) && - not (HasFSharpAttribute g g.attrib_DebuggerTypeProxyAttribute tycon.Attribs)) + let generateDebugProxies = + (not (tyconRefEq g tcref g.unit_tcr_canon) && + not (HasFSharpAttribute g g.attrib_DebuggerTypeProxyAttribute tycon.Attribs)) let permissionSets = CreatePermissionSets cenv eenv securityAttrs let secDecls = if List.isEmpty securityAttrs then emptyILSecurityDecls else mkILSecurityDecls permissionSets @@ -7018,8 +7020,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = let ilDebugDisplayAttributes = [ yield! GenAttrs cenv eenv debugDisplayAttrs if generateDebugDisplayAttribute then - yield g.mkDebuggerDisplayAttribute ("{" + debugDisplayMethodName + "(),nq}") ] - + yield g.mkDebuggerDisplayAttribute ("{" + debugDisplayMethodName + "(),nq}") ] let ilCustomAttrs = [ yield! defaultMemberAttrs @@ -7051,9 +7052,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = tycon.AllFieldsArray |> Array.forall (fun f -> f.IsStatic) isEmptyStruct && cenv.opts.workAroundReflectionEmitBugs && not tycon.TyparsNoRange.IsEmpty - + // Compute a bunch of useful things for each field - let isCLIMutable = (TryFindFSharpBoolAttribute g g.attrib_CLIMutableAttribute tycon.Attribs = Some true) + let isCLIMutable = (TryFindFSharpBoolAttribute g g.attrib_CLIMutableAttribute tycon.Attribs = Some true) let fieldSummaries = [ for fspec in tycon.AllFieldsArray do @@ -7081,7 +7082,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = let ilFieldOffset = match TryFindFSharpAttribute g g.attrib_FieldOffsetAttribute fspec.FieldAttribs with - | Some (Attrib(_, _, [ AttribInt32Arg fieldOffset ], _, _, _, _)) -> + | Some (Attrib(_, _, [ AttribInt32Arg fieldOffset ], _, _, _, _)) -> Some fieldOffset | Some (Attrib(_, _, _, _, _, _, m)) -> errorR(Error(FSComp.SR.ilFieldOffsetAttributeCouldNotBeDecoded(), m)) @@ -7096,15 +7097,15 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = if useGenuineField then yield! fspec.PropertyAttribs yield! fspec.FieldAttribs ] - + let ilNotSerialized = HasFSharpAttributeOpt g g.attrib_NonSerializedAttribute attribs - - let fattribs = + + let fattribs = attribs - // Do not generate FieldOffset as a true CLI custom attribute, since it is implied by other corresponding CLI metadata - |> List.filter (IsMatchingFSharpAttribute g g.attrib_FieldOffsetAttribute >> not) - // Do not generate NonSerialized as a true CLI custom attribute, since it is implied by other corresponding CLI metadata - |> List.filter (IsMatchingFSharpAttributeOpt g g.attrib_NonSerializedAttribute >> not) + // Do not generate FieldOffset as a true CLI custom attribute, since it is implied by other corresponding CLI metadata + |> List.filter (IsMatchingFSharpAttribute g g.attrib_FieldOffsetAttribute >> not) + // Do not generate NonSerialized as a true CLI custom attribute, since it is implied by other corresponding CLI metadata + |> List.filter (IsMatchingFSharpAttributeOpt g g.attrib_NonSerializedAttribute >> not) let ilFieldMarshal, fattribs = GenMarshal cenv fattribs @@ -7112,9 +7113,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = // AND the field is not mutable (because we can take the address of a mutable field). // Otherwise fields are always accessed via their property getters/setters let isFieldHidden = isPropHidden || (not useGenuineField && not isFSharpMutable) - - let extraAttribs = - match tyconRepr with + + let extraAttribs = + match tyconRepr with | TRecdRepr _ when not useGenuineField -> [ g.DebuggerBrowsableNeverAttribute ] // hide fields in records in debug display | _ -> [] // don't hide fields in classes in debug display @@ -7138,13 +7139,13 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = .WithFieldMarshal(ilFieldMarshal) yield fdef - if requiresExtraField then - yield mkILInstanceField("__dummy", g.ilg.typ_Int32, None, ILMemberAccess.Assembly) ] - - // Generate property definitions for the fields compiled as properties - let ilPropertyDefsForFields = + if requiresExtraField then + yield mkILInstanceField ("__dummy", g.ilg.typ_Int32, None, ILMemberAccess.Assembly) ] + + // Generate property definitions for the fields compiled as properties + let ilPropertyDefsForFields = [ for (i, (useGenuineField, _, isFSharpMutable, isStatic, propAttribs, ilPropType, _, fspec)) in Seq.indexed fieldSummaries do - if not useGenuineField then + if not useGenuineField then let ilCallingConv = if isStatic then ILCallingConv.Static else ILCallingConv.Instance let ilPropName = fspec.Name let ilHasSetter = isCLIMutable || isFSharpMutable @@ -7202,19 +7203,19 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = [// 'T -> string' funcTy // rest follow from 'StringFormat' - GenUnitTy cenv eenv m - g.ilg.typ_String - g.ilg.typ_String + GenUnitTy cenv eenv m + g.ilg.typ_String + g.ilg.typ_String g.ilg.typ_String], []) // Instantiate with our own type let sprintfMethSpec = mkILMethSpec(sprintfMethSpec.MethodRef, AsObject, [], [funcTy]) // Here's the body of the method. Call printf, then invoke the function it returns let callInstrs = EraseClosures.mkCallFunc g.ilxPubCloEnv (fun _ -> 0us) eenv.tyenv.Count Normalcall (Apps_app(ilThisTy, Apps_done g.ilg.typ_String)) - let ilMethodDef = mkILNonGenericInstanceMethod (debugDisplayMethodName, ILMemberAccess.Assembly, [], + let ilMethodDef = mkILNonGenericInstanceMethod (debugDisplayMethodName,ILMemberAccess.Assembly, [], mkILReturn g.ilg.typ_Object, - mkMethodBody + mkMethodBody (true, [], 2, - nonBranchingInstrsToCode + nonBranchingInstrsToCode ([ // load the hardwired format string yield I_ldstr "%+0.8A" // make the printf format object @@ -7263,10 +7264,11 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = // FSharp 3.0 feature: adding CLIMutable to a record type causes emit of default constructor, and all fields get property setters // Records that are value types do not create a default constructor with CLIMutable or ComVisible if not isStructRecord && (isCLIMutable || (TryFindFSharpBoolAttribute g g.attrib_ComVisibleAttribute tycon.Attribs = Some true)) then - yield mkILSimpleStorageCtor(None, Some g.ilg.typ_Object.TypeSpec, ilThisTy, [], [], reprAccess) - + yield mkILSimpleStorageCtor(None, Some g.ilg.typ_Object.TypeSpec, ilThisTy, [], [], reprAccess) + if not (tycon.HasMember g "ToString" []) then yield! GenToStringMethod cenv eenv ilThisTy m + | TFSharpObjectRepr r when tycon.IsFSharpDelegateTycon -> // Build all the methods that go with a delegate type @@ -7282,9 +7284,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = | paraml -> paraml GenActualSlotsig m cenv eenvinner (TSlotSig(nm, ty, ctps, mtps, paraml, returnTy)) [] [] yield! mkILDelegateMethods reprAccess g.ilg (g.iltyp_AsyncCallback, g.iltyp_IAsyncResult) (p, r) - | _ -> + | _ -> () - | TUnionRepr _ when not (tycon.HasMember g "ToString" []) -> + | TUnionRepr _ when not (tycon.HasMember g "ToString" []) -> yield! GenToStringMethod cenv eenv ilThisTy m | _ -> () ] @@ -7292,7 +7294,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = let ilProperties = mkILProperties (ilPropertyDefsForFields @ abstractPropDefs) let ilEvents = mkILEvents abstractEventDefs let ilFields = mkILFields ilFieldDefs - + let tdef, tdefDiscards = let isSerializable = (TryFindFSharpBoolAttribute g g.attrib_AutoSerializableAttribute tycon.Attribs <> Some false) @@ -7302,14 +7304,14 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = let tdef = tdef.With(customAttrs = mkILCustomAttrs ilCustomAttrs, genericParams = ilGenParams) tdef, None - | TRecdRepr _ | TFSharpObjectRepr _ as tyconRepr -> + | TRecdRepr _ | TFSharpObjectRepr _ as tyconRepr -> let super = superOfTycon g tycon let ilBaseTy = GenType cenv.amap m eenvinner.tyenv super // Build a basic type definition let isObjectType = (match tyconRepr with TFSharpObjectRepr _ -> true | _ -> false) - let ilAttrs = - ilCustomAttrs @ + let ilAttrs = + ilCustomAttrs @ [mkCompilationMappingAttr g (int (if isObjectType then SourceConstructFlags.ObjectType @@ -7337,7 +7339,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = mkILMethods ilMethods, ilFields, emptyILTypeDefs, ilProperties, ilEvents, mkILCustomAttrs ilAttrs, typeDefTrigger) - // Set some the extra entries in the definition + // Set some the extra entries in the definition let isTheSealedAttribute = tyconRefEq g tcref g.attrib_SealedAttribute.TyconRef let tdef = @@ -7347,9 +7349,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = .WithImport(isComInteropTy g thisTy) .With(methodImpls=mkILMethodImpls methodImpls) - let tdLayout, tdEncoding = + let tdLayout,tdEncoding = match TryFindFSharpAttribute g g.attrib_StructLayoutAttribute tycon.Attribs with - | Some (Attrib(_, _, [ AttribInt32Arg layoutKind ], namedArgs, _, _, _)) -> + | Some (Attrib(_, _, [ AttribInt32Arg(layoutKind) ], namedArgs, _, _, _)) -> let decoder = AttributeDecoder namedArgs let ilPack = decoder.FindInt32 "Pack" 0x0 let ilSize = decoder.FindInt32 "Size" 0x0 @@ -7427,8 +7429,8 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = cudAlternatives= alternatives cudWhere = None} - let layout = - if isStructTy g thisTy then + let layout = + if isStructTy g thisTy then if (match ilTypeDefKind with ILTypeDefKind.ValueType -> true | _ -> false) then // Structs with no instance fields get size 1, pack 0 ILTypeDefLayout.Sequential { Size=Some 1; Pack=Some 0us } @@ -7437,8 +7439,8 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = else ILTypeDefLayout.Auto - let cattrs = - mkILCustomAttrs (ilCustomAttrs @ + let cattrs = + mkILCustomAttrs (ilCustomAttrs @ [mkCompilationMappingAttr g (int (if hiddenRepr then SourceConstructFlags.SumType ||| SourceConstructFlags.NonPublicRepresentation @@ -7466,9 +7468,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = .WithInitSemantics(ILTypeInit.BeforeField) let tdef2 = g.eraseClassUnionDef tref tdef cuinfo - - // Discard the user-supplied (i.e. prim-type.fs) implementations of the get_Empty, get_IsEmpty, get_Value and get_None and Some methods. - // This is because we will replace their implementations by ones that load the unique + + // Discard the user-supplied (i.e. prim-type.fs) implementations of the get_Empty, get_IsEmpty, get_Value and get_None and Some methods. + // This is because we will replace their implementations by ones that load the unique // private static field for lists etc. // // Also discard the F#-compiler supplied implementation of the Empty, IsEmpty, Value and None properties. @@ -7503,7 +7505,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) = /// Generate the type for an F# exception declaration. and GenExnDef cenv mgbuf eenv m (exnc: Tycon) = let g = cenv.g - let exncref = mkLocalEntityRef exnc + let exncref = mkLocalEntityRef exnc match exnc.ExceptionInfo with | TExnAbbrevRepr _ | TExnAsmRepr _ | TExnNone -> () | TExnFresh _ -> @@ -7532,16 +7534,16 @@ and GenExnDef cenv mgbuf eenv m (exnc: Tycon) = init = None, args = [], customAttrs=mkILCustomAttrs (GenAttrs cenv eenv fld.PropertyAttribs @ [mkCompilationMappingAttrWithSeqNum g (int SourceConstructFlags.Field) i])) - yield (ilMethodDef, ilFieldDef, ilPropDef, (ilPropName, ilFieldName, ilPropType)) ] + yield (ilMethodDef, ilFieldDef, ilPropDef, (ilPropName, ilFieldName, ilPropType)) ] |> List.unzip4 - let ilCtorDef = - mkILSimpleStorageCtorWithParamNames(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], ChooseParamNames fieldNamesAndTypes, reprAccess) + let ilCtorDef = + mkILSimpleStorageCtorWithParamNames(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], ChooseParamNames fieldNamesAndTypes, reprAccess) // In compiled code, all exception types get a parameterless constructor for use with XML serialization // This does default-initialization of all fields - let ilCtorDefNoArgs = - if not (isNil fieldNamesAndTypes) then + let ilCtorDefNoArgs = + if not (isNil fieldNamesAndTypes) then [ mkILSimpleStorageCtor(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], [], reprAccess) ] else [] @@ -7552,7 +7554,7 @@ and GenExnDef cenv mgbuf eenv m (exnc: Tycon) = | Some serializationInfoType, Some streamingContextType -> let ilCtorDefForSerialization = mkILCtor(ILMemberAccess.Family, - [mkILParamNamed("info", serializationInfoType);mkILParamNamed("context", streamingContextType)], + [mkILParamNamed("info", serializationInfoType); mkILParamNamed("context", streamingContextType)], mkMethodBody (false, [], 8, nonBranchingInstrsToCode diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs index 222a2557890..615bf228b10 100644 --- a/src/fsharp/InfoReader.fs +++ b/src/fsharp/InfoReader.fs @@ -22,6 +22,10 @@ open FSharp.Compiler.TcGlobals open FSharp.Compiler.Features open FSharp.Compiler.TypeRelations +#if !NO_EXTENSIONTYPING +open FSharp.Compiler.ExtensionTyping +#endif + /// Use the given function to select some of the member values from the members of an F# type let SelectImmediateMemberVals g optFilter f (tcref: TyconRef) = let chooser (vref: ValRef) = @@ -148,8 +152,8 @@ let rec GetImmediateIntrinsicPropInfosOfTypeAux (optFilter, ad) g amap m origTy match optFilter with | Some name -> match st.PApply((fun st -> st.GetProperty name), m) with - | Tainted.Null -> [||] - | pi -> [|pi|] + | Tainted.Null -> [||] + | Tainted.NonNull pi -> [|pi|] | None -> st.PApplyArray((fun st -> st.GetProperties()), "GetProperties", m) matchingProps @@ -191,7 +195,7 @@ let IsIndexerType g amap ty = isListTy g ty || match tryTcrefOfAppTy g ty with | ValueSome tcref -> - let _, entityTy = generalizeTyconRef tcref + let entityTy = generalizedTyconRef g tcref let props = GetImmediateIntrinsicPropInfosOfType (None, AccessibleFromSomeFSharpCode) g amap range0 entityTy props |> List.exists (fun x -> x.PropertyName = "Item") | ValueNone -> false @@ -268,8 +272,8 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this = [ for fi in st.PApplyArray((fun st -> st.GetFields()), "GetFields", m) -> ProvidedField(amap, fi, m) ] | Some name -> match st.PApply ((fun st -> st.GetField name), m) with - | Tainted.Null -> [] - | fi -> [ ProvidedField(amap, fi, m) ] + | Tainted.Null -> [] + | Tainted.NonNull fi -> [ ProvidedField(amap, fi, m) ] #endif | ILTypeMetadata _ -> let tinfo = ILTypeInfo.FromType g ty @@ -293,8 +297,8 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this = [ for ei in st.PApplyArray((fun st -> st.GetEvents()), "GetEvents", m) -> ProvidedEvent(amap, ei, m) ] | Some name -> match st.PApply ((fun st -> st.GetEvent name), m) with - | Tainted.Null -> [] - | ei -> [ ProvidedEvent(amap, ei, m) ] + | Tainted.Null -> [] + | Tainted.NonNull ei -> [ ProvidedEvent(amap, ei, m) ] #endif | ILTypeMetadata _ -> let tinfo = ILTypeInfo.FromType g ty @@ -408,7 +412,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this = |> List.tryPick (fun ty -> match tryTcrefOfAppTy g ty with | ValueSome tcref when tcref.IsILTycon && tcref.ILTyconRawMetadata.Name = overridesTyFullName -> - generalizedTyconRef tcref + generalizedTyconRef g tcref |> Some | _ -> None) @@ -445,7 +449,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this = // a decent hash function for these. canMemoize=(fun (_flags, (_: range), ty) -> match stripTyEqns g ty with - | TType_app(tcref, []) -> tcref.TypeContents.tcaug_closed + | TType_app(tcref, [], _nullness) -> tcref.TypeContents.tcaug_closed // TODO NULLNESS: consider whether ignoring _nullness is valid here | _ -> false), keyComparer= @@ -454,13 +458,13 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this = // Ignoring the ranges - that's OK. flagsEq.Equals(flags1, flags2) && match stripTyEqns g typ1, stripTyEqns g typ2 with - | TType_app(tcref1, []), TType_app(tcref2, []) -> tyconRefEq g tcref1 tcref2 + | TType_app(tcref1, [], _nullness1),TType_app(tcref2, [], _nullness2) -> tyconRefEq g tcref1 tcref2 // TODO NULLNESS: consider whether ignoring _nullness is valid here | _ -> false member x.GetHashCode((flags, _, ty)) = // Ignoring the ranges - that's OK. flagsEq.GetHashCode flags + (match stripTyEqns g ty with - | TType_app(tcref, []) -> hash tcref.LogicalName + | TType_app(tcref, [], _nullness1) -> hash tcref.LogicalName // TODO NULLNESS: consider whether ignoring _nullness is valid here | _ -> 0) }) let hashFlags0 = @@ -873,8 +877,8 @@ let GetSigOfFunctionForDelegate (infoReader: InfoReader) delty m ad = | _ -> compiledViewOfDelArgTys let delRetTy = invokeMethInfo.GetFSharpReturnTy(amap, m, minst) CheckMethInfoAttributes g m None invokeMethInfo |> CommitOperationResult - let fty = mkIteratedFunTy fsharpViewOfDelArgTys delRetTy - SigOfFunctionForDelegate(invokeMethInfo, compiledViewOfDelArgTys, delRetTy, fty) + let fty = mkIteratedFunTy g fsharpViewOfDelArgTys delRetTy + SigOfFunctionForDelegate(invokeMethInfo,compiledViewOfDelArgTys, delRetTy, fty) /// Try and interpret a delegate type as a "standard" .NET delegate type associated with an event, with a "sender" parameter. let TryDestStandardDelegateType (infoReader: InfoReader) m ad delTy = diff --git a/src/fsharp/InnerLambdasToTopLevelFuncs.fs b/src/fsharp/InnerLambdasToTopLevelFuncs.fs index b21f0d22790..1331a3485e4 100644 --- a/src/fsharp/InnerLambdasToTopLevelFuncs.fs +++ b/src/fsharp/InnerLambdasToTopLevelFuncs.fs @@ -849,7 +849,7 @@ let CreateNewValuesForTLR g tlrS arityM fclassM envPackM = let newTps = envp.ep_etps @ tps let fHatTy = let newArgtys = List.map typeOfVal envp.ep_aenvs @ argtys - mkLambdaTy newTps newArgtys res + mkLambdaTy g newTps newArgtys res let fHatArity = MakeSimpleArityInfo newTps (envp.ep_aenvs.Length + wf) let fHatName = // Ensure that we have an g.CompilerGlobalState @@ -996,8 +996,8 @@ module Pass4_RewriteAssembly = (* REVIEW: is this mutation really, really necessary? *) (* Why are we applying TLR if the thing already has an arity? *) let fOrig = setValHasNoArity fOrig - let fBind = - mkMultiLambdaBind fOrig letSeqPtOpt m tps vss + let fBind = + mkMultiLambdaBind penv.g fOrig letSeqPtOpt m tps vss (mkApps penv.g ((exprForVal m fHat, fHat.Type), [List.map mkTyparTy (envp.ep_etps @ tps)], @@ -1012,17 +1012,17 @@ module Pass4_RewriteAssembly = // Don't take all the variables - only up to length wf let vssTake, vssDrop = List.splitAt wf vss // put the variables back on - let b, rty = mkMultiLambdasCore b.Range vssDrop (b, rty) - // fHat, args + let b, rty = mkMultiLambdasCore penv.g b.Range vssDrop (b, rty) + // fHat, args let m = fHat.Range // Add the type variables to the front let fHat_tps = envp.ep_etps @ tps // Add the 'aenv' and original taken variables to the front let fHat_args = List.map List.singleton envp.ep_aenvs @ vssTake - let fHat_body = mkLetsFromBindings m envp.ep_unpack b - let fHat_body = mkLetsFromBindings m shortRecBinds fHat_body // bind "f" if have short recursive calls (somewhere) - // fHat binding, f rebinding - let fHatBind = mkMultiLambdaBind fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body, rty) + let fHat_body = mkLetsFromBindings m envp.ep_unpack b + let fHat_body = mkLetsFromBindings m shortRecBinds fHat_body // bind "f" if have short recursive calls (somewhere) + // fHat binding, f rebinding + let fHatBind = mkMultiLambdaBind penv.g fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body,rty) fHatBind let rebinds = binds |> List.map fRebinding let shortRecBinds = rebinds |> List.filter (fun b -> penv.recShortCallS.Contains(b.Var)) diff --git a/src/fsharp/Interactive.DependencyManager/DependencyProvider.fs b/src/fsharp/Interactive.DependencyManager/DependencyProvider.fs index abd6b0b8e40..6809e84c0ed 100644 --- a/src/fsharp/Interactive.DependencyManager/DependencyProvider.fs +++ b/src/fsharp/Interactive.DependencyManager/DependencyProvider.fs @@ -101,7 +101,9 @@ type IResolveDependenciesResult = abstract Roots: string seq -[] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +[] +#endif type IDependencyManagerProvider = abstract Name: string abstract Key: string @@ -308,7 +310,11 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr InteractiveDependencyManager.SR.packageManagerUnknown(packageManagerKey, String.Join(", ", searchPaths, compilerTools), registeredKeys) /// Fetch a dependencymanager that supports a specific key +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string * IDependencyManagerProvider = +#else + member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string? * IDependencyManagerProvider? = +#endif try if path.Contains ":" && not (Path.IsPathRooted path) then let managers = RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError @@ -317,17 +323,17 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr | None -> let err, msg = this.CreatePackageManagerUnknownError(compilerTools, outputDir, (path.Split(':').[0]), reportError) reportError.Invoke(ErrorReportType.Error, err, msg) - null, Unchecked.defaultof + null, null | Some kv -> path, kv.Value else - path, Unchecked.defaultof + path, null with | e -> let e = stripTieWrapper e let err, msg = InteractiveDependencyManager.SR.packageManagerError(e.Message) reportError.Invoke(ErrorReportType.Error, err, msg) - null, Unchecked.defaultof + null, null /// Remove the dependency mager with the specified key member __.RemoveDependencyManagerKey(packageManagerKey:string, path:string): string = @@ -335,7 +341,11 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr path.Substring(packageManagerKey.Length + 1).Trim() /// Fetch a dependencymanager that supports a specific key +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member __.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider = +#else + member __.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider? = +#endif try RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError diff --git a/src/fsharp/Interactive.DependencyManager/DependencyProvider.fsi b/src/fsharp/Interactive.DependencyManager/DependencyProvider.fsi index e71b727e88f..9184c3ad790 100644 --- a/src/fsharp/Interactive.DependencyManager/DependencyProvider.fsi +++ b/src/fsharp/Interactive.DependencyManager/DependencyProvider.fsi @@ -29,7 +29,9 @@ type IResolveDependenciesResult = abstract Roots: seq /// Wraps access to a DependencyManager implementation -[] +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +[] +#endif type IDependencyManagerProvider = /// Name of the dependency manager @@ -73,7 +75,15 @@ type DependencyProvider = member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: string seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string -> IResolveDependenciesResult /// Fetch a dependencymanager that supports a specific key +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider +#else + member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider? +#endif /// TryFindDependencyManagerInPath - given a #r "key:sometext" go and find a DependencyManager that satisfies the key +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string * IDependencyManagerProvider +#else + member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string? * IDependencyManagerProvider? +#endif diff --git a/src/fsharp/LanguageFeatures.fs b/src/fsharp/LanguageFeatures.fs index 05572cfb9e9..096e5c3df32 100644 --- a/src/fsharp/LanguageFeatures.fs +++ b/src/fsharp/LanguageFeatures.fs @@ -31,6 +31,7 @@ type LanguageFeature = | AndBang | NullableOptionalInterop | DefaultInterfaceMemberConsumption + | NullnessChecking /// LanguageVersion management type LanguageVersion (specifiedVersionAsString) = @@ -59,12 +60,14 @@ type LanguageVersion (specifiedVersionAsString) = LanguageFeature.FixedIndexSlice3d4d, languageVersion50 LanguageFeature.FromEndSlicing, languageVersion50 LanguageFeature.DotlessFloat32Literal, languageVersion50 + LanguageFeature.DotlessFloat32Literal, languageVersion50 // F# preview LanguageFeature.NameOf, previewVersion LanguageFeature.OpenStaticClasses, previewVersion LanguageFeature.PackageManagement, previewVersion LanguageFeature.AndBang, previewVersion + LanguageFeature.NullnessChecking, languageVersion47 // TODO: currently always on because requires FSharp.Core build LanguageFeature.NullableOptionalInterop, previewVersion LanguageFeature.DefaultInterfaceMemberConsumption, previewVersion ] @@ -133,6 +136,7 @@ type LanguageVersion (specifiedVersionAsString) = | LanguageFeature.FromEndSlicing -> FSComp.SR.featureFromEndSlicing() | LanguageFeature.FixedIndexSlice3d4d -> FSComp.SR.featureFixedIndexSlice3d4d() | LanguageFeature.AndBang -> FSComp.SR.featureAndBang() + | LanguageFeature.NullnessChecking -> FSComp.SR.featureNullnessChecking() | LanguageFeature.NullableOptionalInterop -> FSComp.SR.featureNullableOptionalInterop() | LanguageFeature.DefaultInterfaceMemberConsumption -> FSComp.SR.featureDefaultInterfaceMemberConsumption() diff --git a/src/fsharp/LanguageFeatures.fsi b/src/fsharp/LanguageFeatures.fsi index fd367388bdd..4fca2e8a17f 100644 --- a/src/fsharp/LanguageFeatures.fsi +++ b/src/fsharp/LanguageFeatures.fsi @@ -19,6 +19,7 @@ type LanguageFeature = | AndBang | NullableOptionalInterop | DefaultInterfaceMemberConsumption + | NullnessChecking /// LanguageVersion management type LanguageVersion = diff --git a/src/fsharp/LegacyHostedCompilerForTesting.fs b/src/fsharp/LegacyHostedCompilerForTesting.fs index 821882d84d5..d825149a851 100644 --- a/src/fsharp/LegacyHostedCompilerForTesting.fs +++ b/src/fsharp/LegacyHostedCompilerForTesting.fs @@ -136,12 +136,15 @@ type internal FscCompiler(legacyReferenceResolver) = fun arg -> regex.IsMatch(arg) /// do compilation as if args was argv to fsc.exe - member this.Compile(args : string array) = + member this.Compile(args : string[]) = // args.[0] is later discarded, assuming it is just the path to fsc. // compensate for this in case caller didn't know let args = + match box args with + | null -> [|"fsc"|] + | _ -> match args with - | [||] | null -> [|"fsc"|] + | [||] -> [|"fsc"|] | a when not <| fscExeArg a.[0] -> Array.append [|"fsc"|] a | _ -> args diff --git a/src/fsharp/LegacyMSBuildReferenceResolver.fs b/src/fsharp/LegacyMSBuildReferenceResolver.fs index c0f2596c39e..f2078be5e7a 100644 --- a/src/fsharp/LegacyMSBuildReferenceResolver.fs +++ b/src/fsharp/LegacyMSBuildReferenceResolver.fs @@ -77,7 +77,7 @@ module LegacyMSBuildReferenceResolver /// Get the path to the .NET Framework implementation assemblies by using ToolLocationHelper.GetPathToDotNetFramework /// This is only used to specify the "last resort" path for assembly resolution. - let GetPathToDotNetFrameworkImlpementationAssemblies(v) = + let GetPathToDotNetFrameworkImlpementationAssemblies(v) : string list = let v = match v with | Net45 -> Some TargetDotNetFrameworkVersion.Version45 @@ -96,7 +96,7 @@ module LegacyMSBuildReferenceResolver | Some v -> match ToolLocationHelper.GetPathToDotNetFramework v with | null -> [] - | x -> [x] + | NonNull x -> [x] | _ -> [] let GetPathToDotNetFrameworkReferenceAssemblies(version) = diff --git a/src/fsharp/LexFilter.fs b/src/fsharp/LexFilter.fs index b270910224b..d0b56dbb360 100644 --- a/src/fsharp/LexFilter.fs +++ b/src/fsharp/LexFilter.fs @@ -910,6 +910,7 @@ type LexFilterImpl (lightSyntaxStatus: LightSyntaxStatus, compilingFsLib, lexer, if isAdjacent tokenTup lookaheadTokenTup then let mutable stack = [] let rec scanAhead nParen = + assert (nParen >= 0) let lookaheadTokenTup = popNextTokenTup() let lookaheadToken = lookaheadTokenTup.Token stack <- (lookaheadTokenTup, true) :: stack @@ -923,6 +924,26 @@ type LexFilterImpl (lightSyntaxStatus: LightSyntaxStatus, compilingFsLib, lexer, scanAhead nParen else false + | INFIX_COMPARE_OP "?>" -> + // just smash the token immediately + stack <- stack.Tail + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 1, 0)) + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, QMARK, 0, -1)) + scanAhead nParen + | INFIX_COMPARE_OP ">?>" -> + // just smash the token immediately + stack <- stack.Tail + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 2, 0)) + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, QMARK, 1, -1)) + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 0, -2)) + scanAhead nParen + | INFIX_COMPARE_OP "?>>" -> + // just smash the token immediately + stack <- stack.Tail + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 2, 0)) + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 1, -1)) + delayToken (pool.UseShiftedLocation(lookaheadTokenTup, QMARK, 0, -2)) + scanAhead nParen | GREATER _ | GREATER_RBRACK | GREATER_BAR_RBRACK -> let nParen = nParen - 1 let hasAfterOp = (match lookaheadToken with GREATER _ -> false | _ -> true) @@ -968,7 +989,9 @@ type LexFilterImpl (lightSyntaxStatus: LightSyntaxStatus, compilingFsLib, lexer, // f<{| C : int |}>x // fx // fx + // fx | DEFAULT | COLON | COLON_GREATER | STRUCT | NULL | DELEGATE | AND | WHEN + | QMARK | HACKNULL | AMBIVALENT | DOT_DOT | NEW | LBRACE_BAR diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs index 821f458e59a..6e4ed61cb4d 100644 --- a/src/fsharp/MethodCalls.fs +++ b/src/fsharp/MethodCalls.fs @@ -437,13 +437,16 @@ type CalledMeth<'T> match epinfos with | [pinfo] when pinfo.HasSetter && not pinfo.IsIndexer -> let pminfo = pinfo.SetterMethod - let pminst = match minfo with - | MethInfo.FSMeth(_, TType.TType_app(_, types), _, _) -> types - | _ -> freshenMethInfo m pminfo + let pminst = + match minfo with + | MethInfo.FSMeth(_, TType_app(_, types, _), _, _) -> types + | _ -> freshenMethInfo m pminfo + + let pminst = + match tyargsOpt with + | Some (TType_app(_, types, _)) -> types + | _ -> pminst - let pminst = match tyargsOpt with - | Some(TType.TType_app(_, types)) -> types - | _ -> pminst Choice1Of2(AssignedItemSetter(id, AssignedPropSetter(pinfo, pminfo, pminst), e)) | _ -> match infoReader.GetILFieldInfosOfType(Some(nm), ad, m, returnedObjTy) with @@ -834,7 +837,7 @@ let MakeMethInfoCall amap m minfo minst args = let isProp = false // not necessarily correct, but this is only used post-creflect where this flag is irrelevant let ilMethodRef = Import.ImportProvidedMethodBaseAsILMethodRef amap m mi let isConstructor = mi.PUntaint((fun c -> c.IsConstructor), m) - let valu = mi.PUntaint((fun c -> c.DeclaringType.IsValueType), m) + let valu = mi.PUntaint((fun c -> (nonNull c.DeclaringType).IsValueType), m) let actualTypeInst = [] // GENERIC TYPE PROVIDERS: for generics, we would have something here let actualMethInst = [] // GENERIC TYPE PROVIDERS: for generics, we would have something here let ilReturnTys = Option.toList (minfo.GetCompiledReturnTy(amap, m, [])) // GENERIC TYPE PROVIDERS: for generics, we would have more here @@ -847,7 +850,7 @@ let MakeMethInfoCall amap m minfo minst args = // This imports a provided method, and checks if it is a known compiler intrinsic like "1 + 2" let TryImportProvidedMethodBaseAsLibraryIntrinsic (amap: Import.ImportMap, m: range, mbase: Tainted) = let methodName = mbase.PUntaint((fun x -> x.Name), m) - let declaringType = Import.ImportProvidedType amap m (mbase.PApply((fun x -> x.DeclaringType), m)) + let declaringType = Import.ImportProvidedType amap m (mbase.PApply((fun x -> nonNull x.DeclaringType), m)) if isAppTy amap.g declaringType then let declaringEntity = tcrefOfAppTy amap.g declaringType if not declaringEntity.IsLocalRef && ccuEq declaringEntity.nlr.Ccu amap.g.fslibCcu then @@ -949,8 +952,14 @@ let BuildMethodCall tcVal g amap isMutable m isProp minfo valUseFlags minst objA // Build a 'call' to a struct default constructor | DefaultStructCtor (g, ty) -> - if not (TypeHasDefaultValue g m ty) then - errorR(Error(FSComp.SR.tcDefaultStructConstructorCall(), m)) + if g.langFeatureNullness then + if not (TypeHasDefaultValueNew g m ty) && not (TypeHasDefaultValueOld g m ty) then + errorR(Error(FSComp.SR.tcDefaultStructConstructorCall(), m)) + if g.checkNullness && not (TypeHasDefaultValueNew g m ty) then + warning(Error(FSComp.SR.tcDefaultStructConstructorCallNulls(), m)) + else + if not (TypeHasDefaultValueOld g m ty) then + errorR(Error(FSComp.SR.tcDefaultStructConstructorCall(), m)) mkDefault (m, ty), ty) //------------------------------------------------------------------------- @@ -1425,7 +1434,7 @@ module ProvidedMethodCalls = st.PApply((fun st -> match st.BaseType with | null -> ProvidedType.CreateNoContext(typeof) // it might be an interface - | st -> st), m) + | NonNull st -> st), m) loop baseType else if isGeneric then @@ -1467,7 +1476,7 @@ module ProvidedMethodCalls = let fail() = error(Error(FSComp.SR.etUnsupportedProvidedExpression(ea.PUntaint((fun etree -> etree.UnderlyingExpressionString), m)), m)) match ea with | Tainted.Null -> error(Error(FSComp.SR.etNullProvidedExpression(ea.TypeProviderDesignation), m)) - | _ -> + | Tainted.NonNull ea -> let exprType = ea.PApplyOption((fun x -> x.GetExprType()), m) let exprType = match exprType with | Some exprType -> exprType | None -> fail() match exprType.PUntaint(id, m) with @@ -1566,7 +1575,7 @@ module ProvidedMethodCalls = let vsT = List.map addVar vs let delegateBodyExprT = exprToExpr delegateBodyExpr List.iter removeVar vs - let lambdaExpr = mkLambdas m [] vsT (delegateBodyExprT, tyOfExpr g delegateBodyExprT) + let lambdaExpr = mkLambdas g m [] vsT (delegateBodyExprT, tyOfExpr g delegateBodyExprT) let lambdaExprTy = tyOfExpr g lambdaExpr let infoReader = InfoReader(g, amap) let exprT = CoerceFromFSharpFuncToDelegate g amap infoReader AccessorDomain.AccessibleFromSomewhere lambdaExprTy m lambdaExpr delegateTyT @@ -1692,7 +1701,7 @@ module ProvidedMethodCalls = let thisArg, paramVars = match objArgs with | [objArg] -> - let erasedThisTy = eraseSystemType (amap, m, mi.PApply((fun mi -> mi.DeclaringType), m)) + let erasedThisTy = eraseSystemType (amap, m, mi.PApply((fun mi -> nonNull mi.DeclaringType), m)) let thisVar = erasedThisTy.PApply((fun ty -> ty.AsProvidedVar("this")), m) Some objArg, Array.append [| thisVar |] paramVars | [] -> None, paramVars @@ -1712,7 +1721,7 @@ module ProvidedMethodCalls = methInfoOpt, expr, exprty with | :? TypeProviderError as tpe -> - let typeName = mi.PUntaint((fun mb -> mb.DeclaringType.FullName), m) + let typeName = mi.PUntaint((fun mb -> (nonNull mb.DeclaringType).FullName), m) let methName = mi.PUntaint((fun mb -> mb.Name), m) raise( tpe.WithContext(typeName, methName) ) // loses original stack trace #endif @@ -1752,7 +1761,7 @@ let MethInfoChecks g amap isInstance tyargsOpt objArgs ad m (minfo: MethInfo) = match objArgs, ad with | [objArg], AccessibleFrom(paths, Some tcref) -> let objArgTy = tyOfExpr g objArg - let ty = generalizedTyconRef tcref + let ty = generalizedTyconRef g tcref // We get to keep our rights if the type we're in subsumes the object argument type if TypeFeasiblySubsumesType 0 g amap m ty CanCoerce objArgTy then ad diff --git a/src/fsharp/MethodOverrides.fs b/src/fsharp/MethodOverrides.fs index 629a5435d0f..422f51a9de9 100644 --- a/src/fsharp/MethodOverrides.fs +++ b/src/fsharp/MethodOverrides.fs @@ -271,7 +271,7 @@ module DispatchSlotChecking = let OverrideImplementsDispatchSlot g amap m dispatchSlot availPriorOverride = IsExactMatch g amap m dispatchSlot availPriorOverride && // The override has to actually be in some subtype of the dispatch slot - ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef availPriorOverride.BoundingTyconRef) dispatchSlot.DeclaringTyconRef + ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef g availPriorOverride.BoundingTyconRef) dispatchSlot.DeclaringTyconRef /// Check if a dispatch slot is already implemented let DispatchSlotIsAlreadyImplemented g amap m availPriorOverridesKeyed (dispatchSlot: MethInfo) = @@ -459,7 +459,7 @@ module DispatchSlotChecking = /// Finds the override interface methods from the most specific overrides by the given method. let GetMostSpecificOverrideInterfaceMethodsByMethod g amap m (mostSpecificOverrides: NameMultiMap) (minfo: MethInfo) = let overrideBy = GetInheritedMemberOverrideInfo g amap m OverrideCanImplement.CanImplementAnyInterfaceSlot minfo - let minfoTy = generalizedTyconRef minfo.ApparentEnclosingTyconRef + let minfoTy = generalizedTyconRef g minfo.ApparentEnclosingTyconRef NameMultiMap.find minfo.LogicalName mostSpecificOverrides |> List.filter (fun (overridenTy, minfo2) -> typeEquiv g overridenTy minfoTy && @@ -581,7 +581,7 @@ module DispatchSlotChecking = // dispatch slots are ordered from the derived classes to base // so we can check the topmost dispatch slot if it is final match dispatchSlots with - | meth :: _ when meth.IsFinal -> errorR(Error(FSComp.SR.tcCannotOverrideSealedMethod((sprintf "%s::%s" (meth.ApparentEnclosingType.ToString()) (meth.LogicalName))), m)) + | meth::_ when meth.IsFinal -> errorR(Error(FSComp.SR.tcCannotOverrideSealedMethod((sprintf "%s::%s" (NicePrint.stringOfTy denv meth.ApparentEnclosingType) meth.LogicalName)), m)) | _ -> () @@ -715,7 +715,7 @@ module DispatchSlotChecking = let tcaug = tycon.TypeContents let interfaces = tycon.ImmediateInterfacesOfFSharpTycon |> List.map (fun (ity, _compgen, m) -> (ity, m)) - let overallTy = generalizedTyconRef (mkLocalTyconRef tycon) + let overallTy = generalizedTyconRef g (mkLocalTyconRef tycon) let allReqdTys = (overallTy, tycon.Range) :: interfaces diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs index 368b6c3fb03..d37c5487a33 100644 --- a/src/fsharp/NameResolution.fs +++ b/src/fsharp/NameResolution.fs @@ -122,9 +122,9 @@ let ActivePatternElemsOfModuleOrNamespace (modref: ModuleOrNamespaceRef) : NameM /// Detect a use of a nominal type, including type abbreviations. /// /// When reporting symbols, we care about abbreviations, e.g. 'int' and 'int32' count as two separate symbols -let (|AbbrevOrAppTy|_|) (ty: TType) = - match stripTyparEqns ty with - | TType_app (tcref, _) -> Some tcref +let (|AbbrevOrAppTy|_|) (ty: TType) = + match stripTyparEqns ty with + | TType_app (tcref, _, _) -> Some tcref | _ -> None [] @@ -443,8 +443,8 @@ let private GetCSharpStyleIndexedExtensionMembersForTyconRef (amap: Import.Impor // Type must be non-generic and have 'Extension' attribute if isNil(tcrefOfStaticClass.Typars m) && TyconRefHasAttribute g m g.attrib_ExtensionAttribute tcrefOfStaticClass then let pri = NextExtensionMethodPriority() - let ty = generalizedTyconRef tcrefOfStaticClass - + let ty = generalizedTyconRef g tcrefOfStaticClass + // Get the 'plain' methods, not interpreted as extension methods let minfos = GetImmediateIntrinsicMethInfosOfType (None, AccessorDomain.AccessibleFromSomeFSharpCode) g amap m ty [ for minfo in minfos do @@ -720,10 +720,9 @@ let AddActivePatternResultTagsToNameEnv (apinfo: PrettyNaming.ActivePatternInfo) ||> List.foldBack (fun (j, nm) acc -> acc.Add(nm, Item.ActivePatternResult(apinfo, ty, j, m))) } /// Generalize a union case, from Cons --> List.Cons -let GeneralizeUnionCaseRef (ucref: UnionCaseRef) = - UnionCaseInfo (fst (generalizeTyconRef ucref.TyconRef), ucref) - - +let GeneralizeUnionCaseRef (ucref: UnionCaseRef) = + UnionCaseInfo (generalTyconRefInst ucref.TyconRef, ucref) + /// Add type definitions to the sub-table of the environment indexed by name and arity let AddTyconsByDemangledNameAndArity (bulkAddMode: BulkAdd) (tcrefs: TyconRef[]) (tab: LayeredMap) = if tcrefs.Length = 0 then tab else @@ -773,7 +772,7 @@ let AddUnionCases2 bulkAddMode (eUnqualifiedItems: UnqualifiedItems) (ucrefs: Un let AddStaticContentOfTyconRefToNameEnv (g:TcGlobals) (amap: Import.ImportMap) ad m (nenv: NameResolutionEnv) (tcref:TyconRef) = // If OpenStaticClasses is not enabled then don't do this if amap.g.langVersion.SupportsFeature LanguageFeature.OpenStaticClasses then - let ty = generalizedTyconRef tcref + let ty = generalizedTyconRef g tcref let infoReader = InfoReader(g,amap) let items = [| let methGroups = @@ -843,11 +842,11 @@ let private AddPartsOfTyconRefToNameEnv bulkAddMode ownDefinition (g: TcGlobals) // This may explore into an unreferenced assembly if the name // is a type abbreviation. If it does, assume the name does not // have a constructor. - let mayHaveConstruction = - protectAssemblyExploration - false - (fun () -> - let ty = generalizedTyconRef tcref + let mayHaveConstruction = + protectAssemblyExploration + false + (fun () -> + let ty = generalizedTyconRef g tcref isClassTy g ty || isStructTy g ty) if mayHaveConstruction then @@ -1051,7 +1050,7 @@ let AddDeclaredTyparsToNameEnv check nenv typars = /// a fresh set of inference type variables for the type parameters of the union type. let FreshenTycon (ncenv: NameResolver) m (tcref: TyconRef) = let tinst = ncenv.InstantiationGenerator m (tcref.Typars m) - let improvedTy = ncenv.g.decompileType tcref tinst + let improvedTy = ncenv.g.decompileType tcref tinst ncenv.g.knownWithoutNull improvedTy /// Convert a reference to a union case into a UnionCaseInfo that includes @@ -1322,7 +1321,7 @@ let ResolveProvidedTypeNameInEntity (amap, m, typeName, modref: ModuleOrNamespac //if staticResInfo.NumStaticArgs > 0 then // error(Error(FSComp.SR.etNestedProvidedTypesDoNotTakeStaticArgumentsOrGenericParameters(), m)) [] - | nestedSty -> + | Tainted.NonNull nestedSty -> [AddEntityForProvidedType (amap, modref, resolutionEnvironment, nestedSty, m) ] | _ -> [] #endif @@ -1582,7 +1581,7 @@ let ItemsAreEffectivelyEqual g orig other = nm1 = nm2 && (typeEquiv g (mkTyparTy tp1) (mkTyparTy tp2) || match stripTyparEqns (mkTyparTy tp1), stripTyparEqns (mkTyparTy tp2) with - | TType_var tp1, TType_var tp2 -> + | TType_var (tp1, _), TType_var (tp2, _) -> not tp1.IsCompilerGenerated && not tp1.IsFromError && not tp2.IsCompilerGenerated && not tp2.IsFromError && Range.equals tp1.Range tp2.Range @@ -3852,10 +3851,13 @@ let rec ResolvePartialLongIdentInType (ncenv: NameResolver) nenv isApplicableMet // e.g. .. (rfinfos |> List.collect (fun x -> x.FieldType |> ResolvePartialLongIdentInType ncenv nenv isApplicableMeth m ad false rest)) @ - // e.g. .. - let FullTypeOfPinfo(pinfo: PropInfo) = - let rty = pinfo.GetPropertyType(amap, m) - let rty = if pinfo.IsIndexer then mkRefTupledTy g (pinfo.GetParamTypes(amap, m)) --> rty else rty + // e.g. .. + let FullTypeOfPinfo (pinfo: PropInfo) = + let rty = pinfo.GetPropertyType(amap, m) + let rty = + if pinfo.IsIndexer then + mkFunTy g (mkRefTupledTy g (pinfo.GetParamTypes(amap, m))) rty + else rty rty (ty @@ -4042,10 +4044,11 @@ let rec ResolvePartialLongIdentInModuleOrNamespace (ncenv: NameResolver) nenv is @ (LookupTypeNameInEntityNoArity m id modref.ModuleOrNamespaceType |> List.collect (fun tycon -> - let tcref = modref.NestedTyconRef tycon - if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref allowObsolete) then - tcref |> generalizedTyconRef |> ResolvePartialLongIdentInType ncenv nenv isApplicableMeth m ad true rest - else + let tcref = modref.NestedTyconRef tycon + if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref allowObsolete) then + let ty = generalizedTyconRef g tcref + ResolvePartialLongIdentInType ncenv nenv isApplicableMeth m ad true rest ty + else [])) /// Try to resolve a long identifier as type. @@ -4298,8 +4301,8 @@ and ResolvePartialLongIdentToClassOrRecdFieldsImpl (ncenv: NameResolver) (nenv: let recdFields = nenv.eFieldLabels |> Seq.collect (fun (KeyValue(_, v)) -> v) - |> Seq.map (fun fref -> - let typeInsts = fref.TyconRef.TyparsNoRange |> List.map (fun tyar -> tyar.AsType) + |> Seq.map (fun fref -> + let typeInsts = fref.TyconRef.TyparsNoRange |> List.map mkTyparTy Item.RecdField(RecdFieldInfo(typeInsts, fref))) |> List.ofSeq @@ -4535,13 +4538,17 @@ let rec ResolvePartialLongIdentInTypeForItem (ncenv: NameResolver) nenv m ad sta // e.g. .. for rfinfo in rfinfos do yield! ResolvePartialLongIdentInTypeForItem ncenv nenv m ad false rest item rfinfo.FieldType - - // e.g. .. - let fullTypeOfPinfo (pinfo: PropInfo) = - let rty = pinfo.GetPropertyType(amap, m) - let rty = if pinfo.IsIndexer then mkRefTupledTy g (pinfo.GetParamTypes(amap, m)) --> rty else rty - rty - + + // e.g. .. + let fullTypeOfPinfo (pinfo: PropInfo) = + let rty = pinfo.GetPropertyType(amap, m) + let rty = + if pinfo.IsIndexer then + mkFunTy g (mkRefTupledTy g (pinfo.GetParamTypes(amap, m))) rty + else + rty + rty + let pinfos = ty |> AllPropInfosOfTypeInScope ResultCollectionSettings.AllResults ncenv.InfoReader nenv (Some id) ad IgnoreOverrides m @@ -4651,9 +4658,10 @@ let rec ResolvePartialLongIdentInModuleOrNamespaceForItem (ncenv: NameResolver) | _ -> () for tycon in LookupTypeNameInEntityNoArity m id modref.ModuleOrNamespaceType do - let tcref = modref.NestedTyconRef tycon - if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref true) then - yield! tcref |> generalizedTyconRef |> ResolvePartialLongIdentInTypeForItem ncenv nenv m ad true rest item + let tcref = modref.NestedTyconRef tycon + if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref true) then + let ty = tcref |> generalizedTyconRef g + yield! ResolvePartialLongIdentInTypeForItem ncenv nenv m ad true rest item ty } let rec PartialResolveLookupInModuleOrNamespaceAsModuleOrNamespaceThenLazy f plid (modref: ModuleOrNamespaceRef) = diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs index 84b2904ad52..49d13980a6d 100755 --- a/src/fsharp/NicePrint.fs +++ b/src/fsharp/NicePrint.fs @@ -845,6 +845,9 @@ module private PrintTypes = | TyparConstraint.SupportsNull _ -> [wordL (tagKeyword "null") |> longConstraintPrefix] + | TyparConstraint.NotSupportsNull _ -> + [(wordL (tagKeyword "not") ^^ wordL(tagKeyword "null")) |> longConstraintPrefix] + | TyparConstraint.IsNonNullableStruct _ -> if denv.shortConstraints then [wordL (tagText "value type")] @@ -925,30 +928,40 @@ module private PrintTypes = | [arg] -> layoutTypeWithInfoAndPrec denv env 2 arg ^^ tcL | args -> bracketIfL (prec <= 1) (bracketL (layoutTypesWithInfoAndPrec denv env 2 (sepL (tagPunctuation ",")) args) --- tcL) + and layoutNullness part2 (nullness: Nullness) = + match nullness.Evaluate() with + | NullnessInfo.WithNull -> part2 ^^ rightL (tagText "?") + | NullnessInfo.WithoutNull -> part2 + | NullnessInfo.AmbivalentToNull -> part2 // TODO NULLNESS: emit this optionally ^^ wordL (tagText "%") + /// Layout a type, taking precedence into account to insert brackets where needed and layoutTypeWithInfoAndPrec denv env prec ty = match stripTyparEqns ty with - // Always prefer to format 'byref' as 'inref' - | ty when isInByrefTy denv.g ty && (match ty with TType_app (tc, _) when denv.g.inref_tcr.CanDeref && tyconRefEq denv.g tc denv.g.byref2_tcr -> true | _ -> false) -> + // Always prefer to format 'byref' as 'inref' + | ty when isInByrefTy denv.g ty && (match ty with TType_app (tc, _, _) when denv.g.inref_tcr.CanDeref && tyconRefEq denv.g tc denv.g.byref2_tcr -> true | _ -> false) -> layoutTypeWithInfoAndPrec denv env prec (mkInByrefTy denv.g (destByrefTy denv.g ty)) - // Always prefer to format 'byref' as 'outref' - | ty when isOutByrefTy denv.g ty && (match ty with TType_app (tc, _) when denv.g.outref_tcr.CanDeref && tyconRefEq denv.g tc denv.g.byref2_tcr -> true | _ -> false) -> + // Always prefer to format 'byref' as 'outref' + | ty when isOutByrefTy denv.g ty && (match ty with TType_app (tc, _, _) when denv.g.outref_tcr.CanDeref && tyconRefEq denv.g tc denv.g.byref2_tcr -> true | _ -> false) -> layoutTypeWithInfoAndPrec denv env prec (mkOutByrefTy denv.g (destByrefTy denv.g ty)) - // Always prefer to format 'byref' as 'byref' - | ty when isByrefTy denv.g ty && (match ty with TType_app (tc, _) when denv.g.byref_tcr.CanDeref && tyconRefEq denv.g tc denv.g.byref2_tcr -> true | _ -> false) -> + // Always prefer to format 'byref' as 'byref' + | ty when isByrefTy denv.g ty && (match ty with TType_app (tc, _, _) when denv.g.byref_tcr.CanDeref && tyconRefEq denv.g tc denv.g.byref2_tcr -> true | _ -> false) -> layoutTypeWithInfoAndPrec denv env prec (mkByrefTy denv.g (destByrefTy denv.g ty)) // Always prefer 'float' to 'float<1>' - | TType_app (tc, args) when tc.IsMeasureableReprTycon && List.forall (isDimensionless denv.g) args -> - layoutTypeWithInfoAndPrec denv env prec (reduceTyconRefMeasureableOrProvided denv.g tc args) + | TType_app (tc,args,nullness) when tc.IsMeasureableReprTycon && List.forall (isDimensionless denv.g) args -> + let part1 = layoutTypeWithInfoAndPrec denv env prec (reduceTyconRefMeasureableOrProvided denv.g tc args) + let part2 = layoutNullness part1 nullness + part2 // Layout a type application - | TType_app (tc, args) -> - layoutTypeAppWithInfoAndPrec denv env (layoutTyconRef denv tc) prec tc.IsPrefixDisplay args + | TType_app (tc,args, nullness) -> + let part1 = layoutTypeAppWithInfoAndPrec denv env (layoutTyconRef denv tc) prec tc.IsPrefixDisplay args + let part2 = layoutNullness part1 nullness + part2 | TType_ucase (UnionCaseRef(tc, _), args) -> layoutTypeAppWithInfoAndPrec denv env (layoutTyconRef denv tc) prec tc.IsPrefixDisplay args @@ -980,13 +993,19 @@ module private PrintTypes = | TType_fun _ -> let rec loop soFarL ty = match stripTyparEqns ty with - | TType_fun (dty, rty) -> loop (soFarL --- (layoutTypeWithInfoAndPrec denv env 4 dty ^^ wordL (tagPunctuation "->"))) rty + | TType_fun (dty, rty, nullness) -> + let part1 = soFarL --- (layoutTypeWithInfoAndPrec denv env 4 dty ^^ wordL (tagPunctuation "->")) + let part2 = loop part1 rty + let part3 = layoutNullness part2 nullness + part3 | rty -> soFarL --- layoutTypeWithInfoAndPrec denv env 5 rty bracketIfL (prec <= 4) (loop emptyL ty) // Layout a type variable . - | TType_var r -> - layoutTyparRefWithInfo denv env r + | TType_var (r, nullness) -> + let part1 = layoutTyparRefWithInfo denv env r + let part2 = layoutNullness part1 nullness + part2 | TType_measure unt -> layoutMeasure denv unt @@ -1150,11 +1169,13 @@ module private PrintTypes = /// retTy: return type /// genParamTy: generic parameter types let prettyLayoutsOfUnresolvedOverloading denv argInfos retTy genParamTys = + let _niceMethodTypars, typarInst = let memberToParentInst = List.empty - let typars = argInfos |> List.choose (function (TType.TType_var typar,_) -> Some typar | _ -> None) + let typars = argInfos |> List.choose (function (TType.TType_var (typar, _),_) -> Some typar | _ -> None) let methTyparNames = typars |> List.mapi (fun i tp -> if (PrettyTypes.NeedsPrettyTyparName tp) then sprintf "a%d" (List.length memberToParentInst + i) else tp.Name) PrettyTypes.NewPrettyTypars memberToParentInst typars methTyparNames + let retTy = instType typarInst retTy let argInfos = prettyArgInfos denv typarInst argInfos let argInfos,retTy,genParamTys, cxs = @@ -1520,7 +1541,7 @@ module InfoMemberPrinting = let prettyLayoutOfPropInfoFreeStyle g amap m denv (pinfo: PropInfo) = let rty = pinfo.GetPropertyType(amap, m) - let rty = if pinfo.IsIndexer then mkRefTupledTy g (pinfo.GetParamTypes(amap, m)) --> rty else rty + let rty = if pinfo.IsIndexer then mkFunTy g (mkRefTupledTy g (pinfo.GetParamTypes(amap, m))) rty else rty let rty, _ = PrettyTypes.PrettifyType g rty let tagProp = match pinfo.ArbitraryValRef with @@ -1780,7 +1801,7 @@ module private TastDefinitionPrinting = let layoutTycon (denv: DisplayEnv) (infoReader: InfoReader) ad m simplified typewordL (tycon: Tycon) = let g = denv.g - let _, ty = generalizeTyconRef (mkLocalTyconRef tycon) + let ty = generalizedTyconRef g (mkLocalTyconRef tycon) let start, name = let n = tycon.DisplayName if isStructTy g ty then Some "struct", tagStruct n @@ -2271,8 +2292,8 @@ let minimalStringsOfTwoTypes denv t1 t2= let denv = denv.SetOpenPaths [] let denv = { denv with includeStaticParametersInTypeNames=true } let makeName t = - let assemblyName = PrintTypes.layoutAssemblyName denv t |> function | null | "" -> "" | name -> sprintf " (%s)" name - sprintf "%s%s" (stringOfTy denv t1) assemblyName + let assemblyName = PrintTypes.layoutAssemblyName denv t |> function "" -> "" | name -> sprintf " (%s)" name + sprintf "%s%s" (stringOfTy denv t) assemblyName (makeName t1, makeName t2, stringOfTyparConstraints denv tpcs) diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs index 1b6d8fc209c..04b4e5ec8bb 100644 --- a/src/fsharp/Optimizer.fs +++ b/src/fsharp/Optimizer.fs @@ -1816,8 +1816,8 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) = let resultExprAfterConvertToResultTy = match reqdResultInfo, exprIsEnumerableInfo with | Some _, Some _ | None, None -> resultExpr // the expression is a QuerySource, the result is a QuerySource, nothing to do - | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable cenv.g expr.Range resultElemTy (TType_app(cenv.g.tcref_System_Collections_IEnumerable, [])) resultExpr - | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource cenv.g expr.Range resultElemTy qTy resultExpr + | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable cenv.g expr.Range resultElemTy (TType_app(cenv.g.tcref_System_Collections_IEnumerable, [], g.knownWithoutNull)) resultExpr + | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource cenv.g expr.Range resultElemTy qTy resultExpr Some resultExprAfterConvertToResultTy | None -> None @@ -1854,10 +1854,11 @@ let IsILMethodRefSystemStringConcatArray (mref: ILMethodRef) = /// Optimize/analyze an expression let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr = + let g = cenv.g // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need // complete inference types. - let expr = NormalizeAndAdjustPossibleSubsumptionExprs cenv.g expr + let expr = NormalizeAndAdjustPossibleSubsumptionExprs g expr let expr = stripExpr expr @@ -1898,7 +1899,7 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr = | Expr.Lambda (_lambdaId, _, _, argvs, _body, m, rty) -> let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) - let ty = mkMultiLambdaTy m argvs rty + let ty = mkMultiLambdaTy cenv.g m argvs rty OptimizeLambdas None cenv env topValInfo expr ty | Expr.TyLambda (_lambdaId, tps, _body, _m, rty) -> @@ -1906,8 +1907,8 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr = let ty = mkForallTyIfNeeded tps rty OptimizeLambdas None cenv env topValInfo expr ty - | Expr.TyChoose _ -> - OptimizeExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars cenv.g cenv.amap expr) + | Expr.TyChoose _ -> + OptimizeExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr) | Expr.Match (spMatch, exprm, dtree, targets, m, ty) -> OptimizeMatch cenv env (spMatch, exprm, dtree, targets, m, ty) @@ -2914,7 +2915,7 @@ and OptimizeLambdas (vspec: Val option) cenv env topValInfo e ety = let env = List.foldBack (BindInternalValsToUnknown cenv) vsl env let env = BindInternalValsToUnknown cenv (Option.toList baseValOpt) env let bodyR, bodyinfo = OptimizeExpr cenv env body - let exprR = mkMemberLambdas m tps ctorThisValOpt baseValOpt vsl (bodyR, bodyty) + let exprR = mkMemberLambdas cenv.g m tps ctorThisValOpt baseValOpt vsl (bodyR, bodyty) let arities = vsl.Length let arities = if isNil tps then arities else 1+arities let bsize = bodyinfo.TotalSize @@ -2955,7 +2956,7 @@ and OptimizeLambdas (vspec: Val option) cenv env topValInfo e ety = if fvs.UsesMethodLocalConstructs || fvs.FreeLocals.Contains baseVal then UnknownValue else - let expr2 = mkMemberLambdas m tps ctorThisValOpt None vsl (bodyR, bodyty) + let expr2 = mkMemberLambdas cenv.g m tps ctorThisValOpt None vsl (bodyR, bodyty) CurriedLambdaValue (lambdaId, arities, bsize, expr2, ety) let estimatedSize = @@ -3041,9 +3042,9 @@ and ConsiderSplitToMethod flag threshold cenv env (e, einfo) = match env.latestBoundId with | Some id -> id.idText+suffixForVariablesThatMayNotBeEliminated | None -> suffixForVariablesThatMayNotBeEliminated - let fv, fe = mkCompGenLocal m nm (cenv.g.unit_ty --> ty) + let fv, fe = mkCompGenLocal m nm (mkFunTy cenv.g cenv.g.unit_ty ty) mkInvisibleLet m fv (mkLambda m uv (e, ty)) - (primMkApp (fe, (cenv.g.unit_ty --> ty)) [] [mkUnit cenv.g m] m), + (primMkApp (fe, (mkFunTy cenv.g cenv.g.unit_ty ty)) [] [mkUnit cenv.g m] m), {einfo with FunctionSize=callSize } else e, einfo @@ -3167,6 +3168,7 @@ and OptimizeSwitchFallback cenv env (eR, einfo, cases, dflt, m) = and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) = try + let g = cenv.g // The aim here is to stop method splitting for direct-self-tailcalls. We do more than that: if an expression // occurs in the body of recursively defined values RVS, then we refuse to split @@ -3228,7 +3230,7 @@ and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) = if mbrTyconRef.TryDeref.IsSome then // Check if this is a subtype of MarshalByRefObject assert (cenv.g.system_MarshalByRefObject_ty.IsSome) - ExistsSameHeadTypeInHierarchy cenv.g cenv.amap vref.Range (generalizedTyconRef tcref) cenv.g.system_MarshalByRefObject_ty.Value + ExistsSameHeadTypeInHierarchy cenv.g cenv.amap vref.Range (generalizedTyconRef g tcref) cenv.g.system_MarshalByRefObject_ty.Value else false | ParentNone -> false) || diff --git a/src/fsharp/PatternMatchCompilation.fs b/src/fsharp/PatternMatchCompilation.fs index 1864bfed8cb..ef284575944 100644 --- a/src/fsharp/PatternMatchCompilation.fs +++ b/src/fsharp/PatternMatchCompilation.fs @@ -568,8 +568,7 @@ let (|ConstNeedsDefaultCase|_|) c = /// switches, string switches and floating point switches are treated in the /// same way as DecisionTreeTest.IsInst. let rec BuildSwitch inpExprOpt g expr edges dflt m = - if verbose then dprintf "--> BuildSwitch@%a, #edges = %A, dflt.IsSome = %A\n" outputRange m (List.length edges) (Option.isSome dflt) - match edges, dflt with + match edges, dflt with | [], None -> failwith "internal error: no edges and no default" | [], Some dflt -> dflt (* NOTE: first time around, edges<>[] *) @@ -800,7 +799,7 @@ let CompilePatternBasic | ThrowIncompleteMatchException -> mkThrow matchm resultTy - (mkExnExpr(mk_MFCore_tcref g.fslibCcu "MatchFailureException", + (mkExnExpr(g.MatchFailureException_tcr, [ mkString g matchm matchm.FileName mkInt g matchm matchm.StartLine mkInt g matchm matchm.StartColumn], matchm)) diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs index b03db035cf9..7c132c3b499 100644 --- a/src/fsharp/PostInferenceChecks.fs +++ b/src/fsharp/PostInferenceChecks.fs @@ -323,7 +323,7 @@ let rec CheckTypeDeep (cenv: cenv) ((visitTy, visitTyconRefOpt, visitAppTyOpt, v // In an ideal world we would, instead, record the solutions to these constraints as "witness variables" in expressions, // rather than solely in types. match ty with - | TType_var tp when tp.Solution.IsSome -> + | TType_var (tp, _nullness) when tp.Solution.IsSome -> for cx in tp.Constraints do match cx with | TyparConstraint.MayResolveMember((TTrait(_, _, _, _, _, soln)), _) -> @@ -337,7 +337,7 @@ let rec CheckTypeDeep (cenv: cenv) ((visitTy, visitTyconRefOpt, visitAppTyOpt, v if g.compilingFslib then match stripTyparEqns ty with // When compiling FSharp.Core, do not strip type equations at this point if we can't dereference a tycon. - | TType_app (tcref, _) when not tcref.CanDeref -> ty + | TType_app (tcref, _, _) when not tcref.CanDeref -> ty | _ -> stripTyEqns g ty else stripTyEqns g ty @@ -350,7 +350,7 @@ let rec CheckTypeDeep (cenv: cenv) ((visitTy, visitTyconRefOpt, visitAppTyOpt, v tps |> List.iter (fun tp -> tp.Constraints |> List.iter (CheckTypeConstraintDeep cenv f g env)) | TType_measure _ -> () - | TType_app (tcref, tinst) -> + | TType_app (tcref, tinst, _nullness) -> match visitTyconRefOpt with | Some visitTyconRef -> visitTyconRef isInner tcref | None -> () @@ -365,14 +365,15 @@ let rec CheckTypeDeep (cenv: cenv) ((visitTy, visitTyconRefOpt, visitAppTyOpt, v match visitAppTyOpt with | Some visitAppTy -> visitAppTy (tcref, tinst) | None -> () + | TType_anon (anonInfo, tys) -> RecordAnonRecdInfo cenv anonInfo CheckTypesDeep cenv f g env tys | TType_ucase (_, tinst) -> CheckTypesDeep cenv f g env tinst | TType_tuple (_, tys) -> CheckTypesDeep cenv f g env tys - | TType_fun (s, t) -> CheckTypeDeep cenv f g env true s; CheckTypeDeep cenv f g env true t - | TType_var tp -> + | TType_fun (s, t, _nullness) -> CheckTypeDeep cenv f g env true s; CheckTypeDeep cenv f g env true t + | TType_var (tp, _nullness) -> if not tp.IsSolved then match visitTyparOpt with | None -> () @@ -398,6 +399,7 @@ and CheckTypeConstraintDeep cenv f g env x = | TyparConstraint.SupportsComparison _ | TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _ + | TyparConstraint.NotSupportsNull _ | TyparConstraint.IsNonNullableStruct _ | TyparConstraint.IsUnmanaged _ | TyparConstraint.IsReferenceType _ @@ -1087,8 +1089,8 @@ and CheckExpr (cenv: cenv) (env: env) origExpr (context: PermitByRefExpr) : Limi CheckCall cenv env m returnTy argsl contexts context | Expr.Lambda (_, _ctorThisValOpt, _baseValOpt, argvs, _, m, rty) -> - let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) - let ty = mkMultiLambdaTy m argvs rty in + let topValInfo = ValReprInfo ([],[argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)],ValReprInfo.unnamedRetVal) + let ty = mkMultiLambdaTy cenv.g m argvs rty CheckLambdas false None cenv env false topValInfo false expr m ty PermitByRefExpr.Yes | Expr.TyLambda (_, tps, _, m, rty) -> @@ -1888,8 +1890,8 @@ let CheckModuleBinding cenv env (TBind(v, e, _) as bind) = if v.IsExtensionMember then tcref.ModuleOrNamespaceType.AllValsAndMembersByLogicalNameUncached.[v.LogicalName] |> List.iter (fun v2 -> if v2.IsExtensionMember && not (valEq v v2) && (v.CompiledName cenv.g.CompilerGlobalState) = (v2.CompiledName cenv.g.CompilerGlobalState) then - let minfo1 = FSMeth(g, generalizedTyconRef tcref, mkLocalValRef v, Some 0UL) - let minfo2 = FSMeth(g, generalizedTyconRef tcref, mkLocalValRef v2, Some 0UL) + let minfo1 = FSMeth(g, generalizedTyconRef g tcref, mkLocalValRef v, Some 0UL) + let minfo2 = FSMeth(g, generalizedTyconRef g tcref, mkLocalValRef v2, Some 0UL) if tyconRefEq g v.MemberApparentEntity v2.MemberApparentEntity && MethInfosEquivByNameAndSig EraseAll true g cenv.amap v.Range minfo1 minfo2 then errorR(Duplicate(kind, v.DisplayName, v.Range))) @@ -1949,7 +1951,7 @@ let CheckEntityDefn cenv env (tycon: Entity) = let g = cenv.g let m = tycon.Range let tcref = mkLocalTyconRef tycon - let ty = generalizedTyconRef tcref + let ty = generalizedTyconRef g tcref let env = { env with reflect = env.reflect || HasFSharpAttribute g g.attrib_ReflectedDefinitionAttribute tycon.Attribs } let env = BindTypars g env (tycon.Typars m) @@ -2226,15 +2228,37 @@ let CheckEntityDefn cenv env (tycon: Entity) = yield! AllSuperTypesOfType g cenv.amap m AllowMultiIntfInstantiations.Yes ty ] CheckMultipleInterfaceInstantiations cenv interfaces m - // Check struct fields. We check these late because we have to have first checked that the structs are + // Check fields. We check these late because we have to have first checked that the structs are // free of cycles - if tycon.IsStructOrEnumTycon then + if g.langFeatureNullness then for f in tycon.AllInstanceFieldsAsList do + let m = f.Range // Check if it's marked unsafe let zeroInitUnsafe = TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute f.FieldAttribs if zeroInitUnsafe = Some true then - if not (TypeHasDefaultValue g m ty) then - errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m)) + let ty = f.FormalType + if not (TypeHasDefaultValueNew g m ty) && not (TypeHasDefaultValueOld g m ty) then + if tycon.IsStructOrEnumTycon then + // Under F# 4.5 we gave a hard error for this case so we can give it now + errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m)) + else + if g.checkNullness then + // Under F# 5.0 rules with checkNullness we can now give a warning for this case + warning(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m)) + + elif g.checkNullness && not (TypeHasDefaultValueNew g m ty) then + // Under F# 5.0 rules with checkNullness we can now give a warning for this case + warning(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValueNulls(), m)) + else + // These are the F# 4.5 rules, mistakenly only applied to structs + if tycon.IsStructOrEnumTycon then + for f in tycon.AllInstanceFieldsAsList do + let m = f.Range + // Check if it's marked unsafe + let zeroInitUnsafe = TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute f.FieldAttribs + if zeroInitUnsafe = Some true then + if not (TypeHasDefaultValueOld g m ty) then + errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m)) // Check type abbreviations match tycon.TypeAbbrev with diff --git a/src/fsharp/PrettyNaming.fs b/src/fsharp/PrettyNaming.fs index dc3ca573ac2..610ebe8b92f 100755 --- a/src/fsharp/PrettyNaming.fs +++ b/src/fsharp/PrettyNaming.fs @@ -757,6 +757,10 @@ let unassignedTyparName = "?" let FSharpOptimizationDataResourceName = "FSharpOptimizationData." let FSharpSignatureDataResourceName = "FSharpSignatureData." + +let FSharpOptimizationDataResourceNameB = "FSharpOptimizationDataB." +let FSharpSignatureDataResourceNameB = "FSharpSignatureDataB." + // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers // don't complain when they see the resource. The prefix of these names must not be 'FSharpOptimizationData' // or 'FSharpSignatureData' diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs index 0249d8ccc99..6446771cd98 100644 --- a/src/fsharp/QuotationTranslator.fs +++ b/src/fsharp/QuotationTranslator.fs @@ -208,7 +208,8 @@ let rec EmitDebugInfoIfNecessary cenv env m astExpr : QP.ExprData = and ConvExpr cenv env (expr : Expr) = EmitDebugInfoIfNecessary cenv env expr.Range (ConvExprCore cenv env expr) -and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.ExprData = +and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.ExprData = + let g = cenv.g let expr = DetectAndOptimizeForExpression cenv.g OptimizeIntRangesOnly expr @@ -223,12 +224,12 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. // Recognize applications of module functions. match expr with // Detect expression tree exprSplices - | Expr.App (InnerExprPat(Expr.Val (vf, _, _)), _, _, x0 :: rest, m) - when isSplice cenv.g vf -> + | Expr.App (InnerExprPat (Expr.Val (vf, _, _)), _, _, x0 :: rest, m) + when isSplice g vf -> let idx = cenv.exprSplices.Count - let ty = tyOfExpr cenv.g expr - - match (freeInExpr CollectTyparsAndLocalsNoCaching x0).FreeLocals |> Seq.tryPick (fun v -> if env.vs.ContainsVal v then Some v else None) with + let ty = tyOfExpr g expr + + match (freeInExpr CollectTyparsAndLocalsNoCaching x0).FreeLocals |> Seq.tryPick (fun v -> if env.vs.ContainsVal v then Some v else None) with | Some v -> errorR(Error(FSComp.SR.crefBoundVarUsedInSplice(v.DisplayName), v.Range)) | None -> () @@ -236,24 +237,24 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. let hole = QP.mkHole(ConvType cenv env m ty, idx) (hole, rest) ||> List.fold (fun fR arg -> QP.mkApp (fR, ConvExpr cenv env arg)) - | ModuleValueOrMemberUse cenv.g (vref, vFlags, _f, _fty, tyargs, curriedArgs) - when not (isSplice cenv.g vref) -> - let m = expr.Range + | ModuleValueOrMemberUse g (vref, vFlags, _f, _fty, tyargs, curriedArgs) + when not (isSplice g vref) -> + let m = expr.Range - let (numEnclTypeArgs, _, isNewObj, valUseFlags, isSelfInit, takesInstanceArg, isPropGet, isPropSet) = - GetMemberCallInfo cenv.g (vref, vFlags) + let (numEnclTypeArgs,_,isNewObj,valUseFlags,isSelfInit,takesInstanceArg,isPropGet,isPropSet) = + GetMemberCallInfo g (vref,vFlags) let isMember, tps, curriedArgInfos, retTy = match vref.MemberInfo with | Some _ when not vref.IsExtensionMember -> // This is an application of a member method // We only count one argument block for these. - let tps, curriedArgInfos, retTy, _ = GetTypeOfIntrinsicMemberInCompiledForm cenv.g vref + let tps, curriedArgInfos, retTy, _ = GetTypeOfIntrinsicMemberInCompiledForm g vref true, tps, curriedArgInfos, retTy - | _ -> + | _ -> // This is an application of a module value or extension member - let arities = arityOfVal vref.Deref - let tps, curriedArgInfos, retTy, _ = GetTopValTypeInCompiledForm cenv.g arities vref.Type m + let arities = arityOfVal vref.Deref + let tps, curriedArgInfos, retTy, _ = GetTopValTypeInCompiledForm g arities vref.Type m false, tps, curriedArgInfos, retTy // Compute the object arguments as they appear in a compiled call @@ -274,17 +275,17 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. ((List.truncate nCurriedArgInfos curriedArgs, curriedArgInfos) ||> List.exists2 (fun arg argInfo -> (argInfo.Length > (tryDestRefTupleExpr arg).Length))) then - if verboseCReflect then - dprintfn "vref.DisplayName = %A was under applied" vref.DisplayName - // Too few arguments or incorrect tupling? Convert to a lambda and beta-reduce the - // partially applied arguments to 'let' bindings - let topValInfo = - match vref.ValReprInfo with - | None -> error(InternalError("no arity information found for F# value " + vref.LogicalName, vref.Range)) - | Some a -> a - - let expr, exprty = AdjustValForExpectedArity cenv.g m vref vFlags topValInfo - ConvExpr cenv env (MakeApplicationAndBetaReduce cenv.g (expr, exprty, [tyargs], curriedArgs, m)) + if verboseCReflect then + dprintfn "vref.DisplayName = %A was under applied" vref.DisplayName + // Too few arguments or incorrect tupling? Convert to a lambda and beta-reduce the + // partially applied arguments to 'let' bindings + let topValInfo = + match vref.ValReprInfo with + | None -> error(InternalError("no arity information found for F# value " + vref.LogicalName,vref.Range)) + | Some a -> a + + let expr,exprty = AdjustValForExpectedArity g m vref vFlags topValInfo + ConvExpr cenv env (MakeApplicationAndBetaReduce g (expr,exprty,[tyargs],curriedArgs,m)) else // Too many arguments? Chop let (curriedArgs: Expr list ), laterArgs = List.splitAt nCurriedArgInfos curriedArgs @@ -341,10 +342,10 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. List.fold (fun fR arg -> QP.mkApp (fR, ConvExpr cenv env arg)) callR laterArgs - // Blast type application nodes and expression application nodes apart so values are left with just their type arguments - | Expr.App (f, fty, (_ :: _ as tyargs), (_ :: _ as args), m) -> - let rfty = applyForallTy cenv.g fty tyargs - ConvExpr cenv env (primMkApp (primMkApp (f, fty) tyargs [] m, rfty) [] args m) + // Blast type application nodes and expression application nodes apart so values are left with just their type arguments + | Expr.App (f, fty, (_ :: _ as tyargs),(_ :: _ as args), m) -> + let rfty = applyForallTy g fty tyargs + ConvExpr cenv env (primMkApp (primMkApp (f,fty) tyargs [] m, rfty) [] args m) // Uses of possibly-polymorphic values | Expr.App (InnerExprPat(Expr.Val (vref, _vFlags, m)), _fty, tyargs, [], _) -> @@ -376,17 +377,17 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. let bindsR = List.zip vsR (binds |> List.map (fun b -> ConvExpr cenv env b.Expr)) QP.mkLetRec(bindsR, bodyR) - | Expr.Lambda (_, _, _, vs, b, _, _) -> - let v, b = MultiLambdaToTupledLambda cenv.g vs b - let vR = ConvVal cenv env v - let bR = ConvExpr cenv (BindVal env v) b + | Expr.Lambda (_, _, _, vs, b, _, _) -> + let v,b = MultiLambdaToTupledLambda g vs b + let vR = ConvVal cenv env v + let bR = ConvExpr cenv (BindVal env v) b QP.mkLambda(vR, bR) | Expr.Quote (ast, _, _, _, ety) -> // F# 2.0-3.1 had a bug with nested 'raw' quotations. F# 4.0 + FSharp.Core 4.4.0.0+ allows us to do the right thing. if cenv.quotationFormat.SupportsDeserializeEx && // Look for a 'raw' quotation - tyconRefEq cenv.g (tcrefOfAppTy cenv.g ety) cenv.g.raw_expr_tcr + tyconRefEq g (tcrefOfAppTy g ety) g.raw_expr_tcr then QP.mkQuoteRaw40(ConvExpr cenv env ast) else @@ -400,18 +401,25 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. ConvDecisionTree cenv env tgs typR dtree // initialization check - | Expr.Sequential (ObjectInitializationCheck cenv.g, x1, NormalSeq, _, _) -> ConvExpr cenv env x1 - | Expr.Sequential (x0, x1, NormalSeq, _, _) -> QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1) - | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy cenv.g ty -> - let f = mkLambdas m tps tmvs (e, GetFSharpViewOfReturnType cenv.g (returnTyOfMethod cenv.g tmethod)) - let fR = ConvExpr cenv env f - let tyargR = ConvType cenv env m ctyp + | Expr.Sequential (ObjectInitializationCheck g, x1, NormalSeq, _, _) -> ConvExpr cenv env x1 + | Expr.Sequential (x0,x1,NormalSeq,_,_) -> QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1) + | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod],_,m) when isDelegateTy g ty -> + let f = mkLambdas g m tps tmvs (e,GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod)) + let fR = ConvExpr cenv env f + let tyargR = ConvType cenv env m ctyp QP.mkDelegate(tyargR, fR) - | Expr.StaticOptimization (_, _, x, _) -> ConvExpr cenv env x - | Expr.TyChoose _ -> ConvExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars cenv.g cenv.amap expr) - | Expr.Sequential (x0, x1, ThenDoSeq, _, _) -> QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1) - | Expr.Obj (_lambdaId, _typ, _basev, _basecall, _overrides, _iimpls, m) -> wfail(Error(FSComp.SR.crefQuotationsCantContainObjExprs(), m)) + | Expr.StaticOptimization (_, _, x, _) -> + ConvExpr cenv env x + + | Expr.TyChoose _ -> + ConvExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr) + + | Expr.Sequential (x0, x1, ThenDoSeq, _, _) + -> QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1) + + | Expr.Obj (_lambdaId, _typ, _basev, _basecall, _overrides, _iimpls, m) -> + wfail(Error(FSComp.SR.crefQuotationsCantContainObjExprs(),m)) | Expr.Op (op, tyargs, args, m) -> match op, tyargs, args with @@ -422,7 +430,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. QP.mkUnion(tcR, s, tyargsR, argsR) | TOp.Tuple tupInfo, tyargs, _ -> - let tyR = ConvType cenv env m (mkAnyTupledTy cenv.g tupInfo tyargs) + let tyR = ConvType cenv env m (mkAnyTupledTy g tupInfo tyargs) let argsR = ConvExprs cenv env args QP.mkTuple(tyR, argsR) @@ -463,7 +471,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. | TOp.TupleFieldGet (tupInfo, n), tyargs, [e] -> let eR = ConvLValueExpr cenv env e - let tyR = ConvType cenv env m (mkAnyTupledTy cenv.g tupInfo tyargs) + let tyR = ConvType cenv env m (mkAnyTupledTy g tupInfo tyargs) QP.mkTupleGet(tyR, n, eR) | TOp.ILAsm (([ I_ldfld (_, _, fspec) ] @@ -478,14 +486,14 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. let argsR = ConvLValueArgs cenv env args QP.mkFieldSet(parentTyconR, fspec.Name, tyargsR, argsR) - | TOp.ILAsm ([ AI_ceq ], _), _, [arg1;arg2] -> - let ty = tyOfExpr cenv.g arg1 - let eq = mkCallEqualsOperator cenv.g m ty arg1 arg2 + | TOp.ILAsm ([ AI_ceq ], _), _,[arg1; arg2] -> + let ty = tyOfExpr g arg1 + let eq = mkCallEqualsOperator g m ty arg1 arg2 ConvExpr cenv env eq - | TOp.ILAsm ([ I_throw ], _), _, [arg1] -> - let raiseExpr = mkCallRaise cenv.g m (tyOfExpr cenv.g expr) arg1 - ConvExpr cenv env raiseExpr + | TOp.ILAsm ([ I_throw ], _), _, [arg1] -> + let raiseExpr = mkCallRaise g m (tyOfExpr g expr) arg1 + ConvExpr cenv env raiseExpr | TOp.ILAsm (_il, _), _, _ -> wfail(Error(FSComp.SR.crefQuotationsCantContainInlineIL(), m)) @@ -501,7 +509,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. QP.mkCtorCall( { ctorParent = parentTyconR ctorArgTypes = methArgTypesR }, [], argsR) - let exnTypeR = ConvType cenv env m cenv.g.exn_ty + let exnTypeR = ConvType cenv env m g.exn_ty QP.mkCoerce(exnTypeR, objR) | TOp.ValFieldSet rfref, _tinst, args -> @@ -527,19 +535,19 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. let parentTyconR = ConvTyconRef cenv tcref m let propRetTypeR = ConvType cenv env m fspec.FormalType let callArgR = ConvExpr cenv env obj - let exnTypeR = ConvType cenv env m (generalizedTyconRef tcref) - QP.mkPropGet( (parentTyconR, fspec.Name, propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)]) + let exnTypeR = ConvType cenv env m (generalizedTyconRef g tcref) + QP.mkPropGet( (parentTyconR, fspec.Name,propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)]) | TOp.Coerce, [tgtTy;srcTy], [x] -> let xR = ConvExpr cenv env x - if typeEquiv cenv.g tgtTy srcTy then + if typeEquiv g tgtTy srcTy then xR else QP.mkCoerce(ConvType cenv env m tgtTy, xR) - | TOp.Reraise, [toTy], [] -> - // rebuild reraise() and Convert - mkReraiseLibCall cenv.g toTy m |> ConvExpr cenv env + | TOp.Reraise, [toTy], [] -> + // rebuild reraise() and Convert + mkReraiseLibCall g toTy m |> ConvExpr cenv env | TOp.LValueOp (LAddrOf _, vref), [], [] -> QP.mkAddressOf(ConvValRef false cenv env m vref []) @@ -549,9 +557,9 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. | TOp.LValueOp (LSet, vref), [], [e] -> // Sets of module values become property sets - match vref.DeclaringEntity with - | Parent tcref when IsCompiledAsStaticProperty cenv.g vref.Deref -> - let parentTyconR = ConvTyconRef cenv tcref m + match vref.DeclaringEntity with + | Parent tcref when IsCompiledAsStaticProperty g vref.Deref -> + let parentTyconR = ConvTyconRef cenv tcref m let propName = vref.CompiledName cenv.g.CompilerGlobalState let propTy = ConvType cenv env m vref.Type QP.mkPropSet( (parentTyconR, propName, propTy, []), [], [ConvExpr cenv env e]) @@ -566,11 +574,11 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. | TOp.While _, [], [Expr.Lambda (_, _, _, [_], test, _, _);Expr.Lambda (_, _, _, [_], body, _, _)] -> QP.mkWhileLoop(ConvExpr cenv env test, ConvExpr cenv env body) - - | TOp.For (_, FSharpForLoopUp), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody cenv.g (arr, elemTy, body)] -> - let lim1 = - let len = mkCallArrayLength cenv.g lm elemTy arr // Array.length arr - mkCallSubtractionOperator cenv.g lm cenv.g.int32_ty len (Expr.Const (Const.Int32 1, m, cenv.g.int32_ty)) // len - 1 + + | TOp.For (_, FSharpForLoopUp), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody g (arr, elemTy, body)] -> + let lim1 = + let len = mkCallArrayLength g lm elemTy arr // Array.length arr + mkCallSubtractionOperator g lm g.int32_ty len (Expr.Const(Const.Int32 1, m, g.int32_ty)) // len - 1 QP.mkForLoop(ConvExpr cenv env lim0, ConvExpr cenv env lim1, ConvExpr cenv env body) | TOp.For (_, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _);Expr.Lambda (_, _, _, [_], lim1, _, _);body] -> @@ -599,22 +607,25 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. let envh = BindVal env vh QP.mkTryWith(ConvExpr cenv env e1, vfR, ConvExpr cenv envf ef, vhR, ConvExpr cenv envh eh) - | TOp.Bytes bytes, [], [] -> - ConvExpr cenv env (Expr.Op (TOp.Array, [cenv.g.byte_ty], List.ofArray (Array.map (mkByte cenv.g m) bytes), m)) + | TOp.Bytes bytes, [], [] -> + ConvExpr cenv env (Expr.Op (TOp.Array, [g.byte_ty], List.ofArray (Array.map (mkByte g m) bytes), m)) | TOp.UInt16s arr, [], [] -> - ConvExpr cenv env (Expr.Op (TOp.Array, [cenv.g.uint16_ty], List.ofArray (Array.map (mkUInt16 cenv.g m) arr), m)) + ConvExpr cenv env (Expr.Op(TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m)) + | TOp.UInt16s arr, [], [] -> + ConvExpr cenv env (Expr.Op(TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m)) + | TOp.UnionCaseProof _, _, [e] -> ConvExpr cenv env e // Note: we erase the union case proof conversions when converting to quotations | TOp.UnionCaseTagGet _tycr, _tinst, [_cx] -> wfail(Error(FSComp.SR.crefQuotationsCantFetchUnionIndexes(), m)) - | TOp.UnionCaseFieldSet (_c, _i), _tinst, [_cx;_x] -> + | TOp.UnionCaseFieldSet (_c, _i), _tinst, [_cx; _x] -> wfail(Error(FSComp.SR.crefQuotationsCantSetUnionFields(), m)) - | TOp.ExnFieldSet (_tcref, _i), [], [_ex;_x] -> + | TOp.ExnFieldSet(_tcref, _i), [], [_ex; _x] -> wfail(Error(FSComp.SR.crefQuotationsCantSetExceptionFields(), m)) | TOp.RefAddrGet _, _, _ -> @@ -623,11 +634,11 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP. | TOp.TraitCall (_ss), _, _ -> wfail(Error(FSComp.SR.crefQuotationsCantCallTraitMembers(), m)) - | _ -> - wfail(InternalError( "Unexpected expression shape", m)) + | _ -> + wfail(InternalError( "Unexpected expression shape",m)) - | _ -> - wfail(InternalError(sprintf "unhandled construct in AST: %A" expr, expr.Range)) + | _ -> + wfail(InternalError(sprintf "unhandled construct in AST: %A" expr,expr.Range)) and ConvLdfld cenv env m (fspec: ILFieldSpec) enclTypeArgs args = let tyargsR = ConvTypes cenv env m enclTypeArgs @@ -694,22 +705,23 @@ and ConvLValueArgs cenv env args = and ConvLValueExpr cenv env expr = EmitDebugInfoIfNecessary cenv env expr.Range (ConvLValueExprCore cenv env expr) -// This function has to undo the work of mkExprAddrOfExpr -and ConvLValueExprCore cenv env expr = - match expr with - | Expr.Op (op, tyargs, args, m) -> +// This function has to undo the work of mkExprAddrOfExpr +and ConvLValueExprCore cenv env expr = + let g = cenv.g + match expr with + | Expr.Op(op, tyargs, args, m) -> match op, args, tyargs with - | TOp.LValueOp (LAddrOf _, vref), _, _ -> ConvValRef false cenv env m vref [] - | TOp.ValFieldGetAddr (rfref, _), _, _ -> ConvClassOrRecdFieldGet cenv env m rfref tyargs args - | TOp.UnionCaseFieldGetAddr (ucref, n, _), [e], _ -> ConvUnionFieldGet cenv env m ucref n tyargs e - | TOp.ILAsm ([ I_ldflda(fspec) ], _rtys), _, _ -> ConvLdfld cenv env m fspec tyargs args - | TOp.ILAsm ([ I_ldsflda(fspec) ], _rtys), _, _ -> ConvLdfld cenv env m fspec tyargs args - | TOp.ILAsm (([ I_ldelema(_ro, _isNativePtr, shape, _tyarg) ] ), _), (arr :: idxs), [elemty] -> - match shape.Rank, idxs with - | 1, [idx1] -> ConvExpr cenv env (mkCallArrayGet cenv.g m elemty arr idx1) - | 2, [idx1; idx2] -> ConvExpr cenv env (mkCallArray2DGet cenv.g m elemty arr idx1 idx2) - | 3, [idx1; idx2; idx3] -> ConvExpr cenv env (mkCallArray3DGet cenv.g m elemty arr idx1 idx2 idx3) - | 4, [idx1; idx2; idx3; idx4] -> ConvExpr cenv env (mkCallArray4DGet cenv.g m elemty arr idx1 idx2 idx3 idx4) + | TOp.LValueOp(LAddrOf _,vref),_,_ -> ConvValRef false cenv env m vref [] + | TOp.ValFieldGetAddr(rfref, _),_,_ -> ConvClassOrRecdFieldGet cenv env m rfref tyargs args + | TOp.UnionCaseFieldGetAddr(ucref, n, _), [e], _ -> ConvUnionFieldGet cenv env m ucref n tyargs e + | TOp.ILAsm([ I_ldflda(fspec) ], _rtys), _, _ -> ConvLdfld cenv env m fspec tyargs args + | TOp.ILAsm([ I_ldsflda(fspec) ], _rtys), _, _ -> ConvLdfld cenv env m fspec tyargs args + | TOp.ILAsm(([ I_ldelema(_ro, _isNativePtr, shape, _tyarg) ] ), _), (arr::idxs), [elemty] -> + match shape.Rank, idxs with + | 1, [idx1] -> ConvExpr cenv env (mkCallArrayGet g m elemty arr idx1) + | 2, [idx1; idx2] -> ConvExpr cenv env (mkCallArray2DGet g m elemty arr idx1 idx2) + | 3, [idx1; idx2; idx3] -> ConvExpr cenv env (mkCallArray3DGet g m elemty arr idx1 idx2 idx3) + | 4, [idx1; idx2; idx3; idx4] -> ConvExpr cenv env (mkCallArray4DGet g m elemty arr idx1 idx2 idx3 idx4) | _ -> ConvExpr cenv env expr | _ -> ConvExpr cenv env expr | _ -> ConvExpr cenv env expr @@ -748,12 +760,13 @@ and ConvModuleValueApp cenv env m (vref: ValRef) tyargs (args: Expr list list) = EmitDebugInfoIfNecessary cenv env m (ConvModuleValueAppCore cenv env m vref tyargs args) and ConvModuleValueAppCore cenv env m (vref: ValRef) tyargs (args: Expr list list) = - match vref.DeclaringEntity with + let g = cenv.g + match vref.DeclaringEntity with | ParentNone -> failwith "ConvModuleValueApp" - | Parent(tcref) -> - let isProperty = IsCompiledAsStaticProperty cenv.g vref.Deref - let tcrefR = ConvTyconRef cenv tcref m - let tyargsR = ConvTypes cenv env m tyargs + | Parent tcref -> + let isProperty = IsCompiledAsStaticProperty g vref.Deref + let tcrefR = ConvTyconRef cenv tcref m + let tyargsR = ConvTypes cenv env m tyargs let nm = vref.CompiledName cenv.g.CompilerGlobalState let argsR = List.map (ConvExprs cenv env) args QP.mkModuleValueApp(tcrefR, nm, isProperty, tyargsR, argsR) @@ -765,11 +778,12 @@ and ConvValRef holeOk cenv env m (vref: ValRef) tyargs = EmitDebugInfoIfNecessary cenv env m (ConvValRefCore holeOk cenv env m vref tyargs) and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs = + let g = cenv.g let v = vref.Deref - if env.isinstVals.ContainsVal v then + if env.isinstVals.ContainsVal v then let (ty, e) = env.isinstVals.[v] - ConvExpr cenv env (mkCallUnbox cenv.g m ty e) - elif env.substVals.ContainsVal v then + ConvExpr cenv env (mkCallUnbox g m ty e) + elif env.substVals.ContainsVal v then let e = env.substVals.[v] ConvExpr cenv env e elif env.vs.ContainsVal v then @@ -783,19 +797,20 @@ and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs = | ParentNone -> // References to local values are embedded by value if not holeOk then wfail(Error(FSComp.SR.crefNoSetOfHole(), m)) - let idx = cenv.exprSplices.Count - cenv.exprSplices.Add((mkCallLiftValueWithName cenv.g m vty v.LogicalName (exprForValRef m vref), m)) + let idx = cenv.exprSplices.Count + cenv.exprSplices.Add((mkCallLiftValueWithName g m vty v.LogicalName (exprForValRef m vref), m)) QP.mkHole(ConvType cenv env m vty, idx) - | Parent _ -> + | Parent _ -> ConvModuleValueApp cenv env m vref tyargs [] and ConvUnionCaseRef cenv (ucref: UnionCaseRef) m = + let g = cenv.g let ucgtypR = ConvTyconRef cenv ucref.TyconRef m - let nm = - if cenv.g.unionCaseRefEq ucref cenv.g.cons_ucref then "Cons" - elif cenv.g.unionCaseRefEq ucref cenv.g.nil_ucref then "Empty" - else ucref.CaseName - (ucgtypR, nm) + let nm = + if g.unionCaseRefEq ucref g.cons_ucref then "Cons" + elif g.unionCaseRefEq ucref g.nil_ucref then "Empty" + else ucref.CaseName + (ucgtypR, nm) and ConvRecdFieldRef cenv (rfref: RecdFieldRef) m = let typR = ConvTyconRef cenv rfref.TyconRef m @@ -825,12 +840,13 @@ and FilterMeasureTyargs tys = tys |> List.filter (fun ty -> match ty with TType_measure _ -> false | _ -> true) and ConvType cenv env m ty = - match stripTyEqnsAndMeasureEqns cenv.g ty with - | TType_app(tcref, [tyarg]) when isArrayTyconRef cenv.g tcref -> - QP.mkArrayTy(rankOfArrayTyconRef cenv.g tcref, ConvType cenv env m tyarg) + let g = cenv.g + match stripTyEqnsAndMeasureEqns g ty with + | TType_app(tcref, [tyarg],_) when isArrayTyconRef g tcref -> + QP.mkArrayTy(rankOfArrayTyconRef g tcref, ConvType cenv env m tyarg) | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations - | TType_app(tcref, tyargs) -> + | TType_app(tcref, tyargs, _) -> #if !NO_EXTENSIONTYPING match TryElimErasableTyconRef cenv m tcref with | Some baseTy -> ConvType cenv env m baseTy @@ -838,13 +854,15 @@ and ConvType cenv env m ty = #endif QP.mkILNamedTy(ConvTyconRef cenv tcref m, ConvTypes cenv env m tyargs) - | TType_fun(a, b) -> QP.mkFunTy(ConvType cenv env m a, ConvType cenv env m b) - | TType_tuple(tupInfo, l) -> ConvType cenv env m (mkCompiledTupleTy cenv.g (evalTupInfoIsStruct tupInfo) l) - | TType_anon(anonInfo, tinst) -> + | TType_fun(a, b, _nullness) -> + QP.mkFunTy(ConvType cenv env m a, ConvType cenv env m b) + | TType_tuple(tupInfo, l) -> + ConvType cenv env m (mkCompiledTupleTy cenv.g (evalTupInfoIsStruct tupInfo) l) + | TType_anon(anonInfo, tinst) -> let tref = anonInfo.ILTypeRef let tinstR = ConvTypes cenv env m tinst QP.mkILNamedTy(ConvILTypeRefUnadjusted cenv m tref, tinstR) - | TType_var(tp) -> QP.mkVarTy(ConvTyparRef cenv env m tp) + | TType_var(tp, _nullness) -> QP.mkVarTy(ConvTyparRef cenv env m tp) | TType_forall(_spec, _ty) -> wfail(Error(FSComp.SR.crefNoInnerGenericsInQuotations(), m)) | _ -> wfail(Error (FSComp.SR.crefQuotationsCantContainThisType(), m)) @@ -852,7 +870,8 @@ and ConvTypes cenv env m tys = List.map (ConvType cenv env m) (FilterMeasureTyargs tys) and ConvConst cenv env m c ty = - match TryEliminateDesugaredConstants cenv.g m c with + let g = cenv.g + match TryEliminateDesugaredConstants g m c with | Some e -> ConvExpr cenv env e | None -> let tyR = ConvType cenv env m ty @@ -871,20 +890,21 @@ and ConvConst cenv env m c ty = | Const.String s -> QP.mkString (s, tyR) | Const.Char c -> QP.mkChar (c, tyR) | Const.Unit -> QP.mkUnit() - | Const.Zero -> - if isRefTy cenv.g ty then + | Const.Zero -> + if isRefTy g ty then QP.mkNull tyR else QP.mkDefaultValue tyR | _ -> wfail(Error (FSComp.SR.crefQuotationsCantContainThisConstant(), m)) -and ConvDecisionTree cenv env tgs typR x = - match x with - | TDSwitch(e1, csl, dfltOpt, m) -> - let acc = - match dfltOpt with - | Some d -> ConvDecisionTree cenv env tgs typR d +and ConvDecisionTree cenv env tgs typR x = + let g = cenv.g + match x with + | TDSwitch(e1, csl, dfltOpt, m) -> + let acc = + match dfltOpt with + | Some d -> ConvDecisionTree cenv env tgs typR d | None -> wfail(Error(FSComp.SR.crefQuotationsCantContainThisPatternMatch(), m)) let converted = @@ -906,10 +926,10 @@ and ConvDecisionTree cenv env tgs typR x = // Note, reverse the branches QP.mkCond (e1R, acc, ConvDecisionTree cenv env tgs typR dtree) - | DecisionTreeTest.Const c -> - let ty = tyOfExpr cenv.g e1 - let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (c, m, ty)) - let eqR = ConvExpr cenv env eq + | DecisionTreeTest.Const c -> + let ty = tyOfExpr g e1 + let eq = mkCallEqualsOperator g m ty e1 (Expr.Const (c, m, ty)) + let eqR = ConvExpr cenv env eq QP.mkCond (eqR, ConvDecisionTree cenv env tgs typR dtree, acc) | DecisionTreeTest.IsNull -> @@ -921,10 +941,10 @@ and ConvDecisionTree cenv env tgs typR x = let eR = ConvExpr cenv env e // note: reverse the branches - a null test is a failure of an isinst test QP.mkCond (QP.mkTypeTest (tyR, eR), acc, ConvDecisionTree cenv env tgs typR dtree) - | _ -> - let ty = tyOfExpr cenv.g e1 - let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (Const.Zero, m, ty)) - let eqR = ConvExpr cenv env eq + | _ -> + let ty = tyOfExpr g e1 + let eq = mkCallEqualsOperator g m ty e1 (Expr.Const (Const.Zero, m, ty)) + let eqR = ConvExpr cenv env eq QP.mkCond (eqR, ConvDecisionTree cenv env tgs typR dtree, acc) | DecisionTreeTest.IsInst (_srcty, tgty) -> @@ -959,12 +979,15 @@ and ConvDecisionTree cenv env tgs typR x = // Check if this is an provider-generated assembly that will be statically linked and IsILTypeRefStaticLinkLocal cenv m (tr: ILTypeRef) = - ignore cenv; ignore m - match tr.Scope with -#if !NO_EXTENSIONTYPING - | ILScopeRef.Assembly aref - when not cenv.g.isInteractive && - aref.Name <> cenv.g.ilg.primaryAssemblyName && // optimization to avoid this check in the common case +#if NO_EXTENSIONTYPING + ignore m; ignore cenv; ignore tr + false +#else + let g = cenv.g + match tr.Scope with + | ILScopeRef.Assembly aref + when not g.isInteractive && + aref.Name <> g.ilg.primaryAssemblyName && // optimization to avoid this check in the common case // Explanation: This represents an unchecked invariant in the hosted compiler: that any operations // which import types (and resolve assemblies from the tcImports tables) happen on the compilation thread. @@ -974,8 +997,8 @@ and IsILTypeRefStaticLinkLocal cenv m (tr: ILTypeRef) = | ResolvedCcu ccu -> ccu.IsProviderGenerated | UnresolvedCcu _ -> false) -> true -#endif | _ -> false +#endif // Adjust for static linking information, then convert and ConvILTypeRefUnadjusted cenv m (tr: ILTypeRef) = @@ -1005,8 +1028,10 @@ and ConvILTypeRef cenv (tr: ILTypeRef) = | _ -> tr.Scope.QualifiedName QP.Named(tr.BasicQualifiedName, assemblyRef) - -and ConvVoidType cenv m = QP.mkILNamedTy(ConvTyconRef cenv cenv.g.system_Void_tcref m, []) + +and ConvVoidType cenv m = + let g = cenv.g + QP.mkILNamedTy(ConvTyconRef cenv g.system_Void_tcref m, []) and ConvILType cenv env m ty = match ty with diff --git a/src/fsharp/SignatureConformance.fs b/src/fsharp/SignatureConformance.fs index b1bd00345e9..4bdf03909fa 100644 --- a/src/fsharp/SignatureConformance.fs +++ b/src/fsharp/SignatureConformance.fs @@ -219,8 +219,8 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) = false else - let aNull2 = TypeNullIsExtraValue g m (generalizedTyconRef (mkLocalTyconRef implTycon)) - let fNull2 = TypeNullIsExtraValue g m (generalizedTyconRef (mkLocalTyconRef implTycon)) + let aNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef implTycon)) + let fNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef sigTycon)) if aNull2 && not fNull2 then errorR(Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleImplementationSaysNull2(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m)) false @@ -229,8 +229,8 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) = false else - let aSealed = isSealedTy g (generalizedTyconRef (mkLocalTyconRef implTycon)) - let fSealed = isSealedTy g (generalizedTyconRef (mkLocalTyconRef sigTycon)) + let aSealed = isSealedTy g (generalizedTyconRef g (mkLocalTyconRef implTycon)) + let fSealed = isSealedTy g (generalizedTyconRef g (mkLocalTyconRef sigTycon)) if aSealed && not fSealed then errorR(Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleImplementationSealed(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m)) false diff --git a/src/fsharp/SyntaxTree.fs b/src/fsharp/SyntaxTree.fs index a071f1c526b..e3dd6db893d 100644 --- a/src/fsharp/SyntaxTree.fs +++ b/src/fsharp/SyntaxTree.fs @@ -371,6 +371,11 @@ type SynTypeConstraint = typar: SynTypar * range: range + /// F# syntax is 'typar : null + | WhereTyparNotSupportsNull of + genericName: SynTypar * + range: range + /// F# syntax is 'typar: comparison | WhereTyparIsComparable of typar: SynTypar * @@ -504,6 +509,10 @@ type SynType = constant: SynConst * range: range + /// F# syntax : nul used in parameters to type providers + | StaticConstantNull of + range: range + /// F# syntax: const expr, used in static parameters to type providers | StaticConstantExpr of expr: SynExpr * @@ -515,6 +524,12 @@ type SynType = value: SynType * range: range + /// F# syntax : type | null + | WithNull of + innerType: SynType * + ambivalent: bool * + range:range + /// Gets the syntax range of this constuct member x.Range = match x with @@ -528,9 +543,11 @@ type SynType = | SynType.Anon (range=m) | SynType.WithGlobalConstraints (range=m) | SynType.StaticConstant (range=m) + | SynType.StaticConstantNull (range=m) | SynType.StaticConstantExpr (range=m) | SynType.StaticConstantNamed (range=m) | SynType.HashConstraint (range=m) + | SynType.WithNull (range=m) | SynType.MeasureDivide (range=m) | SynType.MeasurePower (range=m) -> m | SynType.LongIdent lidwd -> lidwd.Range diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs index 68ef24cb764..a0d7e92ec36 100755 --- a/src/fsharp/TcGlobals.fs +++ b/src/fsharp/TcGlobals.fs @@ -83,19 +83,6 @@ module FSharpLib = // Access the initial environment: helpers to build references //------------------------------------------------------------------------- -let private mkNonGenericTy tcref = TType_app(tcref, []) - -let mkNonLocalTyconRef2 ccu path n = mkNonLocalTyconRef (mkNonLocalEntityRef ccu path) n - -let mk_MFCore_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CorePathArray n -let mk_MFQuotations_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.QuotationsPath n -let mk_MFLinq_tcref ccu n = mkNonLocalTyconRef2 ccu LinqPathArray n -let mk_MFCollections_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CollectionsPathArray n -let mk_MFCompilerServices_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CompilerServicesPath n -let mk_MFRuntimeHelpers_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.RuntimeHelpersPath n -let mk_MFControl_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.ControlPathArray n - - type [] BuiltinAttribInfo = @@ -176,11 +163,29 @@ let tname_IAsyncResult = "System.IAsyncResult" //------------------------------------------------------------------------- type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, directoryToResolveRelativePaths, - mlCompatibility: bool, isInteractive:bool, + mlCompatibility: bool, isInteractive:bool, assumeNullOnImport: bool, checkNullness: bool, // The helper to find system types amongst referenced DLLs tryFindSysTypeCcu, emitDebugInfoInQuotations: bool, noDebugData: bool, pathMap: PathMap, langVersion: LanguageVersion) = + + let v_langFeatureNullness = langVersion.SupportsFeature LanguageFeature.NullnessChecking + + let v_knownWithoutNull = + if v_langFeatureNullness then KnownWithoutNull else KnownAmbivalentToNull + + let mkNonGenericTy tcref = TType_app(tcref, [], v_knownWithoutNull) + + let mkNonGenericTyWithNullness tcref nullness = TType_app(tcref, [], nullness) + + let mkNonLocalTyconRef2 ccu path n = mkNonLocalTyconRef (mkNonLocalEntityRef ccu path) n + + let mk_MFCore_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CorePathArray n + let mk_MFQuotations_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.QuotationsPath n + let mk_MFLinq_tcref ccu n = mkNonLocalTyconRef2 ccu LinqPathArray n + let mk_MFCollections_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CollectionsPathArray n + let mk_MFCompilerServices_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CompilerServicesPath n + let mk_MFControl_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.ControlPathArray n let vara = Construct.NewRigidTypar "a" envRange let varb = Construct.NewRigidTypar "b" envRange @@ -232,6 +237,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d let v_fastFunc_tcr = mk_MFCore_tcref fslibCcu "FSharpFunc`2" let v_refcell_tcr_canon = mk_MFCore_tcref fslibCcu "Ref`1" let v_refcell_tcr_nice = mk_MFCore_tcref fslibCcu "ref`1" + let v_mfe_tcr = mk_MFCore_tcref fslibCcu "MatchFailureException" let dummyAssemblyNameCarryingUsefulErrorInformation path typeName = FSComp.SR.tcGlobalsSystemTypeNotFound (String.concat "." path + "." + typeName) @@ -344,10 +350,10 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d let v_nullable_tcr = findSysTyconRef sys "Nullable`1" (* local helpers to build value infos *) - let mkNullableTy ty = TType_app(v_nullable_tcr, [ty]) - let mkByrefTy ty = TType_app(v_byref_tcr, [ty]) - let mkNativePtrTy ty = TType_app(v_nativeptr_tcr, [ty]) - let mkFunTy d r = TType_fun (d, r) + let mkNullableTy ty = TType_app(v_nullable_tcr, [ty], v_knownWithoutNull) + let mkByrefTy ty = TType_app(v_byref_tcr, [ty], v_knownWithoutNull) + let mkNativePtrTy ty = TType_app(v_nativeptr_tcr, [ty], v_knownWithoutNull) + let mkFunTy d r = TType_fun (d, r, v_knownWithoutNull) let (-->) d r = mkFunTy d r let mkIteratedFunTy dl r = List.foldBack mkFunTy dl r let mkSmallRefTupledTy l = match l with [] -> v_unit_ty | [h] -> h | tys -> mkRawRefTupleTy tys @@ -383,23 +389,23 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d let mk_compare_withc_sig ty = [[v_IComparer_ty];[ty]; [ty]], v_int_ty let mk_equality_withc_sig ty = [[v_IEqualityComparer_ty];[ty];[ty]], v_bool_ty let mk_hash_withc_sig ty = [[v_IEqualityComparer_ty]; [ty]], v_int_ty - let mkListTy ty = TType_app(v_list_tcr_nice, [ty]) - let mkSeqTy ty1 = TType_app(v_seq_tcr, [ty1]) - let mkRefCellTy ty = TType_app(v_refcell_tcr_canon, [ty]) - let mkOptionTy ty = TType_app(v_option_tcr_nice, [ty]) - let mkQuerySourceTy ty1 ty2 = TType_app(v_querySource_tcr, [ty1; ty2]) + let mkListTy ty = TType_app(v_list_tcr_nice, [ty], v_knownWithoutNull) + let mkSeqTy ty1 = TType_app(v_seq_tcr, [ty1], v_knownWithoutNull) + let mkRefCellTy ty = TType_app(v_refcell_tcr_canon, [ty], v_knownWithoutNull) + let mkOptionTy ty = TType_app(v_option_tcr_nice, [ty], v_knownWithoutNull) + let mkQuerySourceTy ty1 ty2 = TType_app(v_querySource_tcr, [ty1; ty2], v_knownWithoutNull) let v_tcref_System_Collections_IEnumerable = findSysTyconRef sysCollections "IEnumerable"; let mkArrayType rank (ty : TType) : TType = assert (rank >= 1 && rank <= 32) - TType_app(v_il_arr_tcr_map.[rank - 1], [ty]) - let mkLazyTy ty = TType_app(lazy_tcr, [ty]) + TType_app(v_il_arr_tcr_map.[rank - 1], [ty], v_knownWithoutNull) + let mkLazyTy ty = TType_app(lazy_tcr, [ty], v_knownWithoutNull) - let mkPrintfFormatTy aty bty cty dty ety = TType_app(v_format_tcr, [aty;bty;cty;dty; ety]) - let mk_format4_ty aty bty cty dty = TType_app(v_format4_tcr, [aty;bty;cty;dty]) - let mkQuotedExprTy aty = TType_app(v_expr_tcr, [aty]) - let mkRawQuotedExprTy = TType_app(v_raw_expr_tcr, []) - let mkQueryBuilderTy = TType_app(v_query_builder_tcref, []) - let mkLinqExpressionTy aty = TType_app(v_linqExpression_tcr, [aty]) + let mkPrintfFormatTy aty bty cty dty ety = TType_app(v_format_tcr, [aty;bty;cty;dty; ety], v_knownWithoutNull) + let mk_format4_ty aty bty cty dty = TType_app(v_format4_tcr, [aty;bty;cty;dty], v_knownWithoutNull) + let mkQuotedExprTy aty = TType_app(v_expr_tcr, [aty], v_knownWithoutNull) + let mkRawQuotedExprTy = TType_app(v_raw_expr_tcr, [], v_knownWithoutNull) + let mkQueryBuilderTy = TType_app(v_query_builder_tcref, [], v_knownWithoutNull) + let mkLinqExpressionTy aty = TType_app(v_linqExpression_tcr, [aty], v_knownWithoutNull) let v_cons_ucref = mkUnionCaseRef v_list_tcr_canon "op_ColonColon" let v_nil_ucref = mkUnionCaseRef v_list_tcr_canon "op_Nil" @@ -511,8 +517,8 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d match l with | [t1;t2;t3;t4;t5;t6;t7;marker] -> match marker with - | TType_app(tcref, [t8]) when tyconRefEq tcref v_ref_tuple1_tcr -> mkRawRefTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some - | TType_app(tcref, [t8]) when tyconRefEq tcref v_struct_tuple1_tcr -> mkRawStructTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some + | TType_app(tcref, [t8], _nullness) when tyconRefEq tcref v_ref_tuple1_tcr -> mkRawRefTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some + | TType_app(tcref, [t8], _nullness) when tyconRefEq tcref v_struct_tuple1_tcr -> mkRawStructTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some | TType_tuple (_structness2, t8plus) -> TType_tuple (tupInfo, [t1;t2;t3;t4;t5;t6;t7] @ t8plus) |> Some | _ -> None | [] -> None @@ -520,15 +526,18 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d | _ -> TType_tuple (tupInfo, l) |> Some - let decodeTupleTy tupInfo l = - match tryDecodeTupleTy tupInfo l with + let decodeTupleTyAndNullness tupInfo tinst _nullness = // TODO nullness + match tryDecodeTupleTy tupInfo tinst with | Some ty -> ty | None -> failwith "couldn't decode tuple ty" - let decodeTupleTyIfPossible tcref tupInfo l = - match tryDecodeTupleTy tupInfo l with + let decodeTupleTyAndNullnessIfPossible tcref tupInfo tinst nullness = // TODO nullness + match tryDecodeTupleTy tupInfo tinst with | Some ty -> ty - | None -> TType_app(tcref, l) + | None -> TType_app(tcref, tinst, nullness) + + let decodeTupleTy tupInfo tinst = + decodeTupleTyAndNullness tupInfo tinst v_knownWithoutNull let mk_MFCore_attrib nm : BuiltinAttribInfo = AttribInfo(mkILTyRef(IlxSettings.ilxFsharpCoreLibScopeRef (), FSharpLib.Core + "." + nm), mk_MFCore_tcref fslibCcu nm) @@ -653,7 +662,6 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d let v_hash_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "hash" , None , Some "Hash" , [vara], ([[varaTy]], v_int_ty)) let v_box_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "box" , None , Some "Box" , [vara], ([[varaTy]], v_obj_ty)) let v_isnull_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "isNull" , None , Some "IsNull" , [vara], ([[varaTy]], v_bool_ty)) - let v_isnotnull_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "isNotNull" , None , Some "IsNotNull" , [vara], ([[varaTy]], v_bool_ty)) let v_raise_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "raise" , None , Some "Raise" , [vara], ([[mkSysNonGenericTy sys "Exception"]], varaTy)) let v_failwith_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "failwith" , None , Some "FailWith" , [vara], ([[v_string_ty]], varaTy)) let v_invalid_arg_info = makeIntrinsicValRef(fslib_MFOperators_nleref, "invalidArg" , None , Some "InvalidArg" , [vara], ([[v_string_ty]; [v_string_ty]], varaTy)) @@ -695,7 +703,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d let v_seq_generated_info = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref, "EnumerateWhile" , None , None , [varb], ([[v_unit_ty --> v_bool_ty]; [mkSeqTy varbTy]], mkSeqTy varbTy)) let v_seq_finally_info = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref, "EnumerateThenFinally" , None , None , [varb], ([[mkSeqTy varbTy]; [v_unit_ty --> v_unit_ty]], mkSeqTy varbTy)) let v_seq_of_functions_info = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref, "EnumerateFromFunctions" , None , None , [vara;varb], ([[v_unit_ty --> varaTy]; [varaTy --> v_bool_ty]; [varaTy --> varbTy]], mkSeqTy varbTy)) - let v_create_event_info = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref, "CreateEvent" , None , None , [vara;varb], ([[varaTy --> v_unit_ty]; [varaTy --> v_unit_ty]; [(v_obj_ty --> (varbTy --> v_unit_ty)) --> varaTy]], TType_app (v_fslib_IEvent2_tcr, [varaTy;varbTy]))) + let v_create_event_info = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref, "CreateEvent" , None , None , [vara;varb], ([[varaTy --> v_unit_ty]; [varaTy --> v_unit_ty]; [(v_obj_ty --> (varbTy --> v_unit_ty)) --> varaTy]], TType_app (v_fslib_IEvent2_tcr, [varaTy;varbTy], v_knownWithoutNull))) let v_seq_to_array_info = makeIntrinsicValRef(fslib_MFSeqModule_nleref, "toArray" , None , Some "ToArray", [varb], ([[mkSeqTy varbTy]], mkArrayType 1 varbTy)) let v_seq_to_list_info = makeIntrinsicValRef(fslib_MFSeqModule_nleref, "toList" , None , Some "ToList" , [varb], ([[mkSeqTy varbTy]], mkListTy varbTy)) let v_seq_map_info = makeIntrinsicValRef(fslib_MFSeqModule_nleref, "map" , None , Some "Map" , [vara;varb], ([[varaTy --> varbTy]; [mkSeqTy varaTy]], mkSeqTy varbTy)) @@ -800,35 +808,39 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d "Single" , v_float32_tcr |] |> Array.map (fun (nm, tcr) -> let ty = mkNonGenericTy tcr - nm, findSysTyconRef sys nm, (fun _ -> ty)) + nm, findSysTyconRef sys nm, (fun _ nullness -> + match nullness with + | Nullness.Known NullnessInfo.WithoutNull -> ty + | _ -> mkNonGenericTyWithNullness tcr nullness)) let decompileTyconEntries = [| - "FSharpFunc`2" , v_fastFunc_tcr , (fun tinst -> mkFunTy (List.item 0 tinst) (List.item 1 tinst)) - "Tuple`2" , v_ref_tuple2_tcr , decodeTupleTy tupInfoRef - "Tuple`3" , v_ref_tuple3_tcr , decodeTupleTy tupInfoRef - "Tuple`4" , v_ref_tuple4_tcr , decodeTupleTy tupInfoRef - "Tuple`5" , v_ref_tuple5_tcr , decodeTupleTy tupInfoRef - "Tuple`6" , v_ref_tuple6_tcr , decodeTupleTy tupInfoRef - "Tuple`7" , v_ref_tuple7_tcr , decodeTupleTy tupInfoRef - "Tuple`8" , v_ref_tuple8_tcr , decodeTupleTyIfPossible v_ref_tuple8_tcr tupInfoRef - "ValueTuple`2" , v_struct_tuple2_tcr , decodeTupleTy tupInfoStruct - "ValueTuple`3" , v_struct_tuple3_tcr , decodeTupleTy tupInfoStruct - "ValueTuple`4" , v_struct_tuple4_tcr , decodeTupleTy tupInfoStruct - "ValueTuple`5" , v_struct_tuple5_tcr , decodeTupleTy tupInfoStruct - "ValueTuple`6" , v_struct_tuple6_tcr , decodeTupleTy tupInfoStruct - "ValueTuple`7" , v_struct_tuple7_tcr , decodeTupleTy tupInfoStruct - "ValueTuple`8" , v_struct_tuple8_tcr , decodeTupleTyIfPossible v_struct_tuple8_tcr tupInfoStruct |] + // TODO: nullness here + "FSharpFunc`2" , v_fastFunc_tcr , (fun tinst _nullness -> mkFunTy (List.item 0 tinst) (List.item 1 tinst)) + "Tuple`2" , v_ref_tuple2_tcr , decodeTupleTyAndNullness tupInfoRef + "Tuple`3" , v_ref_tuple3_tcr , decodeTupleTyAndNullness tupInfoRef + "Tuple`4" , v_ref_tuple4_tcr , decodeTupleTyAndNullness tupInfoRef + "Tuple`5" , v_ref_tuple5_tcr , decodeTupleTyAndNullness tupInfoRef + "Tuple`6" , v_ref_tuple6_tcr , decodeTupleTyAndNullness tupInfoRef + "Tuple`7" , v_ref_tuple7_tcr , decodeTupleTyAndNullness tupInfoRef + "Tuple`8" , v_ref_tuple8_tcr , decodeTupleTyAndNullnessIfPossible v_ref_tuple8_tcr tupInfoRef + "ValueTuple`2" , v_struct_tuple2_tcr , decodeTupleTyAndNullness tupInfoStruct + "ValueTuple`3" , v_struct_tuple3_tcr , decodeTupleTyAndNullness tupInfoStruct + "ValueTuple`4" , v_struct_tuple4_tcr , decodeTupleTyAndNullness tupInfoStruct + "ValueTuple`5" , v_struct_tuple5_tcr , decodeTupleTyAndNullness tupInfoStruct + "ValueTuple`6" , v_struct_tuple6_tcr , decodeTupleTyAndNullness tupInfoStruct + "ValueTuple`7" , v_struct_tuple7_tcr , decodeTupleTyAndNullness tupInfoStruct + "ValueTuple`8" , v_struct_tuple8_tcr , decodeTupleTyAndNullnessIfPossible v_struct_tuple8_tcr tupInfoStruct |] let betterEntries = Array.append betterTyconEntries decompileTyconEntries - let mutable decompileTypeDict = null - let mutable betterTypeDict1 = null - let mutable betterTypeDict2 = null + let mutable decompileTypeDict = Unchecked.defaultof<_> + let mutable betterTypeDict1 = Unchecked.defaultof<_> + let mutable betterTypeDict2 = Unchecked.defaultof<_> /// This map is indexed by stamps and lazy to avoid dereferencing while setting up the base imports. let getDecompileTypeDict () = - match decompileTypeDict with + match box decompileTypeDict with | null -> let entries = decompileTyconEntries let t = Dictionary.newWithSize entries.Length @@ -837,26 +849,31 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d t.Add(tcref.Stamp, builder) decompileTypeDict <- t t - | t -> t + | _ -> decompileTypeDict /// This map is for use when building FSharp.Core.dll. The backing Tycon's may not yet exist for /// the TyconRef's we have in our hands, hence we can't dereference them to find their stamps. /// So this dictionary is indexed by names. Make it lazy to avoid dereferencing while setting up the base imports. let getBetterTypeDict1 () = - match betterTypeDict1 with + match box betterTypeDict1 with | null -> let entries = betterEntries let t = Dictionary.newWithSize entries.Length for nm, tcref, builder in entries do - t.Add(nm, fun tcref2 tinst2 -> if tyconRefEq tcref tcref2 then builder tinst2 else TType_app (tcref2, tinst2)) + t.Add(nm, + (fun tcref2 tinst2 nullness -> + if tyconRefEq tcref tcref2 then + builder tinst2 nullness + else + TType_app (tcref2, tinst2, nullness))) betterTypeDict1 <- t t - | t -> t + | _ -> betterTypeDict1 /// This map is for use in normal times (not building FSharp.Core.dll). It is indexed by stamps /// and lazy to avoid dereferencing while setting up the base imports. let getBetterTypeDict2 () = - match betterTypeDict2 with + match box betterTypeDict2 with | null -> let entries = betterEntries let t = Dictionary.newWithSize entries.Length @@ -865,50 +882,62 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d t.Add(tcref.Stamp, builder) betterTypeDict2 <- t t - | t -> t + | _ -> betterTypeDict2 /// For logical purposes equate some F# types with .NET types, e.g. TType_tuple == System.Tuple/ValueTuple. /// Doing this normalization is a fairly performance critical piece of code as it is frequently invoked /// in the process of converting .NET metadata to F# internal compiler data structures (see import.fs). - let decompileTy (tcref: EntityRef) tinst = + let decompileTy (tcref: EntityRef) tinst nullness = if compilingFslib then // No need to decompile when compiling FSharp.Core.dll - TType_app (tcref, tinst) + TType_app (tcref, tinst, nullness) else let dict = getDecompileTypeDict() match dict.TryGetValue tcref.Stamp with - | true, builder -> builder tinst - | _ -> TType_app (tcref, tinst) + | true, builder -> builder tinst nullness + | _ -> TType_app (tcref, tinst, nullness) /// For cosmetic purposes "improve" some .NET types, e.g. Int32 --> int32. /// Doing this normalization is a fairly performance critical piece of code as it is frequently invoked /// in the process of converting .NET metadata to F# internal compiler data structures (see import.fs). - let improveTy (tcref: EntityRef) tinst = + let improveTy (tcref: EntityRef) tinst nullness= if compilingFslib then let dict = getBetterTypeDict1() match dict.TryGetValue tcref.LogicalName with - | true, builder -> builder tcref tinst - | _ -> TType_app (tcref, tinst) + | true, builder -> builder tcref tinst nullness + | _ -> TType_app (tcref, tinst, nullness) else let dict = getBetterTypeDict2() match dict.TryGetValue tcref.Stamp with - | true, builder -> builder tinst - | _ -> TType_app (tcref, tinst) + | true, builder -> builder tinst nullness + | _ -> TType_app (tcref, tinst, nullness) override x.ToString() = "" member __.ilg=ilg - // A table of all intrinsics that the compiler cares about + + /// A table of all intrinsics that the compiler cares about member __.knownIntrinsics = v_knownIntrinsics - // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the - // better the job we do of mapping from provided expressions back to FSharp.Core F# functions and values. + + member __.assumeNullOnImport = assumeNullOnImport + + member __.checkNullness = checkNullness + + member __.langFeatureNullness = v_langFeatureNullness + + member g.knownWithoutNull = v_knownWithoutNull + + member __.langVersion = langVersion + + // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the + // better the job we do of mapping from provided expressions back to FSharp.Core F# functions and values. member __.knownFSharpCoreModules = v_knownFSharpCoreModules + member __.compilingFslib = compilingFslib member __.mlCompatibility = mlCompatibility member __.emitDebugInfoInQuotations = emitDebugInfoInQuotations member __.directoryToResolveRelativePaths= directoryToResolveRelativePaths member __.pathMap = pathMap - member __.langVersion = langVersion member __.unionCaseRefEq x y = primUnionCaseRefEq compilingFslib fslibCcu x y member __.valRefEq x y = primValRefEq compilingFslib fslibCcu x y member __.fslibCcu = fslibCcu @@ -961,6 +990,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d member __.voidptr_tcr = v_voidptr_tcr member __.ilsigptr_tcr = v_ilsigptr_tcr member __.fastFunc_tcr = v_fastFunc_tcr + member __.MatchFailureException_tcr = v_mfe_tcr member __.tcref_IQueryable = v_tcref_IQueryable member __.tcref_IObservable = v_tcref_IObservable member __.tcref_IObserver = v_tcref_IObserver @@ -1325,7 +1355,6 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d member __.hash_info = v_hash_info member __.box_info = v_box_info member __.isnull_info = v_isnull_info - member __.isnotnull_info = v_isnotnull_info member __.raise_info = v_raise_info member __.failwith_info = v_failwith_info member __.invalid_arg_info = v_invalid_arg_info diff --git a/src/fsharp/TypeChecker.fs b/src/fsharp/TypeChecker.fs index 2cb72a3047b..912842fa1c7 100755 --- a/src/fsharp/TypeChecker.fs +++ b/src/fsharp/TypeChecker.fs @@ -700,8 +700,8 @@ let UnifyRefTupleType contextInfo cenv denv m ty ps = if isRefTupleTy cenv.g ty then let ptys = destRefTupleTy cenv.g ty if List.length ps = List.length ptys then ptys - else NewInferenceTypes ps - else NewInferenceTypes ps + else NewInferenceTypes cenv.g ps + else NewInferenceTypes cenv.g ps let contextInfo = match contextInfo with @@ -720,10 +720,10 @@ let UnifyTupleTypeAndInferCharacteristics contextInfo cenv denv m knownTy isExpl let tupInfo = (if isExplicitStruct then tupInfoStruct else tupInfo) let ptys = if List.length ps = List.length ptys then ptys - else NewInferenceTypes ps + else NewInferenceTypes cenv.g ps tupInfo, ptys else - mkTupInfo isExplicitStruct, NewInferenceTypes ps + mkTupInfo isExplicitStruct, NewInferenceTypes cenv.g ps let contextInfo = match contextInfo with @@ -747,12 +747,12 @@ let UnifyAnonRecdTypeAndInferCharacteristics contextInfo cenv denv m ty isExplic let anonInfo = AnonRecdTypeInfo.Create(anonInfo.Assembly, tupInfo, unsortedNames) let ptys = if List.length ptys = Array.length unsortedNames then ptys - else NewInferenceTypes (Array.toList anonInfo.SortedNames) + else NewInferenceTypes cenv.g (Array.toList anonInfo.SortedNames) anonInfo, ptys | ValueNone -> // Note: no known anonymous record type - use our assembly let anonInfo = AnonRecdTypeInfo.Create(cenv.topCcu, mkTupInfo isExplicitStruct, unsortedNames) - anonInfo, NewInferenceTypes (Array.toList anonInfo.SortedNames) + anonInfo, NewInferenceTypes cenv.g (Array.toList anonInfo.SortedNames) let ty2 = TType_anon (anonInfo, ptys) AddCxTypeEqualsType contextInfo denv cenv.css m ty ty2 anonInfo, ptys @@ -763,9 +763,9 @@ let UnifyAnonRecdTypeAndInferCharacteristics contextInfo cenv denv m ty isExplic let UnifyFunctionTypeUndoIfFailed cenv denv m ty = match tryDestFunTy cenv.g ty with | ValueNone -> - let domainTy = NewInferenceType () - let resultTy = NewInferenceType () - if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (domainTy --> resultTy) then + let domainTy = NewInferenceType cenv.g + let resultTy = NewInferenceType cenv.g + if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (mkFunTy cenv.g domainTy resultTy) then ValueSome(domainTy, resultTy) else ValueNone @@ -824,9 +824,9 @@ let UnifyUnitType cenv (env: TcEnv) m ty expr = if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty cenv.g.unit_ty then true else - let domainTy = NewInferenceType () - let resultTy = NewInferenceType () - if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (domainTy --> resultTy) then + let domainTy = NewInferenceType cenv.g + let resultTy = NewInferenceType cenv.g + if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (mkFunTy cenv.g domainTy resultTy) then warning (FunctionValueUnexpected(denv, ty, m)) else let reportImplicitlyDiscardError() = @@ -1440,7 +1440,7 @@ let MakeAndPublishVal cenv env (altActualParent, inSig, declKind, vrec, vscheme, if MemberIsExplicitImpl cenv.g memberInfo then let slotSig = List.head memberInfo.ImplementedSlotSigs match slotSig.ImplementedType with - | TType_app (tyconref, _) -> Some tyconref.Accessibility + | TType_app (tyconref, _, _nullness) -> Some tyconref.Accessibility | _ -> None else None @@ -1918,14 +1918,16 @@ let MakeAndPublishSimpleValsForMergedScope cenv env m (names: NameMap<_>) = // to C<_> occurs then generate C for a fresh type inference variable ?ty. //------------------------------------------------------------------------- -let FreshenTyconRef m rigid (tcref: TyconRef) declaredTyconTypars = +let FreshenTyconRef (g: TcGlobals) m rigid (tcref: TyconRef) declaredTyconTypars = let tpsorig = declaredTyconTypars let tps = copyTypars tpsorig if rigid <> TyparRigidity.Rigid then tps |> List.iter (fun tp -> tp.SetRigidity rigid) let renaming, tinst = FixupNewTypars m [] [] tpsorig tps - (TType_app(tcref, List.map mkTyparTy tpsorig), tps, renaming, TType_app(tcref, tinst)) + let origObjTy = TType_app(tcref, List.map mkTyparTy tpsorig, g.knownWithoutNull) + let freshTy = TType_app(tcref, tinst, g.knownWithoutNull) + (origObjTy, tps, renaming, freshTy) let FreshenPossibleForallTy g m rigid ty = let tpsorig, tau = tryDestForallTy g ty @@ -1937,10 +1939,9 @@ let FreshenPossibleForallTy g m rigid ty = let tps, renaming, tinst = CopyAndFixupTypars m rigid tpsorig tpsorig, tps, tinst, instType renaming tau -let FreshenTyconRef2 m (tcref: TyconRef) = +let FreshenTyconRef2 (g: TcGlobals) m (tcref: TyconRef) = let tps, renaming, tinst = FreshenTypeInst m (tcref.Typars m) - tps, renaming, tinst, TType_app (tcref, tinst) - + tps, renaming, tinst, TType_app (tcref, tinst, g.knownWithoutNull) /// Given a abstract method, which may be a generic method, freshen the type in preparation /// to apply it as a constraint to the method that implements the abstract slot @@ -2251,7 +2252,7 @@ module GeneralizationHelpers = match tp.Constraints |> List.partition (function (TyparConstraint.CoercesTo _) -> true | _ -> false) with | [TyparConstraint.CoercesTo(cxty, _)], others -> // Throw away null constraints if they are implied - if others |> List.exists (function (TyparConstraint.SupportsNull(_)) -> not (TypeSatisfiesNullConstraint cenv.g m cxty) | _ -> true) + if others |> List.exists (function (TyparConstraint.SupportsNull(_)) -> not (TypeNullIsExtraValueOld cenv.g m cxty) | _ -> true) then None else Some cxty | _ -> None @@ -2677,9 +2678,9 @@ module EventDeclarationNormalization = /// Also adjust the "this" type to take into account whether the type is a struct. let FreshenObjectArgType cenv m rigid tcref isExtrinsic declaredTyconTypars = #if EXTENDED_EXTENSION_MEMBERS // indicates if extension members can add additional constraints to type parameters - let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy = FreshenTyconRef m (if isExtrinsic then TyparRigidity.Flexible else rigid) tcref declaredTyconTypars + let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy = FreshenTyconRef cenv.g m (if isExtrinsic then TyparRigidity.Flexible else rigid) tcref declaredTyconTypars #else - let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy = FreshenTyconRef m rigid tcref declaredTyconTypars + let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy = FreshenTyconRef cenv.g m rigid tcref declaredTyconTypars #endif // Struct members have a byref 'this' type (unless they are extrinsic extension members) let thisTy = @@ -2965,20 +2966,19 @@ let MakeApplicableExprWithFlex cenv (env: TcEnv) expr = if isNonFlexibleType actualType then actualType else - let flexibleType = NewInferenceType () - AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace actualType flexibleType + let flexibleType = NewInferenceType cenv.g + AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace actualType flexibleType; flexibleType) // Create a coercion to represent the expansion of the application - let expr = mkCoerceExpr (expr, mkIteratedFunTy (List.map (mkRefTupledTy g) curriedFlexibleTypes) retTy, m, exprTy) + let expr = mkCoerceExpr (expr, mkIteratedFunTy g (List.map (mkRefTupledTy g) curriedFlexibleTypes) retTy, m, exprTy) ApplicableExpr (cenv, expr, true) - /// Checks, warnings and constraint assertions for downcasts let TcRuntimeTypeTest isCast isOperator cenv denv m tgtTy srcTy = let g = cenv.g if TypeDefinitelySubsumesTypeNoCoercion 0 g cenv.amap m tgtTy srcTy then - warning(TypeTestUnnecessary m) + warning (TypeTestUnnecessary m) if isTyparTy g srcTy && not (destTyparTy g srcTy).IsCompatFlex then error(IndeterminateRuntimeCoercion(denv, srcTy, tgtTy, m)) @@ -3414,7 +3414,7 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr else None // Next try to typecheck the thing as a sequence - let enumElemTy = NewInferenceType () + let enumElemTy = NewInferenceType cenv.g let exprTyAsSeq = mkSeqTy cenv.g enumElemTy match probe exprTyAsSeq with @@ -3431,7 +3431,7 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr // Used inside sequence expressions let ConvertArbitraryExprToEnumerable cenv ty (env: TcEnv) (expr: Expr) = let m = expr.Range - let enumElemTy = NewInferenceType () + let enumElemTy = NewInferenceType cenv.g if AddCxTypeMustSubsumeTypeUndoIfFailed env.DisplayEnv cenv.css m ( mkSeqTy cenv.g enumElemTy) ty then expr, enumElemTy else @@ -3449,43 +3449,43 @@ let ConvertArbitraryExprToEnumerable cenv ty (env: TcEnv) (expr: Expr) = let mkSeqEmpty cenv env m genTy = // We must discover the 'zero' of the monadic algebra being generated in order to compile failing matches. - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) mkCallSeqEmpty cenv.g m genResultTy let mkSeqCollect cenv env m enumElemTy genTy lam enumExpr = - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) let enumExpr = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g enumElemTy) (tyOfExpr cenv.g enumExpr) enumExpr mkCallSeqCollect cenv.g m enumElemTy genResultTy lam enumExpr let mkSeqUsing cenv (env: TcEnv) m resourceTy genTy resourceExpr lam = AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace cenv.g.system_IDisposable_ty resourceTy - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) mkCallSeqUsing cenv.g m resourceTy genResultTy resourceExpr lam let mkSeqDelay cenv env m genTy lam = - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) mkCallSeqDelay cenv.g m genResultTy (mkUnitDelayLambda cenv.g m lam) let mkSeqAppend cenv env m genTy e1 e2 = - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) let e1 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e1) e1 let e2 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e2) e2 mkCallSeqAppend cenv.g m genResultTy e1 e2 let mkSeqFromFunctions cenv env m genTy e1 e2 = - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) let e2 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e2) e2 mkCallSeqGenerated cenv.g m genResultTy e1 e2 let mkSeqFinally cenv env m genTy e1 e2 = - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy) let e1 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e1) e1 mkCallSeqFinally cenv.g m genResultTy e1 e2 @@ -3934,9 +3934,9 @@ let EliminateInitializationGraphs | _ -> let ty = v.Type let m = v.Range - let vty = (mkLazyTy g ty) + let vty = mkLazyTy g ty - let fty = (g.unit_ty --> ty) + let fty = mkFunTy g g.unit_ty ty let flazy, felazy = mkCompGenLocal m v.LogicalName fty let frhs = mkUnitDelayLambda g m e if mustHaveArity then flazy.SetValReprInfo (Some(InferArityOfExpr g AllowTypeDirectedDetupling.Yes fty [] [] frhs)) @@ -4060,7 +4060,7 @@ let CheckAndRewriteObjectCtor g env (ctorLambdaExpr: Expr) = error expr let body = checkAndRewrite body - mkMultiLambdas m tps vsl (body, returnTy) + mkMultiLambdas g m tps vsl (body, returnTy) @@ -4094,7 +4094,7 @@ let buildApp cenv expr resultTy arg m = | ApplicableExpr(_, Expr.App (Expr.Val (vf, _, _), _, _, [], _), _), _ when (valRefEq g vf g.nativeptr_tobyref_vref) -> - let argty = NewInferenceType() + let argty = NewInferenceType g let resultTy = mkByrefTyWithInference g argty (NewByRefKindInferenceType g m) expr.SupplyArgument (arg, m), resultTy @@ -4341,7 +4341,9 @@ let rec TcTyparConstraint ridx cenv newOk checkCxs occ (env: TcEnv) tpenv c = AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace ty' (mkTyparTy tp') tpenv - | WhereTyparSupportsNull(tp, m) -> checkSimpleConstraint tp m AddCxTypeMustSupportNull + | WhereTyparSupportsNull(tp, m) -> checkSimpleConstraint tp m AddCxTypeDefnSupportsNull + + | WhereTyparNotSupportsNull(tp, m) -> checkSimpleConstraint tp m AddCxTypeDefnNotSupportsNull | WhereTyparIsComparable(tp, m) -> checkSimpleConstraint tp m AddCxTypeMustSupportComparison @@ -4478,11 +4480,14 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv match memberFlags.MemberKind with | MemberKind.PropertyGet -> if SynInfo.HasNoArgs valSynInfo then - (cenv.g.unit_ty --> declaredTy), (SynInfo.IncorporateEmptyTupledArgForPropertyGetter valSynInfo) + let getterTy = mkFunTy cenv.g cenv.g.unit_ty declaredTy + getterTy, (SynInfo.IncorporateEmptyTupledArgForPropertyGetter valSynInfo) else declaredTy, valSynInfo | _ -> - let setterTy = (mkRefTupledTy cenv.g (List.map fst (List.concat arginfos) @ [returnTy]) --> cenv.g.unit_ty) + let setterArgTys = List.map fst (List.concat arginfos) @ [returnTy] + let setterArgTy = mkRefTupledTy cenv.g setterArgTys + let setterTy = mkFunTy cenv.g setterArgTy cenv.g.unit_ty let synInfo = SynInfo.IncorporateSetterArg valSynInfo setterTy, synInfo | MemberKind.PropertyGetSet -> @@ -4493,7 +4498,7 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv let ty', valSynInfo = if memberFlags.IsInstance then - (thisTy --> ty'), (SynInfo.IncorporateSelfArg valSynInfo) + (mkFunTy cenv.g thisTy ty'), (SynInfo.IncorporateSelfArg valSynInfo) else ty', valSynInfo @@ -4516,7 +4521,7 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv |> List.map (fun (argty, argInfo) -> if SynInfo.IsOptionalArg argInfo then mkOptionTy cenv.g argty else argty)) - mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) curriedArgTys) returnTy + mkIteratedFunTy cenv.g (List.map (mkRefTupledTy cenv.g) curriedArgTys) returnTy else ty' let memberInfoOpt = @@ -4537,9 +4542,9 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv let delTy = FindDelegateTypeOfPropertyEvent cenv.g cenv.amap id.idText id.idRange declaredTy let ty = if memberFlags.IsInstance then - thisTy --> (delTy --> cenv.g.unit_ty) + mkFunTy cenv.g thisTy (mkFunTy cenv.g delTy cenv.g.unit_ty) else - (delTy --> cenv.g.unit_ty) + mkFunTy cenv.g delTy cenv.g.unit_ty yield reallyGenerateOneMember(ident("add_" + id.idText, id.idRange), valSynInfo, ty, memberFlags) yield reallyGenerateOneMember(ident("remove_" + id.idText, id.idRange), valSynInfo, ty, memberFlags) ] @@ -4712,6 +4717,7 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: SyntacticUnscope TType_tuple(tupInfo,args'),tpenv | SynType.AnonRecd(isStruct, args,m) -> + let tupInfo = mkTupInfo isStruct let args',tpenv = TcTypesAsTuple cenv newOk checkCxs occ env tpenv (args |> List.map snd |> List.map (fun x -> (false,x))) m let unsortedFieldIds = args |> List.map fst |> List.toArray @@ -4726,11 +4732,12 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: SyntacticUnscope | SynType.Fun(domainTy, resultTy, _) -> let domainTy', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv domainTy let resultTy', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv resultTy - (domainTy' --> resultTy'), tpenv + let ty' = mkFunTy cenv.g domainTy' resultTy' + ty', tpenv | SynType.Array (n, elemTy, m) -> let elemTy, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv elemTy - mkArrayTy g n elemTy m, tpenv + mkArrayTy g n g.knownWithoutNull elemTy m, tpenv | SynType.Var (tp, _) -> let tp', tpenv = TcTyparOrMeasurePar optKind cenv env newOk tpenv tp @@ -4754,8 +4761,9 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: SyntacticUnscope | SynType.HashConstraint(ty, m) -> let tp = TcAnonTypeOrMeasure (Some TyparKind.Type) cenv TyparRigidity.WarnIfNotRigid TyparDynamicReq.Yes newOk m let ty', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv ty - AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace ty' (mkTyparTy tp) - tp.AsType, tpenv + let tpTy = mkTyparTy tp + AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace ty' tpTy + tpTy, tpenv | SynType.StaticConstant (c, m) -> match c, optKind with @@ -4768,12 +4776,46 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: SyntacticUnscope errorR(Error(FSComp.SR.parsInvalidLiteralInType(), m)) NewErrorType (), tpenv + | SynType.StaticConstantNull m | SynType.StaticConstantNamed (_, _, m) - | SynType.StaticConstantExpr (_, m) -> errorR(Error(FSComp.SR.parsInvalidLiteralInType(), m)) NewErrorType (), tpenv + | SynType.WithNull(innerTy, ambivalent, m) -> + let innerTyC, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv innerTy + if g.langFeatureNullness then + if TypeNullNever g innerTyC then + let tyString = NicePrint.minimalStringOfType env.DisplayEnv innerTyC + errorR(Error(FSComp.SR.tcTypeDoesNotHaveAnyNull(tyString), m)) + + // TODO - doesn't feel right - it will add KnownNotNull + KnownWithNull --> KnownWithNull, e.g. + // let f (x: string) = (x = null) + match tryAddNullnessToTy (if ambivalent then KnownAmbivalentToNull else KnownWithNull) innerTyC with + + | None -> + let tyString = NicePrint.minimalStringOfType env.DisplayEnv innerTyC + errorR(Error(FSComp.SR.tcTypeDoesNotHaveAnyNull(tyString), m)) + innerTyC, tpenv + + | Some innerTyCWithNull -> + // The inner type is not allowed to support null or use null as a representation value. + // For example "int option?" is not allowed, not "string??". + // + // For variable types in FSharp.Core we make an exception because we must allow + // val toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : not null *) + // wihout implying 'T is not null. This is because it is legitimate to use this + // function to "collapse" null and obj-null-coming-from-option using such a function. + + if g.compilingFslib && not (isTyparTy g innerTyC) then + AddCxTypeDefnNotSupportsNull env.DisplayEnv cenv.css m NoTrace innerTyC + + innerTyCWithNull, tpenv + + else + warning(Error(FSComp.SR.tcNullnessCheckingNotEnabled(), m)) + innerTyC, tpenv + | SynType.MeasurePower(ty, exponent, m) -> match optKind with | Some TyparKind.Type -> @@ -4888,17 +4930,18 @@ and TcStaticConstantParameter cenv (env: TcEnv) tpenv kind (v: SynType) idOpt co | SynConst.Int32 n when typeEquiv g g.int32_ty kind -> record(g.int32_ty); box (n: int) | SynConst.Int64 n when typeEquiv g g.int64_ty kind -> record(g.int64_ty); box (n: int64) | SynConst.SByte n when typeEquiv g g.sbyte_ty kind -> record(g.sbyte_ty); box (n: sbyte) - | SynConst.UInt16 n when typeEquiv g g.uint16_ty kind -> record(g.uint16_ty); box (n: uint16) - | SynConst.UInt32 n when typeEquiv g g.uint32_ty kind -> record(g.uint32_ty); box (n: uint32) - | SynConst.UInt64 n when typeEquiv g g.uint64_ty kind -> record(g.uint64_ty); box (n: uint64) + | SynConst.UInt16 n when typeEquiv g g.uint16_ty kind -> record(g.uint16_ty); box (n: uint16) + | SynConst.UInt32 n when typeEquiv g g.uint32_ty kind -> record(g.uint32_ty); box (n: uint32) + | SynConst.UInt64 n when typeEquiv g g.uint64_ty kind -> record(g.uint64_ty); box (n: uint64) | SynConst.Decimal n when typeEquiv g g.decimal_ty kind -> record(g.decimal_ty); box (n: decimal) | SynConst.Single n when typeEquiv g g.float32_ty kind -> record(g.float32_ty); box (n: single) | SynConst.Double n when typeEquiv g g.float_ty kind -> record(g.float_ty); box (n: double) | SynConst.Char n when typeEquiv g g.char_ty kind -> record(g.char_ty); box (n: char) - | SynConst.String (s, _) when s <> null && typeEquiv g g.string_ty kind -> record(g.string_ty); box (s: string) + | SynConst.String (s, _) when typeEquiv g g.string_ty kind -> record(g.string_ty); box s | SynConst.Bool b when typeEquiv g g.bool_ty kind -> record(g.bool_ty); box (b: bool) | _ -> fail() v, tpenv + | SynType.StaticConstantNull(_) -> fail() | SynType.StaticConstantExpr(e, _ ) -> // If an error occurs, don't try to recover, since the constant expression will be nothing like what we need @@ -4923,10 +4966,9 @@ and TcStaticConstantParameter cenv (env: TcEnv) tpenv kind (v: SynType) idOpt co | Const.Single n -> record(g.float32_ty); box (n: single) | Const.Double n -> record(g.float_ty); box (n: double) | Const.Char n -> record(g.char_ty); box (n: char) - | Const.String null -> fail() | Const.String s -> record(g.string_ty); box (s: string) | Const.Bool b -> record(g.bool_ty); box (b: bool) - | _ -> fail() + | _ -> fail() | _ -> error(Error(FSComp.SR.tcInvalidConstantExpression(), v.Range)) v, tpenv' | SynType.LongIdent lidwd -> @@ -5065,7 +5107,7 @@ and TcTypeApp cenv newOk checkCxs occ env tpenv m tcref pathTypeArgs (synArgTys: if tcref.Deref.IsProvided then TcProvidedTypeApp cenv env tpenv tcref synArgTys m else #endif - let tps, _, tinst, _ = FreshenTyconRef2 m tcref + let tps, _, tinst, _ = FreshenTyconRef2 g m tcref // If we're not checking constraints, i.e. when we first assert the super/interfaces of a type definition, then just // clear the constraint lists of the freshly generated type variables. A little ugly but fairly localized. @@ -5086,7 +5128,7 @@ and TcTypeApp cenv newOk checkCxs occ env tpenv m tcref pathTypeArgs (synArgTys: List.iter2 (UnifyTypes cenv env m) tinst actualArgTys // Try to decode System.Tuple --> F~ tuple types etc. - let ty = g.decompileType tcref actualArgTys + let ty = g.decompileType tcref actualArgTys g.knownWithoutNull ty, tpenv @@ -5110,7 +5152,7 @@ and TcNestedTypeApplication cenv newOk checkCxs occ env tpenv mWholeTypeApp ty t let ty = convertToTypeWithMetadataIfPossible cenv.g ty if not (isAppTy cenv.g ty) then error(Error(FSComp.SR.tcTypeHasNoNestedTypes(), mWholeTypeApp)) match ty with - | TType_app(tcref, tinst) -> + | TType_app(tcref, tinst, _nullness) -> let pathTypeArgs = List.truncate (max (tinst.Length - tcref.Typars(mWholeTypeApp).Length) 0) tinst TcTypeApp cenv newOk checkCxs occ env tpenv mWholeTypeApp tcref pathTypeArgs tyargs | _ -> error(InternalError("TcNestedTypeApplication: expected type application", mWholeTypeApp)) @@ -5137,7 +5179,7 @@ and TcSimplePat optArgsOK checkCxs cenv ty env (tpenv, names, takenNames) p = if not optArgsOK then errorR(Error(FSComp.SR.tcOptionalArgsOnlyOnMembers(), m)) - let tyarg = NewInferenceType () + let tyarg = NewInferenceType cenv.g UnifyTypes cenv env m ty (mkOptionTy cenv.g tyarg) let _, names, takenNames = TcPatBindingName cenv env id ty isMemberThis None None (ValInline.Optional, permitInferTypars, noArgOrRetAttribs, false, None, compgen) (names, takenNames) @@ -5218,7 +5260,7 @@ and TcSimplePats cenv optArgsOK checkCxs ty env (tpenv, names, takenNames: Set<_ TcSimplePats cenv optArgsOK checkCxs ty env (tpenv, names, takenNames) p and TcSimplePatsOfUnknownType cenv optArgsOK checkCxs env tpenv spats = - let argty = NewInferenceType () + let argty = NewInferenceType cenv.g TcSimplePats cenv optArgsOK checkCxs argty env (tpenv, NameMap.empty, Set.empty) spats and TcPatBindingName cenv env id ty isMemberThis vis1 topValData (inlineFlag, declaredTypars, argAttribs, isMutable, vis2, compgen) (names, takenNames: Set) = @@ -5373,7 +5415,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p let tcArgPatterns () = let args = getArgPatterns () - TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes args) args + TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes cenv.g args) args match ResolvePatternLongIdent cenv.tcSink cenv.nameResolver warnOnUpperForId false m ad env.NameEnv TypeNameResolutionInfo.Default longId with | Item.NewDef id -> @@ -5440,7 +5482,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p | _ -> error(Error(FSComp.SR.tcInvalidArgForParameterizedPattern(), x.Range)) let activePatArgsAsSynExprs = List.map convSynPatToSynExpr activePatArgsAsSynPats - let activePatResTys = NewInferenceTypes apinfo.Names + let activePatResTys = NewInferenceTypes cenv.g apinfo.Names let activePatType = apinfo.OverallType cenv.g m ty activePatResTys let delayed = activePatArgsAsSynExprs |> List.map (fun arg -> DelayedApp(ExprAtomicFlag.NonAtomic, arg, unionRanges (rangeOfLid longId) arg.Range)) @@ -5507,8 +5549,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p if isNull (box result.[i]) then result.[i] <- SynPat.Wild (m.MakeSynthetic()) - let extraPatterns = - if isNull extraPatterns then [] else List.ofSeq extraPatterns + let extraPatterns = List.ofSeq extraPatterns let args = List.ofArray result if result.Length = 1 then args, extraPatterns @@ -5558,7 +5599,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p let extraPatterns = extraPatterns @ extraPatternsFromNames let args', acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) argTys args - let _, acc = TcPatterns warnOnUpper cenv env vFlags acc (NewInferenceTypes extraPatterns) extraPatterns + let _, acc = TcPatterns warnOnUpper cenv env vFlags acc (NewInferenceTypes cenv.g extraPatterns) extraPatterns (fun values -> mkf m (List.map (fun f -> f values) args')), acc | Item.ILField finfo -> @@ -5623,14 +5664,14 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p (fun values -> TPat_tuple(tupInfo, List.map (fun f -> f values) args', argTys, m)), acc with e -> errorRecovery e m - let _, acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes args) args + let _, acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes cenv.g args) args (fun _ -> TPat_error m), acc | SynPat.Paren (p, _) -> TcPat warnOnUpper cenv env None vFlags (tpenv, names, takenNames) ty p | SynPat.ArrayOrList (isArray, args, m) -> - let argty = NewInferenceType () + let argty = NewInferenceType cenv.g UnifyTypes cenv env m ty (if isArray then mkArrayType cenv.g argty else mkListTy cenv.g argty) let args', acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (List.map (fun _ -> argty) args) args (fun values -> @@ -5641,7 +5682,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p | SynPat.Record (flds, m) -> let tcref, fldsmap, _fldsList = BuildFieldMap cenv env true ty flds m // REVIEW: use _fldsList to type check pattern in code order not field defn order - let _, inst, tinst, gtyp = FreshenTyconRef2 m tcref + let _, inst, tinst, gtyp = FreshenTyconRef2 cenv.g m tcref UnifyTypes cenv env m ty gtyp let fields = tcref.TrueInstanceFieldsAsList let ftys = fields |> List.map (fun fsp -> actualTyOfRecdField inst fsp, fsp) @@ -5659,7 +5700,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p (fun _ -> TPat_range(c1, c2, m)), (tpenv, names, takenNames) | SynPat.Null m -> - try AddCxTypeMustSupportNull env.DisplayEnv cenv.css m NoTrace ty + try AddCxTypeDefnSupportsNull env.DisplayEnv cenv.css m NoTrace ty with e -> errorRecovery e m (fun _ -> TPat_null m), (tpenv, names, takenNames) @@ -5715,13 +5756,13 @@ and UnifyTypesAndRecover cenv env m expectedTy actualTy = errorRecovery e m and TcExprOfUnknownType cenv env tpenv expr = - let exprty = NewInferenceType () + let exprty = NewInferenceType cenv.g let expr', tpenv = TcExpr cenv exprty env tpenv expr expr', exprty, tpenv and TcExprFlex cenv flex compat ty (env: TcEnv) tpenv (e: SynExpr) = if flex then - let argty = NewInferenceType () + let argty = NewInferenceType cenv.g if compat then (destTyparTy cenv.g argty).SetIsCompatFlex(true) AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css e.Range NoTrace ty argty @@ -5761,7 +5802,7 @@ and TcExprNoRecover cenv ty (env: TcEnv) tpenv (expr: SynExpr) = // and has been added relatively late in F# 4.0 to preserve the structure of previous code. It pushes a 'delayed' parameter // through TcExprOfUnknownType, TcExpr and TcExprNoRecover and TcExprOfUnknownTypeThen cenv env tpenv expr delayed = - let exprty = NewInferenceType () + let exprty = NewInferenceType cenv.g let expr', tpenv = try TcExprThen cenv exprty env tpenv expr delayed @@ -5872,8 +5913,8 @@ and CheckSuperInit cenv objTy m = // TcExprUndelayed //------------------------------------------------------------------------- -and TcExprUndelayedNoType cenv env tpenv synExpr: Expr * TType * _ = - let overallTy = NewInferenceType () +and TcExprUndelayedNoType cenv env tpenv synExpr : Expr * TType * _ = + let overallTy = NewInferenceType cenv.g let expr, tpenv = TcExprUndelayed cenv overallTy env tpenv synExpr expr, overallTy, tpenv @@ -5995,11 +6036,11 @@ and TcExprUndelayed cenv overallTy env tpenv (synExpr: SynExpr) = expr, tpenv | SynExpr.Null m -> - AddCxTypeMustSupportNull env.DisplayEnv cenv.css m NoTrace overallTy + AddCxTypeDefnSupportsNull env.DisplayEnv cenv.css m NoTrace overallTy mkNull m overallTy, tpenv | SynExpr.Lazy (synInnerExpr, m) -> - let innerTy = NewInferenceType () + let innerTy = NewInferenceType cenv.g UnifyTypes cenv env m overallTy (mkLazyTy cenv.g innerTy) let innerExpr, tpenv = TcExpr cenv innerTy env tpenv synInnerExpr let expr = mkLazyDelayed cenv.g m innerTy (mkUnitDelayLambda cenv.g m innerExpr) @@ -6019,7 +6060,7 @@ and TcExprUndelayed cenv overallTy env tpenv (synExpr: SynExpr) = | SynExpr.ArrayOrList (isArray, args, m) -> CallExprHasTypeSink cenv.tcSink (m, env.NameEnv, overallTy, env.AccessRights) - let argty = NewInferenceType () + let argty = NewInferenceType cenv.g UnifyTypes cenv env m overallTy (if isArray then mkArrayType cenv.g argty else mkListTy cenv.g argty) // Always allow subsumption if a nominal type is known prior to type checking any arguments @@ -6118,7 +6159,7 @@ and TcExprUndelayed cenv overallTy env tpenv (synExpr: SynExpr) = TcExprUndelayed cenv overallTy env tpenv replacementExpr | _ -> - let genCollElemTy = NewInferenceType () + let genCollElemTy = NewInferenceType cenv.g let genCollTy = (if isArray then mkArrayType else mkListTy) cenv.g genCollElemTy @@ -6305,7 +6346,7 @@ and TcExprUndelayed cenv overallTy env tpenv (synExpr: SynExpr) = mkf n e2', tpenv | SynExpr.LibraryOnlyILAssembly (s, tyargs, args, rtys, m) -> - let argTys = NewInferenceTypes args + let argTys = NewInferenceTypes cenv.g args let tyargs', tpenv = TcTypes cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv tyargs // No subsumption at uses of IL assembly code let flexes = argTys |> List.map (fun _ -> false) @@ -6799,7 +6840,7 @@ and FreshenObjExprAbstractSlot cenv (env: TcEnv) (implty: TType) virtNameAndArit = FreshenAbstractSlot cenv.g cenv.amap mBinding synTyparDecls absSlot // Work out the required type of the member - let bindingTy = implty --> (mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot) + let bindingTy = mkFunTy cenv.g implty (mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot) Some(typarsFromAbsSlotAreRigid, typarsFromAbsSlot, bindingTy) @@ -6838,7 +6879,7 @@ and TcObjectExprBinding cenv (env: TcEnv) implty tpenv (absSlotInfo, bind) = | Some(_, _, memberTyFromAbsSlot) -> memberTyFromAbsSlot | _ -> - implty --> NewInferenceType () + mkFunTy cenv.g implty (NewInferenceType cenv.g) let (CheckedBindingInfo(inlineFlag, bindingAttribs, _, _, ExplicitTyparInfo(_, declaredTypars, _), nameToPrelimValSchemeMap, rhsExpr, _, _, m, _, _, _, _), tpenv) = let flex, tpenv = TcNonrecBindingTyparDecls cenv env tpenv bind @@ -7078,16 +7119,16 @@ and TcObjectExpr cenv overallTy env tpenv (synObjTy, argopt, binds, extraImpls, //------------------------------------------------------------------------- /// Check a constant string expression. It might be a 'printf' format string -and TcConstStringExpr cenv overallTy env m tpenv s = +and TcConstStringExpr cenv overallTy env m tpenv (s: string) = if (AddCxTypeEqualsTypeUndoIfFailed env.DisplayEnv cenv.css m overallTy cenv.g.string_ty) then mkString cenv.g m s, tpenv else - let aty = NewInferenceType () - let bty = NewInferenceType () - let cty = NewInferenceType () - let dty = NewInferenceType () - let ety = NewInferenceType () + let aty = NewInferenceType cenv.g + let bty = NewInferenceType cenv.g + let cty = NewInferenceType cenv.g + let dty = NewInferenceType cenv.g + let ety = NewInferenceType cenv.g let ty' = mkPrintfFormatTy cenv.g aty bty cty dty ety if (not (isObjTy cenv.g overallTy) && AddCxTypeMustSubsumeTypeUndoIfFailed env.DisplayEnv cenv.css m overallTy ty') then // Parse the format string to work out the phantom types @@ -7117,7 +7158,6 @@ and TcConstStringExpr cenv overallTy env m tpenv s = and TcConstExpr cenv overallTy env m tpenv c = match c with - // NOTE: these aren't "really" constants | SynConst.Bytes (bytes, m) -> UnifyTypes cenv env m overallTy (mkByteArrayTy cenv.g) Expr.Op (TOp.Bytes bytes, [], [], m), tpenv @@ -7210,7 +7250,7 @@ and TcRecdExpr cenv overallTy env tpenv (inherits, optOrigExpr, flds, mWholeExpr | [] -> [] | _ -> let tcref, _, fldsList = BuildFieldMap cenv env hasOrigExpr overallTy flds mWholeExpr - let _, _, _, gtyp = FreshenTyconRef2 mWholeExpr tcref + let _, _, _, gtyp = FreshenTyconRef2 cenv.g mWholeExpr tcref UnifyTypes cenv env mWholeExpr overallTy gtyp [ for n, v in fldsList do @@ -7313,7 +7353,7 @@ and TcAnonRecdExpr cenv overallTy env tpenv (isStruct, optOrigSynExpr, unsortedF // Unlike in the case of record type copy-and-update we do _not_ assume that the origExpr has the same type as the overall expression. // Unlike in the case of record type copy-and-update {| a with X = 1 |} does not force a.X to exist or have had type 'int' - let origExprTy = NewInferenceType() + let origExprTy = NewInferenceType cenv.g let origExprChecked, tpenv = TcExpr cenv origExprTy env tpenv origExpr let oldv, oldve = mkCompGenLocal mWholeExpr "inputRecord" origExprTy let mOrigExpr = origExpr.Range @@ -7556,7 +7596,7 @@ and TcForEachExpr cenv overallTy env tpenv (pat, enumSynExpr, bodySynExpr, mWhol //------------------------------------------------------------------------- and TcQuotationExpr cenv overallTy env tpenv (_oper, raw, ast, isFromQueryExpression, m) = - let astTy = NewInferenceType () + let astTy = NewInferenceType cenv.g // Assert the overall type for the domain of the quotation template UnifyTypes cenv env m overallTy (if raw then mkRawQuotedExprTy cenv.g else mkQuotedExprTy cenv.g astTy) @@ -8078,13 +8118,13 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder let varSpaceWithFirstVars = addVarsToVarSpace varSpace (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (firstSourcePat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (firstSourcePat, None) vspecs, envinner) let varSpaceWithSecondVars = addVarsToVarSpace varSpaceWithFirstVars (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (secondSourcePat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (secondSourcePat, None) vspecs, envinner) let varSpaceWithGroupJoinVars = @@ -8092,7 +8132,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder | Some pat3 -> addVarsToVarSpace varSpaceWithFirstVars (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat3, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (pat3, None) vspecs, envinner) | None -> varSpace @@ -8226,7 +8266,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder let varSpace = addVarsToVarSpace varSpace (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (pat, None) vspecs, envinner) Some (trans true q varSpace innerComp @@ -8385,7 +8425,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder | [NormalizedBinding(_vis, NormalBinding, false, false, _, _, _, _, pat, _, _, _)] -> // successful case use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (pat, None) vspecs, envinner | _ -> // error case @@ -8416,7 +8456,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder let varSpace = addVarsToVarSpace varSpace (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (pat, None) vspecs, envinner) let rhsExpr = mkSourceExprConditional isFromSource rhsExpr @@ -8475,7 +8515,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder let varSpace = addVarsToVarSpace varSpace (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (consumePat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (consumePat, None) vspecs, envinner) Some (transBind q varSpace bindRange bindNName sources consumePat letSpBind innerComp translatedCtxt) @@ -8491,7 +8531,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder let varSpace = addVarsToVarSpace varSpace (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (consumePat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (consumePat, None) vspecs, envinner) Some (transBind q varSpace bindRange bindNName sources consumePat letSpBind innerComp translatedCtxt) @@ -8549,7 +8589,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder let varSpace = addVarsToVarSpace varSpace (fun _mCustomOp env -> use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink - let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (consumePat, None) + let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType cenv.g) env tpenv (consumePat, None) vspecs, envinner) // Build the 'Bind' call @@ -8908,7 +8948,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder | SynExpr.YieldOrReturn ((_, true), _, _) -> { env with eContextInfo = ContextInfo.ReturnInComputationExpression } | _ -> env - let lambdaExpr, tpenv= TcExpr cenv (builderTy --> overallTy) env tpenv lambdaExpr + let lambdaExpr , tpenv= TcExpr cenv (mkFunTy cenv.g builderTy overallTy) env tpenv lambdaExpr // beta-var-reduce to bind the builder using a 'let' binding let coreExpr = mkApps cenv.g ((lambdaExpr, tyOfExpr cenv.g lambdaExpr), [], [interpExpr], mBuilderVal) @@ -8923,7 +8963,7 @@ and TcComputationExpression cenv env overallTy mWhole (interpExpr: Expr) builder /// Also "ienumerable extraction" is performed on arguments to "for". and TcSequenceExpression cenv env tpenv comp overallTy m = - let genEnumElemTy = NewInferenceType () + let genEnumElemTy = NewInferenceType cenv.g UnifyTypes cenv env m overallTy (mkSeqTy cenv.g genEnumElemTy) // Allow subsumption at 'yield' if the element type is nominal prior to the analysis of the body of the sequence expression @@ -9038,8 +9078,8 @@ and TcSequenceExpression cenv env tpenv comp overallTy m = // 'use x = expr in expr' | SynExpr.LetOrUse (_isRec, true, [Binding (_vis, NormalBinding, _, _, _, _, _, pat, _, rhsExpr, _, _spBind)], innerComp, wholeExprMark) -> - let bindPatTy = NewInferenceType () - let inputExprTy = NewInferenceType () + let bindPatTy = NewInferenceType cenv.g + let inputExprTy = NewInferenceType cenv.g let pat', _, vspecs, envinner, tpenv = TcMatchPattern cenv bindPatTy env tpenv (pat, None) UnifyTypes cenv env m inputExprTy bindPatTy let inputExpr, tpenv = TcExpr cenv inputExprTy env tpenv rhsExpr @@ -9079,8 +9119,8 @@ and TcSequenceExpression cenv env tpenv comp overallTy m = AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace genOuterTy genExprTy Some(mkCoerceExpr(resultExpr, genOuterTy, m, genExprTy), tpenv) - | SynExpr.YieldOrReturn ((isYield, _), yieldExpr, m) -> - let genResultTy = NewInferenceType () + | SynExpr.YieldOrReturn((isYield, _), yieldExpr, m) -> + let genResultTy = NewInferenceType cenv.g if not isYield then errorR(Error(FSComp.SR.tcSeqResultsUseYield(), m)) UnifyTypes cenv env m genOuterTy (mkSeqTy cenv.g genResultTy) @@ -9109,7 +9149,7 @@ and TcSequenceExpression cenv env tpenv comp overallTy m = if hasTypeUnit then Choice2Of2 expr, tpenv else - let genResultTy = NewInferenceType () + let genResultTy = NewInferenceType cenv.g UnifyTypes cenv env m genOuterTy (mkSeqTy cenv.g genResultTy) let exprTy = tyOfExpr cenv.g expr AddCxTypeMustSubsumeType env.eContextInfo env.DisplayEnv cenv.css m NoTrace genResultTy exprTy @@ -9277,7 +9317,7 @@ and TcNameOfExpr cenv env tpenv (synArg: SynExpr) = | Result tcref when IsEntityAccessible cenv.amap m ad tcref -> () // resolved to a type name, done with checks | _ -> - let overallTy = match overallTyOpt with None -> NewInferenceType() | Some t -> t + let overallTy = match overallTyOpt with None -> NewInferenceType cenv.g | Some t -> t let _, _ = TcLongIdentThen cenv overallTy env tpenv lidd delayed () // checked as an expression, done with checks List.last longId @@ -9381,7 +9421,7 @@ and TcItemThen cenv overallTy env tpenv (item, mItem, rest, afterResolution) del // x where x is a union case or active pattern result tag. | (Item.UnionCase _ | Item.ExnCase _ | Item.ActivePatternResult _) as item -> // ucaseAppTy is the type of the union constructor applied to its (optional) argument - let ucaseAppTy = NewInferenceType () + let ucaseAppTy = NewInferenceType g let mkConstrApp, argTys, argNames = match item with | Item.ActivePatternResult(apinfo, _, n, _) -> @@ -9392,8 +9432,8 @@ and TcItemThen cenv overallTy env tpenv (item, mItem, rest, afterResolution) del mkConstrApp, [ucaseAppTy], [ for (s, m) in apinfo.ActiveTagsWithRanges -> mkSynId m s ] | _ -> let ucref = mkChoiceCaseRef g mItem aparity n - let _, _, tinst, _ = FreshenTyconRef2 mItem ucref.TyconRef - let ucinfo = UnionCaseInfo (tinst, ucref) + let _, _, tinst, _ = FreshenTyconRef2 g mItem ucref.TyconRef + let ucinfo = UnionCaseInfo(tinst, ucref) ApplyUnionCaseOrExnTypes mItem cenv env ucaseAppTy (Item.UnionCase(ucinfo, false)) | _ -> ApplyUnionCaseOrExnTypes mItem cenv env ucaseAppTy item @@ -9466,8 +9506,8 @@ and TcItemThen cenv overallTy env tpenv (item, mItem, rest, afterResolution) del (currentIndex <> SEEN_NAMED_ARGUMENT) && (currentIndex < numArgTys) && match stripTyEqns g argTys.[currentIndex] with - | TType_app(tcref, _) -> tyconRefEq g g.bool_tcr tcref || tyconRefEq g g.system_Bool_tcref tcref - | TType_var(_) -> true + | TType_app (tcref, _, _) -> tyconRefEq g g.bool_tcr tcref || tyconRefEq g g.system_Bool_tcref tcref + | TType_var _ -> true | _ -> false if isSpecialCaseForBackwardCompatibility then @@ -9677,7 +9717,7 @@ and TcItemThen cenv overallTy env tpenv (item, mItem, rest, afterResolution) del let traitInfo = TTrait(argTys, logicalCompiledName, memberFlags, argTys, Some retTy, sln) let expr = Expr.Op (TOp.TraitCall traitInfo, [], ves, mItem) - let expr = mkLambdas mItem [] vs (expr, retTy) + let expr = mkLambdas g mItem [] vs (expr, retTy) let rec isSimpleArgument e = match e with @@ -9755,7 +9795,8 @@ and TcItemThen cenv overallTy env tpenv (item, mItem, rest, afterResolution) del let delayed1, delayed2 = let pred = (function (DelayedApp (_, arg, _)) -> isSimpleArgument arg | _ -> false) List.takeWhile pred delayed, List.skipWhile pred delayed - let intermediateTy = if isNil delayed2 then overallTy else NewInferenceType () + + let intermediateTy = if isNil delayed2 then overallTy else NewInferenceType g let resultExpr, tpenv = TcDelayed cenv intermediateTy env tpenv mItem (MakeApplicableExprNoFlex cenv expr) (tyOfExpr g expr) ExprAtomicFlag.NonAtomic delayed1 @@ -10144,7 +10185,7 @@ and TcEventValueThen cenv overallTy env tpenv mItem mExprAndItem objDetails (ein (let dv, de = mkCompGenLocal mItem "eventDelegate" delegateType let callExpr, _ = BuildPossiblyConditionalMethodCall cenv env PossiblyMutates mItem false einfo.RemoveMethod NormalValUse [] objVars [de] mkLambda mItem dv (callExpr, cenv.g.unit_ty)) - (let fvty = (cenv.g.obj_ty --> (argsTy --> cenv.g.unit_ty)) + (let fvty = (mkFunTy cenv.g cenv.g.obj_ty (mkFunTy cenv.g argsTy cenv.g.unit_ty)) let fv, fe = mkCompGenLocal mItem "callback" fvty let createExpr = BuildNewDelegateExpr (Some einfo, cenv.g, cenv.amap, delegateType, invokeMethInfo, compiledViewOfDelArgTys, fe, fvty, mItem) mkLambda mItem fv (createExpr, delegateType))) @@ -10186,7 +10227,7 @@ and TcMethodApplicationThen // Work out if we know anything about the return type of the overall expression. If there are any delayed // lookups then we don't know anything. - let exprTy = if isNil delayed then overallTy else NewInferenceType () + let exprTy = if isNil delayed then overallTy else NewInferenceType cenv.g // Call the helper below to do the real checking let (expr, attributeAssignedNamedItems, delayed), tpenv = @@ -10206,13 +10247,13 @@ and TcMethodApplicationThen /// Infer initial type information at the callsite from the syntax of an argument, prior to overload resolution. and GetNewInferenceTypeForMethodArg cenv env tpenv x = match x with - | SynExprParen(a, _, _, _) -> GetNewInferenceTypeForMethodArg cenv env tpenv a + | SynExprParen (a, _, _, _) -> GetNewInferenceTypeForMethodArg cenv env tpenv a | SynExpr.AddressOf (true, a, _, m) -> mkByrefTyWithInference cenv.g (GetNewInferenceTypeForMethodArg cenv env tpenv a) (NewByRefKindInferenceType cenv.g m) - | SynExpr.Lambda (_, _, _, a, _) -> mkFunTy (NewInferenceType ()) (GetNewInferenceTypeForMethodArg cenv env tpenv a) + | SynExpr.Lambda (_, _, _, a, _) -> mkFunTy cenv.g (NewInferenceType cenv.g) (GetNewInferenceTypeForMethodArg cenv env tpenv a) | SynExpr.Quote (_, raw, a, _, _) -> if raw then mkRawQuotedExprTy cenv.g else mkQuotedExprTy cenv.g (GetNewInferenceTypeForMethodArg cenv env tpenv a) - | _ -> NewInferenceType () + | _ -> NewInferenceType cenv.g /// Method calls, property lookups, attribute constructions etc. get checked through here and TcMethodApplication @@ -10251,7 +10292,7 @@ and TcMethodApplication let curriedCallerArgs, exprTy, delayed = match calledMeths with | [calledMeth] when not isProp && calledMeth.NumArgs.Length > 1 -> - [], NewInferenceType (), [ for x in curriedCallerArgs -> DelayedApp(ExprAtomicFlag.NonAtomic, x, x.Range) ] @ delayed + [], NewInferenceType cenv.g, [ for x in curriedCallerArgs -> DelayedApp(ExprAtomicFlag.NonAtomic, x, x.Range) ] @ delayed | _ when not isProp && calledMeths |> List.exists (fun calledMeth -> calledMeth.NumArgs.Length > 1) -> // This condition should only apply when multiple conflicting curried extension members are brought into scope error(Error(FSComp.SR.tcOverloadsCannotHaveCurriedArguments(), mMethExpr)) @@ -10325,7 +10366,7 @@ and TcMethodApplication curriedCalledArgs.Head |> List.forall isSimpleFormalArg) -> // The call lambda has function type - let exprTy = mkFunTy (NewInferenceType ()) exprTy + let exprTy = mkFunTy cenv.g (NewInferenceType cenv.g) exprTy (None, Some unnamedCurriedCallerArgs.Head.Head, exprTy) @@ -10350,7 +10391,7 @@ and TcMethodApplication let GenerateMatchingSimpleArgumentTypes (calledMeth: MethInfo) = let curriedMethodArgAttribs = calledMeth.GetParamAttribs(cenv.amap, mItem) curriedMethodArgAttribs - |> List.map (List.filter isSimpleFormalArg >> NewInferenceTypes) + |> List.map (List.filter isSimpleFormalArg >> NewInferenceTypes cenv.g) let UnifyMatchingSimpleArgumentTypes exprTy (calledMeth: MethInfo) = let curriedArgTys = GenerateMatchingSimpleArgumentTypes calledMeth @@ -11024,9 +11065,9 @@ and TcAndBuildFixedExpr cenv env (overallPatTy, fixedExpr, overallExprTy, mBindi let elemPtrTy = mkNativePtrTy cenv.g elemTy UnifyTypes cenv env mBinding elemPtrTy overallPatTy - // let ptr: nativeptr = - // let tmpArray: elem[] = arr - // if nonNull tmpArray then + // let ptr : nativeptr = + // let tmpArray : elem[] = arr + // if notNull tmpArray then // if tmpArray.Length <> 0 then // let pinned tmpArrayByref: byref = &arr.[0] // (nativeint) tmpArrayByref @@ -11085,7 +11126,7 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt let isFixed, rhsExpr, overallPatTy, overallExprTy = match rhsExpr with - | SynExpr.Fixed (e, _) -> true, e, NewInferenceType(), overallTy + | SynExpr.Fixed (e, _) -> true, e, NewInferenceType cenv.g, overallTy | e -> false, e, overallTy, overallTy // Check the attributes of the binding, parameters or return value @@ -11138,7 +11179,7 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt if Option.isSome memberFlagsOpt then errorR(Error(FSComp.SR.tcEntryPointAttributeRequiresFunctionInModule(), mBinding)) else - UnifyTypes cenv env mBinding overallPatTy (mkArrayType cenv.g cenv.g.string_ty --> cenv.g.int_ty) + UnifyTypes cenv env mBinding overallPatTy (mkFunTy cenv.g (mkArrayType cenv.g cenv.g.string_ty) cenv.g.int_ty) if isMutable && isInline then errorR(Error(FSComp.SR.tcMutableValuesCannotBeInline(), mBinding)) @@ -11217,7 +11258,7 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt // Assert the return type of an active pattern match apinfoOpt with | Some (apinfo, ty, _) -> - let activePatResTys = NewInferenceTypes apinfo.ActiveTags + let activePatResTys = NewInferenceTypes cenv.g apinfo.ActiveTags let _, rty = stripFunTy cenv.g ty UnifyTypes cenv env mBinding (apinfo.ResultType cenv.g rhsExpr.Range activePatResTys) rty | None -> @@ -11388,7 +11429,7 @@ and TcAttribute canFail cenv (env: TcEnv) attrTgt (synAttr: SynAttribute) = let meths = minfos |> List.map (fun minfo -> minfo, None) let afterResolution = ForNewConstructors cenv.tcSink env tyid.idRange methodName minfos let (expr, attributeAssignedNamedItems, _), _ = - TcMethodApplication true cenv env tpenv None [] mAttr mAttr methodName None ad PossiblyMutates false meths afterResolution NormalValUse [arg] (NewInferenceType ()) [] + TcMethodApplication true cenv env tpenv None [] mAttr mAttr methodName None ad PossiblyMutates false meths afterResolution NormalValUse [arg] (NewInferenceType cenv.g) [] UnifyTypes cenv env mAttr ty (tyOfExpr cenv.g expr) @@ -11483,7 +11524,7 @@ and TcAttributes cenv env attrTgt synAttribs = and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBindsRange, scopem) = // Typecheck all the bindings... - let checkedBinds, tpenv = List.mapFold (fun tpenv b -> TcNonRecursiveBinding declKind cenv env tpenv (NewInferenceType ()) b) tpenv synBinds + let checkedBinds, tpenv = List.mapFold (fun tpenv b -> TcNonRecursiveBinding declKind cenv env tpenv (NewInferenceType cenv.g) b) tpenv synBinds let (ContainerInfo(altActualParent, _)) = containerInfo // Canonicalize constraints prior to generalization @@ -11790,10 +11831,10 @@ and ApplyAbstractSlotInference (cenv: cenv) (envinner: TcEnv) (bindingTy, m, syn then mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot else match argTysFromAbsSlot with - | [argTysFromAbsSlot] -> mkRefTupledTy cenv.g argTysFromAbsSlot --> cenv.g.unit_ty + | [argTysFromAbsSlot] -> mkFunTy cenv.g (mkRefTupledTy cenv.g argTysFromAbsSlot) cenv.g.unit_ty | _ -> error(Error(FSComp.SR.tcInvalidSignatureForSet(), memberId.idRange)) - retTyFromAbsSlot --> cenv.g.unit_ty + mkFunTy cenv.g retTyFromAbsSlot cenv.g.unit_ty UnifyTypes cenv envinner m bindingTy absSlotTy) @@ -11883,11 +11924,11 @@ and AnalyzeRecursiveStaticMemberOrValDecl | Some superTy -> MakeAndPublishBaseVal cenv envinner (match baseValOpt with None -> None | Some v -> Some v.Id) superTy | None -> None - let domainTy = NewInferenceType () + let domainTy = NewInferenceType cenv.g // This is the type we pretend a constructor has, because its implementation must ultimately appear to return a value of the given type // This is somewhat awkward later in codegen etc. - UnifyTypes cenv envinner mBinding ty (domainTy --> objTy) + UnifyTypes cenv envinner mBinding ty (mkFunTy cenv.g domainTy objTy) safeThisValOpt, baseValOpt @@ -11937,8 +11978,8 @@ and AnalyzeRecursiveInstanceMemberDecl let baseValOpt = if tcref.IsFSharpObjectModelTycon then baseValOpt else None // Apply the known type of 'this' - let bindingTy = NewInferenceType () - UnifyTypes cenv envinner mBinding ty (thisTy --> bindingTy) + let bindingTy = NewInferenceType cenv.g + UnifyTypes cenv envinner mBinding ty (mkFunTy cenv.g thisTy bindingTy) CheckForNonAbstractInterface declKind tcref memberFlags memberId.idRange @@ -12039,7 +12080,7 @@ and AnalyzeAndMakeAndPublishRecursiveValue overridesOK isGeneratedEventVal cenv let bindingAttribs = TcAttributes cenv env attrTgt bindingSynAttribs // Allocate the type inference variable for the inferred type - let ty = NewInferenceType () + let ty = NewInferenceType cenv.g let inlineFlag = ComputeInlineFlag memberFlagsOpt isInline isMutable mBinding @@ -12505,7 +12546,7 @@ and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiv | Some bind -> let m = expr.Range let tps, vsl, body, returnTy = stripTopLambda (expr, vspec.Type) - mkMultiLambdas m tps vsl (mkLetBind m bind body, returnTy) + mkMultiLambdas cenv.g m tps vsl (mkLetBind m bind body, returnTy) // Add a call to CheckInit if necessary for instance members let expr = @@ -12518,7 +12559,7 @@ and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiv let thisVar = vsl.Head.Head let thisTypeInst = argsOfAppTy cenv.g thisVar.Type let newBody = MakeCheckSafeInitField cenv.g thisTypeInst (Some thisVar) rfref (mkOne cenv.g m) body - mkMultiLambdas m tps vsl (newBody, returnTy) + mkMultiLambdas cenv.g m tps vsl (newBody, returnTy) | NoSafeInitInfo -> expr @@ -12531,7 +12572,7 @@ and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiv | _ -> let m = expr.Range let tps, vsl, body, returnTy = stripTopLambda (expr, vspec.Type) - mkMemberLambdas m tps None baseValOpt vsl (body, returnTy) + mkMemberLambdas cenv.g m tps None baseValOpt vsl (body, returnTy) { ValScheme = pgrbind.ValScheme Binding = TBind(vspec, expr, spBind) } @@ -12849,8 +12890,8 @@ module TcRecdUnionAndEnumDeclarations = begin Construct.NewRecdField true (Some v) id false thisTy false false [] attrs (xmldoc.ToXmlDoc()) vis false let TcEnumDecls cenv env parent thisTy enumCases = - let fieldTy = NewInferenceType () - let enumCases' = enumCases |> List.map (TcEnumDecl cenv env parent thisTy fieldTy) |> CheckDuplicates (fun f -> f.Id) "enum element" + let fieldTy = NewInferenceType cenv.g + let enumCases' = enumCases |> List.map (TcEnumDecl cenv env parent thisTy fieldTy) |> CheckDuplicates (fun f -> f.Id) "enum element" fieldTy, enumCases' end @@ -13043,7 +13084,7 @@ module IncrClassChecking = let ctorValScheme, ctorVal = let argty = mkRefTupledTy cenv.g (typesOfVals ctorArgs) // Initial type has known information - let ctorTy = mkFunTy argty objTy + let ctorTy = mkFunTy cenv.g argty objTy // REVIEW: no attributes can currently be specified for the implicit constructor let attribs = TcAttributes cenv env (AttributeTargets.Constructor ||| AttributeTargets.Method) attrs let memberFlags = CtorMemberFlags @@ -13069,7 +13110,7 @@ module IncrClassChecking = lazy (let cctorArgs = [ fst(mkCompGenLocal m "unitVar" cenv.g.unit_ty) ] - let cctorTy = mkFunTy cenv.g.unit_ty cenv.g.unit_ty + let cctorTy = mkFunTy cenv.g cenv.g.unit_ty cenv.g.unit_ty let valSynData = SynValInfo([[]], SynInfo.unnamedRetVal) let id = ident ("cctor", m) CheckForNonAbstractInterface ModuleOrMemberBinding tcref ClassCtorMemberFlags id.idRange @@ -13239,7 +13280,7 @@ module IncrClassChecking = if isStatic then tauTy, topValInfo else - let tauTy = ctorInfo.InstanceCtorThisVal.Type --> v.TauType + let tauTy = mkFunTy cenv.g ctorInfo.InstanceCtorThisVal.Type v.TauType let (ValReprInfo(tpNames, args, ret)) = topValInfo let topValInfo = ValReprInfo(tpNames, ValReprInfo.selfMetadata :: args, ret) tauTy, topValInfo @@ -13534,7 +13575,7 @@ module IncrClassChecking = | InMethod(isStatic, methodVal, _) -> let _, chooseTps, tauExpr, tauTy, m = match rhsExpr with - | Expr.TyChoose (chooseTps, b, _) -> [], chooseTps, b, (tyOfExpr g b), m + | Expr.TyChoose (chooseTps, b, _) -> [], chooseTps, b, tyOfExpr g b, m | Expr.TyLambda (_, tps, Expr.TyChoose (chooseTps, b, _), m, returnTy) -> tps, chooseTps, b, returnTy, m | Expr.TyLambda (_, tps, b, m, returnTy) -> tps, [], b, returnTy, m | e -> [], [], e, (tyOfExpr g e), e.Range @@ -13739,7 +13780,7 @@ module IncrClassChecking = let ctorBody = List.foldBack (fun (_, binder) acc -> binder acc) ctorInitActionsPre ctorBody // Add the final wrapping to make this into a method - let ctorBody = mkMemberLambdas m [] (Some thisVal) ctorInfo.InstanceCtorBaseValOpt [ctorInfo.InstanceCtorArgs] (ctorBody, g.unit_ty) + let ctorBody = mkMemberLambdas g m [] (Some thisVal) ctorInfo.InstanceCtorBaseValOpt [ctorInfo.InstanceCtorArgs] (ctorBody, g.unit_ty) ctorBody @@ -13753,8 +13794,8 @@ module IncrClassChecking = let cctorArgs, cctorVal, _ = ctorInfo.StaticCtorValInfo.Force() // Reconstitute the type of the implicit class constructor with the correct quantified type variables. cctorVal.SetType (mkForallTyIfNeeded ctorDeclaredTypars cctorVal.TauType) - let cctorBody = mkMemberLambdas m [] None None [cctorArgs] (cctorInitAction, g.unit_ty) - Some cctorBody + let cctorBody = mkMemberLambdas g m [] None None [cctorArgs] (cctorInitAction, g.unit_ty) + Some(cctorBody) ctorBody, cctorBodyOpt, methodBinds, reps @@ -13835,8 +13876,6 @@ module MutRecBindingChecking = type MutRecDefnsPhase2CData = MutRecShape list - - // Phase2A: create member prelimRecValues for "recursive" items, i.e. ctor val and member vals // Phase2A: also processes their arg patterns - collecting type assertions let TcMutRecBindings_Phase2A_CreateRecursiveValuesAndCheckArgumentPatterns cenv tpenv (envMutRec, mutRecDefns: MutRecDefnsPhase2Info) = @@ -14161,7 +14200,7 @@ module MutRecBindingChecking = errorR(Error(FSComp.SR.tcDllImportNotAllowed(), bind.Var.Range)) let nm = bind.Var.DisplayName - let ty = generalizedTyconRef tcref + let ty = generalizedTyconRef g tcref let ad = envNonRec.eAccessRights match TryFindIntrinsicMethInfo cenv.infoReader bind.Var.Range ad nm ty, TryFindPropInfo cenv.infoReader bind.Var.Range ad nm ty with @@ -14238,7 +14277,6 @@ module MutRecBindingChecking = // Fixup recursive references to members. let TcMutRecBindings_Phase2C_FixupRecursiveReferences cenv (denv, defnsBs: MutRecDefnsPhase2BData, generalizedTyparsForRecursiveBlock: Typar list, generalizedRecBinds: PostGeneralizationRecursiveBinding list, scopem) = let g = cenv.g - // Build an index ---> binding map let generalizedBindingsMap = generalizedRecBinds |> List.map (fun pgrbind -> (pgrbind.RecBindingInfo.Index, pgrbind)) |> Map.ofList @@ -14329,7 +14367,7 @@ module MutRecBindingChecking = | _ -> false) if needsSafeStaticInit && hasStaticBindings then - let rfield = MakeSafeInitField g envForDecls tcref.Range true + let rfield = MakeSafeInitField g envForDecls tcref.Range true SafeInitField(mkRecdFieldRef tcref rfield.Name, rfield) else NoSafeInitInfo @@ -14427,6 +14465,7 @@ module MutRecBindingChecking = /// Check a "module X = A.B.C" module abbreviation declaration let TcModuleAbbrevDecl (cenv: cenv) scopem env (id, p, m) = + let g = cenv.g let ad = env.eAccessRights let resolved = match p with @@ -14439,7 +14478,7 @@ module MutRecBindingChecking = errorR(Error(FSComp.SR.tcModuleAbbreviationForNamespace(fullDisplayTextOfModRef (List.head modrefs)), m)) let modrefs = modrefs |> List.filter (fun mvv -> not mvv.IsNamespace) if isNil modrefs then env else - modrefs |> List.iter (fun modref -> CheckEntityAttributes cenv.g modref m |> CommitOperationResult) + modrefs |> List.iter (fun modref -> CheckEntityAttributes g modref m |> CommitOperationResult) let env = AddModuleAbbreviationAndReport cenv.tcSink scopem id modrefs env env @@ -14459,6 +14498,7 @@ module MutRecBindingChecking = /// Compute the active environments within each nested module. let TcMutRecDefns_ComputeEnvs getTyconOpt getVals (cenv: cenv) report scopem m envInitial mutRecShape = + let g = cenv.g (envInitial, mutRecShape) ||> MutRecShapes.computeEnvs (fun envAbove (MutRecDefnsPhase2DataForModule (mtypeAcc, mspec)) -> MakeInnerEnvWithAcc envAbove mspec.Id mtypeAcc mspec.ModuleOrNamespaceType.ModuleOrNamespaceKind) (fun envAbove decls -> @@ -14491,15 +14531,15 @@ module MutRecBindingChecking = let envForDecls = envAbove // Add the modules being defined - let envForDecls = (envForDecls, mspecs) ||> List.fold ((if report then AddLocalSubModuleAndReport cenv.tcSink scopem else AddLocalSubModule) cenv.g cenv.amap m) + let envForDecls = (envForDecls, mspecs) ||> List.fold ((if report then AddLocalSubModuleAndReport cenv.tcSink scopem else AddLocalSubModule) g cenv.amap m) // Process the 'open' declarations let envForDecls = (envForDecls, opens) ||> List.fold (fun env (mp, m, moduleRange) -> TcOpenDecl cenv.tcSink cenv.g cenv.amap m moduleRange env mp) // Add the type definitions being defined - let envForDecls = (if report then AddLocalTyconsAndReport cenv.tcSink scopem else AddLocalTycons) cenv.g cenv.amap m tycons envForDecls + let envForDecls = (if report then AddLocalTyconsAndReport cenv.tcSink scopem else AddLocalTycons) g cenv.amap m tycons envForDecls // Add the exception definitions being defined let envForDecls = (envForDecls, exns) ||> List.fold (AddLocalExnDefnAndReport cenv.tcSink scopem) // Add the modules again (but don't report them a second time) - let envForDecls = (envForDecls, mspecs) ||> List.fold (AddLocalSubModule cenv.g cenv.amap m) + let envForDecls = (envForDecls, mspecs) ||> List.fold (AddLocalSubModule g cenv.amap m) // Add the module abbreviations let envForDecls = (envForDecls, moduleAbbrevs) ||> List.fold (TcModuleAbbrevDecl cenv scopem) // Add the values and members @@ -14647,7 +14687,7 @@ let TcMutRecDefns_Phase2 cenv envInitial bindsm scopem mutRecNSInfo (envMutRec: let overridesOK = DeclKind.CanOverrideOrImplement declKind members |> List.collect (function | SynMemberDefn.Interface(ity, defnOpt, _) -> - let _, ty = if tcref.Deref.IsExceptionDecl then [], g.exn_ty else generalizeTyconRef tcref + let ty = if tcref.Deref.IsExceptionDecl then g.exn_ty else generalizedTyconRef g tcref let m = ity.Range if tcref.IsTypeAbbrev then error(Error(FSComp.SR.tcTypeAbbreviationsCannotHaveInterfaceDeclaration(), m)) if tcref.IsEnumTycon then error(Error(FSComp.SR.tcEnumerationsCannotHaveInterfaceDeclaration(), m)) @@ -14767,7 +14807,7 @@ module AddAugmentationDeclarations = if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon && scSet.Contains tycon.Stamp then let tcref = mkLocalTyconRef tycon let tcaug = tycon.TypeContents - let _, ty = if tcref.Deref.IsExceptionDecl then [], g.exn_ty else generalizeTyconRef tcref + let ty = if tcref.Deref.IsExceptionDecl then g.exn_ty else generalizedTyconRef g tcref let m = tycon.Range let genericIComparableTy = mkAppTy g.system_GenericIComparable_tcref [ty] @@ -14821,7 +14861,7 @@ module AddAugmentationDeclarations = let AddGenericCompareBindings cenv (tycon: Tycon) = - if (* AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon && *) Option.isSome tycon.GeneratedCompareToValues then + if (* AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon && *) Option.isSome tycon.GeneratedCompareToValues then AugmentWithHashCompare.MakeBindingsForCompareAugmentation cenv.g tycon else [] @@ -14854,7 +14894,7 @@ module AddAugmentationDeclarations = if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then let tcref = mkLocalTyconRef tycon let tcaug = tycon.TypeContents - let _, ty = if tcref.Deref.IsExceptionDecl then [], g.exn_ty else generalizeTyconRef tcref + let ty = if tcref.Deref.IsExceptionDecl then g.exn_ty else generalizedTyconRef g tcref let m = tycon.Range // Note: tycon.HasOverride only gives correct results after we've done the type augmentation @@ -14893,7 +14933,7 @@ module TyconConstraintInference = // Initially, assume the equality relation is available for all structural type definitions let initialAssumedTycons = set [ for (tycon, _) in tyconsWithStructuralTypes do - if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon then + if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon then yield tycon.Stamp ] // Initially, don't assume that the equality relation is dependent on any type variables @@ -14909,7 +14949,7 @@ module TyconConstraintInference = let rec checkIfFieldTypeSupportsComparison (tycon: Tycon) (ty: TType) = // Is the field type a type parameter? - match tryDestTyparTy cenv.g ty with + match tryDestTyparTy g ty with | ValueSome tp -> // Look for an explicit 'comparison' constraint if tp.Constraints |> List.exists (function TyparConstraint.SupportsComparison _ -> true | _ -> false) then @@ -14957,8 +14997,8 @@ module TyconConstraintInference = assumedTycons |> Set.filter (fun tyconStamp -> let (tycon, structuralTypes) = tab.[tyconStamp] - if cenv.g.compilingFslib && - AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon && + if g.compilingFslib && + AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon && not (HasFSharpAttribute g g.attrib_StructuralComparisonAttribute tycon.Attribs) && not (HasFSharpAttribute g g.attrib_NoComparisonAttribute tycon.Attribs) then errorR(Error(FSComp.SR.tcFSharpCoreRequiresExplicit(), tycon.Range)) @@ -15024,7 +15064,7 @@ module TyconConstraintInference = // Initially, assume the equality relation is available for all structural type definitions let initialAssumedTycons = set [ for (tycon, _) in tyconsWithStructuralTypes do - if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon then + if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then yield tycon.Stamp ] // Initially, don't assume that the equality relation is dependent on any type variables @@ -15038,7 +15078,7 @@ module TyconConstraintInference = // Checks if a field type supports the 'equality' constraint based on the assumptions about the type constructors // and type parameters. let rec checkIfFieldTypeSupportsEquality (tycon: Tycon) (ty: TType) = - match tryDestTyparTy cenv.g ty with + match tryDestTyparTy g ty with | ValueSome tp -> // Look for an explicit 'equality' constraint if tp.Constraints |> List.exists (function TyparConstraint.SupportsEquality _ -> true | _ -> false) then @@ -15085,8 +15125,8 @@ module TyconConstraintInference = let (tycon, structuralTypes) = tab.[tyconStamp] - if cenv.g.compilingFslib && - AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon && + if g.compilingFslib && + AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon && not (HasFSharpAttribute g g.attrib_StructuralEqualityAttribute tycon.Attribs) && not (HasFSharpAttribute g g.attrib_NoEqualityAttribute tycon.Attribs) then errorR(Error(FSComp.SR.tcFSharpCoreRequiresExplicit(), tycon.Range)) @@ -15098,7 +15138,7 @@ module TyconConstraintInference = if not res then match TryFindFSharpBoolAttribute g g.attrib_StructuralEqualityAttribute tycon.Attribs with | Some true -> - if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon then + if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then match structuralTypes |> List.tryFind (fst >> checkIfFieldTypeSupportsEquality tycon >> not) with | None -> assert false @@ -15113,7 +15153,7 @@ module TyconConstraintInference = | Some false -> () | None -> - if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon then + if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then match structuralTypes |> List.tryFind (fst >> checkIfFieldTypeSupportsEquality tycon >> not) with | None -> assert false @@ -15183,7 +15223,7 @@ module TcExceptionDeclarations = Construct.NewExn cpath id vis repr attrs (doc.ToXmlDoc()) let TcExnDefnCore_Phase1G_EstablishRepresentation cenv env parent (exnc: Entity) (SynExceptionDefnRepr(_, UnionCase(_, _, args, _, _, _), reprIdOpt, _, _, m)) = - let g = cenv.g + let g = cenv.g let args = match args with (UnionCaseFields args) -> args | _ -> error(Error(FSComp.SR.tcExplicitTypeSpecificationCannotBeUsedForExceptionConstructors(), m)) let ad = env.eAccessRights let id = exnc.Id @@ -15193,7 +15233,7 @@ module TcExceptionDeclarations = match idOpt with | Some fieldId -> let tcref = mkLocalTyconRef exnc - let thisTypInst, _ = generalizeTyconRef tcref + let thisTypInst, _ = generalizeTyconRef g tcref let item = Item.RecdField (RecdFieldInfo (thisTypInst, RecdFieldRef (tcref, fieldId.idText))) CallNameResolutionSink cenv.tcSink (fieldId.idRange, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.AccessRights) | _ -> () @@ -16001,7 +16041,7 @@ module EstablishTypeDefinitionCores = let id = tycon.Id let thisTyconRef = mkLocalTyconRef tycon let innerParent = Parent thisTyconRef - let thisTyInst, thisTy = generalizeTyconRef thisTyconRef + let thisTyInst, thisTy = generalizeTyconRef g thisTyconRef let hasAbstractAttr = HasFSharpAttribute g g.attrib_AbstractClassAttribute attrs let hasSealedAttr = @@ -16033,8 +16073,8 @@ module EstablishTypeDefinitionCores = let allowNullLiteralAttributeCheck() = if hasAllowNullLiteralAttr then - tycon.TypeContents.tcaug_super |> Option.iter (fun ty -> if not (TypeNullIsExtraValue g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m))) - tycon.ImmediateInterfaceTypesOfFSharpTycon |> List.iter (fun ty -> if not (TypeNullIsExtraValue g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m))) + tycon.TypeContents.tcaug_super |> Option.iter (fun ty -> if not (TypeNullIsExtraValueOld g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m))) + tycon.ImmediateInterfaceTypesOfFSharpTycon |> List.iter (fun ty -> if not (TypeNullIsExtraValueOld g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m))) let structLayoutAttributeCheck allowed = @@ -16050,9 +16090,9 @@ module EstablishTypeDefinitionCores = errorR (Error(FSComp.SR.tcGenericTypesCannotHaveStructLayout(), m)) | None -> () - let hiddenReprChecks hasRepr = + let hiddenReprChecks(hasRepr) = structLayoutAttributeCheck false - if hasSealedAttr = Some false || (hasRepr && hasSealedAttr <> Some true && not (id.idText = "Unit" && g.compilingFslib) ) then + if hasSealedAttr = Some false || (hasRepr && hasSealedAttr <> Some(true) && not (id.idText = "Unit" && g.compilingFslib) ) then errorR(Error(FSComp.SR.tcRepresentationOfTypeHiddenBySignature(), m)) if hasAbstractAttr then errorR (Error(FSComp.SR.tcOnlyClassesCanHaveAbstract(), m)) @@ -16262,7 +16302,7 @@ module EstablishTypeDefinitionCores = noAbstractClassAttributeCheck() noFieldsCheck userFields let ty', _ = TcTypeAndRecover cenv NoNewTypars CheckCxs ItemOccurence.UseInType envinner tpenv ty - let _, curriedArgInfos, returnTy, _ = GetTopValTypeInCompiledForm g (arity |> TranslateTopValSynInfo m (TcAttributes cenv envinner) |> TranslatePartialArity []) ty' m + let _, curriedArgInfos, returnTy, _ = GetTopValTypeInCompiledForm g (arity |> TranslateTopValSynInfo m (TcAttributes cenv envinner) |> TranslatePartialArity []) ty' m if curriedArgInfos.Length < 1 then error(Error(FSComp.SR.tcInvalidDelegateSpecification(), m)) if curriedArgInfos.Length > 1 then error(Error(FSComp.SR.tcDelegatesCannotBeCurried(), m)) let ttps = thisTyconRef.Typars m @@ -16362,7 +16402,7 @@ module EstablishTypeDefinitionCores = | TType_anon (_,l) | TType_tuple (_, l) -> accInAbbrevTypes l acc | TType_ucase (UnionCaseRef(tc, _), tinst) - | TType_app (tc, tinst) -> + | TType_app (tc, tinst, _) -> let tycon2 = tc.Deref let acc = accInAbbrevTypes tinst acc // Record immediate recursive references @@ -16375,7 +16415,7 @@ module EstablishTypeDefinitionCores = else acc - | TType_fun (d, r) -> + | TType_fun (d, r, _nullness) -> accInAbbrevType d (accInAbbrevType r acc) | TType_var _ -> acc @@ -16473,7 +16513,7 @@ module EstablishTypeDefinitionCores = and accStructFieldType structTycon structTyInst fspec fieldTy (doneTypes, acc) = let fieldTy = stripTyparEqns fieldTy match fieldTy with - | TType_app (tcref2, tinst2) when tcref2.IsStructOrEnumTycon -> + | TType_app (tcref2, tinst2, _nullness) when tcref2.IsStructOrEnumTycon -> // The field is a struct. // An edge (tycon, tycon2) should be recorded, unless it is the "static self-typed field" case. let tycon2 = tcref2.Deref @@ -16493,7 +16533,7 @@ module EstablishTypeDefinitionCores = else let acc = insertEdgeToTycon tycon2 acc // collect edge (tycon, tycon2), if tycon2 is initial. accStructInstanceFields fieldTy tycon2 tinst2 (doneTypes, acc) // recurse through struct field looking for more edges - | TType_app (tcref2, tinst2) when tcref2.IsTypeAbbrev -> + | TType_app (tcref2, tinst2, _nullness) when tcref2.IsTypeAbbrev -> // The field is a type abbreviation. Expand and repeat. accStructFieldType structTycon structTyInst fspec (reduceTyconRefAbbrev tcref2 tinst2) (doneTypes, acc) | _ -> @@ -16523,7 +16563,7 @@ module EstablishTypeDefinitionCores = let acc = [] let acc = if tycon.IsStructOrEnumTycon then - let tinst, ty = generalizeTyconRef (mkLocalTyconRef tycon) + let tinst, ty = generalizeTyconRef g (mkLocalTyconRef tycon) let _, acc = accStructAllFields ty tycon tinst ([], acc) acc else @@ -16720,7 +16760,7 @@ module TcDeclarations = /// Given a type definition, compute whether its members form an extension of an existing type, and if so if it is an /// intrinsic or extrinsic extension - let private ComputeTyconDeclKind cenv envForDecls tyconOpt isAtOriginalTyconDefn inSig m (synTypars: SynTyparDecl list) synTyparCxs longPath = + let private ComputeTyconDeclKind cenv tyconOpt isAtOriginalTyconDefn envForDecls inSig m (synTypars: SynTyparDecl list) synTyparCxs longPath = let g = cenv.g let ad = envForDecls.eAccessRights @@ -17057,7 +17097,7 @@ module TcDeclarations = let (MutRecDefnsPhase1DataForTycon(synTyconInfo, _, _, _, _, isAtOriginalTyconDefn)) = typeDefnCore let tyDeclRange = synTyconInfo.Range let (ComponentInfo(_, typars, cs, longPath, _, _, _, _)) = synTyconInfo - let declKind, tcref, declaredTyconTypars = ComputeTyconDeclKind cenv envForDecls tyconOpt isAtOriginalTyconDefn false tyDeclRange typars cs longPath + let declKind, tcref, declaredTyconTypars = ComputeTyconDeclKind cenv tyconOpt isAtOriginalTyconDefn envForDecls false tyDeclRange typars cs longPath let newslotsOK = (if isAtOriginalTyconDefn && tcref.IsFSharpObjectModelTycon then NewSlotsOK else NoNewSlots) if (declKind = ExtrinsicExtensionBinding) && isByrefTyconRef cenv.g tcref then @@ -17183,7 +17223,7 @@ module TcDeclarations = let tpenv = emptyUnscopedTyparEnv let (MutRecDefnsPhase1DataForTycon (_, _, _, _, _, isAtOriginalTyconDefn)) = tyconCore let (ComponentInfo(_, typars, cs, longPath, _, _, _, m)) = synTyconInfo - let declKind, tcref, declaredTyconTypars = ComputeTyconDeclKind cenv envForDecls tyconOpt isAtOriginalTyconDefn true m typars cs longPath + let declKind, tcref, declaredTyconTypars = ComputeTyconDeclKind cenv tyconOpt isAtOriginalTyconDefn envForDecls true m typars cs longPath let envForTycon = AddDeclaredTypars CheckForDuplicateTypars declaredTyconTypars envForDecls let envForTycon = MakeInnerEnvForTyconRef envForTycon tcref (declKind = ExtrinsicExtensionBinding) @@ -17238,6 +17278,7 @@ module TcDeclarations = let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synSigDecl: Eventually = eventually { try + let g = cenv.g match synSigDecl with | SynModuleSigDecl.Exception (edef, m) -> let scopem = unionRanges m.EndRange endm @@ -17252,7 +17293,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS | SynModuleSigDecl.Open (mp, m) -> let scopem = unionRanges m.EndRange endm - let env = TcOpenDecl cenv.tcSink cenv.g cenv.amap m scopem env mp + let env = TcOpenDecl cenv.tcSink g cenv.amap m scopem env mp return env | SynModuleSigDecl.Val (vspec, m) -> @@ -17276,8 +17317,8 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS let id = ComputeModuleName longPath let vis, _ = ComputeAccessAndCompPath env None im vis None parent let attribs = TcAttributes cenv env AttributeTargets.ModuleDecl attribs - CheckNamespaceModuleOrTypeName cenv.g id - let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind cenv.g true typeNames attribs id.idText + CheckNamespaceModuleOrTypeName g id + let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind g true typeNames attribs id.idText let modName = EstablishTypeDefinitionCores.AdjustModuleName modKind id.idText CheckForDuplicateConcreteType env modName id.idRange @@ -17292,7 +17333,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS mspec.entity_modul_contents <- MaybeLazy.Strict mtyp let scopem = unionRanges m endm PublishModuleDefn cenv env mspec - let env = AddLocalSubModuleAndReport cenv.tcSink scopem cenv.g cenv.amap m env mspec + let env = AddLocalSubModuleAndReport cenv.tcSink scopem g cenv.amap m env mspec return env | SynModuleSigDecl.ModuleAbbrev (id, p, m) -> @@ -17311,7 +17352,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS errorR(Error(FSComp.SR.tcModuleAbbreviationForNamespace(fullDisplayTextOfModRef (List.head unfilteredModrefs)), m)) if List.isEmpty modrefs then return env else - modrefs |> List.iter (fun modref -> CheckEntityAttributes cenv.g modref m |> CommitOperationResult) + modrefs |> List.iter (fun modref -> CheckEntityAttributes g modref m |> CommitOperationResult) let env = AddModuleAbbreviationAndReport cenv.tcSink scopem id modrefs env return env @@ -17323,7 +17364,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS | SynModuleSigDecl.NamespaceFragment (SynModuleOrNamespaceSig(longId, isRec, kind, defs, xml, attribs, vis, m)) -> do for id in longId do - CheckNamespaceModuleOrTypeName cenv.g id + CheckNamespaceModuleOrTypeName g id // Logically speaking, this changes // module [rec] A.B.M @@ -17340,7 +17381,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS longId, defs let envNS = LocateEnv cenv.topCcu env enclosingNamespacePath - let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink cenv.g cenv.amap m enclosingNamespacePath envNS + let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink g cenv.amap m enclosingNamespacePath envNS // For 'namespace rec' and 'module rec' we add the thing being defined let mtypNS = !(envNS.eModuleOrNamespaceTypeAccumulator) @@ -17353,7 +17394,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS CallNameResolutionSink cenv.tcSink (mspec.Range, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.eAccessRights)) // For 'namespace rec' and 'module rec' we add the thing being defined - let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m envNS mtypRoot else envNS + let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m envNS mtypRoot else envNS let nsInfo = Some (mspecNSOpt, envNS.eModuleOrNamespaceTypeAccumulator) let mutRecNSInfo = if isRec then nsInfo else None @@ -17365,12 +17406,12 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS if isNil enclosingNamespacePath then envAtEnd else - let env = AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m env mtypRoot + let env = AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m env mtypRoot // If the namespace is an interactive fragment e.g. FSI_0002, then open FSI_0002 in the subsequent environment. let env = - match TryStripPrefixPath cenv.g enclosingNamespacePath with - | Some(p, _) -> TcOpenDecl cenv.tcSink cenv.g cenv.amap m.EndRange m.EndRange env [p] + match TryStripPrefixPath g enclosingNamespacePath with + | Some(p, _) -> TcOpenDecl cenv.tcSink g cenv.amap m.EndRange m.EndRange env [p] | None -> env // Publish the combined module type @@ -17521,6 +17562,7 @@ let CheckLetOrDoInNamespace binds m = /// The non-mutually recursive case for a declaration let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem env synDecl = eventually { + let g = cenv.g cenv.synArgNameGenerator.Reset() let tpenv = emptyUnscopedTyparEnv @@ -17549,7 +17591,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem | SynModuleDecl.Open (LongIdentWithDots(mp, _), m) -> let scopem = unionRanges m.EndRange scopem - let env = TcOpenDecl cenv.tcSink cenv.g cenv.amap m scopem env mp + let env = TcOpenDecl cenv.tcSink g cenv.amap m scopem env mp return ((fun e -> e), []), env, env | SynModuleDecl.Let (letrec, binds, m) -> @@ -17591,7 +17633,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem let id = ComputeModuleName longPath let modAttrs = TcAttributes cenv env AttributeTargets.ModuleDecl attribs - let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind cenv.g true typeNames modAttrs id.idText + let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind g true typeNames modAttrs id.idText let modName = EstablishTypeDefinitionCores.AdjustModuleName modKind id.idText CheckForDuplicateConcreteType env modName im CheckForDuplicateModule env id.idText id.idRange @@ -17600,7 +17642,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem let endm = m.EndRange let id = ident (modName, id.idRange) - CheckNamespaceModuleOrTypeName cenv.g id + CheckNamespaceModuleOrTypeName g id let envForModule, mtypeAcc = MakeInnerEnv env id modKind @@ -17616,7 +17658,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem mspec.entity_modul_contents <- MaybeLazy.Strict !mtypeAcc let modDefn = TMDefRec(false, [], [ModuleOrNamespaceBinding.Module(mspec, mexpr)], m) PublishModuleDefn cenv env mspec - let env = AddLocalSubModuleAndReport cenv.tcSink scopem cenv.g cenv.amap m env mspec + let env = AddLocalSubModuleAndReport cenv.tcSink scopem g cenv.amap m env mspec // isContinuingModule is true for all of the following // - the implicit module of a script @@ -17636,7 +17678,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem let endm = m.EndRange do for id in longId do - CheckNamespaceModuleOrTypeName cenv.g id + CheckNamespaceModuleOrTypeName g id // Logically speaking, this changes // module [rec] A.B.M @@ -17653,7 +17695,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem longId, defs let envNS = LocateEnv cenv.topCcu env enclosingNamespacePath - let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink cenv.g cenv.amap m enclosingNamespacePath envNS + let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink g cenv.amap m enclosingNamespacePath envNS let mtypNS = !(envNS.eModuleOrNamespaceTypeAccumulator) let mtypRoot, mspecNSs = BuildRootModuleType enclosingNamespacePath envNS.eCompPath mtypNS @@ -17665,7 +17707,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem CallNameResolutionSink cenv.tcSink (mspec.Range, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.eAccessRights)) // For 'namespace rec' and 'module rec' we add the thing being defined - let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m envNS mtypRoot else envNS + let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m envNS mtypRoot else envNS let nsInfo = Some (mspecNSOpt, envNS.eModuleOrNamespaceTypeAccumulator) let mutRecNSInfo = if isRec then nsInfo else None @@ -17677,12 +17719,12 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem if isNil enclosingNamespacePath then envAtEnd else - let env = AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m env mtypRoot + let env = AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m env mtypRoot // If the namespace is an interactive fragment e.g. FSI_0002, then open FSI_0002 in the subsequent environment let env = - match TryStripPrefixPath cenv.g enclosingNamespacePath with - | Some(p, _) -> TcOpenDecl cenv.tcSink cenv.g cenv.amap m.EndRange m.EndRange env [p] + match TryStripPrefixPath g enclosingNamespacePath with + | Some(p, _) -> TcOpenDecl cenv.tcSink g cenv.amap m.EndRange m.EndRange env [p] | None -> env // Publish the combined module type @@ -17982,11 +18024,11 @@ let CheckModuleSignature g cenv m denvAtEnd rootSigOpt implFileTypePriorToSig im raise (ReportedError None) // Compute the remapping from implementation to signature - let remapInfo, _ = ComputeRemappingFromInferredSignatureToExplicitSignature cenv.g implFileTypePriorToSig sigFileType + let remapInfo , _ = ComputeRemappingFromInferredSignatureToExplicitSignature g implFileTypePriorToSig sigFileType let aenv = { TypeEquivEnv.Empty with EquivTycons = TyconRefMap.OfList remapInfo.RepackagedEntities } - if not (SignatureConformance.Checker(cenv.g, cenv.amap, denv, remapInfo, true).CheckSignature aenv (mkLocalModRef implFileSpecPriorToSig) sigFileType) then ( + if not (SignatureConformance.Checker(g, cenv.amap, denv, remapInfo, true).CheckSignature aenv (mkLocalModRef implFileSpecPriorToSig) sigFileType) then ( // We can just raise 'ReportedError' since CheckModuleOrNamespace raises its own error raise (ReportedError None) ) diff --git a/src/fsharp/TypeRelations.fs b/src/fsharp/TypeRelations.fs index efd82d277dd..6e03c17866b 100755 --- a/src/fsharp/TypeRelations.fs +++ b/src/fsharp/TypeRelations.fs @@ -56,7 +56,7 @@ let rec TypesFeasiblyEquiv ndeep g amap m ty1 ty2 = | TType_var _, _ | _, TType_var _ -> true - | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2 -> + | TType_app (tc1, l1, _nullness1), TType_app (tc2, l2, _nullness2) when tyconRefEq g tc1 tc2 -> List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2 | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2) -> @@ -69,7 +69,7 @@ let rec TypesFeasiblyEquiv ndeep g amap m ty1 ty2 = evalTupInfoIsStruct tupInfo1 = evalTupInfoIsStruct tupInfo2 && List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2 - | TType_fun (d1, r1), TType_fun (d2, r2) -> + | TType_fun (d1, r1, _nullness1), TType_fun (d2, r2, _nullness2) -> (TypesFeasiblyEquiv ndeep g amap m) d1 d2 && (TypesFeasiblyEquiv ndeep g amap m) r1 r2 | TType_measure _, TType_measure _ -> @@ -86,8 +86,7 @@ let rec TypeFeasiblySubsumesType ndeep g amap m ty1 canCoerce ty2 = let ty2 = stripTyEqns g ty2 match ty1, ty2 with | TType_var _, _ | _, TType_var _ -> true - - | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2 -> + | TType_app (tc1, l1, _nullness1), TType_app (tc2, l2, _nullness2) when tyconRefEq g tc1 tc2 -> List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2 | TType_tuple _, TType_tuple _ @@ -140,7 +139,9 @@ let ChooseTyparSolutionAndRange (g: TcGlobals) amap (tp:Typar) = errorR(Error(FSComp.SR.typrelCannotResolveAmbiguityInPrintf(), m)) maxSoFar, m | TyparConstraint.SupportsNull m -> - maxSoFar, m + addNullnessToTy KnownWithNull maxSoFar, m + | TyparConstraint.NotSupportsNull m -> + maxSoFar, m // NOTE: this doesn't "force" non-nullness, since it is the default choice in 'obj' or 'int' | TyparConstraint.SupportsComparison m -> join m g.mk_IComparable_ty, m | TyparConstraint.SupportsEquality m -> diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs index 8b12eb84295..0430c35d553 100644 --- a/src/fsharp/TypedTree.fs +++ b/src/fsharp/TypedTree.fs @@ -2201,14 +2201,18 @@ type Typar = | None -> () /// Links a previously unlinked type variable to the given data. Only used during unpickling of F# metadata. - member x.AsType = - let ty = x.typar_astype - match box ty with - | null -> - let ty2 = TType_var x - x.typar_astype <- ty2 - ty2 - | _ -> ty + member x.AsType nullness = + match nullness with + | Nullness.Known NullnessInfo.AmbivalentToNull -> + let ty = x.typar_astype + match box ty with + | null -> + let ty2 = TType_var (x, Nullness.Known NullnessInfo.AmbivalentToNull) + x.typar_astype <- ty2 + ty2 + | _ -> ty + | _ -> + TType_var (x, nullness) /// Indicates if a type variable has been linked. Only used during unpickling of F# metadata. member x.IsLinked = x.typar_stamp <> -1L @@ -2258,6 +2262,9 @@ type TyparConstraint = /// A constraint that a type has a 'null' value | SupportsNull of range + /// A constraint that a type doesn't support nullness + | NotSupportsNull of range + /// A constraint that a type has a member with the given signature | MayResolveMember of TraitConstraintInfo * range @@ -3051,7 +3058,7 @@ type NonLocalEntityRef = let rec tryResolveNestedTypeOf(parentEntity: Entity, resolutionEnvironment, st: Tainted, i) = match st.PApply((fun st -> st.GetNestedType path.[i]), m) with | Tainted.Null -> ValueNone - | st -> + | Tainted.NonNull st -> let newEntity = Construct.NewProvidedTycon(resolutionEnvironment, st, ccu.ImportProvidedType, false, m) parentEntity.ModuleOrNamespaceType.AddProvidedTypeEntity newEntity if i = path.Length-1 then ValueSome newEntity @@ -3081,13 +3088,16 @@ type NonLocalEntityRef = assert (j >= 0) assert (j <= path.Length - 1) let matched = - [ for resolver in resolvers do - let moduleOrNamespace = if j = 0 then null else path.[0..j-1] + [ for resolver in resolvers do + let moduleOrNamespace = if j = 0 then [| |] else path.[0..j-1] let typename = path.[j] let resolution = ExtensionTyping.TryLinkProvidedType(resolver, moduleOrNamespace, typename, m) match resolution with - | None | Some (Tainted.Null) -> () - | Some st -> yield (resolver, st) ] + | None -> () + | Some st -> + match st with + | Tainted.Null -> () + | Tainted.NonNull st -> yield (resolver, st) ] match matched with | [(_, st)] -> // 'entity' is at position i in the dereference chain. We resolved to position 'j'. @@ -3892,6 +3902,63 @@ type RecdFieldRef = override x.ToString() = x.FieldName +[] +type Nullness = + | Known of NullnessInfo + | Variable of NullnessVar + + member n.Evaluate() = + match n with + | Known info -> info + | Variable v -> v.Evaluate() + + member n.TryEvaluate() = + match n with + | Known info -> ValueSome info + | Variable v -> v.TryEvaluate() + + override n.ToString() = match n.Evaluate() with NullnessInfo.WithNull -> "?" | NullnessInfo.WithoutNull -> "" | NullnessInfo.AmbivalentToNull -> "%" + +// Note, nullness variables are only created if the nullness checking feature is on +type NullnessVar() = + let mutable solution: Nullness option = None + + member nv.Evaluate() = + match solution with + | None -> NullnessInfo.WithoutNull + | Some soln -> soln.Evaluate() + + member nv.TryEvaluate() = + match solution with + | None -> ValueNone + | Some soln -> soln.TryEvaluate() + + member nv.IsSolved = solution.IsSome + + member nv.Set(nullness) = + assert (not nv.IsSolved) + solution <- Some nullness + + member nv.Unset() = + assert nv.IsSolved + solution <- None + + member nv.Solution = + assert nv.IsSolved + solution.Value + +[] +type NullnessInfo = + + /// we know that there is an extra null value in the type + | WithNull + + /// we know that there is no extra null value in the type + | WithoutNull + + /// we know we don't care + | AmbivalentToNull + /// Represents a type in the typed abstract syntax [] type TType = @@ -3901,10 +3968,10 @@ type TType = /// Indicates the type is a universal type, only used for types of values and members | TType_forall of Typars * TType - /// TType_app(tyconRef, typeInstantiation). + /// TType_app(tyconRef, typeInstantiation, nullness). /// /// Indicates the type is built from a named type and a number of type arguments - | TType_app of TyconRef * TypeInst + | TType_app of TyconRef * TypeInst * Nullness /// TType_anon /// @@ -3916,10 +3983,10 @@ type TType = /// Indicates the type is a tuple type. elementTypes must be of length 2 or greater. | TType_tuple of TupInfo * TTypes - /// TType_fun(domainType, rangeType). + /// TType_fun(domainType, rangeType, nullness). /// /// Indicates the type is a function type - | TType_fun of TType * TType + | TType_fun of TType * TType * Nullness /// TType_ucase(unionCaseRef, typeInstantiation) /// @@ -3929,22 +3996,23 @@ type TType = | TType_ucase of UnionCaseRef * TypeInst /// Indicates the type is a variable type, whether declared, generalized or an inference type parameter - | TType_var of Typar + | TType_var of Typar * Nullness /// Indicates the type is a unit-of-measure expression being used as an argument to a type or member | TType_measure of Measure + /// For now, used only as a discriminant in error message. /// See https://github.com/Microsoft/visualfsharp/issues/2561 member x.GetAssemblyName() = match x with - | TType_forall (_tps, ty) -> ty.GetAssemblyName() - | TType_app (tcref, _tinst) -> tcref.CompilationPath.ILScopeRef.QualifiedName - | TType_tuple (_tupInfo, _tinst) -> "" + | TType_forall (_tps, ty) -> ty.GetAssemblyName() + | TType_app (tcref, _tinst, _) -> tcref.CompilationPath.ILScopeRef.QualifiedName + | TType_tuple _ -> "" | TType_anon (anonInfo, _tinst) -> defaultArg anonInfo.Assembly.QualifiedName "" - | TType_fun (_d, _r) -> "" - | TType_measure _ms -> "" - | TType_var tp -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> "" + | TType_fun _ -> "" + | TType_measure _ -> "" + | TType_var (tp, _nullness) -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> "" | TType_ucase (_uc, _tinst) -> let (TILObjectReprData(scope, _nesting, _definition)) = _uc.Tycon.ILTyconInfo scope.QualifiedName @@ -3954,21 +4022,21 @@ type TType = override x.ToString() = match x with - | TType_forall (_tps, ty) -> "forall ... " + ty.ToString() - | TType_app (tcref, tinst) -> tcref.DisplayName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">") + | TType_forall (_tps, ty) -> "forall ... " + ty.ToString() + | TType_app (tcref, tinst, nullness) -> tcref.DisplayName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">") + nullness.ToString() | TType_tuple (tupInfo, tinst) -> (match tupInfo with | TupInfo.Const false -> "" | TupInfo.Const true -> "struct ") - + String.concat "," (List.map string tinst) + + String.concat "," (List.map string tinst) + ")" + | TType_fun (d,r,nullness) -> "(" + string d + " -> " + string r + ")" + nullness.ToString() | TType_anon (anonInfo, tinst) -> (match anonInfo.TupInfo with | TupInfo.Const false -> "" | TupInfo.Const true -> "struct ") + "{|" + String.concat "," (Seq.map2 (fun nm ty -> nm + " " + string ty + ";") anonInfo.SortedNames tinst) + ")" + "|}" - | TType_fun (d, r) -> "(" + string d + " -> " + string r + ")" | TType_ucase (uc, tinst) -> "ucase " + uc.CaseName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">") - | TType_var tp -> + | TType_var (tp, _nullness) -> match tp.Solution with | None -> tp.DisplayName | Some _ -> tp.DisplayName + " (solved)" @@ -4028,7 +4096,7 @@ type AnonRecdTypeInfo = x.Stamp <- d.Stamp x.SortedNames <- sortedNames - member x.IsLinked = (match x.SortedIds with null -> true | _ -> false) + member x.IsLinked = (match box x.SortedIds with null -> true | _ -> false) [] type TupInfo = @@ -5023,7 +5091,11 @@ type CcuReference = string // ILAssemblyRef type CcuThunk = { +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE mutable target: CcuData +#else + mutable target: CcuData? +#endif /// ccu.orphanfixup is true when a reference is missing in the transitive closure of static references that /// may potentially be required for the metadata of referenced DLLs. It is set to true if the "loader" @@ -5035,15 +5107,24 @@ type CcuThunk = name: CcuReference } +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE /// Dereference the asssembly reference member ccu.Deref = - if isNull (ccu.target :> obj) || ccu.orphanfixup then + if isNull (box ccu.target) || ccu.orphanfixup then raise(UnresolvedReferenceNoRange ccu.name) ccu.target - - /// Indicates if this assembly reference is unresolved - member ccu.IsUnresolvedReference = isNull (ccu.target :> obj) || ccu.orphanfixup + member ccu.IsUnresolvedReference = isNull (box ccu.target) || ccu.orphanfixup +#else + member ccu.Deref = + match ccu.target with + | null -> raise(UnresolvedReferenceNoRange ccu.name) + | _ when ccu.orphanfixup -> raise(UnresolvedReferenceNoRange ccu.name) + | NonNull tg -> tg + + member ccu.IsUnresolvedReference = isNull ccu.target || ccu.orphanfixup +#endif + /// Ensure the ccu is derefable in advance. Supply a path to attach to any resulting error message. member ccu.EnsureDerefable(requiringPath: string[]) = if ccu.IsUnresolvedReference then @@ -5302,7 +5383,7 @@ type Construct() = let lazyBaseTy = LazyWithContext.Create ((fun (m, objTy) -> - let baseSystemTy = st.PApplyOption((fun st -> match st.BaseType with null -> None | ty -> Some ty), m) + let baseSystemTy = st.PApplyOption((fun st -> match st.BaseType with null -> None | ty -> Some (nonNull ty)), m) match baseSystemTy with | None -> objTy | Some t -> importProvidedType t), @@ -5317,6 +5398,8 @@ type Construct() = let baseType = st.BaseType match baseType with | null -> false + | NonNull x -> + match x with | x when x.IsGenericType -> false | x when x.DeclaringType <> null -> false | x -> x.FullName = "System.Delegate" || x.FullName = "System.MulticastDelegate"), m)) @@ -5587,7 +5670,7 @@ type Construct() = let attrs = p.PUntaintNoFailure(fun x -> x.GetDefinitionLocationAttribute(p.TypeProvider.PUntaintNoFailure id)) match attrs with | None | Some (null, _, _) -> None - | Some (filePath, line, column) -> + | Some (NonNull filePath, line, column) -> // Coordinates from type provider are 1-based for lines and columns // Coordinates internally in the F# compiler are 1-based for lines and 0-based for columns let pos = Range.mkPos line (max 0 (column - 1)) diff --git a/src/fsharp/TypedTreeBasics.fs b/src/fsharp/TypedTreeBasics.fs index 7f35d57a865..847bf16f01e 100644 --- a/src/fsharp/TypedTreeBasics.fs +++ b/src/fsharp/TypedTreeBasics.fs @@ -188,9 +188,15 @@ let ccuOfTyconRef eref = // Type parameters and inference unknowns //------------------------------------------------------------------------- -let mkTyparTy (tp: Typar) = +let NewNullnessVar() = Nullness.Variable (NullnessVar()) // we don't known (and if we never find out then it's non-null) + +let KnownAmbivalentToNull = Nullness.Known NullnessInfo.AmbivalentToNull +let KnownWithNull = Nullness.Known NullnessInfo.WithNull +let KnownWithoutNull = Nullness.Known NullnessInfo.WithoutNull + +let mkTyparTy (tp:Typar) = match tp.Kind with - | TyparKind.Type -> tp.AsType + | TyparKind.Type -> tp.AsType KnownWithoutNull // TODO NULLNESS: check various callers | TyparKind.Measure -> TType_measure (Measure.Var tp) let copyTypar (tp: Typar) = @@ -230,9 +236,49 @@ let rec stripUnitEqnsAux canShortcut unt = | Measure.Var r when r.IsSolved -> stripUnitEqnsAux canShortcut (tryShortcutSolvedUnitPar canShortcut r) | _ -> unt -let rec stripTyparEqnsAux canShortcut ty = +let combineNullness (nullnessOrig: Nullness) (nullnessNew: Nullness) = + match nullnessOrig.Evaluate() with + | NullnessInfo.WithoutNull -> nullnessNew + | NullnessInfo.AmbivalentToNull -> nullnessOrig + | NullnessInfo.WithNull -> + match nullnessNew.Evaluate() with + | NullnessInfo.WithoutNull -> nullnessOrig + | NullnessInfo.AmbivalentToNull -> nullnessNew + | NullnessInfo.WithNull -> nullnessOrig + +let tryAddNullnessToTy nullnessNew (ty:TType) = + match ty with + | TType_var (tp, nullnessOrig) -> + // TODO NULLNESS: make this avoid allocation if no change + Some (TType_var (tp, combineNullness nullnessOrig nullnessNew)) + | TType_app (tcr, tinst, nullnessOrig) -> + // TODO NULLNESS: make this avoid allocation if no change + Some (TType_app (tcr, tinst, combineNullness nullnessOrig nullnessNew)) + | TType_ucase _ -> None // TODO NULLNESS + | TType_tuple _ -> None // TODO NULLNESS + | TType_anon _ -> None // TODO NULLNESS + | TType_fun (d, r, nullnessOrig) -> + // TODO NULLNESS: make this avoid allocation if no change + Some (TType_fun (d, r, combineNullness nullnessOrig nullnessNew)) + | TType_forall _ -> None + | TType_measure _ -> None + +let addNullnessToTy (nullness: Nullness) (ty:TType) = + match nullness.Evaluate() with + | NullnessInfo.WithoutNull -> ty + | _ -> + match ty with + | TType_var (tp, nullnessOrig) -> TType_var (tp, combineNullness nullnessOrig nullness) + | TType_app (tcr, tinst, nullnessOrig) -> TType_app (tcr, tinst, combineNullness nullnessOrig nullness) + | TType_fun (d, r, nullnessOrig) -> TType_fun (d, r, combineNullness nullnessOrig nullness) + //| TType_ucase _ -> None // TODO NULLNESS + //| TType_tuple _ -> None // TODO NULLNESS + //| TType_anon _ -> None // TODO NULLNESS + | _ -> ty + +let rec stripTyparEqnsAux nullness0 canShortcut ty = match ty with - | TType_var r -> + | TType_var (r, nullness) -> match r.Solution with | Some soln -> if canShortcut then @@ -241,23 +287,36 @@ let rec stripTyparEqnsAux canShortcut ty = // This is only because IterType likes to walk _all_ the constraints _everywhere_ in a type, including // those attached to _solved_ type variables. In an ideal world this would never be needed - see the notes // on IterType. - | TType_var r2 when r2.Constraints.IsEmpty -> - match r2.Solution with - | None -> () - | Some _ as soln2 -> - r.typar_solution <- soln2 + | TType_var (r2, nullness2) when r2.Constraints.IsEmpty -> + match nullness2.Evaluate() with + | NullnessInfo.WithoutNull -> + match r2.Solution with + | None -> () + | Some _ as soln2 -> + r.typar_solution <- soln2 + | _ -> () | _ -> () - stripTyparEqnsAux canShortcut soln + stripTyparEqnsAux (combineNullness nullness0 nullness) canShortcut soln | None -> - ty + addNullnessToTy nullness0 ty | TType_measure unt -> TType_measure (stripUnitEqnsAux canShortcut unt) | _ -> ty -let stripTyparEqns ty = stripTyparEqnsAux false ty +let stripTyparEqns ty = stripTyparEqnsAux KnownWithoutNull false ty let stripUnitEqns unt = stripUnitEqnsAux false unt +let replaceNullnessOfTy nullness (ty:TType) = + match stripTyparEqns ty with + | TType_var (tp, _nullnessOrig) -> TType_var (tp, nullness) + | TType_app (tcr, tinst, _nullnessOrig) -> TType_app (tcr, tinst, nullness) + | TType_fun (d, r, _nullnessOrig) -> TType_fun (d, r, nullness) + //| TType_ucase _ -> None // TODO NULLNESS + //| TType_tuple _ -> None // TODOTODO NULLNESS + //| TType_anon _ -> None // TODO NULLNESS + | sty -> sty + //--------------------------------------------------------------------------- // These make local/non-local references to values according to whether // the item is globally stable ("published") or not. diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs index 513727bf1c2..87ebe3d4087 100644 --- a/src/fsharp/TypedTreeOps.fs +++ b/src/fsharp/TypedTreeOps.fs @@ -175,10 +175,13 @@ let generalizeTypars tps = List.map generalizeTypar tps let rec remapTypeAux (tyenv: Remap) (ty: TType) = let ty = stripTyparEqns ty match ty with - | TType_var tp as ty -> instTyparRef tyenv.tpinst ty tp - | TType_app (tcref, tinst) as ty -> + | TType_var (tp, nullness) as ty -> + let res = instTyparRef tyenv.tpinst ty tp + addNullnessToTy nullness res + + | TType_app (tcref, tinst, nullness) as ty -> match tyenv.tyconRefRemap.TryFind tcref with - | Some tcref' -> TType_app (tcref', remapTypesAux tyenv tinst) + | Some tcref' -> TType_app (tcref', remapTypesAux tyenv tinst, nullness) | None -> match tinst with | [] -> ty // optimization to avoid re-allocation of TType_app node in the common case @@ -186,7 +189,7 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) = // avoid reallocation on idempotent let tinst' = remapTypesAux tyenv tinst if tinst === tinst' then ty else - TType_app (tcref, tinst') + TType_app (tcref, tinst', nullness) | TType_ucase (UnionCaseRef(tcref, n), tinst) -> match tyenv.tyconRefRemap.TryFind tcref with @@ -205,11 +208,11 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) = if tupInfo === tupInfo' && l === l' then ty else TType_tuple (tupInfo', l') - | TType_fun (d, r) as ty -> + | TType_fun (d, r, nullness) as ty -> let d' = remapTypeAux tyenv d let r' = remapTypeAux tyenv r if d === d' && r === r' then ty else - TType_fun (d', r') + TType_fun (d', r', nullness) | TType_forall (tps, ty) -> let tps', tyenv = copyAndRemapAndBindTypars tyenv tps @@ -264,6 +267,7 @@ and remapTyparConstraintsAux tyenv cs = | TyparConstraint.SupportsComparison _ | TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _ + | TyparConstraint.NotSupportsNull _ | TyparConstraint.IsUnmanaged _ | TyparConstraint.IsNonNullableStruct _ | TyparConstraint.IsReferenceType _ @@ -584,21 +588,21 @@ let tryNormalizeMeasureInType g ty = let mkNativePtrTy (g: TcGlobals) ty = assert g.nativeptr_tcr.CanDeref // this should always be available, but check anyway - TType_app (g.nativeptr_tcr, [ty]) + TType_app (g.nativeptr_tcr, [ty], g.knownWithoutNull) let mkByrefTy (g: TcGlobals) ty = assert g.byref_tcr.CanDeref // this should always be available, but check anyway - TType_app (g.byref_tcr, [ty]) + TType_app (g.byref_tcr, [ty], g.knownWithoutNull) let mkInByrefTy (g: TcGlobals) ty = if g.inref_tcr.CanDeref then // If not using sufficient FSharp.Core, then inref = byref, see RFC FS-1053.md - TType_app (g.inref_tcr, [ty]) + TType_app (g.inref_tcr, [ty], g.knownWithoutNull) else mkByrefTy g ty let mkOutByrefTy (g: TcGlobals) ty = if g.outref_tcr.CanDeref then // If not using sufficient FSharp.Core, then outref = byref, see RFC FS-1053.md - TType_app (g.outref_tcr, [ty]) + TType_app (g.outref_tcr, [ty], g.knownWithoutNull) else mkByrefTy g ty @@ -610,24 +614,24 @@ let mkByrefTyWithFlag g readonly ty = let mkByref2Ty (g: TcGlobals) ty1 ty2 = assert g.byref2_tcr.CanDeref // check we are using sufficient FSharp.Core, caller should check this - TType_app (g.byref2_tcr, [ty1; ty2]) + TType_app (g.byref2_tcr, [ty1; ty2], g.knownWithoutNull) let mkVoidPtrTy (g: TcGlobals) = - assert g.voidptr_tcr.CanDeref // check we are using sufficient FSharp.Core, caller should check this - TType_app (g.voidptr_tcr, []) + assert g.voidptr_tcr.CanDeref // check we are using sufficient FSharp.Core , caller should check this + TType_app (g.voidptr_tcr, [], g.knownWithoutNull) let mkByrefTyWithInference (g: TcGlobals) ty1 ty2 = if g.byref2_tcr.CanDeref then // If not using sufficient FSharp.Core, then inref = byref, see RFC FS-1053.md - TType_app (g.byref2_tcr, [ty1; ty2]) + TType_app (g.byref2_tcr, [ty1; ty2], g.knownWithoutNull) else - TType_app (g.byref_tcr, [ty1]) + TType_app (g.byref_tcr, [ty1], g.knownWithoutNull) -let mkArrayTy (g: TcGlobals) rank ty m = +let mkArrayTy (g: TcGlobals) rank nullness ty m = if rank < 1 || rank > 32 then errorR(Error(FSComp.SR.tastopsMaxArrayThirtyTwo rank, m)) - TType_app (g.il_arr_tcr_map.[3], [ty]) + TType_app (g.il_arr_tcr_map.[3], [ty], nullness) else - TType_app (g.il_arr_tcr_map.[rank - 1], [ty]) + TType_app (g.il_arr_tcr_map.[rank - 1], [ty], nullness) //-------------------------------------------------------------------------- // Tuple compilation (types) @@ -669,16 +673,16 @@ let mkCompiledTupleTyconRef (g: TcGlobals) isStruct n = let rec mkCompiledTupleTy g isStruct tupElemTys = let n = List.length tupElemTys if n < maxTuple then - TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys) + TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys, g.knownWithoutNull) else let tysA, tysB = List.splitAfter goodTupleFields tupElemTys - TType_app ((if isStruct then g.struct_tuple8_tcr else g.ref_tuple8_tcr), tysA@[mkCompiledTupleTy g isStruct tysB]) + TType_app ((if isStruct then g.struct_tuple8_tcr else g.ref_tuple8_tcr), tysA@[mkCompiledTupleTy g isStruct tysB], g.knownWithoutNull) /// Convert from F# tuple types to .NET tuple types, but only the outermost level let mkOuterCompiledTupleTy g isStruct tupElemTys = let n = List.length tupElemTys if n < maxTuple then - TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys) + TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys, g.knownWithoutNull) else let tysA, tysB = List.splitAfter goodTupleFields tupElemTys let tcref = (if isStruct then g.struct_tuple8_tcr else g.ref_tuple8_tcr) @@ -686,10 +690,10 @@ let mkOuterCompiledTupleTy g isStruct tupElemTys = // as a regular F# tuple type. match tysB with | [ tyB ] -> - let marker = TType_app (mkCompiledTupleTyconRef g isStruct 1, [tyB]) - TType_app (tcref, tysA@[marker]) + let marker = TType_app (mkCompiledTupleTyconRef g isStruct 1, [tyB], g.knownWithoutNull) + TType_app (tcref, tysA@[marker], g.knownWithoutNull) | _ -> - TType_app (tcref, tysA@[TType_tuple (mkTupInfo isStruct, tysB)]) + TType_app (tcref, tysA@[TType_tuple (mkTupInfo isStruct, tysB)], g.knownWithoutNull) //--------------------------------------------------------------------------- // Remove inference equations and abbreviations from types @@ -726,25 +730,29 @@ let reduceTyconRefMeasureableOrProvided (g: TcGlobals) (tcref: TyconRef) tyargs reduceTyconMeasureableOrProvided g tcref.Deref tyargs let rec stripTyEqnsA g canShortcut ty = - let ty = stripTyparEqnsAux canShortcut ty + let ty = stripTyparEqnsAux KnownWithoutNull canShortcut ty match ty with - | TType_app (tcref, tinst) -> + | TType_app (tcref, tinst, nullness) -> let tycon = tcref.Deref match tycon.TypeAbbrev with | Some abbrevTy -> - stripTyEqnsA g canShortcut (applyTyconAbbrev abbrevTy tycon tinst) + let reducedTy = applyTyconAbbrev abbrevTy tycon tinst + let reducedTy2 = addNullnessToTy nullness reducedTy + stripTyEqnsA g canShortcut reducedTy2 | None -> // This is the point where we get to add additional conditional normalizing equations // into the type system. Such power! // // Add the equation byref<'T> = byref<'T, ByRefKinds.InOut> for when using sufficient FSharp.Core // See RFC FS-1053.md - if tyconRefEq g tcref g.byref_tcr && g.byref2_tcr.CanDeref && g.byrefkind_InOut_tcr.CanDeref then - mkByref2Ty g tinst.[0] (TType_app(g.byrefkind_InOut_tcr, [])) + if tyconRefEq g tcref g.byref_tcr && g.byref2_tcr.CanDeref && g.byrefkind_InOut_tcr.CanDeref then + mkByref2Ty g tinst.[0] (TType_app(g.byrefkind_InOut_tcr, [], g.knownWithoutNull)) // Add the equation double<1> = double for units of measure. elif tycon.IsMeasureableReprTycon && List.forall (isDimensionless g) tinst then - stripTyEqnsA g canShortcut (reduceTyconMeasureableOrProvided g tycon tinst) + let reducedTy = reduceTyconMeasureableOrProvided g tycon tinst + let reducedTy2 = addNullnessToTy nullness reducedTy + stripTyEqnsA g canShortcut reducedTy2 else ty | ty -> ty @@ -765,15 +773,17 @@ let evalAnonInfoIsStruct (anonInfo: AnonRecdTypeInfo) = let rec stripTyEqnsAndErase eraseFuncAndTuple (g: TcGlobals) ty = let ty = stripTyEqns g ty match ty with - | TType_app (tcref, args) -> + | TType_app (tcref, args, nullness) -> let tycon = tcref.Deref - if tycon.IsErased then - stripTyEqnsAndErase eraseFuncAndTuple g (reduceTyconMeasureableOrProvided g tycon args) + if tycon.IsErased then + let reducedTy = reduceTyconMeasureableOrProvided g tycon args + let reducedTy2 = addNullnessToTy nullness reducedTy + stripTyEqnsAndErase eraseFuncAndTuple g reducedTy2 elif tyconRefEq g tcref g.nativeptr_tcr && eraseFuncAndTuple then stripTyEqnsAndErase eraseFuncAndTuple g g.nativeint_ty else ty - | TType_fun(a, b) when eraseFuncAndTuple -> TType_app(g.fastFunc_tcr, [ a; b]) + | TType_fun(a, b, nullness) when eraseFuncAndTuple -> TType_app(g.fastFunc_tcr, [ a; b], nullness) | TType_tuple(tupInfo, l) when eraseFuncAndTuple -> mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) l | ty -> ty @@ -795,12 +805,12 @@ let rec stripExnEqns (eref: TyconRef) = | _ -> exnc let primDestForallTy g ty = ty |> stripTyEqns g |> (function TType_forall (tyvs, tau) -> (tyvs, tau) | _ -> failwith "primDestForallTy: not a forall type") -let destFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau) -> (tyv, tau) | _ -> failwith "destFunTy: not a function type") +let destFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _nullness) -> (tyv, tau) | _ -> failwith "destFunTy: not a function type") let destAnyTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) -> tupInfo, l | _ -> failwith "destAnyTupleTy: not a tuple type") let destRefTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) when not (evalTupInfoIsStruct tupInfo) -> l | _ -> failwith "destRefTupleTy: not a reference tuple type") let destStructTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) when evalTupInfoIsStruct tupInfo -> l | _ -> failwith "destStructTupleTy: not a struct tuple type") -let destTyparTy g ty = ty |> stripTyEqns g |> (function TType_var v -> v | _ -> failwith "destTyparTy: not a typar type") -let destAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var v -> v | TType_measure unt -> destUnitParMeasure g unt | _ -> failwith "destAnyParTy: not a typar or unpar type") +let destTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> v | _ -> failwith "destTyparTy: not a typar type") +let destAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> v | TType_measure unt -> destUnitParMeasure g unt | _ -> failwith "destAnyParTy: not a typar or unpar type") let destMeasureTy g ty = ty |> stripTyEqns g |> (function TType_measure m -> m | _ -> failwith "destMeasureTy: not a unit-of-measure type") let isFunTy g ty = ty |> stripTyEqns g |> (function TType_fun _ -> true | _ -> false) let isForallTy g ty = ty |> stripTyEqns g |> (function TType_forall _ -> true | _ -> false) @@ -809,48 +819,48 @@ let isRefTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, _ let isStructTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, _) -> evalTupInfoIsStruct tupInfo | _ -> false) let isAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon _ -> true | _ -> false) let isStructAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon (anonInfo, _) -> evalAnonInfoIsStruct anonInfo | _ -> false) -let isUnionTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsUnionTycon | _ -> false) -let isReprHiddenTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsHiddenReprTycon | _ -> false) -let isFSharpObjModelTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsFSharpObjectModelTycon | _ -> false) -let isRecdTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsRecordTycon | _ -> false) -let isFSharpStructOrEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsFSharpStructOrEnumTycon | _ -> false) -let isFSharpEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsFSharpEnumTycon | _ -> false) +let isUnionTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsUnionTycon | _ -> false) +let isReprHiddenTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsHiddenReprTycon | _ -> false) +let isFSharpObjModelTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsFSharpObjectModelTycon | _ -> false) +let isRecdTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsRecordTycon | _ -> false) +let isFSharpStructOrEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsFSharpStructOrEnumTycon | _ -> false) +let isFSharpEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsFSharpEnumTycon | _ -> false) let isTyparTy g ty = ty |> stripTyEqns g |> (function TType_var _ -> true | _ -> false) let isAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var _ -> true | TType_measure unt -> isUnitParMeasure g unt | _ -> false) let isMeasureTy g ty = ty |> stripTyEqns g |> (function TType_measure _ -> true | _ -> false) - let isProvenUnionCaseTy ty = match ty with TType_ucase _ -> true | _ -> false -let mkAppTy tcref tyargs = TType_app(tcref, tyargs) +let mkAppTy tcref tyargs = TType_app(tcref, tyargs, KnownWithoutNull) // TODO NULLNESS - check various callers let mkProvenUnionCaseTy ucref tyargs = TType_ucase(ucref, tyargs) let isAppTy g ty = ty |> stripTyEqns g |> (function TType_app _ -> true | _ -> false) -let tryAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst) -> ValueSome (tcref, tinst) | _ -> ValueNone) -let destAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst) -> tcref, tinst | _ -> failwith "destAppTy") -let tcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref | _ -> failwith "tcrefOfAppTy") -let argsOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(_, tinst) -> tinst | _ -> []) -let tryDestTyparTy g ty = ty |> stripTyEqns g |> (function TType_var v -> ValueSome v | _ -> ValueNone) -let tryDestFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau) -> ValueSome(tyv, tau) | _ -> ValueNone) -let tryTcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> ValueSome tcref | _ -> ValueNone) +let tryAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> ValueSome (tcref, tinst) | _ -> ValueNone) +let destAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> tcref, tinst | _ -> failwith "destAppTy") +let tcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref | _ -> failwith "tcrefOfAppTy") +let nullnessOfTy g ty = ty |> stripTyEqns g |> (function TType_app(_, _, nullness) | TType_fun (_, _, nullness) | TType_var (_, nullness) -> nullness | _ -> g.knownWithoutNull) +let argsOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(_, tinst, _) -> tinst | _ -> []) +let tryDestTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> ValueSome v | _ -> ValueNone) +let tryDestFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _) -> ValueSome(tyv, tau) | _ -> ValueNone) +let tryTcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> ValueSome tcref | _ -> ValueNone) let tryDestAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon (anonInfo, tys) -> ValueSome (anonInfo, tys) | _ -> ValueNone) -let tryAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var v -> ValueSome v | TType_measure unt when isUnitParMeasure g unt -> ValueSome(destUnitParMeasure g unt) | _ -> ValueNone) -let tryAnyParTyOption g ty = ty |> stripTyEqns g |> (function TType_var v -> Some v | TType_measure unt when isUnitParMeasure g unt -> Some(destUnitParMeasure g unt) | _ -> None) -let (|AppTy|_|) g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst) -> Some (tcref, tinst) | _ -> None) +let tryAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> ValueSome v | TType_measure unt when isUnitParMeasure g unt -> ValueSome(destUnitParMeasure g unt) | _ -> ValueNone) +let tryAnyParTyOption g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> Some v | TType_measure unt when isUnitParMeasure g unt -> Some(destUnitParMeasure g unt) | _ -> None) +let (|AppTy|_|) g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> Some (tcref, tinst) | _ -> None) let (|RefTupleTy|_|) g ty = ty |> stripTyEqns g |> (function TType_tuple(tupInfo, tys) when not (evalTupInfoIsStruct tupInfo) -> Some tys | _ -> None) -let (|FunTy|_|) g ty = ty |> stripTyEqns g |> (function TType_fun(dty, rty) -> Some (dty, rty) | _ -> None) +let (|FunTy|_|) g ty = ty |> stripTyEqns g |> (function TType_fun(dty, rty, _nullness) -> Some (dty, rty) | _ -> None) let tryNiceEntityRefOfTy ty = - let ty = stripTyparEqnsAux false ty + let ty = stripTyparEqnsAux KnownWithoutNull false ty match ty with - | TType_app (tcref, _) -> ValueSome tcref + | TType_app (tcref, _, _) -> ValueSome tcref | TType_measure (Measure.Con tcref) -> ValueSome tcref | _ -> ValueNone let tryNiceEntityRefOfTyOption ty = - let ty = stripTyparEqnsAux false ty + let ty = stripTyparEqnsAux KnownWithoutNull false ty match ty with - | TType_app (tcref, _) -> Some tcref + | TType_app (tcref, _, _) -> Some tcref | TType_measure (Measure.Con tcref) -> Some tcref | _ -> None @@ -867,7 +877,7 @@ let convertToTypeWithMetadataIfPossible g ty = let (tupInfo, tupElemTys) = destAnyTupleTy g ty mkOuterCompiledTupleTy g (evalTupInfoIsStruct tupInfo) tupElemTys elif isFunTy g ty then - let (a,b) = destFunTy g ty + let (a, b (*, nullness *) ) = destFunTy g ty mkAppTy g.fastFunc_tcr [a; b] else ty @@ -945,6 +955,7 @@ and typarConstraintsAEquivAux erasureFlag g aenv tpc1 tpc2 = | TyparConstraint.SupportsComparison _, TyparConstraint.SupportsComparison _ | TyparConstraint.SupportsEquality _, TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _, TyparConstraint.SupportsNull _ + | TyparConstraint.NotSupportsNull _, TyparConstraint.NotSupportsNull _ | TyparConstraint.IsNonNullableStruct _, TyparConstraint.IsNonNullableStruct _ | TyparConstraint.IsReferenceType _, TyparConstraint.IsReferenceType _ | TyparConstraint.IsUnmanaged _, TyparConstraint.IsUnmanaged _ @@ -970,13 +981,13 @@ and typeAEquivAux erasureFlag g aenv ty1 ty2 = match ty1, ty2 with | TType_forall(tps1, rty1), TType_forall(tps2, rty2) -> typarsAEquivAux erasureFlag g aenv tps1 tps2 && typeAEquivAux erasureFlag g (aenv.BindEquivTypars tps1 tps2) rty1 rty2 - | TType_var tp1, TType_var tp2 when typarEq tp1 tp2 -> + | TType_var (tp1, _nullness1), TType_var (tp2, _nullness2) when typarEq tp1 tp2 -> // NOTE: nullness annotations are ignored for type equivalence true - | TType_var tp1, _ -> + | TType_var (tp1, _nullness1), _ -> match aenv.EquivTypars.TryFind tp1 with | Some v -> typeEquivAux erasureFlag g v ty2 | None -> false - | TType_app (tc1, b1), TType_app (tc2, b2) -> + | TType_app (tc1, b1, _nullness1), TType_app (tc2, b2, _nullness2) -> // NOTE: nullness annotations are ignored for type equivalence tcrefAEquiv g aenv tc1 tc2 && typesAEquivAux erasureFlag g aenv b1 b2 | TType_ucase (UnionCaseRef(tc1, n1), b1), TType_ucase (UnionCaseRef(tc2, n2), b2) -> @@ -985,11 +996,11 @@ and typeAEquivAux erasureFlag g aenv ty1 ty2 = typesAEquivAux erasureFlag g aenv b1 b2 | TType_tuple (s1, l1), TType_tuple (s2, l2) -> structnessAEquiv s1 s2 && typesAEquivAux erasureFlag g aenv l1 l2 + | TType_fun (dtys1, rty1, _nullness1), TType_fun (dtys2, rty2, _nullness2) -> // NOTE: nullness annotations are ignored for type equivalence + typeAEquivAux erasureFlag g aenv dtys1 dtys2 && typeAEquivAux erasureFlag g aenv rty1 rty2 | TType_anon (anonInfo1, l1), TType_anon (anonInfo2, l2) -> anonInfoEquiv anonInfo1 anonInfo2 && typesAEquivAux erasureFlag g aenv l1 l2 - | TType_fun (dtys1, rty1), TType_fun (dtys2, rty2) -> - typeAEquivAux erasureFlag g aenv dtys1 dtys2 && typeAEquivAux erasureFlag g aenv rty1 rty2 | TType_measure m1, TType_measure m2 -> match erasureFlag with | EraseNone -> measureAEquiv g aenv m1 m2 @@ -1035,7 +1046,7 @@ let measureEquiv g m1 m2 = measureAEquiv g TypeEquivEnv.Empty m1 m2 let isErasedType g ty = match stripTyEqns g ty with #if !NO_EXTENSIONTYPING - | TType_app (tcref, _) -> tcref.IsProvidedErasedTycon + | TType_app (tcref, _, _) -> tcref.IsProvidedErasedTycon #endif | _ -> false @@ -1046,12 +1057,20 @@ let rec getErasedTypes g ty = match ty with | TType_forall(_, rty) -> getErasedTypes g rty - | TType_var tp -> - if tp.IsErased then [ty] else [] - | TType_app (_, b) | TType_ucase(_, b) | TType_anon (_, b) | TType_tuple (_, b) -> + | TType_var (tp, nullness) -> + match nullness.Evaluate() with + | NullnessInfo.WithNull -> [ty] // with-null annotations can't be tested at runtime (TODO NULLNESS: for value types Nullable<_> they can be) + | _ -> if tp.IsErased then [ty] else [] + | TType_app (_, b, nullness) -> + match nullness.Evaluate() with + | NullnessInfo.WithNull -> [ty] + | _ -> List.foldBack (fun ty tys -> getErasedTypes g ty @ tys) b [] + | TType_ucase(_, b) | TType_anon (_, b) | TType_tuple (_, b) -> List.foldBack (fun ty tys -> getErasedTypes g ty @ tys) b [] - | TType_fun (dty, rty) -> - getErasedTypes g dty @ getErasedTypes g rty + | TType_fun (dty, rty, nullness) -> + match nullness.Evaluate() with + | NullnessInfo.WithNull -> [ty] + | _ -> getErasedTypes g dty @ getErasedTypes g rty | TType_measure _ -> [ty] @@ -1080,9 +1099,7 @@ let unionCaseRefOrder = // Make some common types //--------------------------------------------------------------------------- -let mkFunTy d r = TType_fun (d, r) - -let (-->) d r = mkFunTy d r +let mkFunTy (g: TcGlobals) d r = TType_fun (d, r, g.knownWithoutNull) let mkForallTy d r = TType_forall (d, r) @@ -1090,7 +1107,9 @@ let mkForallTyIfNeeded d r = if isNil d then r else mkForallTy d r let (+->) d r = mkForallTyIfNeeded d r -let mkIteratedFunTy dl r = List.foldBack (-->) dl r +let mkIteratedFunTy g dl r = List.foldBack (mkFunTy g) dl r + +let mkLambdaTy g tps tys rty = mkForallTyIfNeeded tps (mkIteratedFunTy g tys rty) let mkLambdaArgTy m tys = match tys with @@ -1099,8 +1118,8 @@ let mkLambdaArgTy m tys = | _ -> mkRawRefTupleTy tys let typeOfLambdaArg m vs = mkLambdaArgTy m (typesOfVals vs) -let mkMultiLambdaTy m vs rty = mkFunTy (typeOfLambdaArg m vs) rty -let mkLambdaTy tps tys rty = mkForallTyIfNeeded tps (mkIteratedFunTy tys rty) + +let mkMultiLambdaTy g m vs rty = mkFunTy g (typeOfLambdaArg m vs) rty /// When compiling FSharp.Core.dll we have to deal with the non-local references into /// the library arising from env.fs. Part of this means that we have to be able to resolve these @@ -1212,29 +1231,29 @@ let mkTypeChoose m vs b = match vs with [] -> b | _ -> Expr.TyChoose (vs, b, m) let mkObjExpr (ty, basev, basecall, overrides, iimpls, m) = Expr.Obj (newUnique(), ty, basev, basecall, overrides, iimpls, m) -let mkLambdas m tps (vs: Val list) (b, rty) = - mkTypeLambda m tps (List.foldBack (fun v (e, ty) -> mkLambda m v (e, ty), v.Type --> ty) vs (b, rty)) +let mkLambdas g m tps (vs: Val list) (b, rty) = + mkTypeLambda m tps (List.foldBack (fun v (e, ty) -> mkLambda m v (e, ty), mkFunTy g v.Type ty) vs (b, rty)) -let mkMultiLambdasCore m vsl (b, rty) = - List.foldBack (fun v (e, ty) -> mkMultiLambda m v (e, ty), typeOfLambdaArg m v --> ty) vsl (b, rty) +let mkMultiLambdasCore g m vsl (b, rty) = + List.foldBack (fun v (e, ty) -> mkMultiLambda m v (e, ty), mkFunTy g (typeOfLambdaArg m v) ty) vsl (b, rty) -let mkMultiLambdas m tps vsl (b, rty) = - mkTypeLambda m tps (mkMultiLambdasCore m vsl (b, rty) ) +let mkMultiLambdas g m tps vsl (b, rty) = + mkTypeLambda m tps (mkMultiLambdasCore g m vsl (b, rty) ) -let mkMemberLambdas m tps ctorThisValOpt baseValOpt vsl (b, rty) = +let mkMemberLambdas g m tps ctorThisValOpt baseValOpt vsl (b, rty) = let expr = match ctorThisValOpt, baseValOpt with - | None, None -> mkMultiLambdasCore m vsl (b, rty) + | None, None -> mkMultiLambdasCore g m vsl (b, rty) | _ -> match vsl with | [] -> error(InternalError("mk_basev_multi_lambdas_core: can't attach a basev to a non-lambda expression", m)) | h :: t -> - let b, rty = mkMultiLambdasCore m t (b, rty) - (rebuildLambda m ctorThisValOpt baseValOpt h (b, rty), (typeOfLambdaArg m h --> rty)) + let b, rty = mkMultiLambdasCore g m t (b, rty) + (rebuildLambda m ctorThisValOpt baseValOpt h (b, rty), (mkFunTy g (typeOfLambdaArg m h) rty)) mkTypeLambda m tps expr -let mkMultiLambdaBind v letSeqPtOpt m tps vsl (b, rty) = - TBind(v, mkMultiLambdas m tps vsl (b, rty), letSeqPtOpt) +let mkMultiLambdaBind g v letSeqPtOpt m tps vsl (b, rty) = + TBind(v, mkMultiLambdas g m tps vsl (b, rty), letSeqPtOpt) let mkBind seqPtOpt v e = TBind(v, e, seqPtOpt) @@ -1629,36 +1648,36 @@ let tyconRefEqOpt g tcOpt tc = | None -> false | Some tc2 -> tyconRefEq g tc2 tc -let isStringTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.system_String_tcref | _ -> false) -let isListTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.list_tcr_canon | _ -> false) -let isArrayTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isArrayTyconRef g tcref | _ -> false) -let isArray1DTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.il_arr_tcr_map.[0] | _ -> false) -let isUnitTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.unit_tcr_canon tcref | _ -> false) -let isObjTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.system_Object_tcref tcref | _ -> false) -let isVoidTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.system_Void_tcref tcref | _ -> false) -let isILAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsILTycon | _ -> false) -let isNativePtrTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.nativeptr_tcr tcref | _ -> false) +let isStringTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.system_String_tcref | _ -> false) +let isListTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.list_tcr_canon | _ -> false) +let isArrayTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isArrayTyconRef g tcref | _ -> false) +let isArray1DTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.il_arr_tcr_map.[0] | _ -> false) +let isUnitTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.unit_tcr_canon tcref | _ -> false) +let isObjTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.system_Object_tcref tcref | _ -> false) +let isVoidTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.system_Void_tcref tcref | _ -> false) +let isILAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsILTycon | _ -> false) +let isNativePtrTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.nativeptr_tcr tcref | _ -> false) let isByrefTy g ty = ty |> stripTyEqns g |> (function - | TType_app(tcref, _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref - | TType_app(tcref, _) -> tyconRefEq g g.byref_tcr tcref + | TType_app(tcref, _, _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref + | TType_app(tcref, _, _) -> tyconRefEq g g.byref_tcr tcref | _ -> false) -let isInByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, []) -> tyconRefEq g g.byrefkind_In_tcr tcref | _ -> false) +let isInByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, [], _) -> tyconRefEq g g.byrefkind_In_tcr tcref | _ -> false) let isInByrefTy g ty = ty |> stripTyEqns g |> (function - | TType_app(tcref, [_; tag]) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isInByrefTag g tag + | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isInByrefTag g tag | _ -> false) -let isOutByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, []) -> tyconRefEq g g.byrefkind_Out_tcr tcref | _ -> false) +let isOutByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, [], _) -> tyconRefEq g g.byrefkind_Out_tcr tcref | _ -> false) let isOutByrefTy g ty = ty |> stripTyEqns g |> (function - | TType_app(tcref, [_; tag]) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isOutByrefTag g tag + | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isOutByrefTag g tag | _ -> false) #if !NO_EXTENSIONTYPING -let extensionInfoOfTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.TypeReprInfo | _ -> TNoRepr) +let extensionInfoOfTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.TypeReprInfo | _ -> TNoRepr) #endif type TypeDefMetadata = @@ -2042,6 +2061,7 @@ and accFreeInTyparConstraint opts tpc acc = | TyparConstraint.SupportsComparison _ | TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _ + | TyparConstraint.NotSupportsNull _ | TyparConstraint.IsNonNullableStruct _ | TyparConstraint.IsReferenceType _ | TyparConstraint.IsUnmanaged _ @@ -2091,15 +2111,17 @@ and accFreeInType opts ty acc = match stripTyparEqns ty with | TType_tuple (tupInfo, l) -> accFreeInTypes opts l (accFreeInTupInfo opts tupInfo acc) | TType_anon (anonInfo, l) -> accFreeInTypes opts l (accFreeInTupInfo opts anonInfo.TupInfo acc) - | TType_app (tc, tinst) -> + | TType_app (tc, tinst, _nullness) -> let acc = accFreeTycon opts tc acc match tinst with | [] -> acc // optimization to avoid unneeded call | [h] -> accFreeInType opts h acc // optimization to avoid unneeded call | _ -> accFreeInTypes opts tinst acc - | TType_ucase (UnionCaseRef(tc, _), tinst) -> accFreeInTypes opts tinst (accFreeTycon opts tc acc) - | TType_fun (d, r) -> accFreeInType opts d (accFreeInType opts r acc) - | TType_var r -> accFreeTyparRef opts r acc + | TType_ucase (UnionCaseRef(tc, _), tinst) -> accFreeInTypes opts tinst (accFreeTycon opts tc acc) + | TType_fun (d, r, _nullness) -> + // note, nullness variables are _not_ part of the type system proper + accFreeInType opts d (accFreeInType opts r acc) + | TType_var (r, _nullness) -> accFreeTyparRef opts r acc | TType_forall (tps, r) -> unionFreeTyvars (boundTypars opts tps (freeInType opts r)) acc | TType_measure unt -> accFreeInMeasure opts unt acc @@ -2162,6 +2184,7 @@ and accFreeInTyparConstraintLeftToRight g cxFlag thruFlag acc tpc = | TyparConstraint.SupportsComparison _ | TyparConstraint.SupportsEquality _ | TyparConstraint.SupportsNull _ + | TyparConstraint.NotSupportsNull _ | TyparConstraint.IsNonNullableStruct _ | TyparConstraint.IsUnmanaged _ | TyparConstraint.IsReferenceType _ @@ -2191,21 +2214,18 @@ and accFreeInTypeLeftToRight g cxFlag thruFlag acc ty = | TType_tuple (tupInfo, tupTys) -> let acc = accFreeInTupInfoLeftToRight g cxFlag thruFlag acc tupInfo accFreeInTypesLeftToRight g cxFlag thruFlag acc tupTys - | TType_app (_, tinst) -> + | TType_app (_, tinst, _nullness) -> accFreeInTypesLeftToRight g cxFlag thruFlag acc tinst - | TType_ucase (_, tinst) -> + | TType_ucase (_, tinst) -> accFreeInTypesLeftToRight g cxFlag thruFlag acc tinst - | TType_fun (d, r) -> - let dacc = accFreeInTypeLeftToRight g cxFlag thruFlag acc d - accFreeInTypeLeftToRight g cxFlag thruFlag dacc r - | TType_var r -> + | TType_fun (d, r, _nullness) -> + accFreeInTypeLeftToRight g cxFlag thruFlag (accFreeInTypeLeftToRight g cxFlag thruFlag acc d ) r + | TType_var (r, _nullness) -> accFreeTyparRefLeftToRight g cxFlag thruFlag acc r - | TType_forall (tps, r) -> - let racc = accFreeInTypeLeftToRight g cxFlag thruFlag emptyFreeTyparsLeftToRight r - unionFreeTyparsLeftToRight (boundTyparsLeftToRight g cxFlag thruFlag tps racc) acc + | TType_forall (tps, r) -> + unionFreeTyparsLeftToRight (boundTyparsLeftToRight g cxFlag thruFlag tps (accFreeInTypeLeftToRight g cxFlag thruFlag emptyFreeTyparsLeftToRight r)) acc | TType_measure unt -> - let mvars = ListMeasureVarOccsWithNonZeroExponents unt - List.foldBack (fun (tp, _) acc -> accFreeTyparRefLeftToRight g cxFlag thruFlag acc tp) mvars acc + List.foldBack (fun (tp, _) acc -> accFreeTyparRefLeftToRight g cxFlag thruFlag acc tp) (ListMeasureVarOccsWithNonZeroExponents unt) acc and accFreeInTupInfoLeftToRight _g _cxFlag _thruFlag acc unt = match unt with @@ -2392,16 +2412,26 @@ let ArgInfosOfPropertyVal g (v: Val) = // Generalize type constructors to types //--------------------------------------------------------------------------- -let generalTyconRefInst (tc: TyconRef) = generalizeTypars tc.TyparsNoRange +let generalTyconRefInst (tcref: TyconRef) = + generalizeTypars tcref.TyparsNoRange -let generalizeTyconRef tc = - let tinst = generalTyconRefInst tc - tinst, TType_app(tc, tinst) +let generalizeTyconRef (g: TcGlobals) tcref = + let tinst = generalTyconRefInst tcref + tinst, TType_app(tcref, tinst, g.knownWithoutNull) -let generalizedTyconRef tc = TType_app(tc, generalTyconRefInst tc) +let generalizedTyconRef (g: TcGlobals) tcref = + let tinst = generalTyconRefInst tcref + TType_app(tcref, tinst, g.knownWithoutNull) -let isTTyparSupportsStaticMethod = function TyparConstraint.MayResolveMember _ -> true | _ -> false -let isTTyparCoercesToType = function TyparConstraint.CoercesTo _ -> true | _ -> false +let isTTyparSupportsStaticMethod tpc = + match tpc with + | TyparConstraint.MayResolveMember _ -> true + | _ -> false + +let isTTyparCoercesToType tpc = + match tpc with + | TyparConstraint.CoercesTo _ -> true + | _ -> false //-------------------------------------------------------------------------- // Print Signatures/Types - prelude @@ -2596,11 +2626,11 @@ module SimplifyTypes = let z = f z ty match ty with | TType_forall (_, body) -> foldTypeButNotConstraints f z body - | TType_app (_, tys) + | TType_app (_, tys, _) | TType_ucase (_, tys) | TType_anon (_, tys) | TType_tuple (_, tys) -> List.fold (foldTypeButNotConstraints f) z tys - | TType_fun (s, t) -> foldTypeButNotConstraints f (foldTypeButNotConstraints f z s) t + | TType_fun (s, t, _nullness) -> foldTypeButNotConstraints f (foldTypeButNotConstraints f z s) t | TType_var _ -> z | TType_measure _ -> z @@ -2610,7 +2640,7 @@ module SimplifyTypes = let accTyparCounts z ty = // Walk type to determine typars and their counts (for pprinting decisions) - foldTypeButNotConstraints (fun z ty -> match ty with | TType_var tp when tp.Rigidity = TyparRigidity.Rigid -> incM tp z | _ -> z) z ty + foldTypeButNotConstraints (fun z ty -> match ty with | TType_var (tp, _nullness) when tp.Rigidity = TyparRigidity.Rigid -> incM tp z | _ -> z) z ty let emptyTyparCounts = Zmap.empty typarOrder @@ -2781,8 +2811,8 @@ let tagEntityRefName (xref: EntityRef) name = elif xref.IsRecordTycon then tagRecord name else tagClass name -let fullDisplayTextOfTyconRef (tc: TyconRef) = - fullNameOfEntityRef (fun tc -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) tc +let fullDisplayTextOfTyconRef r = + fullNameOfEntityRef (fun (tcref:TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r let fullNameOfEntityRefAsLayout nmF (xref: EntityRef) = let navigableText = @@ -2814,13 +2844,23 @@ let fullNameOfParentOfValRefAsLayout vref = let fullDisplayTextOfParentOfModRef r = fullNameOfParentOfEntityRef r -let fullDisplayTextOfModRef r = fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r -let fullDisplayTextOfTyconRefAsLayout r = fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r -let fullDisplayTextOfExnRef r = fullNameOfEntityRef (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r -let fullDisplayTextOfExnRefAsLayout r = fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r +let fullDisplayTextOfModRef r = + fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r + +let fullDisplayTextOfTyconRefAsLayout r = + fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r + +let fullDisplayTextOfExnRef r = + fullNameOfEntityRef (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r + +let fullDisplayTextOfExnRefAsLayout r = + fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r -let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) = fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName -let fullDisplayTextOfRecdFieldRef (rfref: RecdFieldRef) = fullDisplayTextOfTyconRef rfref.TyconRef +.+ rfref.FieldName +let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) = + fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName + +let fullDisplayTextOfRecdFieldRef (rfref: RecdFieldRef) = + fullDisplayTextOfTyconRef rfref.TyconRef +.+ rfref.FieldName let fullDisplayTextOfValRef (vref: ValRef) = match fullNameOfParentOfValRef vref with @@ -3041,7 +3081,7 @@ let isSpanLikeTyconRef g m tcref = not (isByrefTyconRef g tcref) let isByrefLikeTy g m ty = - ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isByrefLikeTyconRef g m tcref | _ -> false) + ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isByrefLikeTyconRef g m tcref | _ -> false) let isSpanLikeTy g m ty = isByrefLikeTy g m ty && @@ -3052,7 +3092,7 @@ let isSpanTyconRef g m tcref = tcref.CompiledRepresentationForNamedType.BasicQualifiedName = "System.Span`1" let isSpanTy g m ty = - ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isSpanTyconRef g m tcref | _ -> false) + ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isSpanTyconRef g m tcref | _ -> false) let rec tryDestSpanTy g m ty = match tryAppTy g ty with @@ -3069,7 +3109,7 @@ let isReadOnlySpanTyconRef g m tcref = tcref.CompiledRepresentationForNamedType.BasicQualifiedName = "System.ReadOnlySpan`1" let isReadOnlySpanTy g m ty = - ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isReadOnlySpanTyconRef g m tcref | _ -> false) + ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isReadOnlySpanTyconRef g m tcref | _ -> false) let tryDestReadOnlySpanTy g m ty = match tryAppTy g ty with @@ -3087,8 +3127,8 @@ let destReadOnlySpanTy g m ty = let destByrefTy g ty = match ty |> stripTyEqns g with - | TType_app(tcref, [x; _]) when g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tcref -> x // Check sufficient FSharp.Core - | TType_app(tcref, [x]) when tyconRefEq g g.byref_tcr tcref -> x // all others + | TType_app(tcref, [x; _], _) when g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tcref -> x // Check sufficient FSharp.Core + | TType_app(tcref, [x], _) when tyconRefEq g g.byref_tcr tcref -> x // all others | _ -> failwith "destByrefTy: not a byref type" let (|ByrefTy|_|) g ty = @@ -3097,7 +3137,7 @@ let (|ByrefTy|_|) g ty = let destNativePtrTy g ty = match ty |> stripTyEqns g with - | TType_app(tcref, [x]) when tyconRefEq g g.nativeptr_tcr tcref -> x + | TType_app(tcref, [x], _) when tyconRefEq g g.nativeptr_tcr tcref -> x | _ -> failwith "destNativePtrTy: not a native ptr type" let isRefCellTy g ty = @@ -3107,7 +3147,7 @@ let isRefCellTy g ty = let destRefCellTy g ty = match ty |> stripTyEqns g with - | TType_app(tcref, [x]) when tyconRefEq g g.refcell_tcr_canon tcref -> x + | TType_app(tcref, [x], _) when tyconRefEq g g.refcell_tcr_canon tcref -> x | _ -> failwith "destRefCellTy: not a ref type" let StripSelfRefCell(g: TcGlobals, baseOrThisInfo: ValBaseOrThisInfo, tau: TType) : TType = @@ -3115,17 +3155,17 @@ let StripSelfRefCell(g: TcGlobals, baseOrThisInfo: ValBaseOrThisInfo, tau: TType then destRefCellTy g tau else tau -let mkRefCellTy (g: TcGlobals) ty = TType_app(g.refcell_tcr_nice, [ty]) +let mkRefCellTy (g: TcGlobals) ty = TType_app(g.refcell_tcr_nice, [ty], g.knownWithoutNull) -let mkLazyTy (g: TcGlobals) ty = TType_app(g.lazy_tcr_nice, [ty]) +let mkLazyTy (g: TcGlobals) ty = TType_app(g.lazy_tcr_nice, [ty], g.knownWithoutNull) -let mkPrintfFormatTy (g: TcGlobals) aty bty cty dty ety = TType_app(g.format_tcr, [aty;bty;cty;dty; ety]) +let mkPrintfFormatTy (g: TcGlobals) aty bty cty dty ety = TType_app(g.format_tcr, [aty;bty;cty;dty; ety], g.knownWithoutNull) -let mkOptionTy (g: TcGlobals) ty = TType_app (g.option_tcr_nice, [ty]) +let mkOptionTy (g: TcGlobals) ty = TType_app (g.option_tcr_nice, [ty], g.knownWithoutNull) -let mkNullableTy (g: TcGlobals) ty = TType_app (g.system_Nullable_tcref, [ty]) +let mkListTy (g: TcGlobals) ty = TType_app (g.list_tcr_nice, [ty], g.knownWithoutNull) -let mkListTy (g: TcGlobals) ty = TType_app (g.list_tcr_nice, [ty]) +let mkNullableTy (g: TcGlobals) ty = TType_app (g.system_Nullable_tcref, [ty], g.knownWithoutNull) let isOptionTy (g: TcGlobals) ty = match tryTcrefOfAppTy g ty with @@ -3339,8 +3379,7 @@ module DebugPrint = let stampL _n w = w - let layoutTyconRef (tc: TyconRef) = - wordL (tagText tc.DisplayNameWithStaticParameters) |> stampL tc.Stamp + let layoutTyconRef (tcref: TyconRef) = wordL (tagText tcref.DisplayNameWithStaticParameters) |> stampL tcref.Stamp let rec auxTypeL env ty = auxTypeWrapL env false ty @@ -3360,20 +3399,43 @@ module DebugPrint = else tupleL tinstL ^^ tcL + and auxAddNullness coreL (nullness: Nullness) = + match nullness.Evaluate() with + | NullnessInfo.WithNull -> coreL ^^ wordL (tagText "?") + | NullnessInfo.WithoutNull -> coreL + | NullnessInfo.AmbivalentToNull -> coreL ^^ wordL (tagText "%") + and auxTypeWrapL env isAtomic ty = let wrap x = bracketIfL isAtomic x in // wrap iff require atomic expr match stripTyparEqns ty with | TType_forall (typars, rty) -> (leftL (tagText "!") ^^ layoutTyparDecls typars --- auxTypeL env rty) |> wrap - | TType_ucase (UnionCaseRef(tcref, _), tinst) - | TType_app (tcref, tinst) -> + + | TType_ucase (UnionCaseRef(tcref, _), tinst) -> let prefix = tcref.IsPrefixDisplay let tcL = layoutTyconRef tcref auxTyparsL env tcL prefix tinst - | TType_anon (anonInfo, tys) -> braceBarL (sepListL (wordL (tagText ";")) (List.map2 (fun nm ty -> wordL (tagField nm) --- auxTypeAtomL env ty) (Array.toList anonInfo.SortedNames) tys)) - | TType_tuple (_tupInfo, tys) -> sepListL (wordL (tagText "*")) (List.map (auxTypeAtomL env) tys) |> wrap - | TType_fun (f, x) -> ((auxTypeAtomL env f ^^ wordL (tagText "->")) --- auxTypeL env x) |> wrap - | TType_var typar -> auxTyparWrapL env isAtomic typar + + | TType_app (tcref, tinst, nullness) -> + let prefix = tcref.IsPrefixDisplay + let tcL = layoutTyconRef tcref + let coreL = auxTyparsL env tcL prefix tinst + auxAddNullness coreL nullness + + | TType_tuple (_tupInfo, tys) -> + sepListL (wordL (tagText "*")) (List.map (auxTypeAtomL env) tys) |> wrap + + | TType_fun (f, x, nullness) -> + let coreL = ((auxTypeAtomL env f ^^ wordL (tagText "->")) --- auxTypeL env x) |> wrap + auxAddNullness coreL nullness + + | TType_var (typar, nullness) -> + let coreL = auxTyparWrapL env isAtomic typar + auxAddNullness coreL nullness + + | TType_anon (anonInfo, tys) -> + braceBarL (sepListL (wordL (tagText ";")) (List.map2 (fun nm ty -> wordL (tagField nm) --- auxTypeAtomL env ty) (Array.toList anonInfo.SortedNames) tys)) + | TType_measure unt -> #if DEBUG leftL (tagText "{") ^^ @@ -3385,7 +3447,7 @@ module DebugPrint = let negvs, posvs = ListMeasureVarOccsWithNonZeroExponents unt |> sortVars |> List.partition (fun (_, e) -> SignRational e < 0) let negcs, poscs = ListMeasureConOccsWithNonZeroExponents g false unt |> sortCons |> List.partition (fun (_, e) -> SignRational e < 0) let unparL (uv: Typar) = wordL (tagText ("'" + uv.DisplayName)) - let unconL tc = layoutTyconRef tc + let unconL tcref = layoutTyconRef tcref let rationalL e = wordL (tagText(RationalToString e)) let measureToPowerL x e = if e = OneRational then x else x -- wordL (tagText "^") -- rationalL e let prefix = @@ -3473,6 +3535,8 @@ module DebugPrint = wordL (tagText "struct") |> constraintPrefix | TyparConstraint.IsReferenceType _ -> wordL (tagText "not struct") |> constraintPrefix + | TyparConstraint.NotSupportsNull _ -> + wordL (tagText "not null") |> constraintPrefix | TyparConstraint.IsUnmanaged _ -> wordL (tagText "unmanaged") |> constraintPrefix | TyparConstraint.SimpleChoice(tys, _) -> @@ -3787,8 +3851,8 @@ module DebugPrint = wordL (tagText ecref.LogicalName) ^^ bracketL (commaListL (List.map atomL args)) | Expr.Op (TOp.Tuple _, _, xs, _) -> tupleL (List.map exprL xs) - | Expr.Op (TOp.Recd (ctor, tc), _, xs, _) -> - let fields = tc.TrueInstanceFieldsAsList + | Expr.Op (TOp.Recd (ctor, tcref), _, xs, _) -> + let fields = tcref.TrueInstanceFieldsAsList let lay fs x = (wordL (tagText fs.rfield_id.idText) ^^ sepL(tagText "=")) --- (exprL x) let ctorL = match ctor with @@ -5672,9 +5736,9 @@ let isQuotedExprTy g ty = match tryAppTy g ty with ValueSome (tcref, _) -> tycon let destQuotedExprTy g ty = match tryAppTy g ty with ValueSome (_, [ty]) -> ty | _ -> failwith "destQuotedExprTy" -let mkQuotedExprTy (g: TcGlobals) ty = TType_app(g.expr_tcr, [ty]) +let mkQuotedExprTy (g: TcGlobals) ty = TType_app(g.expr_tcr, [ty], g.knownWithoutNull) -let mkRawQuotedExprTy (g: TcGlobals) = TType_app(g.raw_expr_tcr, []) +let mkRawQuotedExprTy (g: TcGlobals) = TType_app(g.raw_expr_tcr, [], g.knownWithoutNull) let mkAnyTupledTy (g: TcGlobals) tupInfo tys = match tys with @@ -5689,9 +5753,9 @@ let mkRefTupledTy g tys = mkAnyTupledTy g tupInfoRef tys let mkRefTupledVarsTy g vs = mkRefTupledTy g (typesOfVals vs) -let mkMethodTy g argtys rty = mkIteratedFunTy (List.map (mkRefTupledTy g) argtys) rty +let mkMethodTy g argtys rty = mkIteratedFunTy g (List.map (mkRefTupledTy g) argtys) rty -let mkArrayType (g: TcGlobals) ty = TType_app (g.array_tcr_nice, [ty]) +let mkArrayType (g: TcGlobals) ty = TType_app (g.array_tcr_nice, [ty], g.knownWithoutNull) let mkByteArrayTy (g: TcGlobals) = mkArrayType g g.byte_ty @@ -5705,10 +5769,10 @@ let rec tyOfExpr g e = | Expr.Obj (_, ty, _, _, _, _, _) | Expr.Match (_, _, _, _, _, ty) | Expr.Quote (_, _, _, _, ty) - | Expr.Const (_, _, ty) -> (ty) - | Expr.Val (vref, _, _) -> vref.Type - | Expr.Sequential (a, b, k, _, _) -> tyOfExpr g (match k with NormalSeq -> b | ThenDoSeq -> a) - | Expr.Lambda (_, _, _, vs, _, _, rty) -> (mkRefTupledVarsTy g vs --> rty) + | Expr.Const (_, _, ty) -> ty + | Expr.Val (vref, _, _) -> vref.Type + | Expr.Sequential (a, b, k, _, _) -> tyOfExpr g (match k with NormalSeq -> b | ThenDoSeq -> a) + | Expr.Lambda (_, _, _, vs, _, _, rty) -> (mkFunTy g (mkRefTupledVarsTy g vs) rty) | Expr.TyLambda (_, tyvs, _, _, rty) -> (tyvs +-> rty) | Expr.Let (_, e, _, _) | Expr.TyChoose (_, e, _) @@ -6563,11 +6627,11 @@ let destIDelegateEventType g ty = | _ -> failwith "destIDelegateEventType: internal error" else failwith "destIDelegateEventType: not an IDelegateEvent type" -let mkIEventType (g: TcGlobals) ty1 ty2 = TType_app (g.fslib_IEvent2_tcr, [ty1;ty2]) +let mkIEventType (g: TcGlobals) ty1 ty2 = TType_app (g.fslib_IEvent2_tcr, [ty1;ty2], g.knownWithoutNull) -let mkIObservableType (g: TcGlobals) ty1 = TType_app (g.tcref_IObservable, [ty1]) +let mkIObservableType (g: TcGlobals) ty1 = TType_app (g.tcref_IObservable, [ty1], g.knownWithoutNull) -let mkIObserverType (g: TcGlobals) ty1 = TType_app (g.tcref_IObserver, [ty1]) +let mkIObserverType (g: TcGlobals) ty1 = TType_app (g.tcref_IObserver, [ty1], g.knownWithoutNull) let mkRefCellContentsRef (g: TcGlobals) = mkRecdFieldRef g.refcell_tcr_canon "contents" @@ -6902,15 +6966,13 @@ let mkCallArray3DSet (g: TcGlobals) m ty e1 idx1 idx2 idx3 v = mkApps g (typedEx let mkCallArray4DSet (g: TcGlobals) m ty e1 idx1 idx2 idx3 idx4 v = mkApps g (typedExprForIntrinsic g m g.array4D_set_info, [[ty]], [ e1 ; idx1; idx2; idx3; idx4; v ], m) -let mkCallHash (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.hash_info, [[ty]], [ e1 ], m) - -let mkCallBox (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.box_info, [[ty]], [ e1 ], m) +let mkCallHash (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.hash_info, [[ty]], [ e1 ], m) -let mkCallIsNull (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.isnull_info, [[ty]], [ e1 ], m) +let mkCallBox (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.box_info, [[ty]], [ e1 ], m) -let mkCallIsNotNull (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.isnotnull_info, [[ty]], [ e1 ], m) +let mkCallIsNull (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.isnull_info, [[ty]], [ e1 ], m) -let mkCallRaise (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.raise_info, [[ty]], [ e1 ], m) +let mkCallRaise (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.raise_info, [[ty]], [ e1 ], m) let mkCallNewDecimal (g: TcGlobals) m (e1, e2, e3, e4, e5) = mkApps g (typedExprForIntrinsic g m g.new_decimal_info, [], [ e1;e2;e3;e4;e5 ], m) @@ -7148,12 +7210,16 @@ let mkCompilationMappingAttrForQuotationResource (g: TcGlobals) (nm, tys: ILType let isTypeProviderAssemblyAttr (cattr: ILAttribute) = cattr.Method.DeclaringType.BasicQualifiedName = typeof.FullName -let TryDecodeTypeProviderAssemblyAttr ilg (cattr: ILAttribute) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let TryDecodeTypeProviderAssemblyAttr ilg (cattr: ILAttribute) : string option = +#else +let TryDecodeTypeProviderAssemblyAttr ilg (cattr: ILAttribute) : string? option = +#endif if isTypeProviderAssemblyAttr cattr then let parms, _args = decodeILAttribData ilg cattr match parms with // The first parameter to the attribute is the name of the assembly with the compiler extensions. - | (ILAttribElem.String (Some assemblyName)) :: _ -> Some assemblyName | (ILAttribElem.String None) :: _ -> Some null + | (ILAttribElem.String (Some assemblyName)) :: _ -> Some assemblyName | [] -> Some null | _ -> None else @@ -7370,7 +7436,7 @@ let AdjustValForExpectedArity g m (vref: ValRef) flags topValInfo = let call = MakeApplicationAndBetaReduce g (Expr.Val (vref, flags, m), vref.Type, [tyargs'], (List.map (mkRefTupledVars g m) vsl), m) let tauexpr, tauty = List.foldBack - (fun vs (e, ty) -> mkMultiLambda m vs (e, ty), (mkRefTupledVarsTy g vs --> ty)) + (fun vs (e, ty) -> mkMultiLambda m vs (e, ty), (mkFunTy g (mkRefTupledVarsTy g vs) ty)) vsl (call, rty') // Build a type-lambda expression for the toplevel value if needed... @@ -7599,8 +7665,8 @@ let AdjustPossibleSubsumptionExpr g (expr: Expr) (suppliedArgs: Expr list) : (Ex let inpsAsVars, inpsAsExprs = inpArgTys |> List.mapi (fun j ty -> mkCompGenLocal appm ("arg" + string i + string j) ty) |> List.unzip let inpsAsActualArg = CoerceDetupled inpArgTys inpsAsExprs actualArgTys - let inpCloVarType = (mkFunTy (mkRefTupledTy g actualArgTys) cloVar.Type) - let newResTy = mkFunTy inpArgTy resTy + let inpCloVarType = mkFunTy g (mkRefTupledTy g actualArgTys) cloVar.Type + let newResTy = mkFunTy g inpArgTy resTy let inpCloVar, inpCloVarAsExpr = mkCompGenLocal appm ("clo" + string i) inpCloVarType let newRes = // For the final arg we can skip introducing the dummy variable @@ -7823,7 +7889,7 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty = typeEnc g (gtpsType, gtpsMethod) (List.head tinst) + arraySuffix | TType_ucase (UnionCaseRef(tcref, _), tinst) - | TType_app (tcref, tinst) -> + | TType_app (tcref, tinst, _) -> if tyconRefEq g g.byref_tcr tcref then typeEnc g (gtpsType, gtpsMethod) (List.head tinst) + "@" elif tyconRefEq g tcref g.nativeptr_tcr then @@ -7832,7 +7898,7 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty = let tyName = let ty = stripTyEqnsAndMeasureEqns g ty match ty with - | TType_app (tcref, _tinst) -> + | TType_app (tcref, _tinst, _nullness) -> // Generic type names are (name + "`" + digits) where name does not contain "`". // In XML doc, when used in type instances, these do not use the ticks. let path = Array.toList (fullMangledPathToTyconRef tcref) @ [tcref.CompiledName] @@ -7851,10 +7917,10 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty = else sprintf "System.Tuple%s"(tyargsEnc g (gtpsType, gtpsMethod) tys) - | TType_fun (f, x) -> + | TType_fun (f, x, _nullness) -> "Microsoft.FSharp.Core.FSharpFunc" + tyargsEnc g (gtpsType, gtpsMethod) [f;x] - | TType_var typar -> + | TType_var (typar, _nullness) -> typarEnc g (gtpsType, gtpsMethod) typar | TType_measure _ -> "?" @@ -7970,40 +8036,76 @@ let IsUnionTypeWithNullAsTrueValue (g: TcGlobals) (tycon: Tycon) = let TyconCompilesInstanceMembersAsStatic g tycon = IsUnionTypeWithNullAsTrueValue g tycon let TcrefCompilesInstanceMembersAsStatic g (tcref: TyconRef) = TyconCompilesInstanceMembersAsStatic g tcref.Deref +// TODO NULLNESS: Consider whether we need to adjust this predicate, and the compatibility issues with doing this let TypeNullNever g ty = let underlyingTy = stripTyEqnsAndMeasureEqns g ty (isStructTy g underlyingTy) || (isByrefTy g underlyingTy) +let TyconRefNullIsExtraValue isNew g m (tcref: TyconRef) = + not tcref.IsStructOrEnumTycon && + not (isByrefLikeTyconRef g m tcref) && + (if tcref.IsILTycon then + // Putting AllowNullLiteralAttribute(false) on an IL or provided type means 'null' can't be used with that type + (not isNew && TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref <> Some false) + else +// Putting AllowNullLiteralAttribute(true) on an F# type means it always admits null even in the new model + (TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some true)) +let TyconRefNullIsExtraValueOld g m tcref = TyconRefNullIsExtraValue false g m tcref +let TyconRefNullIsExtraValueNew g m tcref = TyconRefNullIsExtraValue true g m tcref -/// Indicates if the type admits the use of 'null' as a value -let TypeNullIsExtraValue g m ty = +/// The F# 4.5 logic about whether a type admits the use of 'null' as a value. +let TypeNullIsExtraValueOld g m ty = if isILReferenceTy g ty || isDelegateTy g ty then - // Putting AllowNullLiteralAttribute(false) on an IL or provided type means 'null' can't be used with that type - not (match tryTcrefOfAppTy g ty with ValueSome tcref -> TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some false | _ -> false) + match tryTcrefOfAppTy g ty with + | ValueSome tcref -> + // In F# 4.x, putting AllowNullLiteralAttribute(false) on an IL or provided + // type means 'null' can't be used with that type, otherwise it can + TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref <> Some false + | _ -> + // In F# 4.5, other IL reference types (e.g. arrays) always support null + true elif TypeNullNever g ty then false else - // Putting AllowNullLiteralAttribute(true) on an F# type means 'null' can be used with that type - match tryTcrefOfAppTy g ty with ValueSome tcref -> TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some true | _ -> false + // In F# 4.x, putting AllowNullLiteralAttribute(true) on an F# type means 'null' can be used with that type + match tryTcrefOfAppTy g ty with + | ValueSome tcref -> TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some true + | _ -> false +/// The F# 5.0 logic about whether a type admits the use of 'null' as a value. +let TypeNullIsExtraValueNew g m ty = + let sty = stripTyparEqns ty + (match tryTcrefOfAppTy g sty with + | ValueSome tcref -> + not tcref.IsStructOrEnumTycon && + not (isByrefLikeTyconRef g m tcref) && + (TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some true) + | _ -> false) + || + (match (nullnessOfTy g sty).Evaluate() with + | NullnessInfo.AmbivalentToNull -> false + | NullnessInfo.WithoutNull -> false + | NullnessInfo.WithNull -> true) + +/// The F# 4.5 and 5.0 logic about whether a type uses 'null' as a true representation value let TypeNullIsTrueValue g ty = (match tryTcrefOfAppTy g ty with | ValueSome tcref -> IsUnionTypeWithNullAsTrueValue g tcref.Deref - | _ -> false) || (isUnitTy g ty) + | _ -> false) + || (isUnitTy g ty) +/// Indicates if unbox(null) is actively rejected at runtime. See nullability RFC. This applies to types that don't have null +/// as a valid runtime representation under old compatiblity rules. let TypeNullNotLiked g m ty = - not (TypeNullIsExtraValue g m ty) + not (TypeNullIsExtraValueOld g m ty) && not (TypeNullIsTrueValue g ty) && not (TypeNullNever g ty) -let TypeSatisfiesNullConstraint g m ty = - TypeNullIsExtraValue g m ty - -let rec TypeHasDefaultValue g m ty = +let rec TypeHasDefaultValue isNew g m ty = let ty = stripTyEqnsAndMeasureEqns g ty - TypeSatisfiesNullConstraint g m ty + (if isNew then TypeNullIsExtraValueNew g m ty else TypeNullIsExtraValueOld g m ty) || (isStructTy g ty && // Is it an F# struct type? (if isFSharpStructTy g ty then @@ -8014,18 +8116,21 @@ let rec TypeHasDefaultValue g m ty = // We can ignore fields with the DefaultValue(false) attribute |> List.filter (fun fld -> not (TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute fld.FieldAttribs = Some false)) - flds |> List.forall (actualTyOfRecdField (mkTyconRefInst tcref tinst) >> TypeHasDefaultValue g m) + flds |> List.forall (actualTyOfRecdField (mkTyconRefInst tcref tinst) >> TypeHasDefaultValue isNew g m) elif isStructTupleTy g ty then - destStructTupleTy g ty |> List.forall (TypeHasDefaultValue g m) + destStructTupleTy g ty |> List.forall (TypeHasDefaultValue isNew g m) elif isStructAnonRecdTy g ty then match tryDestAnonRecdTy g ty with | ValueNone -> true - | ValueSome (_, ptys) -> ptys |> List.forall (TypeHasDefaultValue g m) + | ValueSome (_, ptys) -> ptys |> List.forall (TypeHasDefaultValue isNew g m) else // All struct types defined in other .NET languages have a DefaultValue regardless of their // instantiation true)) +let TypeHasDefaultValueOld g m ty = TypeHasDefaultValue false g m ty + +let TypeHasDefaultValueNew g m ty = TypeHasDefaultValue true g m ty /// Determines types that are potentially known to satisfy the 'comparable' constraint and returns /// a set of residual types that must also satisfy the constraint @@ -8249,7 +8354,7 @@ type PrettyNaming.ActivePatternInfo with if apinfo.IsTotal then choicety else mkOptionTy g choicety member apinfo.OverallType g m dty rtys = - mkFunTy dty (apinfo.ResultType g m rtys) + mkFunTy g dty (apinfo.ResultType g m rtys) //--------------------------------------------------------------------------- // Active pattern validation @@ -8818,15 +8923,15 @@ let rec mkCompiledTuple g isStruct (argtys, args, m) = | [ty8], [arg8] -> match ty8 with // if it's already been nested or ended, pass it through - | TType_app(tn, _) when (isCompiledTupleTyconRef g tn) -> + | TType_app(tn, _, _) when (isCompiledTupleTyconRef g tn) -> ty8, arg8 | _ -> - let ty8enc = TType_app((if isStruct then g.struct_tuple1_tcr else g.ref_tuple1_tcr), [ty8]) + let ty8enc = TType_app((if isStruct then g.struct_tuple1_tcr else g.ref_tuple1_tcr), [ty8], g.knownWithoutNull) let v8enc = Expr.Op (TOp.Tuple (mkTupInfo isStruct), [ty8], [arg8], m) ty8enc, v8enc | _ -> let a, b, c, d = mkCompiledTuple g isStruct (argtysB, argsB, m) - let ty8plus = TType_app(a, b) + let ty8plus = TType_app (a, b, g.knownWithoutNull) let v8plus = Expr.Op (TOp.Tuple (mkTupInfo isStruct), b, c, d) ty8plus, v8plus let argtysAB = argtysA @ [ty8] @@ -8990,7 +9095,7 @@ let DetectAndOptimizeForExpression g option expr = mkLet spBind mEnumExpr currentVar enumerableExpr // let mutable next = current.TailOrNull (mkCompGenLet mForLoop nextVar tailOrNullExpr - // while nonNull next dp + // while notNull next dp (mkWhile g (spWhileLoop, WhileLoopForCompiledForEachExprMarker, guardExpr, bodyExpr, mBody))) expr diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi index dce873e1a8c..85a440d2177 100755 --- a/src/fsharp/TypedTreeOps.fsi +++ b/src/fsharp/TypedTreeOps.fsi @@ -34,10 +34,7 @@ val measureEquiv : TcGlobals -> Measure -> Measure -> bool val stripTyEqnsWrtErasure: Erasure -> TcGlobals -> TType -> TType /// Build a function type -val mkFunTy : TType -> TType -> TType - -/// Build a function type -val ( --> ) : TType -> TType -> TType +val mkFunTy : TcGlobals -> TType -> TType -> TType /// Build a type-forall anonymous generic type if necessary val mkForallTyIfNeeded : Typars -> TType -> TType @@ -45,16 +42,16 @@ val mkForallTyIfNeeded : Typars -> TType -> TType val ( +-> ) : Typars -> TType -> TType /// Build a curried function type -val mkIteratedFunTy : TTypes -> TType -> TType +val mkIteratedFunTy : TcGlobals -> TTypes -> TType -> TType /// Get the natural type of a single argument amongst a set of curried arguments val typeOfLambdaArg : range -> Val list -> TType -/// Get the curried type corresponding to a lambda -val mkMultiLambdaTy : range -> Val list -> TType -> TType +/// Get the type corresponding to a lambda +val mkLambdaTy : TcGlobals -> Typars -> TTypes -> TType -> TType /// Get the curried type corresponding to a lambda -val mkLambdaTy : Typars -> TTypes -> TType -> TType +val mkMultiLambdaTy : TcGlobals -> range -> Val list -> TType -> TType /// Module publication, used while compiling fslib. val ensureCcuHasModuleOrNamespaceAtPath : CcuThunk -> Ident list -> CompilationPath -> XmlDoc -> unit @@ -68,6 +65,14 @@ val valsOfBinds : Bindings -> Vals /// Look for a use of an F# value, possibly including application of a generic thing to a set of type arguments val (|ExprValWithPossibleTypeInst|_|) : Expr -> (ValRef * ValUseFlag * TType list * range) option +//val combineNullness: Nullness -> Nullness -> Nullness +//val tryAddNullnessToTy: Nullness -> TType -> TType option +//val addNullnessToTy: Nullness -> TType -> TType + +//------------------------------------------------------------------------- +// Build decision trees imperatively +//------------------------------------------------------------------------- + /// Build decision trees imperatively type MatchBuilder = @@ -140,16 +145,16 @@ val mkObjExpr : TType * Val option * Expr * ObjExprMethod list * (TType * ObjExp val mkTypeChoose : range -> Typars -> Expr -> Expr /// Build an iterated (curried) lambda expression -val mkLambdas : range -> Typars -> Val list -> Expr * TType -> Expr +val mkLambdas : TcGlobals -> range -> Typars -> Val list -> Expr * TType -> Expr /// Build an iterated (tupled+curried) lambda expression -val mkMultiLambdasCore : range -> Val list list -> Expr * TType -> Expr * TType +val mkMultiLambdasCore : TcGlobals -> range -> Val list list -> Expr * TType -> Expr * TType /// Build an iterated generic (type abstraction + tupled+curried) lambda expression -val mkMultiLambdas : range -> Typars -> Val list list -> Expr * TType -> Expr +val mkMultiLambdas : TcGlobals -> range -> Typars -> Val list list -> Expr * TType -> Expr /// Build a lambda expression that corresponds to the implementation of a member -val mkMemberLambdas : range -> Typars -> Val option -> Val option -> Val list list -> Expr * TType -> Expr +val mkMemberLambdas : TcGlobals -> range -> Typars -> Val option -> Val option -> Val list list -> Expr * TType -> Expr /// Build a 'while' loop expression val mkWhile : TcGlobals -> DebugPointAtWhile * SpecialWhileLoopMarker * Expr * Expr * range -> Expr @@ -179,7 +184,7 @@ val mkLetsFromBindings : range -> Bindings -> Expr -> Expr val mkLet : DebugPointForBinding -> range -> Val -> Expr -> Expr -> Expr /// Make a binding that binds a function value to a lambda taking multiple arguments -val mkMultiLambdaBind : Val -> DebugPointForBinding -> range -> Typars -> Val list list -> Expr * TType -> Binding +val mkMultiLambdaBind : TcGlobals -> Val -> DebugPointForBinding -> range -> Typars -> Val list list -> Expr * TType -> Binding // Compiler generated bindings may involve a user variable. // Compiler generated bindings may give rise to a sequence point if they are part of @@ -548,12 +553,14 @@ val instTyparConstraints : TyparInst -> TyparConstraint list -> TyparConstraint val instTrait : TyparInst -> TraitConstraintInfo -> TraitConstraintInfo +val generalTyconRefInst : TyconRef -> TypeInst + /// From typars to types val generalizeTypars : Typars -> TypeInst -val generalizeTyconRef : TyconRef -> TTypes * TType +val generalizeTyconRef : TcGlobals -> TyconRef -> TTypes * TType -val generalizedTyconRef : TyconRef -> TType +val generalizedTyconRef : TcGlobals -> TyconRef -> TType val mkTyparToTyparRenaming : Typars -> Typars -> TyparInst * TTypes @@ -605,6 +612,7 @@ val destAnyParTy : TcGlobals -> TType -> Typar val destMeasureTy : TcGlobals -> TType -> Measure val tryDestForallTy : TcGlobals -> TType -> Typars * TType +val nullnessOfTy : TcGlobals -> TType -> Nullness val isFunTy : TcGlobals -> TType -> bool @@ -1472,7 +1480,7 @@ val destArrayTy : TcGlobals -> TType -> TType val destListTy : TcGlobals -> TType -> TType /// Build an array type of the given rank -val mkArrayTy : TcGlobals -> int -> TType -> range -> TType +val mkArrayTy : TcGlobals -> int -> Nullness -> TType -> range -> TType /// Check if a type definition is one of the artificial type definitions used for array types of different ranks val isArrayTyconRef : TcGlobals -> TyconRef -> bool @@ -1571,17 +1579,21 @@ val ModuleNameIsMangled : TcGlobals -> Attribs -> bool val CompileAsEvent : TcGlobals -> Attribs -> bool -val TypeNullIsExtraValue : TcGlobals -> range -> TType -> bool - val TypeNullIsTrueValue : TcGlobals -> TType -> bool -val TypeNullNotLiked : TcGlobals -> range -> TType -> bool +val TypeNullIsExtraValueNew : TcGlobals -> range -> TType -> bool + +val TypeNullIsExtraValueOld : TcGlobals -> range -> TType -> bool + +val TyconRefNullIsExtraValueOld : TcGlobals -> range -> TyconRef -> bool + +val TyconRefNullIsExtraValueNew : TcGlobals -> range -> TyconRef -> bool val TypeNullNever : TcGlobals -> TType -> bool -val TypeSatisfiesNullConstraint : TcGlobals -> range -> TType -> bool +val TypeHasDefaultValueNew: TcGlobals -> range -> TType -> bool -val TypeHasDefaultValue : TcGlobals -> range -> TType -> bool +val TypeHasDefaultValueOld: TcGlobals -> range -> TType -> bool val isAbstractTycon : Tycon -> bool @@ -1827,8 +1839,6 @@ val mkCallBox : TcGlobals -> range -> TType -> Expr -> Expr val mkCallIsNull : TcGlobals -> range -> TType -> Expr -> Expr -val mkCallIsNotNull : TcGlobals -> range -> TType -> Expr -> Expr - val mkCallRaise : TcGlobals -> range -> TType -> Expr -> Expr val mkCallGenericComparisonWithComparerOuter : TcGlobals -> range -> TType -> Expr -> Expr -> Expr -> Expr @@ -2056,7 +2066,11 @@ val TryFindAttributeUsageAttribute : TcGlobals -> range -> TyconRef -> bool opti #if !NO_EXTENSIONTYPING /// returns Some(assemblyName) for success +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val TryDecodeTypeProviderAssemblyAttr : ILGlobals -> ILAttribute -> string option +#else +val TryDecodeTypeProviderAssemblyAttr : ILGlobals -> ILAttribute -> string? option +#endif #endif val IsSignatureDataVersionAttr : ILAttribute -> bool diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs index 94691a9fb63..34f66f75452 100644 --- a/src/fsharp/TypedTreePickle.fs +++ b/src/fsharp/TypedTreePickle.fs @@ -112,8 +112,9 @@ type NodeOutTable<'Data, 'Node> = Table = Table<_>.Create nm } [] -type WriterState = - { os: ByteBuffer +type WriterState = + { os: ByteBuffer + osB: ByteBuffer oscope: CcuThunk occus: Table oentities: NodeOutTable @@ -145,8 +146,10 @@ type NodeInTable<'Data, 'Node> = { LinkNode = lnk; IsLinked = isLinked; Name = nm; Nodes = Array.init n (fun _i -> mkEmpty() ) } [] -type ReaderState = - { is: ByteStream +type ReaderState = + { is: ByteStream + // secondary stream of information for F# 5.0 + isB: ByteStream iilscope: ILScopeRef iccus: InputTable ientities: NodeInTable @@ -171,18 +174,28 @@ type 'T pickler = 'T -> WriterState -> unit let p_byte b st = st.os.EmitIntAsByte b +let p_byteB b st = st.osB.EmitIntAsByte b + let p_bool b st = p_byte (if b then 1 else 0) st -let prim_p_int32 i st = +/// Write an uncompressed integer to the main stream. +let prim_p_int32 i st = p_byte (b0 i) st p_byte (b1 i) st p_byte (b2 i) st p_byte (b3 i) st -/// Compress integers according to the same scheme used by CLR metadata -/// This halves the size of pickled data -let p_int32 n st = - if n >= 0 && n <= 0x7F then +/// Write an uncompressed integer to the B stream. +let prim_p_int32B i st = + p_byteB (b0 i) st + p_byteB (b1 i) st + p_byteB (b2 i) st + p_byteB (b3 i) st + +/// Compress integers according to the same scheme used by CLR metadata +/// This halves the size of pickled data +let p_int32 n st = + if n >= 0 && n <= 0x7F then p_byte (b0 n) st else if n >= 0x80 && n <= 0x3FFF then p_byte ( (0x80 ||| (n >>> 8))) st @@ -191,6 +204,17 @@ let p_int32 n st = p_byte 0xFF st prim_p_int32 n st +/// Write a compressed integer to the B stream. +let p_int32B n st = + if n >= 0 && n <= 0x7F then + p_byteB (b0 n) st + else if n >= 0x80 && n <= 0x3FFF then + p_byteB ( (0x80 ||| (n >>> 8))) st + p_byteB ( (n &&& 0xFF)) st + else + p_byteB 0xFF st + prim_p_int32B n st + let space = () let p_space n () st = for i = 0 to n - 1 do @@ -215,6 +239,7 @@ let p_prim_string (s: string) st = st.os.EmitBytes bytes let p_int c st = p_int32 c st +let p_intB c st = p_int32B c st let p_int8 (i: sbyte) st = p_int32 (int32 i) st let p_uint8 (i: byte) st = p_byte (int i) st let p_int16 (i: int16) st = p_int32 (int32 i) st @@ -266,20 +291,32 @@ let inline p_tup11 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 (a, b, c, d, e, f, x7, x8 let u_byte st = int (st.is.ReadByte()) +/// Unpickle an uncompressed integer from the B stream +/// The extra B stream of bytes is implicitly 0 if not present +let u_byteB st = + if st.isB.IsEOF then 0 else int (st.isB.ReadByte()) + type unpickler<'T> = ReaderState -> 'T let u_bool st = let b = u_byte st in (b = 1) - - -let prim_u_int32 st = +/// Unpickle an uncompressed integer from the main stream +let prim_u_int32 st = let b0 = (u_byte st) let b1 = (u_byte st) let b2 = (u_byte st) let b3 = (u_byte st) b0 ||| (b1 <<< 8) ||| (b2 <<< 16) ||| (b3 <<< 24) -let u_int32 st = +/// Unpickle an uncompressed integer from the B stream +let prim_u_int32B st = + let b0 = u_byteB st + let b1 = u_byteB st + let b2 = u_byteB st + let b3 = u_byteB st + b0 ||| (b1 <<< 8) ||| (b2 <<< 16) ||| (b3 <<< 24) + +let u_int32 st = let b0 = u_byte st if b0 <= 0x7F then b0 else if b0 <= 0xbf then @@ -290,6 +327,19 @@ let u_int32 st = assert(b0 = 0xFF) prim_u_int32 st +/// Unpickle a compressed integer from the B stream. +/// The integer is 0 if the B stream is not present. +let u_int32B st = + let b0 = u_byteB st + if b0 <= 0x7F then b0 + else if b0 <= 0xbf then + let b0 = b0 &&& 0x7F + let b1 = u_byteB st + (b0 <<< 8) ||| b1 + else + assert(b0 = 0xFF) + prim_u_int32B st + let u_byte_memory st = let n = (u_int32 st) st.is.ReadBytes n @@ -302,6 +352,7 @@ let u_prim_string st = st.is.ReadUtf8String len let u_int st = u_int32 st +let u_intB st = u_int32B st let u_int8 st = sbyte (u_int32 st) let u_uint8 st = byte (u_byte st) let u_int16 st = int16 (u_int32 st) @@ -379,38 +430,12 @@ let inline u_tup11 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 (st: ReaderState) = let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in let x9 = p9 st in let x10 = p10 st in let x11 = p11 st in (a, b, c, d, e, f, x7, x8, x9, x10, x11) -let inline u_tup12 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 p12 (st: ReaderState) = - let a = p1 st in let b = p2 st in let c = p3 st in let d = p4 st in - let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in - let x9 = p9 st in let x10 = p10 st in let x11 = p11 st in let x12 = p12 st in - (a, b, c, d, e, f, x7, x8, x9, x10, x11, x12) - let inline u_tup13 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 p12 p13 (st: ReaderState) = let a = p1 st in let b = p2 st in let c = p3 st in let d = p4 st in let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in let x9 = p9 st in let x10 = p10 st in let x11 = p11 st in let x12 = p12 st in let x13 = p13 st in (a, b, c, d, e, f, x7, x8, x9, x10, x11, x12, x13) -let inline u_tup14 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 p12 p13 p14 (st: ReaderState) = - let a = p1 st in let b = p2 st in let c = p3 st in let d = p4 st in - let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in - let x9 = p9 st in let x10 = p10 st in let x11 = p11 st in let x12 = p12 st in let x13 = p13 st in - let x14 = p14 st in - (a, b, c, d, e, f, x7, x8, x9, x10, x11, x12, x13, x14) -let inline u_tup15 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 p12 p13 p14 p15 (st: ReaderState) = - let a = p1 st in let b = p2 st in let c = p3 st in let d = p4 st in - let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in - let x9 = p9 st in let x10 = p10 st in let x11 = p11 st in let x12 = p12 st in let x13 = p13 st in - let x14 = p14 st in let x15 = p15 st in - (a, b, c, d, e, f, x7, x8, x9, x10, x11, x12, x13, x14, x15) - -let inline u_tup16 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 p12 p13 p14 p15 p16 (st: ReaderState) = - let a = p1 st in let b = p2 st in let c = p3 st in let d = p4 st in - let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in - let x9 = p9 st in let x10 = p10 st in let x11 = p11 st in let x12 = p12 st in let x13 = p13 st in - let x14 = p14 st in let x15 = p15 st in let x16 = p16 st in - (a, b, c, d, e, f, x7, x8, x9, x10, x11, x12, x13, x14, x15, x16) - let inline u_tup17 p1 p2 p3 p4 p5 p6 p7 p8 p9 p10 p11 p12 p13 p14 p15 p16 p17 (st: ReaderState) = let a = p1 st in let b = p2 st in let c = p3 st in let d = p4 st in let e = p5 st in let f = p6 st in let x7 = p7 st in let x8 = p8 st in @@ -479,6 +504,10 @@ let p_array f (x: 'T[]) st = p_int x.Length st p_array_core f x st +let p_arrayB f (x: 'T[]) st = + p_intB x.Length st + p_array_core f x st + // Optionally encode an extra item using a marker bit. // When extraf is None, the marker bit is not set, and this is identical to p_array. let p_array_ext extraf f (x: 'T[]) st = @@ -497,7 +526,12 @@ let p_list_core f (xs: 'T list) st = let p_list f x st = p_int (List.length x) st p_list_core f x st -let p_list_ext extraf f x st = + +let p_listB f x st = + p_intB (List.length x) st + p_list_core f x st + +let p_list_ext extraf f x st = let n = List.length x let n = if Option.isSome extraf then n ||| 0x80000000 else n p_int n st @@ -577,17 +611,10 @@ let u_array f st = let n = u_int st u_array_core f n st -// Optionally decode an extra item if a marker bit is present. -// When the marker bit is not set this is identical to u_array, and extraf is not called -let u_array_ext extraf f st = - let n = u_int st - let extraItem = - if n &&& 0x80000000 = 0x80000000 then - Some (extraf st) - else - None - let arr = u_array_core f (n &&& 0x7FFFFFFF) st - extraItem, arr +/// Unpickle an array from the B stream. The array is empty if the B stream is not present. +let u_arrayB f st = + let n = u_intB st + u_array_core f n st let u_list_core f n st = List.init n (fun _ -> f st) @@ -595,6 +622,11 @@ let u_list_core f n st = let u_list f st = let n = u_int st u_list_core f n st + +/// Unpickle a list from the B stream. The resulting list is empty if the B stream is not present. +let u_listB f st = + Array.toList (u_arrayB f st) + let u_list_ext extra f st = let n = u_int st let extraItem = @@ -641,13 +673,7 @@ let u_option f st = | 1 -> Some (f st) | n -> ufailwith st ("u_option: found number " + string n) -// Boobytrap an OSGN node with a force of a lazy load of a bunch of pickled data -#if LAZY_UNPICKLE -let wire (x: osgn<_>) (res: Lazy<_>) = - x.osgnTripWire <- Some(fun () -> res.Force() |> ignore) -#endif - -let u_lazy u st = +let u_lazy u st = // Read the number of bytes in the record let len = prim_u_int32 st // fixupPos1 @@ -659,25 +685,8 @@ let u_lazy u st = let ovalsIdx1 = prim_u_int32 st // fixupPos6 let ovalsIdx2 = prim_u_int32 st // fixupPos7 -#if LAZY_UNPICKLE - // Record the position in the bytestream to use when forcing the read of the data - let idx1 = st.is.Position - // Skip the length of data - st.is.Skip len - // This is the lazy computation that wil force the unpickling of the term. - // This term must contain OSGN definitions of the given nodes. - let res = - lazy (let st = { st with is = st.is.CloneAndSeek idx1 } - u st) - /// Force the reading of the data as a "tripwire" for each of the OSGN thunks - for i = otyconsIdx1 to otyconsIdx2-1 do wire (st.ientities.Get i) res done - for i = ovalsIdx1 to ovalsIdx2-1 do wire (st.ivals.Get i) res done - for i = otyparsIdx1 to otyparsIdx2-1 do wire (st.itypars.Get i) res done - res -#else ignore (len, otyconsIdx1, otyconsIdx2, otyparsIdx1, otyparsIdx2, ovalsIdx1, ovalsIdx2) Lazy.CreateFromValue(u st) -#endif let u_hole () = @@ -758,9 +767,14 @@ let encode_nleref ccuTab stringTab nlerefTab thisCcu (nleref: NonLocalEntityRef) let p_encoded_nleref = p_tup2 p_int (p_array p_int) let p_nleref x st = p_int (encode_nleref st.occus st.ostrings st.onlerefs st.oscope x) st -// Simple types are types like "int", represented as TType(Ref_nonlocal(..., "int"), []). -// A huge number of these occur in pickled F# data, so make them unique. -let decode_simpletyp st _ccuTab _stringTab nlerefTab a = TType_app(ERefNonLocal (lookup_nleref st nlerefTab a), []) +// Simple types are types like "int", represented as TType(Ref_nonlocal(...,"int"),[]). +// A huge number of these occur in pickled F# data, so make them unique. +// +// TODO NULLNESS - the simpletyp table now holds KnownAmbivalentToNull by default, is this the right default? +// For old assemblies it is, if we give those assemblies the ambivalent interpretation. +// For new asemblies compiled with null-checking on it isn't, if the default is to give +// those the KnownWithoutNull interpretation by default. +let decode_simpletyp st _ccuTab _stringTab nlerefTab a = TType_app(ERefNonLocal (lookup_nleref st nlerefTab a), [], KnownAmbivalentToNull) let lookup_simpletyp st simpleTyTab x = lookup_uniq st simpleTyTab x let u_encoded_simpletyp st = u_int st let u_encoded_anoninfo st = u_int st @@ -770,10 +784,11 @@ let p_encoded_simpletyp x st = p_int x st let p_encoded_anoninfo x st = p_int x st let p_simpletyp x st = p_int (encode_simpletyp st.occus st.ostrings st.onlerefs st.osimpletys st.oscope x) st -let pickleObjWithDanglingCcus inMem file g scope p x = - let ccuNameTab, (ntycons, ntypars, nvals, nanoninfos), stringTab, pubpathTab, nlerefTab, simpleTyTab, phase1bytes = - let st1 = - { os = ByteBuffer.Create 100000 +let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x = + let ccuNameTab,(ntycons, ntypars, nvals, nanoninfos),stringTab,pubpathTab,nlerefTab,simpleTyTab,phase1bytes,phase1bytesB = + let st1 = + { os = ByteBuffer.Create 100000 + osB = ByteBuffer.Create 100000 oscope=scope occus= Table<_>.Create "occus" oentities=NodeOutTable<_, _>.Create((fun (tc: Tycon) -> tc.Stamp), (fun tc -> tc.LogicalName), (fun tc -> tc.Range), (fun osgn -> osgn), "otycons") @@ -787,18 +802,19 @@ let pickleObjWithDanglingCcus inMem file g scope p x = oglobals=g ofile=file oInMem=inMem - isStructThisArgPos = false} + isStructThisArgPos = false } p x st1 let sizes = st1.oentities.Size, st1.otypars.Size, st1.ovals.Size, - st1.oanoninfos.Size - st1.occus, sizes, st1.ostrings, st1.opubpaths, st1.onlerefs, st1.osimpletys, st1.os.Close() + st1.oanoninfos.Size + st1.occus, sizes, st1.ostrings, st1.opubpaths,st1.onlerefs, st1.osimpletys, st1.os.Close(), st1.osB.Close() - let phase2bytes = - let st2 = - { os = ByteBuffer.Create 100000 + let phase2bytes, phase2bytesB = + let st2 = + { os = ByteBuffer.Create 100000 + osB = ByteBuffer.Create 100000 oscope=scope occus= Table<_>.Create "occus (fake)" oentities=NodeOutTable<_, _>.Create((fun (tc: Tycon) -> tc.Stamp), (fun tc -> tc.LogicalName), (fun tc -> tc.Range), (fun osgn -> osgn), "otycons") @@ -814,12 +830,16 @@ let pickleObjWithDanglingCcus inMem file g scope p x = oInMem=inMem isStructThisArgPos = false } p_array p_encoded_ccuref ccuNameTab.AsArray st2 - // Add a 4th integer indicated by a negative 1st integer + + // For F# 5.0 and beyond we add a 4th integer for nanoninfos, indicated by a negative 1st integer + // Note that this means assemblies using anonymous record types are not binary-metadata consumable by previous + // generation F# tooling. let z1 = if nanoninfos > 0 then -ntycons-1 else ntycons p_int z1 st2 p_tup2 p_int p_int (ntypars, nvals) st2 if nanoninfos > 0 then p_int nanoninfos st2 + p_tup5 (p_array p_encoded_string) (p_array p_encoded_pubpath) @@ -828,10 +848,13 @@ let pickleObjWithDanglingCcus inMem file g scope p x = p_bytes (stringTab.AsArray, pubpathTab.AsArray, nlerefTab.AsArray, simpleTyTab.AsArray, phase1bytes) st2 - st2.os.Close() - phase2bytes + st2.os.Close(), st2.osB.Close() + + if phase2bytesB.Length <> 0 then failwith "expected phase2bytesB.Length = 0" -let check (ilscope: ILScopeRef) (inMap : NodeInTable<_, _>) = + phase2bytes, phase1bytesB + +let check (ilscope: ILScopeRef) (inMap: NodeInTable<_,_>) = for i = 0 to inMap.Count - 1 do let n = inMap.Get i if not (inMap.IsLinked n) then @@ -841,19 +864,20 @@ let check (ilscope: ILScopeRef) (inMap : NodeInTable<_, _>) = // an identical copy of the source for the DLL containing the data being unpickled. A message will // then be printed indicating the name of the item. -let unpickleObjWithDanglingCcus file ilscope (iILModule: ILModuleDef option) u (phase2bytes: ReadOnlyByteMemory) = +let unpickleObjWithDanglingCcus file ilscope (iILModule: ILModuleDef option) u (phase2bytes: ReadOnlyByteMemory) (phase1bytesB: ReadOnlyByteMemory) = let st2 = { is = ByteStream.FromBytes (phase2bytes, 0, phase2bytes.Length) + isB = ByteStream.FromBytes (ByteMemory.FromArray([| |]).AsReadOnly(),0,0) iilscope= ilscope - iccus= new_itbl "iccus (fake)" [| |] - ientities= NodeInTable<_, _>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", 0) - itypars= NodeInTable<_, _>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", 0) - ivals = NodeInTable<_, _>.Create (Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", 0) - ianoninfos=NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", 0) - istrings = new_itbl "istrings (fake)" [| |] - inlerefs = new_itbl "inlerefs (fake)" [| |] - ipubpaths = new_itbl "ipubpaths (fake)" [| |] - isimpletys = new_itbl "isimpletys (fake)" [| |] + iccus= new_itbl "iccus (fake)" [| |] + ientities= NodeInTable<_,_>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ientities",0) + itypars= NodeInTable<_,_>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"itypars",0) + ivals = NodeInTable<_,_>.Create (Val.NewUnlinked , (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ivals",0) + ianoninfos=NodeInTable<_,_>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ianoninfos",0) + istrings = new_itbl "istrings (fake)" [| |] + inlerefs = new_itbl "inlerefs (fake)" [| |] + ipubpaths = new_itbl "ipubpaths (fake)" [| |] + isimpletys = new_itbl "isimpletys (fake)" [| |] ifile=file iILModule = iILModule } let ccuNameTab = u_array u_encoded_ccuref st2 @@ -874,27 +898,27 @@ let unpickleObjWithDanglingCcus file ilscope (iILModule: ILModuleDef option) u ( let pubpathTab = new_itbl "ipubpaths" (Array.map (decode_pubpath st2 stringTab) pubpathTab) let nlerefTab = new_itbl "inlerefs" (Array.map (decode_nleref st2 ccuTab stringTab) nlerefTab) let simpletypTab = new_itbl "simpleTyTab" (Array.map (decode_simpletyp st2 ccuTab stringTab nlerefTab) simpleTyTab) - let data = - let st1 = - { is = ByteStream.FromBytes (phase1bytes, 0, phase1bytes.Length) - iccus= ccuTab - iilscope= ilscope - ientities= NodeInTable<_, _>.Create(Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", ntycons) - itypars= NodeInTable<_, _>.Create(Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", ntypars) - ivals= NodeInTable<_, _>.Create(Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", nvals) - ianoninfos=NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", nanoninfos) + let data = + let st1 = + { is = ByteStream.FromBytes (phase1bytes, 0, phase1bytes.Length) + isB = ByteStream.FromBytes (phase1bytesB, 0, phase1bytesB.Length) + iccus = ccuTab + iilscope = ilscope + ientities = NodeInTable<_, _>.Create(Tycon.NewUnlinked,(fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked),"ientities", ntycons) + itypars = NodeInTable<_, _>.Create(Typar.NewUnlinked,(fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked),"itypars", ntypars) + ivals = NodeInTable<_, _>.Create(Val.NewUnlinked ,(fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked),"ivals", nvals) + ianoninfos = NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked),"ianoninfos", nanoninfos) istrings = stringTab ipubpaths = pubpathTab inlerefs = nlerefTab isimpletys = simpletypTab - ifile=file + ifile = file iILModule = iILModule } let res = u st1 -#if !LAZY_UNPICKLE + check ilscope st1.ientities check ilscope st1.ientities check ilscope st1.ivals check ilscope st1.itypars -#endif res {RawData=data; FixupThunks=ccuTab.itbl_rows } @@ -1621,7 +1645,7 @@ let p_tyar_constraint x st = | TyparConstraint.MayResolveMember(traitInfo, _) -> p_byte 1 st; p_trait traitInfo st | TyparConstraint.DefaultsTo(_, rty, _) -> p_byte 2 st; p_ty rty st | TyparConstraint.SupportsNull _ -> p_byte 3 st - | TyparConstraint.IsNonNullableStruct _ -> p_byte 4 st + | TyparConstraint.IsNonNullableStruct _ -> p_byte 4 st | TyparConstraint.IsReferenceType _ -> p_byte 5 st | TyparConstraint.RequiresDefaultConstructor _ -> p_byte 6 st | TyparConstraint.SimpleChoice(tys, _) -> p_byte 7 st; p_tys tys st @@ -1630,7 +1654,20 @@ let p_tyar_constraint x st = | TyparConstraint.SupportsComparison _ -> p_byte 10 st | TyparConstraint.SupportsEquality _ -> p_byte 11 st | TyparConstraint.IsUnmanaged _ -> p_byte 12 st -let p_tyar_constraints = (p_list p_tyar_constraint) + | TyparConstraint.NotSupportsNull _ -> + failwith "NotSupportsNull constraints should only be emitted to streamB" + +// Some extra F# 5.0 constraints are stored in stream B, these will be ignored by earlier F# compilers +let p_tyar_constraintB x st = + match x with + | TyparConstraint.NotSupportsNull _ -> p_byteB 1 st + | _ -> failwith "only NotSupportsNull constraints should be emitted to streamB" + +let p_tyar_constraints cxs st = + let cxs1, cxs2 = cxs |> List.partition (function TyparConstraint.NotSupportsNull _ -> false | _ -> true) + p_list p_tyar_constraint cxs1 st + // Some extra F# 5.0 constraints are stored in stream B, these will be ignored by earlier F# compilers + p_listB p_tyar_constraintB cxs2 st let u_tyar_constraint st = let tag = u_byte st @@ -1650,9 +1687,21 @@ let u_tyar_constraint st = | 12 -> (fun _ -> TyparConstraint.IsUnmanaged range0) | _ -> ufailwith st "u_tyar_constraint" - -let u_tyar_constraints = (u_list_revi u_tyar_constraint) - +// Some extra F# 5.0 constraints are stored in stream B, these will be ignored by earlier F# compilers +let u_tyar_constraintB st = + let tag = u_byteB st + match tag with + | 1 -> TyparConstraint.NotSupportsNull range0 + | _ -> ufailwith st "u_tyar_constraintB - unexpected constraint in streamB" + +let u_tyar_constraints st = + let cxs1 = u_list_revi u_tyar_constraint st + // Some extra F# 5.0 constraints are stored in stream B, these will be ignored by earlier F# compilers + // + // If the B stream is not present (e.g. reading F# 4.5 components) then this list will be empty + // via the implementation of u_listB. + let cxs2 = u_listB u_tyar_constraintB st + cxs1 @ cxs2 let p_tyar_spec_data (x: Typar) st = p_tup5 @@ -1704,36 +1753,116 @@ let _ = fill_p_ty2 (fun isStructThisArgPos ty st -> p_byte 8 st; p_tys l st else p_byte 0 st; p_tys l st - | TType_app(ERefNonLocal nleref, []) -> p_byte 1 st; p_simpletyp nleref st - | TType_app (tc, tinst) -> p_byte 2 st; p_tup2 (p_tcref "typ") p_tys (tc, tinst) st - | TType_fun (d, r) -> + + | TType_app(ERefNonLocal nleref, [], nullness) -> + if st.oglobals.langFeatureNullness then + match nullness.Evaluate() with + | NullnessInfo.WithNull -> p_byteB 9 st + | NullnessInfo.WithoutNull -> p_byteB 10 st + | NullnessInfo.AmbivalentToNull -> p_byteB 11 st + p_byte 1 st; p_simpletyp nleref st + + | TType_app (tc, tinst, nullness) -> + if st.oglobals.langFeatureNullness then + match nullness.Evaluate() with + | NullnessInfo.WithNull -> p_byteB 12 st + | NullnessInfo.WithoutNull -> p_byteB 13 st + | NullnessInfo.AmbivalentToNull -> p_byteB 14 st + p_byte 2 st; p_tcref "typ" tc st; p_tys tinst st + + | TType_fun (d,r,nullness) -> + if st.oglobals.langFeatureNullness then + match nullness.Evaluate() with + | NullnessInfo.WithNull -> p_byteB 15 st + | NullnessInfo.WithoutNull -> p_byteB 16 st + | NullnessInfo.AmbivalentToNull -> p_byteB 17 st p_byte 3 st // Note, the "this" argument may be found in the domain position of a function type, so propagate the isStructThisArgPos value p_ty2 isStructThisArgPos d st p_ty r st - | TType_var r -> p_byte 4 st; p_tpref r st - | TType_forall (tps, r) -> + + | TType_var (r, nullness) -> + if st.oglobals.langFeatureNullness then + match nullness.Evaluate() with + | NullnessInfo.WithNull -> p_byteB 18 st + | NullnessInfo.WithoutNull -> p_byteB 19 st + | NullnessInfo.AmbivalentToNull -> p_byteB 20 st + p_byte 4 st + p_tpref r st + + | TType_forall (tps,r) -> p_byte 5 st p_tyar_specs tps st // Note, the "this" argument may be found in the body of a generic forall type, so propagate the isStructThisArgPos value p_ty2 isStructThisArgPos r st - | TType_measure unt -> p_byte 6 st; p_measure_expr unt st - | TType_ucase (uc, tinst) -> p_byte 7 st; p_tup2 p_ucref p_tys (uc, tinst) st + + | TType_measure unt -> p_byte 6 st; p_measure_expr unt st + + | TType_ucase (uc, tinst) -> p_byte 7 st; p_tup2 p_ucref p_tys (uc, tinst) st + // p_byte 8 taken by TType_tuple above | TType_anon (anonInfo, l) -> p_byte 9 st p_anonInfo anonInfo st - p_tys l st) + p_tys l st + ) let _ = fill_u_ty (fun st -> let tag = u_byte st + match tag with - | 0 -> let l = u_tys st in TType_tuple (tupInfoRef, l) - | 1 -> u_simpletyp st - | 2 -> let tc = u_tcref st in let tinst = u_tys st in TType_app (tc, tinst) - | 3 -> let d = u_ty st in let r = u_ty st in TType_fun (d, r) - | 4 -> let r = u_tpref st in r.AsType - | 5 -> let tps = u_tyar_specs st in let r = u_ty st in TType_forall (tps, r) + | 0 -> + let l = u_tys st + TType_tuple (tupInfoRef, l) + | 1 -> + let tagB = u_byteB st + let sty = u_simpletyp st + match tagB with + | 0 -> + sty + | 9 -> + match sty with + | TType_app(tcref, _, _) -> TType_app(tcref, [], KnownWithNull) + | _ -> ufailwith st "u_ty 9a" + | 10 -> + match sty with + | TType_app(tcref, _, _) -> TType_app(tcref, [], KnownWithoutNull) + | _ -> ufailwith st "u_ty 9b" + | 11 -> + match sty with + | TType_app(tcref, _, _) -> TType_app(tcref, [], KnownAmbivalentToNull) + | _ -> ufailwith st "u_ty 9c" + | b -> ufailwith st (sprintf "u_ty - 1/B, byte = %A" b) + | 2 -> + let tagB = u_byteB st + let tcref = u_tcref st + let tinst = u_tys st + match tagB with + | 0 -> TType_app (tcref, tinst, KnownAmbivalentToNull) + | 12 -> TType_app (tcref, tinst, KnownWithNull) + | 13 -> TType_app (tcref, tinst, KnownWithoutNull) + | 14 -> TType_app (tcref, tinst, KnownAmbivalentToNull) + | _ -> ufailwith st "u_ty - 2/B" + | 3 -> + let tagB = u_byteB st + let d = u_ty st + let r = u_ty st + match tagB with + | 0 -> TType_fun (d, r, KnownAmbivalentToNull) + | 15 -> TType_fun (d, r, KnownWithNull) + | 16 -> TType_fun (d, r, KnownWithoutNull) + | 17 -> TType_fun (d, r, KnownAmbivalentToNull) + | _ -> ufailwith st "u_ty - 3/B" + | 4 -> + let tagB = u_byteB st + let r = u_tpref st + match tagB with + | 0 -> r.AsType KnownAmbivalentToNull + | 18 -> r.AsType KnownWithNull + | 19 -> r.AsType KnownWithoutNull + | 20 -> r.AsType KnownAmbivalentToNull + | _ -> ufailwith st "u_ty - 4/B" + | 5 -> let tps = u_tyar_specs st in let r = u_ty st in TType_forall (tps,r) | 6 -> let unt = u_measure_expr st in TType_measure unt | 7 -> let uc = u_ucref st in let tinst = u_tys st in TType_ucase (uc, tinst) | 8 -> let l = u_tys st in TType_tuple (tupInfoStruct, l) diff --git a/src/fsharp/TypedTreePickle.fsi b/src/fsharp/TypedTreePickle.fsi index b5d1547430b..04498a3e471 100644 --- a/src/fsharp/TypedTreePickle.fsi +++ b/src/fsharp/TypedTreePickle.fsi @@ -82,7 +82,7 @@ val internal p_ty : pickler val internal pickleCcuInfo : pickler /// Serialize an arbitrary object using the given pickler -val pickleObjWithDanglingCcus : inMem: bool -> file: string -> TcGlobals -> scope:CcuThunk -> pickler<'T> -> 'T -> byte[] +val pickleObjWithDanglingCcus : inMem: bool -> file: string -> TcGlobals -> scope:CcuThunk -> pickler<'T> -> 'T -> byte[] * byte[] /// The type of state unpicklers read from type ReaderState @@ -142,7 +142,7 @@ val internal u_ty : unpickler val internal unpickleCcuInfo : ReaderState -> PickledCcuInfo /// Deserialize an arbitrary object which may have holes referring to other compilation units -val internal unpickleObjWithDanglingCcus : file:string -> viewedScope:ILScopeRef -> ilModule:ILModuleDef option -> ('T unpickler) -> ReadOnlyByteMemory -> PickledDataWithReferences<'T> +val internal unpickleObjWithDanglingCcus : file:string -> viewedScope:ILScopeRef -> ilModule:ILModuleDef option -> ('T unpickler) -> ReadOnlyByteMemory -> ReadOnlyByteMemory -> PickledDataWithReferences<'T> diff --git a/src/fsharp/autobox.fs b/src/fsharp/autobox.fs index a63790e59e7..7878fc6b793 100644 --- a/src/fsharp/autobox.fs +++ b/src/fsharp/autobox.fs @@ -73,7 +73,7 @@ let DecideExpr cenv exprF noInterceptF z expr = match expr with | Expr.Lambda (_, _ctorThisValOpt, _baseValOpt, argvs, _, m, rty) -> let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) - let ty = mkMultiLambdaTy m argvs rty + let ty = mkMultiLambdaTy cenv.g m argvs rty DecideLambda (Some exprF) cenv topValInfo expr ty z | Expr.TyLambda (_, tps, _, _m, rty) -> diff --git a/src/fsharp/fsc.fs b/src/fsharp/fsc.fs index 82faf0b59fc..9d1c14b218e 100644 --- a/src/fsharp/fsc.fs +++ b/src/fsharp/fsc.fs @@ -441,16 +441,15 @@ let GenerateInterfaceData(tcConfig: TcConfig) = let EncodeInterfaceData(tcConfig: TcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, isIncrementalBuild) = if GenerateInterfaceData tcConfig then - let resource = WriteSignatureData (tcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, isIncrementalBuild) + let resource1, resource2 = WriteSignatureData (tcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, isIncrementalBuild) // The resource gets written to a file for FSharp.Core let useDataFiles = (tcConfig.useOptimizationDataFile || tcGlobals.compilingFslib) && not isIncrementalBuild if useDataFiles then let sigDataFileName = (Filename.chopExtension outfile)+".sigdata" - let bytes = resource.GetBytes() + let bytes = resource1.GetBytes() use fileStream = File.Create(sigDataFileName, bytes.Length) bytes.CopyTo fileStream - let resources = - [ resource ] + let resources = [ yield resource1; match resource2 with None -> () | Some r -> yield r ] let sigAttr = mkSignatureDataVersionAttr tcGlobals (IL.parseILVersion Internal.Utilities.FSharpEnvironment.FSharpBinaryMetadataFormatRevision) [sigAttr], resources else @@ -466,7 +465,7 @@ let EncodeOptimizationData(tcGlobals, tcConfig: TcConfig, outfile, exportRemappi let useDataFiles = (tcConfig.useOptimizationDataFile || tcGlobals.compilingFslib) && not isIncrementalBuild if useDataFiles then let ccu, modulInfo = data - let bytes = TypedTreePickle.pickleObjWithDanglingCcus isIncrementalBuild outfile tcGlobals ccu Optimizer.p_CcuOptimizationInfo modulInfo + let bytes, _bytesB = TypedTreePickle.pickleObjWithDanglingCcus isIncrementalBuild outfile tcGlobals ccu Optimizer.p_CcuOptimizationInfo modulInfo let optDataFileName = (Filename.chopExtension outfile)+".optdata" File.WriteAllBytes(optDataFileName, bytes) let (ccu, optData) = @@ -474,7 +473,9 @@ let EncodeOptimizationData(tcGlobals, tcConfig: TcConfig, outfile, exportRemappi map2Of2 Optimizer.AbstractOptimizationInfoToEssentials data else data - [ WriteOptimizationData (tcGlobals, outfile, isIncrementalBuild, ccu, optData) ] + let r1, r2 = WriteOptimizationData (tcGlobals, outfile, isIncrementalBuild, ccu, optData) + let resources = [ yield r1; match r2 with None -> () | Some r -> yield r ] + resources else [ ] diff --git a/src/fsharp/fsi/console.fs b/src/fsharp/fsi/console.fs index cfa95577b7c..31c7d9b24aa 100644 --- a/src/fsharp/fsi/console.fs +++ b/src/fsharp/fsi/console.fs @@ -10,8 +10,11 @@ open System.Collections.Generic /// When this fix flag is true, this byte is converted to a char using the System.Console.InputEncoding. /// This is a code-around for bug://1345. /// Fixes to System.Console.ReadKey may break this code around, hence the option here. +[] module internal ConsoleOptions = + let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v + let readKeyFixup (c:char) = // Assumes the c:char is actually a byte in the System.Console.InputEncoding. // Convert it to a Unicode char through the encoding. @@ -38,19 +41,26 @@ type internal History() = if current >= 0 && current < list.Count then list.[current] else String.Empty member x.Clear() = list.Clear(); current <- -1 - member x.Add line = - match line with - | null | "" -> () - | _ -> list.Add(line) - member x.AddLast line = - match line with +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + member x.Add (line: string) = +#else + member x.Add (line: string?) = +#endif + match line with | null | "" -> () - | _ -> list.Add(line); current <- list.Count - - // Dead code - // member x.First() = current <- 0; x.Current - // member x.Last() = current <- list.Count - 1; x.Current + | NonNull line -> list.Add(line) + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + member x.AddLast (line: string) = +#else + member x.AddLast (line: string?) = +#endif + match line with + | null | "" -> () + | NonNull line -> + list.Add(line) + current <- list.Count member x.Previous() = if (list.Count > 0) then @@ -347,7 +357,7 @@ type internal ReadLineConsole() = // REVIEW: the Ctrl-Z code is not recognised as EOF by the lexer. // REVIEW: looks like a relic of the port of readline, which is currently removable. let c = if (key.Key = ConsoleKey.F6) then '\x1A' else key.KeyChar - let c = ConsoleOptions.readKeyFixup c + let c = readKeyFixup c insertChar(c) let backspace() = diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs index bf5f650514f..72db1d17281 100644 --- a/src/fsharp/fsi/fsi.fs +++ b/src/fsharp/fsi/fsi.fs @@ -336,9 +336,10 @@ type internal FsiValuePrinter(fsi: FsiEvaluationSessionHostConfig, g: TcGlobals, match obj with | null -> None | _ when aty.IsAssignableFrom(obj.GetType()) -> - match printer obj with + let text = printer obj + match box text with | null -> None - | s -> Some (wordL (TaggedTextOps.tagText s)) + | _ -> Some (wordL (TaggedTextOps.tagText text)) | _ -> None) | Choice2Of2 (aty: System.Type, converter) -> @@ -1304,7 +1305,7 @@ type internal FsiDynamicCompiler | null -> errorR(Error(tcConfigB.dependencyProvider.CreatePackageManagerUnknownError(tcConfigB.compilerToolPaths, outputDir, packageManagerKey, reportError), m)) istate - | dependencyManager -> + | NonNull dependencyManager -> let packageManagerTextLines = packageManagerLines |> List.map snd3 let removeErrorLinesFromScript () = tcConfigB.packageManagerLines <- tcConfigB.packageManagerLines |> Map.map(fun _ l -> l |> List.filter(fun (tried, _, _) -> tried)) @@ -1573,7 +1574,11 @@ module internal MagicAssemblyResolution = let Install(tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput) = - let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly = +#else + let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly? = +#endif try // Grab the name of the assembly @@ -1697,17 +1702,25 @@ type internal FsiStdinLexerProvider let isFeatureSupported featureId = tcConfigB.langVersion.SupportsFeature featureId - let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) readF = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string) = +#else + let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string?) = +#endif UnicodeLexing.FunctionAsLexbuf (isFeatureSupported, (fun (buf: char[], start, len) -> //fprintf fsiConsoleOutput.Out "Calling ReadLine\n" let inputOption = try Some(readF()) with :? EndOfStreamException -> None - inputOption |> Option.iter (fun t -> fsiStdinSyphon.Add (t + "\n")) + inputOption |> Option.iter (fun t -> fsiStdinSyphon.Add ((match t with null -> "" | NonNull t -> t) + "\n")) match inputOption with | Some(null) | None -> if progress then fprintfn fsiConsoleOutput.Out "End of file from TextReader.ReadLine" 0 - | Some (input:string) -> +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + | Some input -> +#else + | Some (NonNull input) -> +#endif let input = input + "\n" let ninput = input.Length if ninput > len then fprintf fsiConsoleOutput.Error "%s" (FSIstrings.SR.fsiLineTooLong()) @@ -1721,11 +1734,18 @@ type internal FsiStdinLexerProvider // Reading stdin as a lex stream //---------------------------------------------------------------------------- +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let removeZeroCharsFromString (str:string) = (* bug://4466 *) - if str<>null && str.Contains("\000") then - System.String(str |> Seq.filter (fun c -> c<>'\000') |> Seq.toArray) - else - str +#else + let removeZeroCharsFromString (str:string?) : string? = (* bug://4466 *) +#endif + match str with + | null -> str + | NonNull str -> + if str.Contains("\000") then + System.String(str |> Seq.filter (fun c -> c<>'\000') |> Seq.toArray) + else + str let CreateLexerForLexBuffer (sourceFileName, lexbuf, errorLogger) = @@ -1893,15 +1913,7 @@ type internal FsiInteractionProcessor // error already reported istate, CompletedWithAlreadyReportedError - | _, dependencyManager when not(isNull dependencyManager) -> - if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then - fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, m, path) - istate, Completed None - else - errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m)) - istate, Completed None - - | p, _ -> + | NonNull p, null -> let path = if String.IsNullOrWhiteSpace(p) then "" else p @@ -1924,6 +1936,14 @@ type internal FsiInteractionProcessor fsiConsoleOutput.uprintnfnn "%s" format) istate,Completed None + | _, NonNull dependencyManager -> + if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then + fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, m, path) + istate, Completed None + else + errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m)) + istate, Completed None + | IHash (ParsedHashDirective("I",[path],m),_) -> tcConfigB.AddIncludePath (m,path, tcConfig.implicitIncludeDir) fsiConsoleOutput.uprintnfnn "%s" (FSIstrings.SR.fsiDidAHashI(tcConfig.MakePathAbsolute path)) diff --git a/src/fsharp/fsi/fsi.fsproj b/src/fsharp/fsi/fsi.fsproj index 3d293e47570..28f9a190f9a 100644 --- a/src/fsharp/fsi/fsi.fsproj +++ b/src/fsharp/fsi/fsi.fsproj @@ -10,6 +10,7 @@ .exe $(NoWarn);45;55;62;75;1204 true + $(OtherFlags) --checknulls $(OtherFlags) --warnon:1182 --maxerrors:20 --extraoptimizationloops:1 fsi.res true diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs index fc6a8f0fa82..ddabf4a61fe 100644 --- a/src/fsharp/import.fs +++ b/src/fsharp/import.fs @@ -35,7 +35,11 @@ type AssemblyLoader = /// Get a flag indicating if an assembly is a provided assembly, plus the /// table of information recording remappings from type names in the provided assembly to type /// names in the statically linked, embedded assembly. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option +#else + abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option +#endif /// Record a root for a [] type to help guide static linking & type relocation abstract RecordGeneratedTypeRoot : ProviderGeneratedType -> unit @@ -157,8 +161,20 @@ let CanImportILTypeRef (env: ImportMap) m (tref: ILTypeRef) = /// /// Prefer the F# abbreviation for some built-in types, e.g. 'string' rather than /// 'System.String', since we prefer the F# abbreviation to the .NET equivalents. -let ImportTyconRefApp (env: ImportMap) tcref tyargs = - env.g.improveType tcref tyargs +let ImportTyconRefApp (env: ImportMap) tcref tyargs nullness = + env.g.improveType tcref tyargs nullness + +let ImportNullness (g: TcGlobals) = + if g.langFeatureNullness && g.assumeNullOnImport then + KnownWithNull + else + KnownAmbivalentToNull + +let ImportNullnessForTyconRef (g: TcGlobals) (m: range) (tcref: TyconRef) = + if g.langFeatureNullness && g.assumeNullOnImport && TyconRefNullIsExtraValueOld g m tcref then + KnownWithNull + else + KnownAmbivalentToNull /// Import an IL type as an F# type. let rec ImportILType (env: ImportMap) m tinst ty = @@ -169,24 +185,36 @@ let rec ImportILType (env: ImportMap) m tinst ty = | ILType.Array(bounds, ty) -> let n = bounds.Rank let elementType = ImportILType env m tinst ty - mkArrayTy env.g n elementType m + let nullness = ImportNullness env.g + mkArrayTy env.g n nullness elementType m | ILType.Boxed tspec | ILType.Value tspec -> let tcref = ImportILTypeRef env m tspec.TypeRef let inst = tspec.GenericArgs |> List.map (ImportILType env m tinst) - ImportTyconRefApp env tcref inst + let nullness = ImportNullnessForTyconRef env.g m tcref + ImportTyconRefApp env tcref inst nullness | ILType.Byref ty -> mkByrefTy env.g (ImportILType env m tinst ty) + | ILType.Ptr ILType.Void when env.g.voidptr_tcr.CanDeref -> mkVoidPtrTy env.g + | ILType.Ptr ty -> mkNativePtrTy env.g (ImportILType env m tinst ty) + | ILType.FunctionPointer _ -> env.g.nativeint_ty (* failwith "cannot import this kind of type (ptr, fptr)" *) + | ILType.Modified(_, _, ty) -> // All custom modifiers are ignored ImportILType env m tinst ty + | ILType.TypeVar u16 -> - try List.item (int u16) tinst - with _ -> - error(Error(FSComp.SR.impNotEnoughTypeParamsInScopeWhileImporting(), m)) + let ty = + try + List.item (int u16) tinst + with _ -> + error(Error(FSComp.SR.impNotEnoughTypeParamsInScopeWhileImporting(), m)) + let nullness = ImportNullness env.g + let tyWithNullness = addNullnessToTy nullness ty + tyWithNullness /// Determines if an IL type can be imported as an F# type let rec CanImportILType (env: ImportMap) m ty = @@ -264,7 +292,8 @@ let rec ImportProvidedType (env: ImportMap) (m: range) (* (tinst: TypeInst) *) ( let g = env.g if st.PUntaint((fun st -> st.IsArray), m) then let elemTy = (ImportProvidedType env m (* tinst *) (st.PApply((fun st -> st.GetElementType()), m))) - mkArrayTy g (st.PUntaint((fun st -> st.GetArrayRank()), m)) elemTy m + let nullness = ImportNullness env.g + mkArrayTy g (st.PUntaint((fun st -> st.GetArrayRank()), m)) nullness elemTy m elif st.PUntaint((fun st -> st.IsByRef), m) then let elemTy = (ImportProvidedType env m (* tinst *) (st.PApply((fun st -> st.GetElementType()), m))) mkByrefTy g elemTy @@ -306,12 +335,12 @@ let rec ImportProvidedType (env: ImportMap) (m: range) (* (tinst: TypeInst) *) ( if tp.Kind = TyparKind.Measure then let rec conv ty = match ty with - | TType_app (tcref, [t1;t2]) when tyconRefEq g tcref g.measureproduct_tcr -> Measure.Prod (conv t1, conv t2) - | TType_app (tcref, [t1]) when tyconRefEq g tcref g.measureinverse_tcr -> Measure.Inv (conv t1) - | TType_app (tcref, []) when tyconRefEq g tcref g.measureone_tcr -> Measure.One - | TType_app (tcref, []) when tcref.TypeOrMeasureKind = TyparKind.Measure -> Measure.Con tcref - | TType_app (tcref, _) -> - errorR(Error(FSComp.SR.impInvalidMeasureArgument1(tcref.CompiledName, tp.Name), m)) + | TType_app (tcref,[t1;t2], _) when tyconRefEq g tcref g.measureproduct_tcr -> Measure.Prod (conv t1, conv t2) + | TType_app (tcref,[t1], _) when tyconRefEq g tcref g.measureinverse_tcr -> Measure.Inv (conv t1) + | TType_app (tcref,[], _) when tyconRefEq g tcref g.measureone_tcr -> Measure.One + | TType_app (tcref,[], _) when tcref.TypeOrMeasureKind = TyparKind.Measure -> Measure.Con tcref + | TType_app (tcref, _, _) -> + errorR(Error(FSComp.SR.impInvalidMeasureArgument1(tcref.CompiledName, tp.Name),m)) Measure.One | _ -> errorR(Error(FSComp.SR.impInvalidMeasureArgument2(tp.Name), m)) @@ -321,22 +350,24 @@ let rec ImportProvidedType (env: ImportMap) (m: range) (* (tinst: TypeInst) *) ( else genericArg) - ImportTyconRefApp env tcref genericArgs + let nullness = ImportNullnessForTyconRef env.g m tcref + + ImportTyconRefApp env tcref genericArgs nullness /// Import a provided method reference as an Abstract IL method reference let ImportProvidedMethodBaseAsILMethodRef (env: ImportMap) (m: range) (mbase: Tainted) = - let tref = ExtensionTyping.GetILTypeRefOfProvidedType (mbase.PApply((fun mbase -> mbase.DeclaringType), m), m) + let tref = ExtensionTyping.GetILTypeRefOfProvidedType (mbase.PApply((fun mbase -> nonNull mbase.DeclaringType), m), m) let mbase = // Find the formal member corresponding to the called member match mbase.OfType() with | Some minfo when - minfo.PUntaint((fun minfo -> minfo.IsGenericMethod|| minfo.DeclaringType.IsGenericType), m) -> - let declaringType = minfo.PApply((fun minfo -> minfo.DeclaringType), m) + minfo.PUntaint((fun minfo -> minfo.IsGenericMethod|| (nonNull minfo.DeclaringType).IsGenericType), m) -> + let declaringType = minfo.PApply((fun minfo -> nonNull minfo.DeclaringType), m) let declaringGenericTypeDefn = if declaringType.PUntaint((fun t -> t.IsGenericType), m) then - declaringType.PApply((fun declaringType -> declaringType.GetGenericTypeDefinition()), m) + declaringType.PApply((fun t -> t.GetGenericTypeDefinition()), m) else declaringType let methods = declaringGenericTypeDefn.PApplyArray((fun x -> x.GetMethods()), "GetMethods", m) @@ -350,8 +381,8 @@ let ImportProvidedMethodBaseAsILMethodRef (env: ImportMap) (m: range) (mbase: Ta error(NumberedError(FSComp.SR.etIncorrectProvidedMethod(ExtensionTyping.DisplayNameOfTypeProvider(minfo.TypeProvider, m), methodName, metadataToken, typeName), m)) | _ -> match mbase.OfType() with - | Some cinfo when cinfo.PUntaint((fun x -> x.DeclaringType.IsGenericType), m) -> - let declaringType = cinfo.PApply((fun x -> x.DeclaringType), m) + | Some cinfo when cinfo.PUntaint((fun x -> (nonNull x.DeclaringType).IsGenericType), m) -> + let declaringType = cinfo.PApply((fun x -> nonNull x.DeclaringType), m) let declaringGenericTypeDefn = declaringType.PApply((fun x -> x.GetGenericTypeDefinition()), m) // We have to find the uninstantiated formal signature corresponding to this instantiated constructor. // Annoyingly System.Reflection doesn't give us a MetadataToken to compare on, so we have to look by doing diff --git a/src/fsharp/import.fsi b/src/fsharp/import.fsi index cc75a8f8967..4ae46d625ea 100644 --- a/src/fsharp/import.fsi +++ b/src/fsharp/import.fsi @@ -24,7 +24,11 @@ type AssemblyLoader = /// Get a flag indicating if an assembly is a provided assembly, plus the /// table of information recording remappings from type names in the provided assembly to type /// names in the statically linked, embedded assembly. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option +#else + abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option +#endif /// Record a root for a [] type to help guide static linking & type relocation abstract RecordGeneratedTypeRoot : ProviderGeneratedType -> unit diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs index d2e27611f9d..8a407d4921c 100755 --- a/src/fsharp/infos.fs +++ b/src/fsharp/infos.fs @@ -52,25 +52,29 @@ let GetSuperTypeOfType g amap m ty = let ty = stripTyEqnsAndMeasureEqns g ty #endif - match metadataOfTy g ty with + let resBeforeNull = + match metadataOfTy g ty with #if !NO_EXTENSIONTYPING - | ProvidedTypeMetadata info -> + | ProvidedTypeMetadata info -> let st = info.ProvidedType - let superOpt = st.PApplyOption((fun st -> match st.BaseType with null -> None | t -> Some t), m) - match superOpt with + let superOpt = st.PApplyOption((fun st -> match st.BaseType with null -> None | t -> Some (nonNull t)), m) + match superOpt with | None -> None | Some super -> Some(Import.ImportProvidedType amap m super) #endif - | ILTypeMetadata (TILObjectReprData(scoref, _, tdef)) -> + | ILTypeMetadata (TILObjectReprData(scoref,_,tdef)) -> let tinst = argsOfAppTy g ty match tdef.Extends with | None -> None - | Some ilty -> Some (ImportILType scoref amap m tinst ilty) + | Some ilty -> + let superTy = ImportILType scoref amap m tinst ilty + Some superTy - | FSharpOrArrayOrByrefOrTupleOrExnTypeMetadata -> - if isFSharpObjModelTy g ty || isExnDeclTy g ty then + | FSharpOrArrayOrByrefOrTupleOrExnTypeMetadata -> + if isFSharpObjModelTy g ty || isExnDeclTy g ty then let tcref = tcrefOfAppTy g ty - Some (instType (mkInstForAppTy g ty) (superOfTycon g tcref.Deref)) + let superTy = instType (mkInstForAppTy g ty) (superOfTycon g tcref.Deref) + Some superTy elif isArrayTy g ty then Some g.system_Array_ty elif isRefTy g ty && not (isObjTy g ty) then @@ -88,15 +92,23 @@ let GetSuperTypeOfType g amap m ty = Some g.obj_ty else None + match resBeforeNull with + | Some superTy -> + let nullness = nullnessOfTy g ty + let superTyWithNull = addNullnessToTy nullness superTy + Some superTyWithNull + | None -> + None /// Make a type for System.Collections.Generic.IList -let mkSystemCollectionsGenericIListTy (g: TcGlobals) ty = TType_app(g.tcref_System_Collections_Generic_IList, [ty]) +let mkSystemCollectionsGenericIListTy (g: TcGlobals) ty = + TType_app(g.tcref_System_Collections_Generic_IList, [ty], g.knownWithoutNull) + [] /// Indicates whether we can skip interface types that lie outside the reference set type SkipUnrefInterfaces = Yes | No - /// Collect the set of immediate declared interface types for an F# type, but do not /// traverse the type hierarchy to collect further interfaces. let rec GetImmediateInterfacesOfType skipUnref g amap m ty = @@ -120,6 +132,7 @@ let rec GetImmediateInterfacesOfType skipUnref g amap m ty = #if !NO_EXTENSIONTYPING | ProvidedTypeMetadata info -> [ for ity in info.ProvidedType.PApplyArray((fun st -> st.GetInterfaces()), "GetInterfaces", m) do + // TODO NULLNESS: the nullness of ty should propagate to each of these yield Import.ImportProvidedType amap m ity ] #endif | ILTypeMetadata (TILObjectReprData(scoref, _, tdef)) -> @@ -127,12 +140,13 @@ let rec GetImmediateInterfacesOfType skipUnref g amap m ty = // ImportILType may fail for an interface if the assembly load set is incomplete and the interface // comes from another assembly. In this case we simply skip the interface: // if we don't skip it, then compilation will just fail here, and if type checking - // succeeds with fewer non-dereferencable interfaces reported then it would have - // succeeded with more reported. There are pathological corner cases where this - // doesn't apply: e.g. for mscorlib interfaces like IComparable, but we can always - // assume those are present. - tdef.Implements |> List.choose (fun ity -> - if skipUnref = SkipUnrefInterfaces.No || CanImportILType scoref amap m ity then + // succeeds with fewer non-dereferencable interfaces reported then it would have + // succeeded with more reported. There are pathological corner cases where this + // doesn't apply: e.g. for mscorlib interfaces like IComparable, but we can always + // assume those are present. + // TODO NULLNESS: the nullness of ty should propagate to each of these + tdef.Implements |> List.choose (fun ity -> + if skipUnref = SkipUnrefInterfaces.No || CanImportILType scoref amap m ity then Some (ImportILType scoref amap m tinst ity) else None) @@ -194,10 +208,11 @@ let private FoldHierarchyOfTypeAux followInterfaces allowMultiIntfInst skipUnref | TyparConstraint.IsEnum _ | TyparConstraint.IsDelegate _ | TyparConstraint.SupportsNull _ - | TyparConstraint.IsNonNullableStruct _ - | TyparConstraint.IsUnmanaged _ - | TyparConstraint.IsReferenceType _ - | TyparConstraint.SimpleChoice _ + | TyparConstraint.NotSupportsNull _ + | TyparConstraint.IsNonNullableStruct _ + | TyparConstraint.IsUnmanaged _ + | TyparConstraint.IsReferenceType _ + | TyparConstraint.SimpleChoice _ | TyparConstraint.RequiresDefaultConstructor _ -> vacc | TyparConstraint.CoercesTo(cty, _) -> loop (ndeep + 1) cty vacc) @@ -322,7 +337,9 @@ let CopyTyparConstraints m tprefInst (tporig: Typar) = TyparConstraint.IsEnum (instType tprefInst uty, m) | TyparConstraint.SupportsComparison _ -> TyparConstraint.SupportsComparison m - | TyparConstraint.SupportsEquality _ -> + | TyparConstraint.NotSupportsNull _ -> + TyparConstraint.NotSupportsNull m + | TyparConstraint.SupportsEquality _ -> TyparConstraint.SupportsEquality m | TyparConstraint.IsDelegate(aty, bty, _) -> TyparConstraint.IsDelegate (instType tprefInst aty, instType tprefInst bty, m) @@ -405,9 +422,9 @@ type ValRef with #if !NO_EXTENSIONTYPING /// Get the return type of a provided method, where 'void' is returned as 'None' let GetCompiledReturnTyOfProvidedMethodInfo amap m (mi: Tainted) = - let returnType = - if mi.PUntaint((fun mi -> mi.IsConstructor), m) then - mi.PApply((fun mi -> mi.DeclaringType), m) + let returnType = + if mi.PUntaint((fun mi -> mi.IsConstructor), m) then + mi.PApply((fun mi -> nonNull mi.DeclaringType), m) else mi.Coerce(m).PApply((fun mi -> mi.ReturnType), m) let ty = Import.ImportProvidedType amap m returnType if isVoidTy amap.g ty then None else Some ty @@ -640,10 +657,17 @@ let OptionalArgInfoOfProvidedParameter (amap: Import.ImportMap) m (provParam : T NotOptional /// Compute the ILFieldInit for the given provided constant value for a provided enum type. -let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo) err = - match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase)), m) with - | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name), m), mi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m)) - | meth -> meth +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo) err = + match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase)),m) with + | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name),m),mi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m)) + | Tainted.NonNull meth -> meth +#else +let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo?) err = + match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase?)),m) with + | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name),m),mi.PUntaint((fun mi -> (nonNull mi.DeclaringType).Name), m)), m)) // TODO NULLNESS: type isntantiation should not be needed + | Tainted.NonNull meth -> meth +#endif /// Try to get an arbitrary ProvidedMethodInfo associated with a property. let ArbitraryMethodInfoOfPropertyInfo (pi: Tainted) m = @@ -651,8 +675,8 @@ let ArbitraryMethodInfoOfPropertyInfo (pi: Tainted) m = GetAndSanityCheckProviderMethod m pi (fun pi -> pi.GetGetMethod()) FSComp.SR.etPropertyCanReadButHasNoGetter elif pi.PUntaint((fun pi -> pi.CanWrite), m) then GetAndSanityCheckProviderMethod m pi (fun pi -> pi.GetSetMethod()) FSComp.SR.etPropertyCanWriteButHasNoSetter - else - error(Error(FSComp.SR.etPropertyNeedsCanWriteOrCanRead(pi.PUntaint((fun mi -> mi.Name), m), pi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m)) + else + error(Error(FSComp.SR.etPropertyNeedsCanWriteOrCanRead(pi.PUntaint((fun mi -> mi.Name), m), pi.PUntaint((fun mi -> (nonNull mi.DeclaringType).Name), m)), m)) #endif @@ -905,8 +929,8 @@ type MethInfo = | FSMeth(_, ty, _, _) -> ty | DefaultStructCtor(_, ty) -> ty #if !NO_EXTENSIONTYPING - | ProvidedMeth(amap, mi, _, m) -> - Import.ImportProvidedType amap m (mi.PApply((fun mi -> mi.DeclaringType), m)) + | ProvidedMeth(amap, mi, _, m) -> + Import.ImportProvidedType amap m (mi.PApply((fun mi -> nonNull mi.DeclaringType), m)) #endif /// Get the enclosing type of the method info, using a nominal type for tuple types @@ -1376,8 +1400,8 @@ type MethInfo = else [] | DefaultStructCtor _ -> [] #if !NO_EXTENSIONTYPING - | ProvidedMeth(amap, mi, _, m) -> - if x.IsInstance then [ Import.ImportProvidedType amap m (mi.PApply((fun mi -> mi.DeclaringType), m)) ] // find the type of the 'this' argument + | ProvidedMeth(amap, mi, _, m) -> + if x.IsInstance then [ Import.ImportProvidedType amap m (mi.PApply((fun mi -> nonNull mi.DeclaringType), m)) ] // find the type of the 'this' argument else [] #endif @@ -1539,8 +1563,8 @@ type MethInfo = let _, formalMethTyparTys = FixupNewTypars m formalEnclosingTypars formalEnclosingTyparTys x.FormalMethodTypars formalMethTypars let formalRetTy, formalParams = match x with - | ILMeth(_, ilminfo, _) -> - let ftinfo = ILTypeInfo.FromType g (TType_app(tcref, formalEnclosingTyparTys)) + | ILMeth(_, ilminfo, _) -> + let ftinfo = ILTypeInfo.FromType g (TType_app(tcref, formalEnclosingTyparTys, g.knownWithoutNull)) let formalRetTy = ImportReturnTypeFromMetadata amap m ilminfo.RawMetadata.Return.Type ilminfo.RawMetadata.Return.CustomAttrs ftinfo.ILScopeRef ftinfo.TypeInstOfRawMetadata formalMethTyparTys let formalParams = [ [ for p in ilminfo.RawMetadata.Parameters do @@ -1554,9 +1578,9 @@ type MethInfo = let formalRetTy = x.GetCompiledReturnTy(amap, m, formalMethTyparTys) // GENERIC TYPE PROVIDERS: formal types should be generated here, not the actual types // For non-generic type providers there is no difference - let formalParams = - [ [ for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do - let paramName = p.PUntaint((fun p -> match p.Name with null -> None | s -> Some s), m) + let formalParams = + [ [ for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do + let paramName = p.PUntaint((fun p -> match p.Name with "" -> None | s -> Some s), m) let paramType = Import.ImportProvidedType amap m (p.PApply((fun p -> p.ParameterType), m)) let isIn, isOut, isOptional = p.PUntaint((fun p -> p.IsIn, p.IsOut, p.IsOptional), m) yield TSlotParam(paramName, paramType, isIn, isOut, isOptional, []) ] ] @@ -1584,12 +1608,12 @@ type MethInfo = [ [for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do let pname = match p.PUntaint((fun p -> p.Name), m) with - | null -> None + | "" -> None | name -> Some (mkSynId m name) let pty = match p.PApply((fun p -> p.ParameterType), m) with | Tainted.Null -> amap.g.unit_ty - | parameterType -> Import.ImportProvidedType amap m parameterType + | Tainted.NonNull parameterType -> Import.ImportProvidedType amap m parameterType yield ParamNameAndType(pname, pty) ] ] #endif @@ -1646,7 +1670,7 @@ type ILFieldInfo = match x with | ILFieldInfo(tinfo, _) -> tinfo.ToType #if !NO_EXTENSIONTYPING - | ProvidedField(amap, fi, m) -> (Import.ImportProvidedType amap m (fi.PApply((fun fi -> fi.DeclaringType), m))) + | ProvidedField(amap, fi, m) -> (Import.ImportProvidedType amap m (fi.PApply((fun fi -> nonNull fi.DeclaringType), m))) #endif member x.ApparentEnclosingAppType = x.ApparentEnclosingType @@ -1667,7 +1691,7 @@ type ILFieldInfo = match x with | ILFieldInfo(tinfo, _) -> tinfo.ILTypeRef #if !NO_EXTENSIONTYPING - | ProvidedField(amap, fi, m) -> (Import.ImportProvidedTypeAsILType amap m (fi.PApply((fun fi -> fi.DeclaringType), m))).TypeRef + | ProvidedField(amap, fi, m) -> (Import.ImportProvidedTypeAsILType amap m (fi.PApply((fun fi -> nonNull fi.DeclaringType), m))).TypeRef #endif /// Get the scope used to interpret IL metadata @@ -1799,8 +1823,9 @@ type RecdFieldInfo = /// Get the (instantiated) type of the field in an F#-declared record, class or struct type member x.FieldType = actualTyOfRecdFieldRef x.RecdFieldRef x.TypeInst - /// Get the enclosing (declaring) type of the field in an F#-declared record, class or struct type - member x.DeclaringType = TType_app (x.RecdFieldRef.TyconRef, x.TypeInst) + /// Get the enclosing (declaring) type of the field in an F#-declared record, class or struct type + member x.DeclaringType = TType_app (x.RecdFieldRef.TyconRef, x.TypeInst, KnownWithoutNull) // TODO NULLNESS - qualify this + override x.ToString() = x.TyconRef.ToString() + "::" + x.Name @@ -1934,8 +1959,8 @@ type PropInfo = | ILProp ilpinfo -> ilpinfo.ILTypeInfo.ToType | FSProp(_, ty, _, _) -> ty #if !NO_EXTENSIONTYPING - | ProvidedProp(amap, pi, m) -> - Import.ImportProvidedType amap m (pi.PApply((fun pi -> pi.DeclaringType), m)) + | ProvidedProp(amap, pi, m) -> + Import.ImportProvidedType amap m (pi.PApply((fun pi -> nonNull pi.DeclaringType), m)) #endif /// Get the enclosing type of the method info, using a nominal type for tuple types @@ -2183,7 +2208,7 @@ type PropInfo = #if !NO_EXTENSIONTYPING | ProvidedProp (_, pi, m) -> [ for p in pi.PApplyArray((fun pi -> pi.GetIndexParameters()), "GetIndexParameters", m) do - let paramName = p.PUntaint((fun p -> match p.Name with null -> None | s -> Some (mkSynId m s)), m) + let paramName = p.PUntaint((fun p -> match p.Name with "" -> None | s -> Some (mkSynId m s)), m) let paramType = Import.ImportProvidedType amap m (p.PApply((fun p -> p.ParameterType), m)) yield ParamNameAndType(paramName, paramType) ] #endif @@ -2352,7 +2377,7 @@ type EventInfo = | ILEvent ileinfo -> ileinfo.ApparentEnclosingType | FSEvent (_, p, _, _) -> p.ApparentEnclosingType #if !NO_EXTENSIONTYPING - | ProvidedEvent (amap, ei, m) -> Import.ImportProvidedType amap m (ei.PApply((fun ei -> ei.DeclaringType), m)) + | ProvidedEvent (amap, ei, m) -> Import.ImportProvidedType amap m (ei.PApply((fun ei -> nonNull ei.DeclaringType), m)) #endif /// Get the enclosing type of the method info, using a nominal type for tuple types member x.ApparentEnclosingAppType = diff --git a/src/fsharp/lex.fsl b/src/fsharp/lex.fsl index 527f6ebd084..2bbfb7961b8 100644 --- a/src/fsharp/lex.fsl +++ b/src/fsharp/lex.fsl @@ -79,9 +79,7 @@ let parseOctalUInt64 (s:string) = Convert.ToUInt64(s, 8) let removeUnderscores (s:string) = - match s with - | null -> null - | s -> s.Replace("_", "") + s.Replace("_", "") let parseInt32 (s:string) = let s = removeUnderscores s diff --git a/src/fsharp/lexhelp.fs b/src/fsharp/lexhelp.fs index 707d7f0b499..b1916353560 100644 --- a/src/fsharp/lexhelp.fs +++ b/src/fsharp/lexhelp.fs @@ -286,6 +286,8 @@ module Keywords = FSHARP, "__token_ODO" ,ODO FSHARP, "__token_OLET" ,OLET(true) FSHARP, "__token_constraint",CONSTRAINT + FSHARP, "__hacknull",HACKNULL + FSHARP, "__ambivalent",AMBIVALENT ] (*------- reserved keywords which are ml-compatibility ids *) @ List.map (fun s -> (FSHARP,s,RESERVED)) diff --git a/src/fsharp/lib.fs b/src/fsharp/lib.fs index b4148683fbe..baad2d7551b 100755 --- a/src/fsharp/lib.fs +++ b/src/fsharp/lib.fs @@ -21,7 +21,12 @@ let condition s = let GetEnvInteger e dflt = match System.Environment.GetEnvironmentVariable(e) with null -> dflt | t -> try int t with _ -> dflt -let dispose (x:System.IDisposable) = match x with null -> () | x -> x.Dispose() +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE +let dispose (x:System.IDisposable) = +#else +let dispose (x:System.IDisposable?) = +#endif + match x with null -> () | NonNull x -> x.Dispose() //------------------------------------------------------------------------- // Library: bits @@ -104,11 +109,10 @@ module Check = | Some x -> x /// Throw System.ArgumentNullException() if argument is null. - let ArgumentNotNull arg argName = + let ArgumentNotNull arg argname = match box(arg) with - | null -> raise (new System.ArgumentNullException(argName)) + | null -> raise (new System.ArgumentNullException(argname)) | _ -> () - /// Throw System.ArgumentNullException() if array argument is null. /// Throw System.ArgumentOutOfRangeException() is array argument is empty. @@ -353,22 +357,23 @@ type Graph<'Data, 'Id when 'Id : comparison and 'Id : equality> // with care. //---------------------------------------------------------------------------- -// The following DEBUG code does not currently compile. -//#if DEBUG -//type 'T NonNullSlot = 'T option -//let nullableSlotEmpty() = None -//let nullableSlotFull(x) = Some x +//#if BUILDING_WITH_LKG +type NonNullSlot<'T when 'T : not struct> = 'T //#else -type NonNullSlot<'T> = 'T -let nullableSlotEmpty() = Unchecked.defaultof<'T> -let nullableSlotFull x = x +//type NonNullSlot<'T when (* 'T : not null and *) 'T : not struct> = 'T? //#endif +let nullableSlotEmpty() : NonNullSlot<'T> = Unchecked.defaultof<_> +let nullableSlotFull (x: 'T) : NonNullSlot<'T> = x //--------------------------------------------------------------------------- // Caches, mainly for free variables //--------------------------------------------------------------------------- -type cache<'T> = { mutable cacheVal: 'T NonNullSlot } +//#if BUILDING_WITH_LKG +type cache<'T when 'T : not struct> = { mutable cacheVal: NonNullSlot<'T> } +//#else +//type cache<'T when 'T : (* not null and *) 'T : not struct> = { mutable cacheVal: NonNullSlot<'T> } +//#endif let newCache() = { cacheVal = nullableSlotEmpty() } let inline cached cache resF = @@ -457,10 +462,15 @@ module internal AsyncUtil = // Continuations that Async.FromContinuations provide do QUWI/SyncContext.Post, // so the order is not overly relevant but still. List.rev savedConts) - let postOrQueue (sc:SynchronizationContext, cont) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let postOrQueue (sc: SynchronizationContext, cont) = +#else + let postOrQueue (sc: SynchronizationContext?, cont) = +#endif match sc with - | null -> ThreadPool.QueueUserWorkItem(fun _ -> cont res) |> ignore - | sc -> sc.Post((fun _ -> cont res), state=null) + | null -> ThreadPool.QueueUserWorkItem(fun _ -> cont res) |> ignore + | NonNull sc -> + sc.Post((fun _ -> cont res), state=null) // Run continuations outside the lock match grabbedConts with diff --git a/src/fsharp/pars.fsy b/src/fsharp/pars.fsy index d68a071e981..7c0cc15bac5 100644 --- a/src/fsharp/pars.fsy +++ b/src/fsharp/pars.fsy @@ -204,6 +204,7 @@ let rangeOfLongIdent(lid:LongIdent) = %token GREATER_RBRACK STRUCT SIG %token STATIC MEMBER CLASS ABSTRACT OVERRIDE DEFAULT CONSTRUCTOR INHERIT %token EXTERN VOID PUBLIC PRIVATE INTERNAL GLOBAL +%token HACKNULL AMBIVALENT /* for parser 'escape hatch' out of expression context without consuming the 'recover' token */ %token TYPE_COMING_SOON TYPE_IS_HERE MODULE_COMING_SOON MODULE_IS_HERE @@ -2282,6 +2283,10 @@ typeConstraint: | typar COLON NULL { WhereTyparSupportsNull($1, lhs parseState) } + | typar COLON IDENT NULL + { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3)) + WhereTyparNotSupportsNull($1, lhs parseState) } + | typar COLON LPAREN classMemberSpfn rparen { let tp = $1 WhereTyparSupportsMember([ SynType.Var(tp, tp.Range) ], $4, lhs parseState) } @@ -2637,6 +2642,9 @@ cType: { let m = lhs parseState SynType.App(SynType.LongIdent(LongIdentWithDots([ident("nativeptr", m)], [])), None, [$1], [], None, true, m) } + | cType QMARK + { SynType.WithNull($1, false, lhs parseState) } + | cType AMP { let m = lhs parseState SynType.App(SynType.LongIdent(LongIdentWithDots([ident("byref", m)], [])), None, [$1], [], None, true, m) } @@ -4847,6 +4855,19 @@ appTypeConPower: { $1 } appType: + | appType HACKNULL + { SynType.WithNull($1, false, lhs parseState) } + + | appType AMBIVALENT + { SynType.WithNull($1, true, lhs parseState) } + + | appType QMARK + { SynType.WithNull($1, false, lhs parseState) } + +/* +| appType OR NULL + { SynType.WithNull($1, false lhs parseState) } +*/ | appType arrayTypeSuffix { SynType.Array($2, $1, lhs parseState) } @@ -4979,7 +5000,7 @@ atomType: | NULL { let m = rhs parseState 1 - SynType.StaticConstant(SynConst.String (null, m), m) } + SynType.StaticConstantNull(m) } | CONST atomicExpr { let e, _ = $2 diff --git a/src/fsharp/service/FSharpCheckerResults.fs b/src/fsharp/service/FSharpCheckerResults.fs index ebab54754bf..944951cde14 100644 --- a/src/fsharp/service/FSharpCheckerResults.fs +++ b/src/fsharp/service/FSharpCheckerResults.fs @@ -285,11 +285,11 @@ type internal TypeCheckInfo let ad = match vref.BaseOrThisInfo, ad with | ValBaseOrThisInfo.NormalVal, AccessibleFrom(paths, Some tcref) -> - let tcref = generalizedTyconRef tcref + let thisTy = generalizedTyconRef g tcref // check that type of value is the same or subtype of tcref // yes - allow access to protected members // no - strip ability to access protected members - if FSharp.Compiler.TypeRelations.TypeFeasiblySubsumesType 0 g amap m tcref FSharp.Compiler.TypeRelations.CanCoerce ty then + if FSharp.Compiler.TypeRelations.TypeFeasiblySubsumesType 0 g amap m thisTy FSharp.Compiler.TypeRelations.CanCoerce ty then ad else AccessibleFrom(paths, None) @@ -961,10 +961,10 @@ type internal TypeCheckInfo items |> List.sortBy (fun d -> let n = match d.Item with - | Item.Types (_,(TType_app(tcref,_) :: _)) -> 1 + tcref.TyparsNoRange.Length + | Item.Types (_,(TType_app(tcref, _, _) :: _)) -> 1 + tcref.TyparsNoRange.Length // Put delegate ctors after types, sorted by #typars. RemoveDuplicateItems will remove FakeInterfaceCtor and DelegateCtor if an earlier type is also reported with this name - | Item.FakeInterfaceCtor (TType_app(tcref,_)) - | Item.DelegateCtor (TType_app(tcref,_)) -> 1000 + tcref.TyparsNoRange.Length + | Item.FakeInterfaceCtor (TType_app(tcref, _, _)) + | Item.DelegateCtor (TType_app(tcref, _, _)) -> 1000 + tcref.TyparsNoRange.Length // Put type ctors after types, sorted by #typars. RemoveDuplicateItems will remove DefaultStructCtors if a type is also reported with this name | Item.CtorGroup (_, (cinfo :: _)) -> 1000 + 10 * cinfo.DeclaringTyconRef.TyparsNoRange.Length | _ -> 0 @@ -978,11 +978,11 @@ type internal TypeCheckInfo let items = items |> List.groupBy (fun d -> match d.Item with - | Item.Types (_,(TType_app(tcref,_) :: _)) + | Item.Types (_,(TType_app(tcref, _, _) :: _)) | Item.ExnCase tcref -> tcref.LogicalName | Item.UnqualifiedType(tcref :: _) - | Item.FakeInterfaceCtor (TType_app(tcref,_)) - | Item.DelegateCtor (TType_app(tcref,_)) -> tcref.CompiledName + | Item.FakeInterfaceCtor (TType_app(tcref, _, _)) + | Item.DelegateCtor (TType_app(tcref, _, _)) -> tcref.CompiledName | Item.CtorGroup (_, (cinfo :: _)) -> cinfo.ApparentEnclosingTyconRef.CompiledName | _ -> d.Item.DisplayName) @@ -1236,7 +1236,7 @@ type internal TypeCheckInfo //Item.Value(vref) None - | Item.Types (_, TType_app (tr, _) :: _) when tr.IsLocalRef && tr.IsTypeAbbrev -> None + | Item.Types (_, TType_app (tr, _, _) :: _) when tr.IsLocalRef && tr.IsTypeAbbrev -> None | Item.Types (_, [ AppTy g (tr, _) ]) when not tr.IsLocalRef -> match tr.TypeReprInfo, tr.PublicPath with @@ -1526,9 +1526,11 @@ module internal ParseAndCheckFile = // If there was a loadClosure, replay the errors and warnings from resolution, excluding parsing loadClosure.LoadClosureRootFileDiagnostics |> List.iter diagnosticSink - let fileOfBackgroundError err = (match GetRangeOfDiagnostic (fst err) with Some m-> m.FileName | None -> null) + let fileOfBackgroundError err = match GetRangeOfDiagnostic (fst err) with Some m -> Some m.FileName | None -> None let sameFile file hashLoadInFile = - (0 = String.Compare(hashLoadInFile, file, StringComparison.OrdinalIgnoreCase)) + match file with + | None -> false + | Some file -> (0 = String.Compare(hashLoadInFile, file, StringComparison.OrdinalIgnoreCase)) // walk the list of #loads and keep the ones for this file. let hashLoadsInFile = diff --git a/src/fsharp/service/IncrementalBuild.fs b/src/fsharp/service/IncrementalBuild.fs index 7e80bac85d2..3defc9f9376 100755 --- a/src/fsharp/service/IncrementalBuild.fs +++ b/src/fsharp/service/IncrementalBuild.fs @@ -1196,9 +1196,22 @@ type RawFSharpAssemblyDataBackedByLanguageService (tcConfig, tcGlobals, tcState: let sigData = let _sigDataAttributes, sigDataResources = Driver.EncodeInterfaceData(tcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, true) - [ for r in sigDataResources do - let ccuName = GetSignatureDataResourceName r - yield (ccuName, (fun () -> r.GetBytes())) ] + let sigDataReaders = + [ for iresource in sigDataResources do + if IsSignatureDataResource iresource then + let ccuName = GetSignatureDataResourceName iresource + let readerA = fun () -> iresource.GetBytes() + let readerB = + sigDataResources |> List.tryPick (fun iresourceB -> + if IsSignatureDataResourceB iresourceB then + let ccuNameB = GetSignatureDataResourceName iresourceB + if ccuName = ccuNameB then + Some (fun () -> iresourceB.GetBytes() ) + else None + else None) + yield (ccuName, (readerA, readerB)) ] + + sigDataReaders let autoOpenAttrs = topAttrs.assemblyAttrs |> List.choose (List.singleton >> TryFindFSharpStringAttribute tcGlobals tcGlobals.attrib_AutoOpenAttribute) diff --git a/src/fsharp/service/ItemKey.fs b/src/fsharp/service/ItemKey.fs index 82889352f61..a3ec4c72ef6 100644 --- a/src/fsharp/service/ItemKey.fs +++ b/src/fsharp/service/ItemKey.fs @@ -232,7 +232,7 @@ and [] ItemKeyStoreBuilder() = match ty with | TType_forall (_, ty) -> writeType ty - | TType_app (tcref, _) -> + | TType_app (tcref, _, _) -> writeEntityRef tcref | TType_tuple (_, tinst) -> writeString ItemKeyTags.typeTuple @@ -241,14 +241,14 @@ and [] ItemKeyStoreBuilder() = writeString ItemKeyTags.typeAnonymousRecord writeString anonInfo.ILTypeRef.BasicQualifiedName tinst |> List.iter writeType - | TType_fun (d, r) -> + | TType_fun (d, r, _) -> writeString ItemKeyTags.typeFunction writeType d writeType r | TType_measure ms -> writeString ItemKeyTags.typeMeasure writeMeasure ms - | TType_var tp -> + | TType_var (tp, _) -> writeTypar tp | TType_ucase (uc, _) -> match uc with diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs index 887e97e2ecb..5a524e4993a 100644 --- a/src/fsharp/service/QuickParse.fs +++ b/src/fsharp/service/QuickParse.fs @@ -69,8 +69,15 @@ module QuickParse = | true, _, true when name.Length > 2 -> isValidStrippedName (name.Substring(1, name.Length - 2)) 0 | _ -> false +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let GetCompleteIdentifierIslandImpl (lineStr: string) (index: int) : (string * int * bool) option = - if index < 0 || isNull lineStr || index >= lineStr.Length then None +#else + let GetCompleteIdentifierIslandImpl (lineStr: string?) (index: int) : (string * int * bool) option = +#endif + match lineStr with + | null -> None + | NonNull lineStr -> + if index < 0 || index >= lineStr.Length then None else let fixup = match () with @@ -177,9 +184,15 @@ module QuickParse = let private defaultName = [], "" /// Get the partial long name of the identifier to the left of index. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let GetPartialLongName(lineStr: string, index: int) = - if isNull lineStr then defaultName - elif index < 0 then defaultName +#else + let GetPartialLongName(lineStr: string?, index: int) = +#endif + match lineStr with + | null -> defaultName + | NonNull lineStr -> + if index < 0 then defaultName elif index >= lineStr.Length then defaultName else let IsIdentifierPartCharacter pos = IsIdentifierPartCharacter lineStr.[pos] @@ -216,9 +229,15 @@ module QuickParse = /// Get the partial long name of the identifier to the left of index. /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let GetPartialLongNameEx(lineStr: string, index: int) : PartialLongName = - if isNull lineStr then PartialLongName.Empty(index) - elif index < 0 then PartialLongName.Empty(index) +#else + let GetPartialLongNameEx(lineStr: string?, index: int) : PartialLongName = +#endif + match lineStr with + | null -> PartialLongName.Empty(index) + | NonNull lineStr -> + if index < 0 then PartialLongName.Empty(index) elif index >= lineStr.Length then PartialLongName.Empty(index) else let IsIdentifierPartCharacter pos = IsIdentifierPartCharacter lineStr.[pos] diff --git a/src/fsharp/service/QuickParse.fsi b/src/fsharp/service/QuickParse.fsi index 0201f846adb..664c4895b44 100644 --- a/src/fsharp/service/QuickParse.fsi +++ b/src/fsharp/service/QuickParse.fsi @@ -71,14 +71,26 @@ module public QuickParse = /// a call to `DeclItemsForNamesAtPosition` for intellisense. This will /// allow us to use find the correct qualified items rather than resorting /// to the more expensive and less accurate environment lookup. - val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> tokenText: string -> index: int -> (string * int * bool) option +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string -> index: int -> (string * int * bool) option +#else + val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string? -> index: int -> (string * int * bool) option +#endif /// Get the partial long name of the identifier to the left of index. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val GetPartialLongName : lineStr: string * index: int -> (string list * string) +#else + val GetPartialLongName : lineStr: string? * index: int -> (string list * string) +#endif /// Get the partial long name of the identifier to the left of index. /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot. +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE val GetPartialLongNameEx : lineStr: string * index: int -> PartialLongName +#else + val GetPartialLongNameEx : lineStr: string? * index: int -> PartialLongName +#endif /// Tests whether the user is typing something like "member x." or "override (*comment*) x." val TestMemberOrOverrideDeclaration : tokens: FSharpTokenInfo[] -> bool \ No newline at end of file diff --git a/src/fsharp/service/SemanticClassification.fs b/src/fsharp/service/SemanticClassification.fs index 367d2290122..e1c8c9799a9 100644 --- a/src/fsharp/service/SemanticClassification.fs +++ b/src/fsharp/service/SemanticClassification.fs @@ -58,7 +58,7 @@ module TcResolutionsExtensions = let (|OptionalArgumentAttribute|_|) ttype = match ttype with - | TType.TType_app(tref, _) when tref.Stamp = g.attrib_OptionalArgumentAttribute.TyconRef.Stamp -> Some() + | TType.TType_app(tref, _, _) when tref.Stamp = g.attrib_OptionalArgumentAttribute.TyconRef.Stamp -> Some() | _ -> None let (|KeywordIntrinsicValue|_|) (vref: ValRef) = @@ -90,7 +90,7 @@ module TcResolutionsExtensions = protectAssemblyExplorationNoReraise false false (fun () -> Infos.ExistsHeadTypeInEntireHierarchy g amap range0 ty g.tcref_System_IDisposable) let isStructTyconRef (tyconRef: TyconRef) = - let ty = generalizedTyconRef tyconRef + let ty = generalizedTyconRef g tyconRef let underlyingTy = stripTyEqnsAndMeasureEqns g ty isStructTy g underlyingTy @@ -148,7 +148,7 @@ module TcResolutionsExtensions = add m SemanticClassificationType.Interface | Item.Types(_, types), LegitTypeOccurence, _, _, _, m when types |> List.exists (isStructTy g) -> add m SemanticClassificationType.ValueType - | Item.Types(_, TType_app(tyconRef, TType_measure _ :: _) :: _), LegitTypeOccurence, _, _, _, m when isStructTyconRef tyconRef -> + | Item.Types(_, TType_app(tyconRef, (TType_measure _ :: _), _) :: _), LegitTypeOccurence, _, _, _, m when isStructTyconRef tyconRef -> add m SemanticClassificationType.ValueType | Item.Types(_, types), LegitTypeOccurence, _, _, _, m when types |> List.exists isDisposableTy -> add m SemanticClassificationType.Disposable diff --git a/src/fsharp/service/ServiceAssemblyContent.fs b/src/fsharp/service/ServiceAssemblyContent.fs index 982f1dc579c..61efe028f3d 100644 --- a/src/fsharp/service/ServiceAssemblyContent.fs +++ b/src/fsharp/service/ServiceAssemblyContent.fs @@ -547,11 +547,13 @@ module ParsedInput = List.iter walkAttribute attrs walkTypar typar - and walkTypeConstraint = function + and walkTypeConstraint cx = + match cx with | SynTypeConstraint.WhereTyparIsValueType (t, _) | SynTypeConstraint.WhereTyparIsReferenceType (t, _) | SynTypeConstraint.WhereTyparIsUnmanaged (t, _) | SynTypeConstraint.WhereTyparSupportsNull (t, _) + | SynTypeConstraint.WhereTyparNotSupportsNull (t, _) | SynTypeConstraint.WhereTyparIsComparable (t, _) | SynTypeConstraint.WhereTyparIsEquatable (t, _) -> walkTypar t | SynTypeConstraint.WhereTyparDefaultsToType (t, ty, _) @@ -560,8 +562,9 @@ module ParsedInput = | SynTypeConstraint.WhereTyparIsDelegate (t, ts, _) -> walkTypar t; List.iter walkType ts | SynTypeConstraint.WhereTyparSupportsMember (ts, sign, _) -> List.iter walkType ts; walkMemberSig sign - and walkPat = function - | SynPat.Tuple (_,pats, _) + and walkPat pat = + match pat with + | SynPat.Tuple (_, pats, _) | SynPat.ArrayOrList (_, pats, _) | SynPat.Ands (pats, _) -> List.iter walkPat pats | SynPat.Named (pat, ident, _, _, _) -> @@ -596,11 +599,13 @@ module ParsedInput = and walkInterfaceImpl (InterfaceImpl(_, bindings, _)) = List.iter walkBinding bindings - and walkIndexerArg = function + and walkIndexerArg arg = + match arg with | SynIndexerArg.One (e, _, _) -> walkExpr e | SynIndexerArg.Two (e1, _, e2, _, _, _) -> List.iter walkExpr [e1; e2] - and walkType = function + and walkType ty = + match ty with | SynType.Array (_, t, _) | SynType.HashConstraint (t, _) | SynType.MeasurePower (t, _, _) -> walkType t @@ -619,13 +624,15 @@ module ParsedInput = walkExpr e2 e1 |> Option.iter walkExpr - and walkSimplePats = function + and walkSimplePats spats = + match spats with | SynSimplePats.SimplePats (pats, _) -> List.iter walkSimplePat pats | SynSimplePats.Typed (pats, ty, _) -> walkSimplePats pats walkType ty - and walkExpr = function + and walkExpr expr = + match expr with | SynExpr.Paren (e, _, _, _) | SynExpr.Quote (_, _, e, _, _) | SynExpr.Typed (e, _, _) @@ -725,7 +732,8 @@ module ParsedInput = | SynExpr.Const (SynConst.Measure(_, m), _) -> walkMeasure m | _ -> () - and walkMeasure = function + and walkMeasure synMeasure = + match synMeasure with | SynMeasure.Product (m1, m2, _) | SynMeasure.Divide (m1, m2, _) -> walkMeasure m1; walkMeasure m2 | SynMeasure.Named (longIdent, _) -> addLongIdent longIdent @@ -735,7 +743,8 @@ module ParsedInput = | SynMeasure.One | SynMeasure.Anon _ -> () - and walkSimplePat = function + and walkSimplePat spat = + match spat with | SynSimplePat.Attrib (pat, Attributes attrs, _) -> walkSimplePat pat List.iter walkAttribute attrs diff --git a/src/fsharp/service/ServiceDeclarationLists.fs b/src/fsharp/service/ServiceDeclarationLists.fs index 70e3d8999a5..8ecef8fa831 100644 --- a/src/fsharp/service/ServiceDeclarationLists.fs +++ b/src/fsharp/service/ServiceDeclarationLists.fs @@ -179,7 +179,7 @@ module internal DescriptionListsImpl = |> Array.map (fun sp -> let ty = Import.ImportProvidedType amap m (sp.PApply((fun x -> x.ParameterType), m)) let spKind = NicePrint.prettyLayoutOfType denv ty - let spName = sp.PUntaint((fun sp -> sp.Name), m) + let spName = sp.PUntaint((fun sp -> nonNull sp.Name), m) let spOpt = sp.PUntaint((fun sp -> sp.IsOptional), m) FSharpMethodGroupItemParameter( name = spName, @@ -254,7 +254,7 @@ module internal DescriptionListsImpl = match ucinfo.UnionCase.RecdFields with | [f] -> [PrettyParamOfUnionCaseField g denv NicePrint.isGeneratedUnionCaseField -1 f] | fs -> fs |> List.mapi (PrettyParamOfUnionCaseField g denv NicePrint.isGeneratedUnionCaseField) - let rty = generalizedTyconRef ucinfo.TyconRef + let rty = generalizedTyconRef g ucinfo.TyconRef let rtyL = NicePrint.layoutType denv rty prettyParams, rtyL @@ -569,10 +569,10 @@ type FSharpDeclarationListInfo(declarations: FSharpDeclarationListItem[], isForT items |> List.map (fun x -> match x.Item with - | Item.Types (_, (TType_app(tcref, _) :: _)) -> { x with MinorPriority = 1 + tcref.TyparsNoRange.Length } + | Item.Types (_, (TType_app(tcref, _, _) :: _)) -> { x with MinorPriority = 1 + tcref.TyparsNoRange.Length } // Put delegate ctors after types, sorted by #typars. RemoveDuplicateItems will remove FakeInterfaceCtor and DelegateCtor if an earlier type is also reported with this name - | Item.FakeInterfaceCtor (TType_app(tcref, _)) - | Item.DelegateCtor (TType_app(tcref, _)) -> { x with MinorPriority = 1000 + tcref.TyparsNoRange.Length } + | Item.FakeInterfaceCtor (TType_app(tcref,_,_)) + | Item.DelegateCtor (TType_app(tcref,_,_)) -> { x with MinorPriority = 1000 + tcref.TyparsNoRange.Length } // Put type ctors after types, sorted by #typars. RemoveDuplicateItems will remove DefaultStructCtors if a type is also reported with this name | Item.CtorGroup (_, (cinfo :: _)) -> { x with MinorPriority = 1000 + 10 * cinfo.DeclaringTyconRef.TyparsNoRange.Length } | Item.MethodGroup(_, minfo :: _, _) -> { x with IsOwnMember = tyconRefOptEq x.Type minfo.DeclaringTyconRef } diff --git a/src/fsharp/service/ServiceLexing.fs b/src/fsharp/service/ServiceLexing.fs index 3318358c1e3..b3663b6256b 100755 --- a/src/fsharp/service/ServiceLexing.fs +++ b/src/fsharp/service/ServiceLexing.fs @@ -274,15 +274,15 @@ module internal TokenClassifications = | IF | THEN | ELSE | DO | DONE | LET _ | AND_BANG _ | IN | CONST | HIGH_PRECEDENCE_PAREN_APP | FIXED | HIGH_PRECEDENCE_BRACK_APP - | TYPE_COMING_SOON | TYPE_IS_HERE | MODULE_COMING_SOON | MODULE_IS_HERE -> - (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None) - - | BEGIN -> - (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None) - - | END -> - (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None) - + | HACKNULL | AMBIVALENT + | TYPE_COMING_SOON | TYPE_IS_HERE | MODULE_COMING_SOON | MODULE_IS_HERE + -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None) + + | BEGIN + -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None) + + | END + -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None) | HASH_LIGHT _ | HASH_LINE _ | HASH_IF _ diff --git a/src/fsharp/service/ServiceParamInfoLocations.fs b/src/fsharp/service/ServiceParamInfoLocations.fs index b265d1b535b..667336aeff5 100755 --- a/src/fsharp/service/ServiceParamInfoLocations.fs +++ b/src/fsharp/service/ServiceParamInfoLocations.fs @@ -34,7 +34,10 @@ module internal NoteworthyParamInfoLocationsImpl = let isStaticArg a = match a with - | SynType.StaticConstant _ | SynType.StaticConstantExpr _ | SynType.StaticConstantNamed _ -> true + | SynType.StaticConstant _ + | SynType.StaticConstantNull _ + | SynType.StaticConstantExpr _ + | SynType.StaticConstantNamed _ -> true | SynType.LongIdent _ -> true // NOTE: this is not a static constant, but it is a prefix of incomplete code, e.g. "TP<42, Arg3" is a prefix of "TP<42, Arg3=6>" and Arg3 shows up as a LongId | _ -> false diff --git a/src/fsharp/service/ServiceUntypedParse.fs b/src/fsharp/service/ServiceUntypedParse.fs index 684f3a04e06..cb502dbba60 100755 --- a/src/fsharp/service/ServiceUntypedParse.fs +++ b/src/fsharp/service/ServiceUntypedParse.fs @@ -746,6 +746,7 @@ module UntypedParseImpl = | SynTypeConstraint.WhereTyparIsReferenceType(t, _) -> walkTypar t | SynTypeConstraint.WhereTyparIsUnmanaged(t, _) -> walkTypar t | SynTypeConstraint.WhereTyparSupportsNull (t, _) -> walkTypar t + | SynTypeConstraint.WhereTyparNotSupportsNull (t, _) -> walkTypar t | SynTypeConstraint.WhereTyparIsComparable(t, _) -> walkTypar t | SynTypeConstraint.WhereTyparIsEquatable(t, _) -> walkTypar t | SynTypeConstraint.WhereTyparSubtypeOfType(t, ty, _) -> walkTypar t |> Option.orElse (walkType ty) diff --git a/src/fsharp/service/service.fs b/src/fsharp/service/service.fs index d170a7a5b2d..feab28abe22 100644 --- a/src/fsharp/service/service.fs +++ b/src/fsharp/service/service.fs @@ -1205,7 +1205,7 @@ type FSharpChecker(legacyReferenceResolver, member __.GetParsingOptionsFromCommandLineArgs(initialSourceFiles, argv, ?isInteractive) = let isInteractive = defaultArg isInteractive false use errorScope = new ErrorScope() - let tcConfigBuilder = TcConfigBuilder.Initial + let tcConfigBuilder = TcConfigBuilder.Initial(legacyReferenceResolver) // Apply command-line arguments and collect more source files if they are in the arguments let sourceFilesNew = ApplyCommandLineArgs(tcConfigBuilder, initialSourceFiles, argv) diff --git a/src/fsharp/symbols/Exprs.fs b/src/fsharp/symbols/Exprs.fs index 17290528587..0ea7e33ea64 100644 --- a/src/fsharp/symbols/Exprs.fs +++ b/src/fsharp/symbols/Exprs.fs @@ -284,7 +284,7 @@ module FSharpExprConvert = let (|TTypeConvOp|_|) (cenv: SymbolEnv) ty = let g = cenv.g match ty with - | TType_app (tcref,_) -> + | TType_app (tcref,_, _) -> match tcref with | _ when tyconRefEq g tcref g.sbyte_tcr -> Some mkCallToSByteOperator | _ when tyconRefEq g tcref g.byte_tcr -> Some mkCallToByteOperator @@ -475,12 +475,13 @@ module FSharpExprConvert = ConvObjectModelCallLinear cenv env (false, v, [], tyargs, List.concat untupledCurriedArgs) contf2 and ConvExprPrim (cenv: SymbolEnv) (env: ExprTranslationEnv) expr = + let g = cenv.g // Eliminate integer 'for' loops - let expr = DetectAndOptimizeForExpression cenv.g OptimizeIntRangesOnly expr + let expr = DetectAndOptimizeForExpression g OptimizeIntRangesOnly expr // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need // complete inference types. - let expr = NormalizeAndAdjustPossibleSubsumptionExprs cenv.g expr + let expr = NormalizeAndAdjustPossibleSubsumptionExprs g expr // Remove TExpr_ref nodes let expr = stripExpr expr @@ -499,7 +500,7 @@ module FSharpExprConvert = | Expr.Sequential _ -> ConvExprPrimLinear cenv env expr (fun e -> e) - | ModuleValueOrMemberUse cenv.g (vref, vFlags, _f, _fty, tyargs, curriedArgs) when (* (nonNil tyargs || nonNil curriedArgs) && *) vref.IsMemberOrModuleBinding -> + | ModuleValueOrMemberUse g (vref, vFlags, _f, _fty, tyargs, curriedArgs) when (* (nonNil tyargs || nonNil curriedArgs) && *) vref.IsMemberOrModuleBinding -> // Process applications of top-level values in a tail-recursive way ConvModuleValueOrMemberUseLinear cenv env (expr, vref, vFlags, tyargs, curriedArgs) (fun e -> e) @@ -522,7 +523,7 @@ module FSharpExprConvert = E.LetRec(bindsR, bodyR) | Expr.Lambda (_, _, _, vs, b, _, _) -> - let v, b = MultiLambdaToTupledLambda cenv.g vs b + let v, b = MultiLambdaToTupledLambda g vs b let vR = ConvVal cenv v let bR = ConvExpr cenv (env.BindVal v) b E.Lambda(vR, bR) @@ -535,8 +536,8 @@ module FSharpExprConvert = let env = env.BindTypars (Seq.zip tps gps |> Seq.toList) E.TypeLambda(gps, ConvExpr cenv env b) - | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy cenv.g ty -> - let f = mkLambdas m tps tmvs (e, GetFSharpViewOfReturnType cenv.g (returnTyOfMethod cenv.g tmethod)) + | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy g ty -> + let f = mkLambdas g m tps tmvs (e, GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod)) let fR = ConvExpr cenv env f let tyargR = ConvType cenv ctyp E.NewDelegate(tyargR, fR) @@ -545,7 +546,7 @@ module FSharpExprConvert = ConvExprPrim cenv env x | Expr.TyChoose _ -> - ConvExprPrim cenv env (ChooseTyparSolutionsForFreeChoiceTypars cenv.g cenv.amap expr) + ConvExprPrim cenv env (ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr) | Expr.Obj (_lambdaId, ty, _basev, basecall, overrides, iimpls, _m) -> let basecallR = ConvExpr cenv env basecall @@ -577,7 +578,7 @@ module FSharpExprConvert = E.NewAnonRecord(typR, argsR) | TOp.Tuple tupInfo, tyargs, _ -> - let tyR = ConvType cenv (mkAnyTupledTy cenv.g tupInfo tyargs) + let tyR = ConvType cenv (mkAnyTupledTy g tupInfo tyargs) let argsR = ConvExprs cenv env args E.NewTuple(tyR, argsR) @@ -620,8 +621,8 @@ module FSharpExprConvert = E.FSharpFieldGet(Some objR, typR, projR) | TOp.TupleFieldGet (tupInfo, n), tyargs, [e] -> - let tyR = ConvType cenv (mkAnyTupledTy cenv.g tupInfo tyargs) - E.TupleGet(tyR, n, ConvExpr cenv env e) + let tyR = ConvType cenv (mkAnyTupledTy g tupInfo tyargs) + E.TupleGet (tyR, n, ConvExpr cenv env e) | TOp.ILAsm ([ I_ldfld (_, _, fspec) ], _), enclTypeArgs, [obj] -> let typR = ConvILTypeRefApp cenv m fspec.DeclaringTypeRef enclTypeArgs @@ -646,93 +647,93 @@ module FSharpExprConvert = | TOp.ILAsm ([ ], [tty]), _, [arg] -> match tty with | TTypeConvOp cenv convOp -> - let ty = tyOfExpr cenv.g arg - let op = convOp cenv.g m ty arg + let ty = tyOfExpr g arg + let op = convOp g m ty arg ConvExprPrim cenv env op | _ -> ConvExprPrim cenv env arg | TOp.ILAsm ([ I_box _ ], _), [ty], [arg] -> - let op = mkCallBox cenv.g m ty arg + let op = mkCallBox g m ty arg ConvExprPrim cenv env op | TOp.ILAsm ([ I_unbox_any _ ], _), [ty], [arg] -> - let op = mkCallUnbox cenv.g m ty arg + let op = mkCallUnbox g m ty arg ConvExprPrim cenv env op | TOp.ILAsm ([ I_isinst _ ], _), [ty], [arg] -> - let op = mkCallTypeTest cenv.g m ty arg + let op = mkCallTypeTest g m ty arg ConvExprPrim cenv env op | TOp.ILAsm ([ I_call (Normalcall, mspec, None) ], _), _, [arg] when mspec.MethodRef.DeclaringTypeRef.Name = "System.String" && mspec.Name = "GetHashCode" -> - let ty = tyOfExpr cenv.g arg - let op = mkCallHash cenv.g m ty arg + let ty = tyOfExpr g arg + let op = mkCallHash g m ty arg ConvExprPrim cenv env op | TOp.ILCall (_, _, _, _, _, _, _, mref, _, _, _), [], [Expr.Op (TOp.ILAsm ([ I_ldtoken (ILToken.ILType _) ], _), [ty], _, _)] when mref.DeclaringTypeRef.Name = "System.Type" && mref.Name = "GetTypeFromHandle" -> - let op = mkCallTypeOf cenv.g m ty + let op = mkCallTypeOf g m ty ConvExprPrim cenv env op | TOp.ILAsm ([ EI_ilzero _ ], _), [ty], _ -> E.DefaultValue (ConvType cenv ty) | TOp.ILAsm ([ AI_ldnull; AI_cgt_un ], _), _, [arg] -> - let elemTy = tyOfExpr cenv.g arg + let elemTy = tyOfExpr g arg let nullVal = mkNull m elemTy - let op = mkCallNotEqualsOperator cenv.g m elemTy arg nullVal + let op = mkCallNotEqualsOperator g m elemTy arg nullVal ConvExprPrim cenv env op | TOp.ILAsm ([ I_ldlen; AI_conv DT_I4 ], _), _, [arr] -> - let arrayTy = tyOfExpr cenv.g arr - let elemTy = destArrayTy cenv.g arrayTy - let op = mkCallArrayLength cenv.g m elemTy arr + let arrayTy = tyOfExpr g arr + let elemTy = destArrayTy g arrayTy + let op = mkCallArrayLength g m elemTy arr ConvExprPrim cenv env op | TOp.ILAsm ([ I_newarr (ILArrayShape [(Some 0, None)], _)], _), [elemTy], xa -> E.NewArray(ConvType cenv elemTy, ConvExprs cenv env xa) | TOp.ILAsm ([ I_ldelem_any (ILArrayShape [(Some 0, None)], _)], _), [elemTy], [arr; idx1] -> - let op = mkCallArrayGet cenv.g m elemTy arr idx1 + let op = mkCallArrayGet g m elemTy arr idx1 ConvExprPrim cenv env op | TOp.ILAsm ([ I_stelem_any (ILArrayShape [(Some 0, None)], _)], _), [elemTy], [arr; idx1; v] -> - let op = mkCallArraySet cenv.g m elemTy arr idx1 v + let op = mkCallArraySet g m elemTy arr idx1 v ConvExprPrim cenv env op | TOp.ILAsm ([ ILUnaryOp unaryOp ], _), _, [arg] -> - let ty = tyOfExpr cenv.g arg - let op = unaryOp cenv.g m ty arg + let ty = tyOfExpr g arg + let op = unaryOp g m ty arg ConvExprPrim cenv env op | TOp.ILAsm ([ ILBinaryOp binaryOp ], _), _, [arg1;arg2] -> - let ty = tyOfExpr cenv.g arg1 - let op = binaryOp cenv.g m ty arg1 arg2 + let ty = tyOfExpr g arg1 + let op = binaryOp g m ty arg1 arg2 ConvExprPrim cenv env op | TOp.ILAsm ([ ILConvertOp convertOp1; ILConvertOp convertOp2 ], _), _, [arg] -> - let ty1 = tyOfExpr cenv.g arg - let op1 = convertOp1 cenv.g m ty1 arg - let ty2 = tyOfExpr cenv.g op1 - let op2 = convertOp2 cenv.g m ty2 op1 + let ty1 = tyOfExpr g arg + let op1 = convertOp1 g m ty1 arg + let ty2 = tyOfExpr g op1 + let op2 = convertOp2 g m ty2 op1 ConvExprPrim cenv env op2 - | TOp.ILAsm ([ ILConvertOp convertOp ], [TType_app (tcref,_)]), _, [arg] -> - let ty = tyOfExpr cenv.g arg + | TOp.ILAsm ([ ILConvertOp convertOp ], [TType_app (tcref,_, _)]), _, [arg] -> + let ty = tyOfExpr g arg let op = - if tyconRefEq cenv.g tcref cenv.g.char_tcr - then mkCallToCharOperator cenv.g m ty arg - else convertOp cenv.g m ty arg + if tyconRefEq g tcref g.char_tcr + then mkCallToCharOperator g m ty arg + else convertOp g m ty arg ConvExprPrim cenv env op | TOp.ILAsm ([ I_throw ], _), _, [arg1] -> - let raiseExpr = mkCallRaise cenv.g m (tyOfExpr cenv.g expr) arg1 + let raiseExpr = mkCallRaise g m (tyOfExpr g expr) arg1 ConvExprPrim cenv env raiseExpr | TOp.ILAsm (il, _), tyargs, args -> - E.ILAsm(sprintf "%+A" il, ConvTypes cenv tyargs, ConvExprs cenv env args) + E.ILAsm (sprintf "%+A" il, ConvTypes cenv tyargs, ConvExprs cenv env args) | TOp.ExnConstr tcref, tyargs, args -> E.NewRecord(ConvType cenv (mkAppTy tcref tyargs), ConvExprs cenv env args) @@ -755,7 +756,7 @@ module FSharpExprConvert = let fspec = exnc.TrueInstanceFieldsAsList.[i] let fref = mkRecdFieldRef tcref fspec.Name let typR = ConvType cenv (mkAppTy tcref tyargs) - let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, cenv.g.exn_ty)) + let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, g.exn_ty)) E.FSharpFieldGet(Some objR, typR, ConvRecdFieldRef cenv fref) | TOp.ExnFieldSet (tcref, i), [], [obj;e2] -> @@ -763,18 +764,18 @@ module FSharpExprConvert = let fspec = exnc.TrueInstanceFieldsAsList.[i] let fref = mkRecdFieldRef tcref fspec.Name let typR = ConvType cenv (mkAppTy tcref tyargs) - let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, cenv.g.exn_ty)) + let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, g.exn_ty)) E.FSharpFieldSet(Some objR, typR, ConvRecdFieldRef cenv fref, ConvExpr cenv env e2) | TOp.Coerce, [tgtTy;srcTy], [x] -> - if typeEquiv cenv.g tgtTy srcTy then + if typeEquiv g tgtTy srcTy then ConvExprPrim cenv env x else E.Coerce(ConvType cenv tgtTy, ConvExpr cenv env x) | TOp.Reraise, [toTy], [] -> // rebuild reraise() and Convert - mkReraiseLibCall cenv.g toTy m |> ConvExprPrim cenv env + mkReraiseLibCall g toTy m |> ConvExprPrim cenv env | TOp.LValueOp (LAddrOf _, vref), [], [] -> E.AddressOf(ConvExpr cenv env (exprForValRef m vref)) @@ -794,16 +795,16 @@ module FSharpExprConvert = | TOp.While _, [], [Expr.Lambda (_, _, _, [_], test, _, _);Expr.Lambda (_, _, _, [_], body, _, _)] -> E.WhileLoop(ConvExpr cenv env test, ConvExpr cenv env body) - | TOp.For (_, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody cenv.g (arr, elemTy, body)] -> + | TOp.For (_, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody g (arr, elemTy, body)] -> let lim1 = - let len = mkCallArrayLength cenv.g lm elemTy arr // Array.length arr - mkCallSubtractionOperator cenv.g lm cenv.g.int32_ty len (mkOne cenv.g lm) // len - 1 + let len = mkCallArrayLength g lm elemTy arr // Array.length arr + mkCallSubtractionOperator g lm g.int32_ty len (mkOne g lm) // len - 1 E.FastIntegerForLoop(ConvExpr cenv env lim0, ConvExpr cenv env lim1, ConvExpr cenv env body, dir <> FSharpForLoopDown) | TOp.For (_, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], lim1, lm, _); body] -> let lim1 = if dir = CSharpForLoopUp then - mkCallSubtractionOperator cenv.g lm cenv.g.int32_ty lim1 (mkOne cenv.g lm) // len - 1 + mkCallSubtractionOperator g lm g.int32_ty lim1 (mkOne g lm) // len - 1 else lim1 E.FastIntegerForLoop(ConvExpr cenv env lim0, ConvExpr cenv env lim1, ConvExpr cenv env body, dir <> FSharpForLoopDown) @@ -820,9 +821,9 @@ module FSharpExprConvert = let envh = env.BindVal vh E.TryWith(ConvExpr cenv env e1, vfR, ConvExpr cenv envf ef, vhR, ConvExpr cenv envh eh) - | TOp.Bytes bytes, [], [] -> E.Const(box bytes, ConvType cenv (tyOfExpr cenv.g expr)) + | TOp.Bytes bytes, [], [] -> E.Const(box bytes, ConvType cenv (tyOfExpr g expr)) - | TOp.UInt16s arr, [], [] -> E.Const(box arr, ConvType cenv (tyOfExpr cenv.g expr)) + | TOp.UInt16s arr, [], [] -> E.Const(box arr, ConvType cenv (tyOfExpr g expr)) | TOp.UnionCaseProof _, _, [e] -> ConvExprPrim cenv env e // Note: we erase the union case proof conversions when converting to quotations | TOp.UnionCaseTagGet tycr, tyargs, [arg1] -> @@ -837,7 +838,7 @@ module FSharpExprConvert = E.TraitCall(tysR, nm, memFlags, argtysR, tyargsR, argsR) | TOp.RefAddrGet readonly, [ty], [e] -> - let replExpr = mkRecdFieldGetAddrViaExprAddr(readonly, e, mkRefCellContentsRef cenv.g, [ty], m) + let replExpr = mkRecdFieldGetAddrViaExprAddr(readonly, e, mkRefCellContentsRef g, [ty], m) ConvExprPrim cenv env replExpr | _ -> wfail (sprintf "unhandled construct in AST", m) @@ -876,6 +877,7 @@ module FSharpExprConvert = Some(vR, rhsR), envinner and ConvILCall (cenv: SymbolEnv) env (isNewObj, valUseFlags, ilMethRef, enclTypeArgs, methTypeArgs, callArgs, m) = + let g = cenv.g let isNewObj = (isNewObj || (match valUseFlags with CtorValUsedAsSuperInit | CtorValUsedAsSelfInit -> true | _ -> false)) let methName = ilMethRef.Name let isPropGet = methName.StartsWithOrdinal("get_") @@ -892,7 +894,7 @@ module FSharpExprConvert = let parent = ILTypeRef.Create(e.Scope, e.Enclosing.Tail, e.Enclosing.Head) Import.ImportILTypeRef cenv.amap m parent, Some e.Name - let enclosingType = generalizedTyconRef tcref + let enclosingType = generalizedTyconRef g tcref let makeCall minfo = ConvObjectModelCallLinear cenv env (isNewObj, minfo, enclTypeArgs, methTypeArgs, callArgs) id @@ -900,7 +902,7 @@ module FSharpExprConvert = let makeFSCall isMember (vr: ValRef) = let memOrVal = if isMember then - let minfo = MethInfo.FSMeth(cenv.g, enclosingType, vr, None) + let minfo = MethInfo.FSMeth(g, enclosingType, vr, None) FSharpMemberOrFunctionOrValue(cenv, minfo) else FSharpMemberOrFunctionOrValue(cenv, vr) @@ -1055,12 +1057,12 @@ module FSharpExprConvert = let argtys = [ ilMethRef.ArgTypes |> List.map (ImportILTypeFromMetadata cenv.amap m scoref tinst1 tinst2) ] let rty = match ImportReturnTypeFromMetadata cenv.amap m ilMethRef.ReturnType emptyILCustomAttrs scoref tinst1 tinst2 with - | None -> if isCtor then enclosingType else cenv.g.unit_ty + | None -> if isCtor then enclosingType else g.unit_ty | Some ty -> ty let linkageType = - let ty = mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) argtys) rty - let ty = if isStatic then ty else mkFunTy enclosingType ty + let ty = mkIteratedFunTy g (List.map (mkRefTupledTy g) argtys) rty + let ty = if isStatic then ty else mkFunTy g enclosingType ty mkForallTyIfNeeded (typars1 @ typars2) ty let argCount = List.sum (List.map List.length argtys) + (if isStatic then 0 else 1) diff --git a/src/fsharp/symbols/SymbolHelpers.fs b/src/fsharp/symbols/SymbolHelpers.fs index e717ac5d5a2..eb70642e89a 100644 --- a/src/fsharp/symbols/SymbolHelpers.fs +++ b/src/fsharp/symbols/SymbolHelpers.fs @@ -504,7 +504,7 @@ module internal SymbolHelpers = // Generalize to get a formal signature let formalTypars = tcref.Typars m let formalTypeInst = generalizeTypars formalTypars - let ty = TType_app(tcref, formalTypeInst) + let ty = TType_app(tcref, formalTypeInst, KnownAmbivalentToNull) if isILAppTy g ty then let formalTypeInfo = ILTypeInfo.FromType g ty Some(nlref.Ccu.FileName, formalTypars, formalTypeInfo) @@ -641,7 +641,7 @@ module internal SymbolHelpers = | Item.RecdField rfinfo -> mkXmlComment (GetXmlDocSigOfRecdFieldInfo rfinfo) | Item.NewDef _ -> FSharpXmlDoc.None | Item.ILField finfo -> mkXmlComment (GetXmlDocSigOfILFieldInfo infoReader m finfo) - | Item.Types(_, ((TType_app(tcref, _)) :: _)) -> mkXmlComment (GetXmlDocSigOfEntityRef infoReader m tcref) + | Item.Types(_, ((TType_app(tcref, _, _)) :: _)) -> mkXmlComment (GetXmlDocSigOfEntityRef infoReader m tcref) | Item.CustomOperation (_, _, Some minfo) -> mkXmlComment (GetXmlDocSigOfMethInfo infoReader m minfo) | Item.TypeVar _ -> FSharpXmlDoc.None | Item.ModuleOrNamespaces(modref :: _) -> mkXmlComment (GetXmlDocSigOfEntityRef infoReader m modref) @@ -799,8 +799,8 @@ module internal SymbolHelpers = | Item.UnqualifiedType tcRefs1, Item.UnqualifiedType tcRefs2 -> List.zip tcRefs1 tcRefs2 |> List.forall (fun (tcRef1, tcRef2) -> tyconRefEq g tcRef1 tcRef2) - | Item.Types(_, [TType.TType_app(tcRef1, _)]), Item.UnqualifiedType([tcRef2]) -> tyconRefEq g tcRef1 tcRef2 - | Item.UnqualifiedType([tcRef1]), Item.Types(_, [TType.TType_app(tcRef2, _)]) -> tyconRefEq g tcRef1 tcRef2 + | Item.Types(_, [TType.TType_app(tcRef1, _, _)]), Item.UnqualifiedType([tcRef2]) -> tyconRefEq g tcRef1 tcRef2 + | Item.UnqualifiedType([tcRef1]), Item.Types(_, [TType.TType_app(tcRef2, _, _)]) -> tyconRefEq g tcRef1 tcRef2 | _ -> false) member x.GetHashCode item = @@ -868,22 +868,22 @@ module internal SymbolHelpers = // This may explore assemblies that are not in the reference set. // In this case just assume the item is not suppressed. protectAssemblyExploration true (fun () -> - match item with - | Item.Types(it, [ty]) -> - match tryTcrefOfAppTy g ty with - | ValueSome tcr1 -> - g.suppressed_types - |> List.exists (fun supp -> - let generalizedSupp = generalizedTyconRef supp - // check the display name is precisely the one we're suppressing - match tryTcrefOfAppTy g generalizedSupp with - | ValueSome tcr2 -> - it = supp.DisplayName && - // check if they are the same logical type (after removing all abbreviations) - tyconRefEq g tcr1 tcr2 + match item with + | Item.Types(it, [ty]) -> + match tryTcrefOfAppTy g ty with + | ValueSome tcr1 -> + g.suppressed_types + |> List.exists (fun supp -> + let generalizedSupp = generalizedTyconRef g supp + // check the display name is precisely the one we're suppressing + match tryTcrefOfAppTy g generalizedSupp with + | ValueSome tcr2 -> + it = supp.DisplayName && + // check if they are the same logical type (after removing all abbreviations) + tyconRefEq g tcr1 tcr2 | _ -> false) | _ -> false - | _ -> false) + | _ -> false) /// Filter types that are explicitly suppressed from the IntelliSense (such as uppercase "FSharpList", "Option", etc.) let RemoveExplicitlySuppressed (g: TcGlobals) (items: ItemWithInst list) = @@ -986,7 +986,7 @@ module internal SymbolHelpers = | Item.MethodGroup(_, minfo :: _, _) -> GetXmlCommentForMethInfoItem infoReader m item minfo - | Item.Types(_, ((TType_app(tcref, _)) :: _)) -> + | Item.Types (_, ((TType_app (tcref, _, _)):: _)) -> GetXmlCommentForItemAux (if tyconRefUsesLocalXmlDoc g.compilingFslib tcref || tcref.XmlDoc.NonEmpty then Some tcref.XmlDoc else None) infoReader m item | Item.ModuleOrNamespaces((modref :: _) as modrefs) -> @@ -1028,9 +1028,9 @@ module internal SymbolHelpers = let g = infoReader.g let amap = infoReader.amap match item with - | Item.Types(_, ((TType_app(tcref, _)) :: _)) + | Item.Types (_, ((TType_app (tcref, _, _)) :: _)) | Item.UnqualifiedType(tcref :: _) -> - let ty = generalizedTyconRef tcref + let ty = generalizedTyconRef g tcref Infos.ExistsHeadTypeInEntireHierarchy g amap range0 ty g.tcref_System_Attribute | _ -> false with _ -> false @@ -1055,7 +1055,7 @@ module internal SymbolHelpers = // Union tags (constructors) | Item.UnionCase(ucinfo, _) -> let uc = ucinfo.UnionCase - let rty = generalizedTyconRef ucinfo.TyconRef + let rty = generalizedTyconRef g ucinfo.TyconRef let recd = uc.RecdFields let layout = wordL (tagText (FSComp.SR.typeInfoUnionCase())) ^^ @@ -1234,7 +1234,7 @@ module internal SymbolHelpers = FSharpStructuredToolTipElement.Single(layout, xml) // Types. - | Item.Types(_, ((TType_app(tcref, _)) :: _)) + | Item.Types (_, ((TType_app (tcref, _, _)) :: _)) | Item.UnqualifiedType (tcref :: _) -> let denv = { denv with shortTypeNames = true } let layout = NicePrint.layoutTycon denv infoReader AccessibleFromSomewhere m (* width *) tcref.Deref @@ -1427,7 +1427,7 @@ module internal SymbolHelpers = | Item.UnqualifiedType (tcref :: _) | Item.ExnCase tcref -> // strip off any abbreviation - match generalizedTyconRef tcref with + match generalizedTyconRef g tcref with | AppTy g (tcref, _) -> Some (ticksAndArgCountTextOfTyconRef tcref) | _ -> None diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs index f387a9bc7e1..8d5819d78e3 100644 --- a/src/fsharp/symbols/Symbols.fs +++ b/src/fsharp/symbols/Symbols.fs @@ -555,33 +555,36 @@ and FSharpEntity(cenv: SymbolEnv, entity:EntityRef) = member x.DeclaredInterfaces = if isUnresolved() then makeReadOnlyCollection [] else + let ty = generalizedTyconRef cenv.g entity ErrorLogger.protectAssemblyExploration [] (fun () -> - [ for ty in GetImmediateInterfacesOfType SkipUnrefInterfaces.Yes cenv.g cenv.amap range0 (generalizedTyconRef entity) do - yield FSharpType(cenv, ty) ]) + [ for ity in GetImmediateInterfacesOfType SkipUnrefInterfaces.Yes cenv.g cenv.amap range0 ty do + yield FSharpType(cenv, ity) ]) |> makeReadOnlyCollection member x.AllInterfaces = if isUnresolved() then makeReadOnlyCollection [] else + let ty = generalizedTyconRef cenv.g entity ErrorLogger.protectAssemblyExploration [] (fun () -> - [ for ty in AllInterfacesOfType cenv.g cenv.amap range0 AllowMultiIntfInstantiations.Yes (generalizedTyconRef entity) do - yield FSharpType(cenv, ty) ]) + [ for ity in AllInterfacesOfType cenv.g cenv.amap range0 AllowMultiIntfInstantiations.Yes ty do + yield FSharpType(cenv, ity) ]) |> makeReadOnlyCollection member x.IsAttributeType = if isUnresolved() then false else - let ty = generalizedTyconRef entity + let ty = generalizedTyconRef cenv.g entity ErrorLogger.protectAssemblyExploration false <| fun () -> - Infos.ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_Attribute + Infos.ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_Attribute member x.IsDisposableType = if isUnresolved() then false else - let ty = generalizedTyconRef entity + let ty = generalizedTyconRef cenv.g entity ErrorLogger.protectAssemblyExploration false <| fun () -> - Infos.ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_IDisposable + Infos.ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_IDisposable member x.BaseType = checkIsResolved() - GetSuperTypeOfType cenv.g cenv.amap range0 (generalizedTyconRef entity) + let ty = generalizedTyconRef cenv.g entity + GetSuperTypeOfType cenv.g cenv.amap range0 ty |> Option.map (fun ty -> FSharpType(cenv, ty)) member __.UsesPrefixDisplay = @@ -595,7 +598,7 @@ and FSharpEntity(cenv: SymbolEnv, entity:EntityRef) = member x.MembersFunctionsAndValues = if isUnresolved() then makeReadOnlyCollection[] else protect <| fun () -> - ([ let _, entityTy = generalizeTyconRef entity + ([ let entityTy = generalizedTyconRef cenv.g entity let createMember (minfo: MethInfo) = if minfo.IsConstructor then FSharpMemberOrFunctionOrValue(cenv, C minfo, Item.CtorGroup (minfo.DisplayName, [minfo])) else FSharpMemberOrFunctionOrValue(cenv, M minfo, Item.MethodGroup (minfo.DisplayName, [minfo], None)) @@ -626,10 +629,10 @@ and FSharpEntity(cenv: SymbolEnv, entity:EntityRef) = yield FSharpMemberOrFunctionOrValue(cenv, V vref, Item.Value vref) match v.MemberInfo.Value.MemberFlags.MemberKind, v.ApparentEnclosingEntity with | MemberKind.PropertyGet, Parent p -> - let pinfo = FSProp(cenv.g, generalizedTyconRef p, Some vref, None) + let pinfo = FSProp(cenv.g, generalizedTyconRef cenv.g p, Some vref, None) yield FSharpMemberOrFunctionOrValue(cenv, P pinfo, Item.Property (pinfo.PropertyName, [pinfo])) | MemberKind.PropertySet, Parent p -> - let pinfo = FSProp(cenv.g, generalizedTyconRef p, None, Some vref) + let pinfo = FSProp(cenv.g, generalizedTyconRef cenv.g p, None, Some vref) yield FSharpMemberOrFunctionOrValue(cenv, P pinfo, Item.Property (pinfo.PropertyName, [pinfo])) | _ -> () @@ -681,7 +684,7 @@ and FSharpEntity(cenv: SymbolEnv, entity:EntityRef) = let (TILObjectReprData(_scoref, _enc, tdef)) = entity.ILTyconInfo let formalTypars = entity.Typars(range.Zero) let formalTypeInst = generalizeTypars formalTypars - let ty = TType_app(entity, formalTypeInst) + let ty = TType_app(entity, formalTypeInst, cenv.g.knownWithoutNull) let formalTypeInfo = ILTypeInfo.FromType cenv.g ty tdef.Fields.AsList |> List.map (fun tdef -> let ilFieldInfo = ILFieldInfo(formalTypeInfo, tdef) @@ -1336,6 +1339,11 @@ and FSharpGenericParameterConstraint(cenv, cx: TyparConstraint) = | TyparConstraint.SupportsComparison _ -> true | _ -> false + member __.IsNotSupportsNullConstraint = + match cx with + | TyparConstraint.NotSupportsNull _ -> true + | _ -> false + member __.IsEqualityConstraint = match cx with | TyparConstraint.SupportsEquality _ -> true @@ -1504,7 +1512,7 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = | M m | C m -> let rty = m.GetFSharpReturnTy(cenv.amap, range0, m.FormalMethodInst) let argtysl = m.GetParamTypes(cenv.amap, range0, m.FormalMethodInst) - mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) argtysl) rty + mkIteratedFunTy cenv.g (List.map (mkRefTupledTy cenv.g) argtysl) rty | V v -> v.TauType FSharpType(cenv, ty) @@ -1638,9 +1646,9 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = match d with | M m when m.LogicalName.StartsWithOrdinal("add_") -> let eventName = m.LogicalName.[4..] - let entityTy = generalizedTyconRef m.DeclaringTyconRef + let entityTy = generalizedTyconRef cenv.g m.DeclaringTyconRef not (isNil (cenv.infoReader.GetImmediateIntrinsicEventsOfType (Some eventName, AccessibleFromSomeFSharpCode, range0, entityTy))) || - let declaringTy = generalizedTyconRef m.DeclaringTyconRef + let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef match GetImmediateIntrinsicPropInfosOfType (Some eventName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy with | pinfo :: _ -> pinfo.IsFSharpEventProperty | _ -> false @@ -1652,9 +1660,9 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = match d with | M m when m.LogicalName.StartsWithOrdinal("remove_") -> let eventName = m.LogicalName.[7..] - let entityTy = generalizedTyconRef m.DeclaringTyconRef + let entityTy = generalizedTyconRef cenv.g m.DeclaringTyconRef not (isNil (cenv.infoReader.GetImmediateIntrinsicEventsOfType (Some eventName, AccessibleFromSomeFSharpCode, range0, entityTy))) || - let declaringTy = generalizedTyconRef m.DeclaringTyconRef + let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef match GetImmediateIntrinsicPropInfosOfType (Some eventName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy with | pinfo :: _ -> pinfo.IsFSharpEventProperty | _ -> false @@ -1679,7 +1687,7 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = match d with | M m when m.LogicalName.StartsWithOrdinal("get_") -> let propName = PrettyNaming.ChopPropertyName(m.LogicalName) - let declaringTy = generalizedTyconRef m.DeclaringTyconRef + let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef not (isNil (GetImmediateIntrinsicPropInfosOfType (Some propName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy)) | V v -> v.IsPropertyGetterMethod | _ -> false @@ -1690,7 +1698,7 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = // Look for a matching property with the right name. | M m when m.LogicalName.StartsWithOrdinal("set_") -> let propName = PrettyNaming.ChopPropertyName(m.LogicalName) - let declaringTy = generalizedTyconRef m.DeclaringTyconRef + let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef not (isNil (GetImmediateIntrinsicPropInfosOfType (Some propName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy)) | V v -> v.IsPropertySetterMethod | _ -> false @@ -2052,7 +2060,7 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = | M m | C m -> let rty = m.GetFSharpReturnTy(cenv.amap, range0, m.FormalMethodInst) let argtysl = m.GetParamTypes(cenv.amap, range0, m.FormalMethodInst) - mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) argtysl) rty + mkIteratedFunTy cenv.g (List.map (mkRefTupledTy cenv.g) argtysl) rty | V v -> v.TauType NicePrint.prettyLayoutOfTypeNoCx (denv.Contents cenv.g) ty @@ -2062,7 +2070,7 @@ and FSharpType(cenv, ty:TType) = let isUnresolved() = ErrorLogger.protectAssemblyExploration true <| fun () -> match stripTyparEqns ty with - | TType_app (tcref, _) -> FSharpEntity(cenv, tcref).IsUnresolved + | TType_app (tcref, _, _) -> FSharpEntity(cenv, tcref).IsUnresolved | TType_measure (Measure.Con tcref) -> FSharpEntity(cenv, tcref).IsUnresolved | TType_measure (Measure.Prod _) -> FSharpEntity(cenv, cenv.g.measureproduct_tcr).IsUnresolved | TType_measure Measure.One -> FSharpEntity(cenv, cenv.g.measureone_tcr).IsUnresolved @@ -2102,20 +2110,37 @@ and FSharpType(cenv, ty:TType) = member __.TypeDefinition = protect <| fun () -> match stripTyparEqns ty with - | TType_app (tcref, _) -> FSharpEntity(cenv, tcref) + | TType_app (tcref, _, _) -> FSharpEntity(cenv, tcref) | TType_measure (Measure.Con tcref) -> FSharpEntity(cenv, tcref) | TType_measure (Measure.Prod _) -> FSharpEntity(cenv, cenv.g.measureproduct_tcr) | TType_measure Measure.One -> FSharpEntity(cenv, cenv.g.measureone_tcr) | TType_measure (Measure.Inv _) -> FSharpEntity(cenv, cenv.g.measureinverse_tcr) | _ -> invalidOp "not a named type" + member __.HasNullAnnotation = + protect <| fun () -> + match stripTyparEqns ty with + | TType_var (_, nullness) + | TType_app (_, _, nullness) + | TType_fun(_, _, nullness) -> match nullness.Evaluate() with NullnessInfo.WithNull -> true | _ -> false + | TType_tuple (_, _) -> false + | _ -> false + + member __.IsNullAmbivalent = + protect <| fun () -> + match stripTyparEqns ty with + | TType_app (_, _, nullness) + | TType_fun(_, _, nullness) -> match nullness.Evaluate() with NullnessInfo.AmbivalentToNull -> true | _ -> false + | TType_tuple (_, _) -> false + | _ -> false + member __.GenericArguments = protect <| fun () -> match stripTyparEqns ty with | TType_anon (_, tyargs) - | TType_app (_, tyargs) + | TType_app (_, tyargs, _) | TType_tuple (_, tyargs) -> (tyargs |> List.map (fun ty -> FSharpType(cenv, ty)) |> makeReadOnlyCollection) - | TType_fun(d, r) -> [| FSharpType(cenv, d); FSharpType(cenv, r) |] |> makeReadOnlyCollection + | TType_fun(d, r, _nullness) -> [| FSharpType(cenv, d); FSharpType(cenv, r) |] |> makeReadOnlyCollection | TType_measure (Measure.Con _) -> [| |] |> makeReadOnlyCollection | TType_measure (Measure.Prod (t1, t2)) -> [| FSharpType(cenv, TType_measure t1); FSharpType(cenv, TType_measure t2) |] |> makeReadOnlyCollection | TType_measure Measure.One -> [| |] |> makeReadOnlyCollection @@ -2167,7 +2192,8 @@ and FSharpType(cenv, ty:TType) = member __.GenericParameter = protect <| fun () -> match stripTyparEqns ty with - | TType_var tp + | TType_var (tp, _nullness) -> + FSharpGenericParameter (cenv, tp) | TType_measure (Measure.Var tp) -> FSharpGenericParameter (cenv, tp) | _ -> invalidOp "not a generic parameter type" @@ -2205,11 +2231,11 @@ and FSharpType(cenv, ty:TType) = let ty = stripTyEqnsWrtErasure EraseNone cenv.g ty match ty with | TType_forall _ -> 10000 - | TType_var tp -> 10100 + int32 tp.Stamp - | TType_app (tc1, b1) -> 10200 + int32 tc1.Stamp + List.sumBy hashType b1 + | TType_var (tp, _nullness) -> 10100 + int32 tp.Stamp + | TType_app (tc1, b1, _) -> 10200 + int32 tc1.Stamp + List.sumBy hashType b1 | TType_ucase _ -> 10300 // shouldn't occur in symbols | TType_tuple (_, l1) -> 10400 + List.sumBy hashType l1 - | TType_fun (dty, rty) -> 10500 + hashType dty + hashType rty + | TType_fun (dty, rty, _nullness) -> 10500 + hashType dty + hashType rty | TType_measure _ -> 10600 | TType_anon (_,l1) -> 10800 + List.sumBy hashType l1 hashType ty diff --git a/src/fsharp/symbols/Symbols.fsi b/src/fsharp/symbols/Symbols.fsi index 4f8313c7919..7524376e136 100644 --- a/src/fsharp/symbols/Symbols.fsi +++ b/src/fsharp/symbols/Symbols.fsi @@ -956,7 +956,13 @@ and [] public FSharpType = /// Get the type definition for a type member TypeDefinition : FSharpEntity - + + /// Indicates this type is known to have a null annotation + member HasNullAnnotation: bool + + /// Indicates this type is assumed to support the null value + member IsNullAmbivalent: bool + /// Get the generic arguments for a tuple type, a function type or a type constructed using a named entity member GenericArguments : IList diff --git a/src/fsharp/tainted.fs b/src/fsharp/tainted.fs index 15d2378b3fb..d6dc49fb59c 100644 --- a/src/fsharp/tainted.fs +++ b/src/fsharp/tainted.fs @@ -123,12 +123,15 @@ type internal Tainted<'T> (context : TaintedContext, value : 'T) = let u = this.Protect (fun x -> f (x,context.TypeProvider)) range Tainted(context, u) - member this.PApplyArray(f,methodName,range:range) = - let a = this.Protect f range + member this.PApplyArray(f, methodName, range:range) = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let a : 'U[] = this.Protect f range +#else + let a : 'U[]? = this.Protect f range +#endif match a with - | null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range) - | _ -> a |> Array.map (fun u -> Tainted(context,u)) - + | null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range) + | NonNull a -> a |> Array.map (fun u -> Tainted(context,u)) member this.PApplyOption(f,range:range) = let a = this.Protect f range @@ -137,7 +140,9 @@ type internal Tainted<'T> (context : TaintedContext, value : 'T) = | Some x -> Some (Tainted(context,x)) member this.PUntaint(f,range:range) = this.Protect f range + member this.PUntaintNoFailure f = this.PUntaint(f, range0) + /// Access the target object directly. Use with extreme caution. member this.AccessObjectDirectly = value @@ -154,8 +159,14 @@ type internal Tainted<'T> (context : TaintedContext, value : 'T) = Tainted(context, this.Protect(fun value -> box value :?> 'U) range) module internal Tainted = - let (|Null|_|) (p:Tainted<'T>) = - if p.PUntaintNoFailure(fun p -> match p with null -> true | _ -> false) then Some() else None + +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct = + if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure id) +#else + let (|Null|NonNull|) (p:Tainted<'T?>) : Choice> when 'T : not null = + if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure nonNull) +#endif let Eq (p:Tainted<'T>) (v:'T) = p.PUntaintNoFailure((fun pv -> pv = v)) diff --git a/src/fsharp/tainted.fsi b/src/fsharp/tainted.fsi index c5220feb6cf..36030e3d551 100644 --- a/src/fsharp/tainted.fsi +++ b/src/fsharp/tainted.fsi @@ -72,7 +72,11 @@ type internal Tainted<'T> = member PApplyWithProvider : ('T * ITypeProvider -> 'U) * range:range -> Tainted<'U> /// Apply an operation that returns an array. Unwrap array. Any exception will be attributed to the type provider with an error located at the given range. String is method name of thing-returning-array, to diagnostically attribute if it is null +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE member PApplyArray : ('T -> 'U[]) * string * range:range -> Tainted<'U>[] +#else + member PApplyArray : ('T -> 'U[]?) * string * range:range -> Tainted<'U>[] +#endif /// Apply an operation that returns an option. Unwrap option. Any exception will be attributed to the type provider with an error located at the given range member PApplyOption : ('T -> 'U option) * range:range -> Tainted<'U> option @@ -96,7 +100,12 @@ type internal Tainted<'T> = module internal Tainted = /// Test whether the tainted value is null - val (|Null|_|) : Tainted<'T> -> unit option when 'T : null +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + val (|Null|NonNull|) : Tainted<'T> -> Choice> when 'T : null and 'T : not struct +#else + val (|Null|NonNull|) : Tainted<'T?> -> Choice> when 'T : not null and 'T : not struct +#endif + /// Test whether the tainted value equals given value. /// Failure in call to equality operation will be blamed on type provider of first operand diff --git a/src/utils/CompilerLocationUtils.fs b/src/utils/CompilerLocationUtils.fs index 0e8934c72b1..bee42be1266 100644 --- a/src/utils/CompilerLocationUtils.fs +++ b/src/utils/CompilerLocationUtils.fs @@ -108,8 +108,11 @@ module internal FSharpEnvironment = let mutable uType = REG_SZ; let mutable cbData = maxDataLength; +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE let res = RegQueryValueExW(hkey, null, 0u, &uType, pathResult, &cbData); - +#else + let res = RegQueryValueExW(hkey, nonNull null, 0u, &uType, pathResult, &cbData); // TODO use of nonNull should not be required +#endif if (res = 0u && cbData > 0 && cbData <= maxDataLength) then Marshal.PtrToStringUni(pathResult, (cbData - 2)/2); else diff --git a/src/utils/reshapedmsbuild.fs b/src/utils/reshapedmsbuild.fs index 20b5cd6f961..d97d6825032 100644 --- a/src/utils/reshapedmsbuild.fs +++ b/src/utils/reshapedmsbuild.fs @@ -369,7 +369,11 @@ module internal ToolLocationHelper = // } // Doesn't need to be virtual @@@@@ +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE abstract member GetPathToDotNetFramework: DotNetFrameworkArchitecture -> string +#else + abstract member GetPathToDotNetFramework: DotNetFrameworkArchitecture -> string? +#endif default this.GetPathToDotNetFramework arch = match this.pathsToDotNetFramework.TryGetValue arch with | true, x -> x diff --git a/src/utils/sformat.fs b/src/utils/sformat.fs index 2c40158c370..83ee4f4bddc 100644 --- a/src/utils/sformat.fs +++ b/src/utils/sformat.fs @@ -109,6 +109,11 @@ namespace Microsoft.FSharp.Text.StructuredPrintfImpl abstract MaxRows : int module TaggedTextOps = +#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE + let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v + let inline nonNull<'T> (x: 'T) = x +#endif + let tag tag text = { new TaggedText with member x.Tag = tag @@ -440,7 +445,7 @@ namespace Microsoft.FSharp.Text.StructuredPrintfImpl // analysis of null values. let GetValueInfo bindingFlags (x : 'a, ty : Type) (* x could be null *) = - let obj = (box x) + let obj = box x match obj with | null -> let isNullaryUnion = @@ -871,10 +876,10 @@ namespace Microsoft.FSharp.Text.StructuredPrintfImpl // Try the StructuredFormatDisplayAttribute extensibility attribute match ty.GetCustomAttributes (typeof, true) with | null | [| |] -> None - | res -> + | NonNull res -> let attr = (res.[0] :?> StructuredFormatDisplayAttribute) let txt = attr.Value - if isNull txt || txt.Length <= 1 then + if isNull (box txt) || txt.Length <= 1 then None else let messageRegexPattern = @"^(?
.*?)(?.*?)(?.*)$"
diff --git a/tests/EndToEndBuildTests/ProvidedTypes/ProvidedTypes.fs b/tests/EndToEndBuildTests/ProvidedTypes/ProvidedTypes.fs
index f1393038a0a..e61e578a29c 100644
--- a/tests/EndToEndBuildTests/ProvidedTypes/ProvidedTypes.fs
+++ b/tests/EndToEndBuildTests/ProvidedTypes/ProvidedTypes.fs
@@ -149,7 +149,6 @@ namespace ProviderImplementation.ProvidedTypes
         /// Internal code of .NET expects the obj[] returned by GetCustomAttributes to be an Attribute[] even in the case of empty arrays
         let emptyAttributes = (([| |]: Attribute[]) |> box |> unbox)
 
-        let nonNull str x = if isNull x then failwithf "Null in '%s', stacktrace = '%s'" str Environment.StackTrace else x
         let nonNone str x = match x with None -> failwithf "No value has been specified for '%s', stacktrace = '%s'" str Environment.StackTrace | Some v -> v
         let patchOption v f = match v with None -> f() | Some _ -> failwithf "Already patched, stacktrace = '%s'" Environment.StackTrace 
 
diff --git a/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs b/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs
index f04b4be38d8..1d8cf63a8e9 100644
--- a/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs
+++ b/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs
@@ -112,7 +112,7 @@ type BigIntType() =
 #endif
         
         // Null
-        Assert.IsFalse(a.Equals(null))
+        Assert.IsFalse(a.Equals(null:obj)) // TODO NULLNESS - this type annoation was needed to resolve overloading, even with /checknulls off
 
 #if CROSS_PLATFORM_COMPILER // see https://bugzilla.xamarin.com/show_bug.cgi?id=22591
 #else
diff --git a/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/OptionModule.fs b/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/OptionModule.fs
index 92aa19339eb..532cc68d9b4 100644
--- a/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/OptionModule.fs
+++ b/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/OptionModule.fs
@@ -131,7 +131,7 @@ type OptionModule() =
     member this.OfToObj() =
         Assert.IsTrue( Option.toObj (Some "3") = "3")
         Assert.IsTrue( Option.toObj (Some "") = "")
-        Assert.IsTrue( Option.toObj (Some null) = null)
+        Assert.IsTrue( Option.toObj (Some null) = null) // TODO NULLNESS: this type annotation should not be needed 
         Assert.IsTrue( Option.toObj None = null)     
      
         Assert.IsTrue( Option.ofObj "3" = Some "3")
@@ -370,7 +370,7 @@ type ValueOptionTests() =
     member this.OfToObj() =
         Assert.IsTrue(ValueOption.toObj (ValueSome "3") = "3")
         Assert.IsTrue(ValueOption.toObj (ValueSome "") = "")
-        Assert.IsTrue(ValueOption.toObj (ValueSome null) = null)
+        Assert.IsTrue(ValueOption.toObj (ValueSome null) = null)  // TODO NULLNESS: this type annotation should not be needed
         Assert.IsTrue(ValueOption.toObj ValueNone = null)     
      
         Assert.IsTrue(ValueOption.ofObj "3" = ValueSome "3")
diff --git a/tests/FSharp.Core.UnitTests/SurfaceArea.coreclr.fs b/tests/FSharp.Core.UnitTests/SurfaceArea.coreclr.fs
index e496f677f6c..65a31cebc6a 100644
--- a/tests/FSharp.Core.UnitTests/SurfaceArea.coreclr.fs
+++ b/tests/FSharp.Core.UnitTests/SurfaceArea.coreclr.fs
@@ -2057,6 +2057,20 @@ Microsoft.FSharp.Core.Operators+Unchecked: T DefaultOf[T]()
 Microsoft.FSharp.Core.Operators+Unchecked: T Unbox[T](System.Object)
 Microsoft.FSharp.Core.Operators: Boolean IsNull[T](T)
 Microsoft.FSharp.Core.Operators: Boolean Not(Boolean)
+Microsoft.FSharp.Core.Operators: Boolean IsNullV[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpChoice`2[Microsoft.FSharp.Core.Unit,T] NullMatchPattern[T](T)
+Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpChoice`2[Microsoft.FSharp.Core.Unit,T] NullValueMatchPattern[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: System.Nullable`1[T] NullV[T]()
+Microsoft.FSharp.Core.Operators: System.Nullable`1[T] WithNullV[T](T)
+Microsoft.FSharp.Core.Operators: T DefaultIfNone[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
+Microsoft.FSharp.Core.Operators: T DefaultIfNullV[T](T, System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T DefaultIfNull[T](T, T)
+Microsoft.FSharp.Core.Operators: T NonNullPattern[T](T)
+Microsoft.FSharp.Core.Operators: T NonNullV[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T NonNullValuePattern[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T NonNull[T](T)
+Microsoft.FSharp.Core.Operators: T NullArgCheck[T](System.String, T)
+Microsoft.FSharp.Core.Operators: T WithNull[T](T)
 Microsoft.FSharp.Core.Operators: Boolean op_Equality[T](T, T)
 Microsoft.FSharp.Core.Operators: Boolean op_GreaterThanOrEqual[T](T, T)
 Microsoft.FSharp.Core.Operators: Boolean op_GreaterThan[T](T, T)
diff --git a/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs b/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
index e2bc4a25a85..8e49aa65259 100644
--- a/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
+++ b/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
@@ -2057,6 +2057,20 @@ Microsoft.FSharp.Core.Operators+Unchecked: T DefaultOf[T]()
 Microsoft.FSharp.Core.Operators+Unchecked: T Unbox[T](System.Object)
 Microsoft.FSharp.Core.Operators: Boolean IsNull[T](T)
 Microsoft.FSharp.Core.Operators: Boolean Not(Boolean)
+Microsoft.FSharp.Core.Operators: Boolean IsNullV[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpChoice`2[Microsoft.FSharp.Core.Unit,T] NullMatchPattern[T](T)
+Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpChoice`2[Microsoft.FSharp.Core.Unit,T] NullValueMatchPattern[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: System.Nullable`1[T] NullV[T]()
+Microsoft.FSharp.Core.Operators: System.Nullable`1[T] WithNullV[T](T)
+Microsoft.FSharp.Core.Operators: T DefaultIfNone[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
+Microsoft.FSharp.Core.Operators: T DefaultIfNullV[T](T, System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T DefaultIfNull[T](T, T)
+Microsoft.FSharp.Core.Operators: T NonNullPattern[T](T)
+Microsoft.FSharp.Core.Operators: T NonNullV[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T NonNullValuePattern[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T NonNull[T](T)
+Microsoft.FSharp.Core.Operators: T NullArgCheck[T](System.String, T)
+Microsoft.FSharp.Core.Operators: T WithNull[T](T)
 Microsoft.FSharp.Core.Operators: Boolean op_Equality[T](T, T)
 Microsoft.FSharp.Core.Operators: Boolean op_GreaterThanOrEqual[T](T, T)
 Microsoft.FSharp.Core.Operators: Boolean op_GreaterThan[T](T, T)
diff --git a/tests/fsharp/core/nullness/test.fsx b/tests/fsharp/core/nullness/test.fsx
new file mode 100644
index 00000000000..74f826baceb
--- /dev/null
+++ b/tests/fsharp/core/nullness/test.fsx
@@ -0,0 +1,412 @@
+#if TESTS_AS_APP
+module Core_nullness
+#endif
+
+#light
+
+let failures = ref []
+
+let report_failure (s : string) = 
+    stderr.Write" NO: "
+    stderr.WriteLine s
+    failures := !failures @ [s]
+
+let test (s : string) b = 
+    stderr.Write(s)
+    if b then stderr.WriteLine " OK"
+    else report_failure (s)
+
+let check s v1 v2 = test s (v1 = v2)
+
+open System
+open System.Runtime.CompilerServices
+
+//let f<'T when 'T : not struct> (x: 'T?) = 1
+
+module Basics = 
+    let x1 : string = null // ** Expected to give a Nullness warning
+    check "ekjnceoiwe1" x1 null
+    let x2 : string? = null // Should not give a Nullness warning
+    check "ekjnceoiwe2" x2 null
+    let x3 : string? = "a" // Should not give a Nullness warning
+    check "ekjnceoiwe3" x3 "a"
+    let x4 : string = "" // Should not give a Nullness warning
+    check "ekjnceoiwe4" x4 ""
+
+    let x5 = nonNull "" // Should not give a Nullness warning
+    check "ekjnceoiwe5" x5 ""
+    let x6 = nonNull "" // **Expected to give a Nullness warning, expected also to give a warning with nullness checking off
+    check "ekjnceoiwe6" x6 ""
+    let x7 = nonNull ""
+    check "ekjnceoiwe7" x7 ""
+    let _x7 : string = x7
+    let x8 = nonNull Array.empty
+    check "ekjnceoiwe8" x8 [| |]
+    let x9 = nonNull [| "" |]
+    check "ekjnceoiwe9" x9 [| "" |]
+    let x10 = nonNullV (Nullable(3))
+    check "ekjnceoiwe10" x10 3
+    let x11 = try nonNullV (Nullable()) with :? System.NullReferenceException -> 10
+    check "ekjnceoiwe11" x11 10
+    let x12 = nullV
+    check "ekjnceoiwe12" x12 (Nullable())
+    let x13 = nullV
+    check "ekjnceoiwe13" x13 (Nullable())
+    let x14 = withNullV 6L
+    check "ekjnceoiwe14" x14 (Nullable(6L))
+    let x15 : string? = withNull x4
+    check "ekjnceoiwe15" x15 ""
+    let x15a : string? = withNull ""
+    check "ekjnceoiwe15a" x15a ""
+    let x15b : string? = withNull x4
+    check "ekjnceoiwe15b" x15b ""
+    let x15c : string? = withNull x4 // **Expected to give a Nullness warning
+    check "ekjnceoiwe15c" x15c ""
+    let x16 : Nullable = withNullV 3
+    check "ekjnceoiwe16" x16 (Nullable(3))
+    
+    let y0 = isNull null // Should not give a Nullness warning (obj)
+    check "ekjnceoiwey0" y0 true
+    let y1 = isNull (null: obj?) // Should not give a Nullness warning
+    check "ekjnceoiwey1" y1 true
+    let y1b = isNull (null: string?) // Should not give a Nullness warning
+    check "ekjnceoiwey1b" y1b true
+    let y2 = isNull "" // **Expected to give a Nullness warning - type instantiation of a nullable type is non-nullable string
+    check "ekjnceoiwey2" y2 false
+    let y9 = isNull "" // **Expected to give a Nullness warning - type instantiation of a nullable type is non-nullable string
+    check "ekjnceoiwey9" y9 false
+    let y10 = isNull "" // Should not give a Nullness warning.
+    check "ekjnceoiwey10" y10 false
+
+module NotNullConstraint =
+    let f3 (x: 'T when 'T : not null) = 1
+    let v1 = f3 1 // Should not give an error
+    check "ekjnceoiwev1" v1 1
+    let v2 = f3 "a" // Should not give an error
+    check "ekjnceoiwev2" v2 1
+    let v3 = f3 (null: obj?) // Expect to give a warning
+    check "ekjnceoiwev3" v3 1
+    let v4 = f3 (null: string?) // Expect to give a warning
+    check "ekjnceoiwev4" v4 1
+#if NEGATIVE
+    f3 (Some 1) // Expect to give an error
+#endif
+
+    let w1 = 1 |> f3 // Should not give an error
+    check "ekjnceoiwew1" w1 1
+    let w2 = "a" |> f3 // Should not give an error
+    check "ekjnceoiwew2" w2 1
+    let w3 = (null: obj?) |> f3 // Expect to give a warning
+    check "ekjnceoiwew3" w3 1
+    let w4 = (null: string?) |> f3 // Expect to give a warning
+    check "ekjnceoiwew4" w4 1
+
+module MemberBasics = 
+    type C() = 
+        member x.P = 1
+        member x.M() = 2
+
+    let c : C? = C()
+    let v1 = c.P  // Expected to give a warning
+    check "ekjnccwwecv1" v1 1
+    let v2 = c.M()  // Expected to give a warning
+    check "ekjnccwwecv2" v2 2
+    let f1 = c.M  // Expected to give a warning
+    check "ekjnccwwecv3" (f1()) 2
+
+module Basics2 = 
+    let f1 () = null
+    // val f : unit -> 'a when 'a : null
+
+    let f2 () : string? = null
+    // val f : unit -> string?
+
+    let f3 () : 'T? = null
+
+    let f4 () : 'T? when 'T : not struct = null
+
+    let f5 () : 'T when 'T : not struct and 'T : null = null
+
+#if NEGATIVE
+    let f6 () : 'T? when 'T : not struct and 'T : null = null // Expected to give an error about inconistent constraints
+#endif
+
+    // Note yet allowed 
+    //let f7 () : 'T? when 'T : struct = null
+    let f7b () : Nullable<'T> = nullV // BUG: Incorrectly gives a warning about System.ValueType with /test:AssumeNullOnImport
+
+    let f8 () : string = null // Expected to give a Nullness warning
+
+type C(s: string) = 
+    member __.Value = s
+
+module InteropBasics =
+    let s0 = String.Concat("a","b") // Expected to infer string? with /test:AssumeNullOnImport
+    check "ekjnccberpos0" s0 "ab"
+    let s1 : string = String.Concat("a","c") // Expected to gives a warning with /test:AssumeNullOnImport
+    check "ekjnccberpos0" s1 "ac"
+    let test1()  = String.Concat("a","d")
+    check "ekjnccberpos0" (test1()) "ad"
+    let test2(s1:string, s2: string)  = String.Concat(s1,s2)
+    let test3()  = String( [| 'a' |] )
+    let test4()  = System.AppDomain.CurrentDomain
+    let test5 : System.AppDomain  = System.AppDomain.CurrentDomain // Expected to gives a warning with /test:AssumeNullOnImport
+
+type KonsoleWithNulls = 
+    static member WriteLine(s: string?) = Console.WriteLine(s)
+    static member WriteLine(fmt: string?, arg1: string?) = Console.WriteLine(fmt, arg1)
+    static member WriteLine(fmt: string?, [] args: obj?[]?) = Console.WriteLine(fmt, args)
+    static member WriteLineC(s: C?) = Console.WriteLine(s.Value)
+    static member WriteLineC(fmt: C?, arg1: C?) = Console.WriteLine(fmt.Value, arg1.Value)
+
+module KonsoleWithNullsModule = 
+    let WriteLine(s: string?) = Console.WriteLine(s)
+    let WriteLine2(fmt: string?, arg1: string?) = Console.WriteLine(fmt, arg1)
+    let WriteLineC(s: C?) = Console.WriteLine(s.Value)
+    let WriteLineC2(fmt: C?, arg1: C?) = Console.WriteLine(fmt.Value, arg1.Value)
+
+module KonsoleWithNullsModule2 = 
+    let WriteLine x = KonsoleWithNullsModule.WriteLine x
+    let WriteLine2 (fmt, arg1) = KonsoleWithNullsModule.WriteLine2(fmt, arg1)
+    let WriteLineC(s) = KonsoleWithNullsModule.WriteLineC(s)
+    let WriteLineC2(fmt, arg1) = KonsoleWithNullsModule.WriteLineC2(fmt, arg1)
+
+type KonsoleNoNulls = 
+    static member WriteLine(s: string) = Console.WriteLine(s)
+    static member WriteLine(fmt: string, arg1: string?) = Console.WriteLine(fmt, arg1)
+    static member WriteLine(fmt: string, [] args: obj[]) = Console.WriteLine(fmt, args)
+    static member WriteLineC(s: C) = Console.WriteLine(s.Value)
+    static member WriteLineC(fmt: C, arg1: C) = Console.WriteLine(fmt.Value, arg1.Value)
+
+module KonsoleNoNullsModule = 
+    let WriteLine(s: string) = Console.WriteLine(s)
+    let WriteLine2(fmt: string, arg1: string) = Console.WriteLine(fmt, arg1)
+    let WriteLineC(s: C) = Console.WriteLine(s.Value)
+    let WriteLineC2(fmt: C, arg1: C) = Console.WriteLine(fmt.Value, arg1.Value)
+
+module KonsoleNoNullsModule2 = 
+    let WriteLine x = KonsoleNoNullsModule.WriteLine x
+    let WriteLine2 (fmt, arg1) = KonsoleNoNullsModule.WriteLine2(fmt, arg1)
+    let WriteLineC(s) = KonsoleNoNullsModule.WriteLineC(s)
+    let WriteLineC2(fmt, arg1) = KonsoleNoNullsModule.WriteLineC2(fmt, arg1)
+
+System.Console.WriteLine("a")
+System.Console.WriteLine("a", (null: obj[])) // Expected to give a Nullness warning
+
+KonsoleWithNulls.WriteLine("Hello world")
+KonsoleWithNulls.WriteLine(null) // WRONG: gives an incorrect Nullness warning for string? and string?
+KonsoleWithNulls.WriteLine("Hello","world")
+KonsoleWithNulls.WriteLine("Hello","world","there") // // WRONG: gives an incorrect Nullness warning for string? and string?
+
+KonsoleNoNulls.WriteLine("Hello world")
+try 
+   KonsoleNoNulls.WriteLine(null)  // Expected to give a Nullness warning
+with :? System.ArgumentNullException -> ()
+KonsoleNoNulls.WriteLine("Hello","world")
+//KonsoleNoNulls.WriteLine("Hello",null) // CHECK ME 
+try 
+    KonsoleNoNulls.WriteLine(null, "World")   // Expected to give a Nullness warning
+with :? System.ArgumentNullException -> ()
+
+KonsoleWithNullsModule.WriteLine("Hello world")
+try 
+    KonsoleWithNullsModule.WriteLine(null) 
+with :? System.ArgumentNullException -> ()
+KonsoleWithNullsModule.WriteLine2("Hello","world") 
+KonsoleWithNullsModule.WriteLine2("Hello",null)
+try
+    KonsoleWithNullsModule.WriteLine2(null,"world")
+with :? System.ArgumentNullException -> ()
+
+KonsoleWithNullsModule2.WriteLine("Hello world")
+try 
+    KonsoleWithNullsModule2.WriteLine(null) 
+with :? System.ArgumentNullException -> ()
+KonsoleWithNullsModule2.WriteLine2("Hello","world")
+KonsoleWithNullsModule2.WriteLine2("Hello",null)
+try 
+    KonsoleWithNullsModule2.WriteLine2(null,"world")
+with :? System.ArgumentNullException -> ()
+
+KonsoleNoNullsModule.WriteLine("Hello world")
+try 
+    KonsoleNoNullsModule.WriteLine(null)  // Expected to give a Nullness warning
+with :? System.ArgumentNullException -> ()
+KonsoleNoNullsModule.WriteLine2("Hello","world")
+KonsoleNoNullsModule.WriteLine2("Hello",null) // Expected to give a Nullness warning
+try 
+    KonsoleNoNullsModule.WriteLine2(null,"world") // Expected to give a Nullness warning
+with :? System.ArgumentNullException -> ()
+
+//-------------------------------------
+
+// Param array cases
+
+KonsoleNoNulls.WriteLine("Hello","world","there")
+KonsoleWithNulls.WriteLine("Hello","world",null)  // Expected to give a Nullness warning 
+KonsoleNoNulls.WriteLine("Hello","world",null)  // Expected to give a Nullness warning
+System.Console.WriteLine("a", (null: obj[]?)) 
+System.Console.WriteLine("a", (null: obj?[]?))
+
+//-------
+// random stuff
+
+let f0 line = 
+    let add (s:string) = ()
+    match line with 
+    | null | "" -> ()
+    | _ -> add line // Exected to give a nullness warning
+
+let f0b line = 
+    let add (s:string) = ()
+    match line with 
+    | null  -> ()
+    | _ -> add (nonNull line) // Exected to give a nullness warning
+
+let add (s:string) = ()
+let f0c line = 
+    add (nonNull "") // WRONG: should not give a nullness warning
+
+let f1 (x: (string __hacknull)) = x;;
+
+//let f2 (x: string or null) = x;;
+let f3 (x: string?) = x
+let f5 x = (x: int)
+//let f4 x = (x: string nullable)
+
+//let f6<'T when 'T : not null> (x: 'T) = x
+//let f6<'T when 'T : not null> (x: 'T) = x
+
+//let f2 (x: string | null) = x;;
+
+//let f2 (_x : string | null) = x;;
+
+//let f2 (x: (string | null)) = x;;
+
+//let f3 x = (x: (string | null))
+
+module NullConstraintTests =
+    type C<'T when 'T : null>() = class end
+
+#if NEGATIVE
+    let f1 (y : C< (int * int) >) = y // This gave an error in F# 4.5 and we expect it to continue to give an error
+
+#endif
+
+#if !NO_CHECKNULLS
+     // This gave an error in F# 4.5.  It now only gives a warning when /checknulls is on which is sort of ok
+     // since we are treating .NET and F# types more symmetrically.
+     //
+     // TODO: However it gives no error or warning at all with /checknulls off in F# 5.0...  That seems bad.
+    let f2 (y : C) = y
+
+    let f3 (y : C) = y // Expect a Nullness warning
+
+    let f4 (y : C) = y // No warning expected 
+
+    let f5 (y : C) = y // No warning expected
+
+    let f6 (y : C?>) = y // No warning expected, lexing/parsing should succeed 
+
+    let f7 (y : C>?) = y // No warning expected, lexing/parsing should succeed
+#endif
+
+
+module DefaultValueTests =
+
+
+    module StructExamples = 
+        []
+        type C1 =
+            []
+            val mutable Whoops : string // expect a warning
+
+        []
+        type C2 =
+            []
+            val mutable Whoops : string // expect no warning
+
+        []
+        type C3 =
+            []
+            val mutable Whoops : string? // expect no warning
+
+#if NEGATIVE
+        []
+        type C4a =
+            []
+            val mutable Whoops : int list // expect a hard error like in F# 4.5
+#endif
+
+        []
+        type C4b =
+            []
+            val mutable Whoops : int list? // expect no warning
+
+#if NEGATIVE
+        []
+        type C5 =
+            []
+            val mutable Whoops : int * int // expect an error like F# 4.5
+
+        []
+        type C6 =
+            []
+            val mutable Whoops : int -> int // expect an error like F# 4.5
+#endif
+
+        []
+        type C7 =
+            []
+            val mutable Whoops : (int -> int)? // expect no warning
+
+    module ClassExamples = 
+        type C1 =
+            []
+            val mutable Whoops : string // expect a warning
+
+        type C2 =
+            []
+            val mutable Whoops : string // expect no warning
+
+        type C3 =
+            []
+            val mutable Whoops : string? // expect no warning
+
+        type C4a =
+            []
+            val mutable Whoops : int list // ** expect a warning
+
+        type C4b =
+            []
+            val mutable Whoops : int list? // expect no warning
+
+    #if NEGATIVE
+        type C5 =
+            []
+            val mutable Whoops : int * int // expect an error like F# 4.5
+
+        type C6 =
+            []
+            val mutable Whoops : int -> int // expect an error like F# 4.5
+    #endif
+
+        type C7 =
+            []
+            val mutable Whoops : (int -> int)? // expect no warning
+
+#if TESTS_AS_APP
+let RUN() = !failures
+#else
+let aa =
+  match !failures with 
+  | [] -> 
+      stdout.WriteLine "Test Passed"
+      System.IO.File.WriteAllText("test.ok","ok")
+      exit 0
+  | _ -> 
+      stdout.WriteLine "Test Failed"
+      exit 1
+#endif
+
+                    
\ No newline at end of file
diff --git a/tests/fsharp/core/syntax/test.fsx b/tests/fsharp/core/syntax/test.fsx
index e26783d7f31..5676a85e50d 100644
--- a/tests/fsharp/core/syntax/test.fsx
+++ b/tests/fsharp/core/syntax/test.fsx
@@ -31,8 +31,8 @@ test "line number test" (__LINE__ = "100")
 test "line number test" (__LINE__ = "102")
 test "line number test" (__SOURCE_FILE__ = "file.fs")
 
-# 29 "original-test-file.fs"
-test "line number test" (__LINE__ = "29")
+# 35 "original-test-file.fs"
+test "line number test" (__LINE__ = "35")
 test "line number test" (__SOURCE_FILE__ = "original-test-file.fs")
 
 
@@ -1441,7 +1441,7 @@ module TypeApplicationDisambiguation =
     let f8 x = xx
     let f9 x = xx
     let f10 x = xx
-    let f13 x = xx
+ //   let f13 x = xx
     let f14 x = xx
     let f16 x = x x>x
     let f17 x = xx
diff --git a/tests/fsharp/regression/literal-value-bug-1/test.il.bsl b/tests/fsharp/regression/literal-value-bug-1/test.il.bsl
index 86655b9a6e7..c2826dff865 100644
--- a/tests/fsharp/regression/literal-value-bug-1/test.il.bsl
+++ b/tests/fsharp/regression/literal-value-bug-1/test.il.bsl
@@ -31,11 +31,21 @@
   // Offset: 0x00000000 Length: 0x00000274
   // WARNING: managed resource file FSharpSignatureData.test created
 }
+.mresource public FSharpSignatureDataB.test
+{
+  // Offset: 0x00000000 Length: 0x00000274
+  // WARNING: managed resource file FSharpSignatureDataB.test created
+}
 .mresource public FSharpOptimizationData.test
 {
   // Offset: 0x00000278 Length: 0x0000006F
   // WARNING: managed resource file FSharpOptimizationData.test created
 }
+.mresource public FSharpOptimizationDataB.test
+{
+  // Offset: 0x00000278 Length: 0x0000006F
+  // WARNING: managed resource file FSharpOptimizationData.test created
+}
 .module test.exe
  // MVID: {5AA663EB-D9C1-2E4E-A745-0383EB63A65A}
 .imagebase 0x00400000
diff --git a/tests/fsharp/tests.fs b/tests/fsharp/tests.fs
index c4792c3cf1c..78ac86ce3c6 100644
--- a/tests/fsharp/tests.fs
+++ b/tests/fsharp/tests.fs
@@ -217,6 +217,69 @@ module CoreTests =
     []
     let ``test int32-FSI_BASIC`` () = singleTestBuildAndRun "core/int32" FSI_BASIC
 
+
+#if !FSHARP_SUITE_DRIVES_CORECLR_TESTS
+    []
+    let ``subtype-langversion-50-checknulls`` () =
+        let cfg = testConfig "core/subtype"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-checknulls.exe -g --langversion:latest --checknulls" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-checknulls.exe") ""
+
+        testOkFile.CheckExists()
+
+    []
+    let ``subtype-langversion-50-no-checknulls`` () =
+        let cfg = testConfig "core/subtype"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-no-checknulls.exe -g --langversion:latest --checknulls-" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-no-checknulls.exe") ""
+
+        testOkFile.CheckExists()
+
+    []
+    let ``subtype-langversion-45`` () =
+        let cfg = testConfig "core/subtype"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-langversion-46.exe -g --langversion:4.6" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-langversion-46.exe") ""
+
+        testOkFile.CheckExists()
+
+    []
+    let nullness_no_checknulls () =
+        let cfg = testConfig "core/nullness"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-no-checknulls.exe -g --define:NO_CHECKNULLS" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-no-checknulls.exe") ""
+
+        testOkFile.CheckExists()
+
+    []
+    let nullness_checknulls () =
+        let cfg = testConfig "core/nullness"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-checknulls.exe -g --checknulls" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-checknulls.exe") ""
+
+        testOkFile.CheckExists()
+#endif
+
     []
     let ``quotes-FSC-BASIC`` () = singleTestBuildAndRun "core/quotes" FSC_BASIC
 
@@ -1133,6 +1196,31 @@ module CoreTests =
     []
     let ``libtest-AS_DLL`` () = singleTestBuildAndRun "core/libtest" AS_DLL
 
+    []
+    let ``libtest-langversion-50-checknulls`` () =
+        let cfg = testConfig "core/libtest"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-checknulls.exe -g --langversion:latest --checknulls" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-checknulls.exe") ""
+
+        testOkFile.CheckExists()
+
+ 
+    []
+    let ``libtest-langversion-45`` () =
+        let cfg = testConfig "core/libtest"
+
+        use testOkFile = fileguard cfg "test.ok"
+
+        fsc cfg "%s -o:test-langversion-46.exe -g --langversion:4.6" cfg.fsc_flags ["test.fsx"]
+
+        exec cfg ("." ++ "test-langversion-46.exe") ""
+
+        testOkFile.CheckExists()
+
     []
     let ``no-warn-2003-tests`` () =
         // see https://github.com/Microsoft/visualfsharp/issues/3139
diff --git a/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.bsl b/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.bsl
index 6c9ef4772e2..e5df3e0b4e8 100644
--- a/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.bsl
+++ b/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.bsl
@@ -7,9 +7,7 @@ Known type parameters: < MonoidSample , Zero >
 
 Available overloads:
  - static member Zero.Zero :  ^t * Default1 ->  ^t when  ^t : (static member get_Zero : ->  ^t) // Argument at index 1 doesn't match
- - static member Zero.Zero :  ^t * Default1 -> ('a1 -> 'a1) when  ^t : null and  ^t : struct // Argument at index 1 doesn't match
  - static member Zero.Zero :  ^t * Default2 ->  ^t when (FromInt32 or  ^t) : (static member FromInt32 :  ^t * FromInt32 -> int32 ->  ^t) // Argument at index 1 doesn't match
- - static member Zero.Zero :  ^t * Default2 -> ('a1 -> 'a1) when  ^t : null and  ^t : struct // Argument at index 1 doesn't match
  - static member Zero.Zero :  ^t * Default3 ->  ^t when  ^t : (static member get_Empty : ->  ^t) // Argument at index 1 doesn't match
  - static member Zero.Zero : 'a array * Zero -> 'a array // Argument at index 1 doesn't match
  - static member Zero.Zero : 'a list * Zero -> 'a list // Argument at index 1 doesn't match
diff --git a/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.fsx b/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.fsx
index db2b2ae297c..b62bae7f0af 100644
--- a/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.fsx
+++ b/tests/fsharp/typecheck/overloads/neg_known_return_type_and_known_type_arguments.fsx
@@ -13,7 +13,7 @@ type Plus =
     inherit Default1
     static member inline ``+`` (x: 'Plus             , y: 'Plus             ,             _mthd: Default2) = (^Plus :  (static member (<|>) : _*_ -> _) x, y) : ^Plus
     static member inline ``+`` (x: 'Plus             , y: 'Plus             , []_mthd: Default1) = x + y : ^Plus
-    static member inline ``+`` (_: ^t when ^t: null and ^t: struct, _: ^t   , []_mthd: Default1) = id
+
     
     static member inline Invoke (x: 'Plus) (y: 'Plus) : 'Plus =
         let inline call (mthd : ^M, input1 : ^I, input2 : ^I) = ((^M or ^I) : (static member ``+`` : _*_*_ -> _) input1, input2, mthd)
@@ -49,9 +49,9 @@ type Zero =
   inherit Default1
   static member inline Zero (_: 't                             , _: Default3) = (^t : (static member Empty : ^t) ()) : 't
   static member inline Zero (_: 't                             , _: Default2) = FromInt32.Invoke 0             : 't
-  static member inline Zero (_: ^t when ^t: null and ^t: struct, _: Default2) = id
+
   static member inline Zero (_: 't                             , _: Default1) = LanguagePrimitives.GenericZero : 't
-  static member inline Zero (_: ^t when ^t: null and ^t: struct, _: Default1) = id
+
   static member        Zero (_: System.TimeSpan                , _: Zero    ) = System.TimeSpan ()
   static member        Zero (_: list<'a>                       , _: Zero    ) = []   :   list<'a>
   static member        Zero (_: option<'a>                     , _: Zero    ) = None : option<'a>
diff --git a/tests/fsharp/typecheck/sigs/neg04.bsl b/tests/fsharp/typecheck/sigs/neg04.bsl
index dea77f161a2..3f1de405040 100644
--- a/tests/fsharp/typecheck/sigs/neg04.bsl
+++ b/tests/fsharp/typecheck/sigs/neg04.bsl
@@ -30,7 +30,7 @@ neg04.fs(47,30,47,51): typecheck error FS0001: Type mismatch. Expecting a
     'seq<'a> -> 'f'    
 but given a
     ''g list -> 'h'    
-The type 'seq<'a>' does not match the type ''f list'
+The type ''a list' does not match the type 'seq<'b>'
 
 neg04.fs(47,49,47,51): typecheck error FS0784: This numeric literal requires that a module 'NumericLiteralN' defining functions FromZero, FromOne, FromInt32, FromInt64 and FromString be in scope
 
@@ -38,7 +38,7 @@ neg04.fs(47,30,47,51): typecheck error FS0001: Type mismatch. Expecting a
     'seq<'a> -> 'f'    
 but given a
     ''g list -> 'h'    
-The type 'seq<'a>' does not match the type ''f list'
+The type ''a list' does not match the type 'seq<'c>'
 
 neg04.fs(61,25,61,40): typecheck error FS0001: This expression was expected to have type
     'ClassType1'    
diff --git a/tests/fsharp/typecheck/sigs/neg20.bsl b/tests/fsharp/typecheck/sigs/neg20.bsl
index 4227ab07193..e026a85c047 100644
--- a/tests/fsharp/typecheck/sigs/neg20.bsl
+++ b/tests/fsharp/typecheck/sigs/neg20.bsl
@@ -135,19 +135,19 @@ neg20.fs(108,12,108,16): typecheck error FS0001: Type mismatch. Expecting a
     'B * B -> 'a'    
 but given a
     'A * A -> Data'    
-The type 'B' does not match the type 'A'
+The type 'A' does not match the type 'B'
 
 neg20.fs(109,12,109,16): typecheck error FS0001: Type mismatch. Expecting a
     'A * B -> 'a'    
 but given a
     'A * A -> Data'    
-The type 'B' does not match the type 'A'
+The type 'A' does not match the type 'B'
 
 neg20.fs(110,12,110,16): typecheck error FS0001: Type mismatch. Expecting a
     'B * A -> 'a'    
 but given a
     'A * A -> Data'    
-The type 'B' does not match the type 'A'
+The type 'A' does not match the type 'B'
 
 neg20.fs(128,19,128,22): typecheck error FS0001: This expression was expected to have type
     'string'    
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
index 3e69ae4967f..8192cf8f300 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly AsyncExpressionSteppingTest1
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest1
 {
-  // Offset: 0x00000000 Length: 0x0000026C
+  // Offset: 0x00000000 Length: 0x00000260
+}
+.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest1
+{
+  // Offset: 0x00000268 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest1
 {
   // Offset: 0x00000270 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest1.dll
-// MVID: {5AF5DDAE-6394-B5D4-A745-0383AEDDF55A}
+// MVID: {5E172EE9-6394-B5D4-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02880000
+// Image base: 0x00B30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +87,7 @@
         // Code size       62 (0x3e)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 6,6 : 17,32 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest1.fs'
+        .line 6,6 : 17,32 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest1.fs'
         IL_0000:  ldstr      "hello"
         IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
         IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
index 7bdb6a074c0..4458b102ecb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly AsyncExpressionSteppingTest2
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest2
 {
-  // Offset: 0x00000000 Length: 0x0000026C
+  // Offset: 0x00000000 Length: 0x00000260
+}
+.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest2
+{
+  // Offset: 0x00000268 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest2
 {
   // Offset: 0x00000270 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest2.dll
-// MVID: {5AF5DDAE-6394-D499-A745-0383AEDDF55A}
+// MVID: {5E172EE9-6394-D499-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04520000
+// Image base: 0x00B70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -80,7 +84,7 @@
         // Code size       15 (0xf)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 6,6 : 23,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest2.fs'
+        .line 6,6 : 23,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest2.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest2/AsyncExpressionSteppingTest2/'f2@6-1'::x
         IL_0006:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::op_Dereference(class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
index 6dfebd88b1e..5295afe21a8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly AsyncExpressionSteppingTest3
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest3
 {
-  // Offset: 0x00000000 Length: 0x00000277
+  // Offset: 0x00000000 Length: 0x0000026B
+}
+.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest3
+{
+  // Offset: 0x00000270 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest3
 {
-  // Offset: 0x00000280 Length: 0x000000B1
+  // Offset: 0x00000278 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest3.dll
-// MVID: {5AF5DDAE-6394-F35E-A745-0383AEDDF55A}
+// MVID: {5E172EE9-6394-F35E-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04650000
+// Image base: 0x00B40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +87,7 @@
         // Code size       14 (0xe)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest3.fs'
+        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest3.fs'
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
         IL_0003:  ldfld      int32 AsyncExpressionSteppingTest3/AsyncExpressionSteppingTest3/'f3@10-1'::'value'
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
index ce54bd4945d..ff6fdbc4003 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly AsyncExpressionSteppingTest4
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest4
 {
-  // Offset: 0x00000000 Length: 0x00000277
+  // Offset: 0x00000000 Length: 0x0000026B
+}
+.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest4
+{
+  // Offset: 0x00000270 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest4
 {
-  // Offset: 0x00000280 Length: 0x000000B1
+  // Offset: 0x00000278 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest4.dll
-// MVID: {5AF5DDAE-6394-6D4B-A745-0383AEDDF55A}
+// MVID: {5E172EE9-6394-6D4B-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x028F0000
+// Image base: 0x04EB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +87,7 @@
         // Code size       14 (0xe)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 10,10 : 21,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest4.fs'
+        .line 10,10 : 21,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest4.fs'
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
         IL_0003:  ldfld      int32 AsyncExpressionSteppingTest4/AsyncExpressionSteppingTest4/'f4@10-2'::'value'
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
index da554a3adf4..0295edd8d7e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly AsyncExpressionSteppingTest5
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest5
 {
-  // Offset: 0x00000000 Length: 0x000002B8
+  // Offset: 0x00000000 Length: 0x000002AC
+}
+.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest5
+{
+  // Offset: 0x000002B0 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest5
 {
   // Offset: 0x000002C0 Length: 0x000000BE
 }
 .module AsyncExpressionSteppingTest5.dll
-// MVID: {5AF5DDAE-6394-30E8-A745-0383AEDDF55A}
+// MVID: {5E172EE9-6394-30E8-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04430000
+// Image base: 0x051B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -84,7 +88,7 @@
         .maxstack  5
         .locals init ([0] int32 x)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 6,6 : 17,31 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest5.fs'
+        .line 6,6 : 17,31 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest5.fs'
         IL_0000:  ldarg.1
         IL_0001:  stloc.0
         .line 7,7 : 20,35 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
index 379ad6bbe7c..92419a88da4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly AsyncExpressionSteppingTest6
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest6
 {
-  // Offset: 0x00000000 Length: 0x000002A3
+  // Offset: 0x00000000 Length: 0x00000297
+}
+.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest6
+{
+  // Offset: 0x000002A0 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest6
 {
-  // Offset: 0x000002A8 Length: 0x000000BE
+  // Offset: 0x000002B0 Length: 0x000000BE
 }
 .module AsyncExpressionSteppingTest6.dll
-// MVID: {5AF5DDAE-6394-4FAD-A745-0383AEDDF55A}
+// MVID: {5E172EE9-6394-4FAD-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04C40000
+// Image base: 0x05730000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -55,7 +59,7 @@
          extends [mscorlib]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 'f2@10-4'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f2@10-1'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public int32 'value'
@@ -73,9 +77,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-4'::'value'
+        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-1'::'value'
         IL_000d:  ret
-      } // end of method 'f2@10-4'::.ctor
+      } // end of method 'f2@10-1'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -83,17 +87,17 @@
         // Code size       14 (0xe)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest6.fs'
+        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest6.fs'
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-4'::'value'
+        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-1'::'value'
         IL_0008:  call       instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1::OnSuccess(!0)
         IL_000d:  ret
-      } // end of method 'f2@10-4'::Invoke
+      } // end of method 'f2@10-1'::Invoke
 
-    } // end of class 'f2@10-4'
+    } // end of class 'f2@10-1'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f2@5-3'
+    .class auto ansi serializable sealed nested assembly beforefieldinit f2@5
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -111,9 +115,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@5-3'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f2@5::builder@
         IL_000d:  ret
-      } // end of method 'f2@5-3'::.ctor
+      } // end of method f2@5::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(class [FSharp.Core]Microsoft.FSharp.Core.Unit unitVar) cil managed
@@ -150,20 +154,20 @@
         IL_0029:  stloc.2
         .line 10,10 : 17,25 ''
         IL_002a:  ldarg.0
-        IL_002b:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@5-3'::builder@
+        IL_002b:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f2@5::builder@
         IL_0030:  stloc.3
         IL_0031:  ldloc.2
         IL_0032:  stloc.s    V_4
         IL_0034:  ldloc.s    V_4
-        IL_0036:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-4'::.ctor(int32)
+        IL_0036:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-1'::.ctor(int32)
         IL_003b:  tail.
         IL_003d:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_0042:  ret
-      } // end of method 'f2@5-3'::Invoke
+      } // end of method f2@5::Invoke
 
-    } // end of class 'f2@5-3'
+    } // end of class f2@5
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@20-7'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@20-5'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public int32 'value'
@@ -181,9 +185,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-7'::'value'
+        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-5'::'value'
         IL_000d:  ret
-      } // end of method 'f3@20-7'::.ctor
+      } // end of method 'f3@20-5'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -193,14 +197,14 @@
         .line 20,20 : 17,25 ''
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-7'::'value'
+        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-5'::'value'
         IL_0008:  call       instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1::OnSuccess(!0)
         IL_000d:  ret
-      } // end of method 'f3@20-7'::Invoke
+      } // end of method 'f3@20-5'::Invoke
 
-    } // end of class 'f3@20-7'
+    } // end of class 'f3@20-5'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@19-6'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@19-4'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -222,15 +226,15 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::builder@
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::x1
+        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::x1
         IL_0014:  ldarg.0
         IL_0015:  ldarg.3
-        IL_0016:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::y
+        IL_0016:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::y
         IL_001b:  ret
-      } // end of method 'f3@19-6'::.ctor
+      } // end of method 'f3@19-4'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg4) cil managed
@@ -246,9 +250,9 @@
         IL_0001:  stloc.0
         .line 19,19 : 17,37 ''
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::x1
+        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::x1
         IL_0008:  ldarg.0
-        IL_0009:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::y
+        IL_0009:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::y
         IL_000e:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::op_Dereference(class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
         IL_0013:  add
         IL_0014:  ldloc.0
@@ -256,20 +260,20 @@
         IL_0016:  stloc.1
         .line 20,20 : 17,25 ''
         IL_0017:  ldarg.0
-        IL_0018:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::builder@
+        IL_0018:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::builder@
         IL_001d:  stloc.2
         IL_001e:  ldloc.1
         IL_001f:  stloc.3
         IL_0020:  ldloc.3
-        IL_0021:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-7'::.ctor(int32)
+        IL_0021:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-5'::.ctor(int32)
         IL_0026:  tail.
         IL_0028:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_002d:  ret
-      } // end of method 'f3@19-6'::Invoke
+      } // end of method 'f3@19-4'::Invoke
 
-    } // end of class 'f3@19-6'
+    } // end of class 'f3@19-4'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@18-8'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@18-6'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -292,12 +296,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::binder
         IL_0014:  ret
-      } // end of method 'f3@18-8'::.ctor
+      } // end of method 'f3@18-6'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -307,19 +311,19 @@
         .line 18,18 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@18-8'::Invoke
+      } // end of method 'f3@18-6'::Invoke
 
-    } // end of class 'f3@18-8'
+    } // end of class 'f3@18-6'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@16-5'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@16-3'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -339,12 +343,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::builder@
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::x1
+        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::x1
         IL_0014:  ret
-      } // end of method 'f3@16-5'::.ctor
+      } // end of method 'f3@16-3'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg3) cil managed
@@ -369,31 +373,31 @@
         IL_000f:  nop
         .line 18,18 : 17,31 ''
         IL_0010:  ldarg.0
-        IL_0011:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::builder@
+        IL_0011:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::builder@
         IL_0016:  stloc.2
         IL_0017:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_001c:  stloc.3
         IL_001d:  ldarg.0
-        IL_001e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::builder@
+        IL_001e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::builder@
         IL_0023:  ldarg.0
-        IL_0024:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::x1
+        IL_0024:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::x1
         IL_0029:  ldloc.1
-        IL_002a:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
+        IL_002a:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
                                                                                                                       int32,
                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
         IL_002f:  stloc.s    V_4
         IL_0031:  ldloc.3
         IL_0032:  ldloc.s    V_4
-        IL_0034:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+        IL_0034:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0039:  tail.
         IL_003b:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_0040:  ret
-      } // end of method 'f3@16-5'::Invoke
+      } // end of method 'f3@16-3'::Invoke
 
-    } // end of class 'f3@16-5'
+    } // end of class 'f3@16-3'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-9'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-7'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -416,12 +420,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::binder
         IL_0014:  ret
-      } // end of method 'f3@15-9'::.ctor
+      } // end of method 'f3@15-7'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -431,19 +435,19 @@
         .line 15,15 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@15-9'::Invoke
+      } // end of method 'f3@15-7'::Invoke
 
-    } // end of class 'f3@15-9'
+    } // end of class 'f3@15-7'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-4'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-2'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -463,12 +467,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::builder@
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::x1
+        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::x1
         IL_0014:  ret
-      } // end of method 'f3@15-4'::.ctor
+      } // end of method 'f3@15-2'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg2) cil managed
@@ -484,29 +488,29 @@
         IL_0001:  stloc.0
         .line 15,15 : 17,31 ''
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::builder@
+        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::builder@
         IL_0008:  stloc.1
         IL_0009:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_000e:  stloc.2
         IL_000f:  ldarg.0
-        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::builder@
+        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::builder@
         IL_0015:  ldarg.0
-        IL_0016:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::x1
-        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
+        IL_0016:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::x1
+        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
                                                                                                                       int32)
         IL_0020:  stloc.3
         IL_0021:  ldloc.2
         IL_0022:  ldloc.3
-        IL_0023:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+        IL_0023:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0028:  tail.
         IL_002a:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_002f:  ret
-      } // end of method 'f3@15-4'::Invoke
+      } // end of method 'f3@15-2'::Invoke
 
-    } // end of class 'f3@15-4'
+    } // end of class 'f3@15-2'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-10'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-8'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -529,12 +533,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::binder
         IL_0014:  ret
-      } // end of method 'f3@14-10'::.ctor
+      } // end of method 'f3@14-8'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -544,19 +548,19 @@
         .line 14,14 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@14-10'::Invoke
+      } // end of method 'f3@14-8'::Invoke
 
-    } // end of class 'f3@14-10'
+    } // end of class 'f3@14-8'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-3'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-1'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -574,9 +578,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::builder@
         IL_000d:  ret
-      } // end of method 'f3@14-3'::.ctor
+      } // end of method 'f3@14-1'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg1) cil managed
@@ -592,28 +596,28 @@
         IL_0001:  stloc.0
         .line 14,14 : 17,31 ''
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::builder@
+        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::builder@
         IL_0008:  stloc.1
         IL_0009:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_000e:  stloc.2
         IL_000f:  ldarg.0
-        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::builder@
+        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::builder@
         IL_0015:  ldloc.0
-        IL_0016:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
+        IL_0016:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
                                                                                                                       int32)
         IL_001b:  stloc.3
         IL_001c:  ldloc.2
         IL_001d:  ldloc.3
-        IL_001e:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
-                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
+        IL_001e:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+                                                                                                                      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0023:  tail.
         IL_0025:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_002a:  ret
-      } // end of method 'f3@14-3'::Invoke
+      } // end of method 'f3@14-1'::Invoke
 
-    } // end of class 'f3@14-3'
+    } // end of class 'f3@14-1'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@13-11'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@13-9'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -636,12 +640,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::binder
         IL_0014:  ret
-      } // end of method 'f3@13-11'::.ctor
+      } // end of method 'f3@13-9'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -651,19 +655,19 @@
         .line 13,13 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@13-11'::Invoke
+      } // end of method 'f3@13-9'::Invoke
 
-    } // end of class 'f3@13-11'
+    } // end of class 'f3@13-9'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@13-2'
+    .class auto ansi serializable sealed nested assembly beforefieldinit f3@13
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -681,9 +685,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::builder@
         IL_000d:  ret
-      } // end of method 'f3@13-2'::.ctor
+      } // end of method f3@13::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(class [FSharp.Core]Microsoft.FSharp.Core.Unit unitVar) cil managed
@@ -695,24 +699,24 @@
                  [2] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> V_2)
         .line 13,13 : 17,31 ''
         IL_0000:  ldarg.0
-        IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::builder@
+        IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::builder@
         IL_0006:  stloc.0
         IL_0007:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_000c:  stloc.1
         IL_000d:  ldarg.0
-        IL_000e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::builder@
-        IL_0013:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
+        IL_000e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::builder@
+        IL_0013:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
         IL_0018:  stloc.2
         IL_0019:  ldloc.1
         IL_001a:  ldloc.2
-        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
-                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
+        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+                                                                                                                      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0020:  tail.
         IL_0022:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_0027:  ret
-      } // end of method 'f3@13-2'::Invoke
+      } // end of method f3@13::Invoke
 
-    } // end of class 'f3@13-2'
+    } // end of class f3@13
 
     .method public static class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
             f2() cil managed
@@ -725,7 +729,7 @@
       IL_0005:  stloc.0
       IL_0006:  ldloc.0
       IL_0007:  ldloc.0
-      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@5-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
+      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f2@5::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
       IL_000d:  tail.
       IL_000f:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder::Delay(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
       IL_0014:  ret
@@ -742,7 +746,7 @@
       IL_0005:  stloc.0
       IL_0006:  ldloc.0
       IL_0007:  ldloc.0
-      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
+      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
       IL_000d:  tail.
       IL_000f:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder::Delay(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
       IL_0014:  ret
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
index bbe5b40ba64..6b5b69437b4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Default
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Default
 {
-  // Offset: 0x00000000 Length: 0x000003FA
+  // Offset: 0x00000000 Length: 0x000003F0
+}
+.mresource public FSharpSignatureDataB.Default
+{
+  // Offset: 0x000003F8 Length: 0x0000001A
 }
 .mresource public FSharpOptimizationData.Default
 {
-  // Offset: 0x00000400 Length: 0x000000BA
+  // Offset: 0x00000418 Length: 0x000000BA
+}
+.mresource public FSharpOptimizationDataB.Default
+{
+  // Offset: 0x000004D8 Length: 0x00000003
 }
 .module Default.dll
-// MVID: {59B19208-AAA9-67BB-A745-03830892B159}
+// MVID: {5E172EE9-AAA9-67BB-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00E30000
+// Image base: 0x06F50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +70,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AttributeTargets\\Default.fs'
+      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AttributeTargets\\Default.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Attribute::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
index 6d4d86af42b..a4a24276b28 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Field
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Field
 {
-  // Offset: 0x00000000 Length: 0x000003F4
+  // Offset: 0x00000000 Length: 0x000003EA
+}
+.mresource public FSharpSignatureDataB.Field
+{
+  // Offset: 0x000003F0 Length: 0x0000001A
 }
 .mresource public FSharpOptimizationData.Field
 {
-  // Offset: 0x000003F8 Length: 0x000000B8
+  // Offset: 0x00000410 Length: 0x000000B8
+}
+.mresource public FSharpOptimizationDataB.Field
+{
+  // Offset: 0x000004D0 Length: 0x00000003
 }
 .module Field.dll
-// MVID: {59B19208-96F8-CD6E-A745-03830892B159}
+// MVID: {5E172EE9-96F8-CD6E-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00F60000
+// Image base: 0x00AD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +70,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AttributeTargets\\Field.fs'
+      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AttributeTargets\\Field.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Attribute::.ctor()
       IL_0006:  ldarg.0
@@ -78,7 +86,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     int32 ''.$M::'T@12-2'
+    IL_0000:  ldsfld     int32 ''.$M::T@12
     IL_0005:  ret
   } // end of method M::get_T
 
@@ -92,7 +100,7 @@
 .class private abstract auto ansi sealed ''.$M
        extends [mscorlib]System.Object
 {
-  .field static assembly initonly int32 'T@12-2'
+  .field static assembly initonly int32 T@12
   .custom instance void M/ExportAttribute::.ctor() = ( 01 00 00 00 ) 
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 init@
@@ -113,7 +121,7 @@
     .line 12,12 : 27,28 ''
     IL_0010:  ldc.i4.1
     IL_0011:  dup
-    IL_0012:  stsfld     int32 ''.$M::'T@12-2'
+    IL_0012:  stsfld     int32 ''.$M::T@12
     IL_0017:  stloc.0
     IL_0018:  ret
   } // end of method $M::.cctor
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
index eb0160f0a01..fc67fb1a820 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Property
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Property
 {
-  // Offset: 0x00000000 Length: 0x000003FD
+  // Offset: 0x00000000 Length: 0x000003F3
+}
+.mresource public FSharpSignatureDataB.Property
+{
+  // Offset: 0x000003F8 Length: 0x0000001A
 }
 .mresource public FSharpOptimizationData.Property
 {
-  // Offset: 0x00000408 Length: 0x000000BB
+  // Offset: 0x00000418 Length: 0x000000BB
+}
+.mresource public FSharpOptimizationDataB.Property
+{
+  // Offset: 0x000004D8 Length: 0x00000003
 }
 .module Property.dll
-// MVID: {59B19208-9B5C-7949-A745-03830892B159}
+// MVID: {5E172EE9-9B5C-7949-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02E80000
+// Image base: 0x06660000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +70,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AttributeTargets\\Property.fs'
+      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AttributeTargets\\Property.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Attribute::.ctor()
       IL_0006:  ldarg.0
@@ -78,7 +86,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     int32 ''.$M::'T@12-4'
+    IL_0000:  ldsfld     int32 ''.$M::T@12
     IL_0005:  ret
   } // end of method M::get_T
 
@@ -93,7 +101,7 @@
 .class private abstract auto ansi sealed ''.$M
        extends [mscorlib]System.Object
 {
-  .field static assembly initonly int32 'T@12-4'
+  .field static assembly initonly int32 T@12
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 init@
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -113,7 +121,7 @@
     .line 12,12 : 27,28 ''
     IL_0010:  ldc.i4.1
     IL_0011:  dup
-    IL_0012:  stsfld     int32 ''.$M::'T@12-4'
+    IL_0012:  stsfld     int32 ''.$M::T@12
     IL_0017:  stloc.0
     IL_0018:  ret
   } // end of method $M::.cctor
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
index 5875beb14e4..ed293df765b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CCtorDUWithMember01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.CCtorDUWithMember01
 {
-  // Offset: 0x00000000 Length: 0x00000790
+  // Offset: 0x00000000 Length: 0x0000077A
+}
+.mresource public FSharpSignatureDataB.CCtorDUWithMember01
+{
+  // Offset: 0x00000780 Length: 0x00000085
 }
 .mresource public FSharpOptimizationData.CCtorDUWithMember01
 {
-  // Offset: 0x00000798 Length: 0x00000227
+  // Offset: 0x00000810 Length: 0x00000227
+}
+.mresource public FSharpOptimizationDataB.CCtorDUWithMember01
+{
+  // Offset: 0x00000A40 Length: 0x0000002F
 }
 .module CCtorDUWithMember01.exe
-// MVID: {59B1923F-26F1-14EE-A745-03833F92B159}
+// MVID: {5E172EE9-26F1-14EE-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00A70000
+// Image base: 0x04F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -70,7 +78,7 @@
              [2] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_2,
              [3] class CCtorDUWithMember01a/C V_3)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 2,2 : 1,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember01.fs'
+    .line 2,2 : 1,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember01.fs'
     IL_0000:  ldstr      "File1.A = %A"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class CCtorDUWithMember01a/C>::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
@@ -259,7 +267,7 @@
       .maxstack  4
       .locals init ([0] int32 V_0,
                [1] int32 V_1)
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember01a.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember01a.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
index f8d32ee78a8..ca350d4eb5f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CCtorDUWithMember02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CCtorDUWithMember02
 {
-  // Offset: 0x00000000 Length: 0x0000030C
+  // Offset: 0x00000000 Length: 0x00000302
+}
+.mresource public FSharpSignatureDataB.CCtorDUWithMember02
+{
+  // Offset: 0x00000308 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.CCtorDUWithMember02
 {
   // Offset: 0x00000310 Length: 0x000000E4
 }
 .module CCtorDUWithMember02.exe
-// MVID: {59B1923F-D176-C99D-A745-03833F92B159}
+// MVID: {5E172EE9-D176-C99D-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01380000
+// Image base: 0x06E50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -68,7 +72,7 @@
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_0,
              [1] int32 V_1)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 2,2 : 1,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember02.fs'
+    .line 2,2 : 1,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember02.fs'
     IL_0000:  ldstr      "x = %A"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
@@ -152,7 +156,7 @@
     // Code size       77 (0x4d)
     .maxstack  4
     .locals init ([0] int32 y)
-    .line 3,3 : 1,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember02a.fs'
+    .line 3,3 : 1,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember02a.fs'
     IL_0000:  ldstr      "hello1"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
index 2ded0bcb8b9..21214051e43 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CCtorDUWithMember03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CCtorDUWithMember03
 {
-  // Offset: 0x00000000 Length: 0x0000029D
+  // Offset: 0x00000000 Length: 0x00000293
+}
+.mresource public FSharpSignatureDataB.CCtorDUWithMember03
+{
+  // Offset: 0x00000298 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.CCtorDUWithMember03
 {
-  // Offset: 0x000002A8 Length: 0x000000B2
+  // Offset: 0x000002A0 Length: 0x000000B2
 }
 .module CCtorDUWithMember03.exe
-// MVID: {59B1923F-C97B-D207-A745-03833F92B159}
+// MVID: {5E172EE9-C97B-D207-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x030C0000
+// Image base: 0x05A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -68,7 +72,7 @@
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_0,
              [1] int32 V_1)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 2,2 : 1,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember03.fs'
+    .line 2,2 : 1,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember03.fs'
     IL_0000:  ldstr      "File1.x = %A"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
@@ -93,7 +97,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     int32 ''.$CCtorDUWithMember03a::'x@3-1'
+    IL_0000:  ldsfld     int32 ''.$CCtorDUWithMember03a::x@3
     IL_0005:  ret
   } // end of method CCtorDUWithMember03a::get_x
 
@@ -103,7 +107,7 @@
     // Code size       7 (0x7)
     .maxstack  8
     IL_0000:  ldarg.0
-    IL_0001:  stsfld     int32 ''.$CCtorDUWithMember03a::'x@3-1'
+    IL_0001:  stsfld     int32 ''.$CCtorDUWithMember03a::x@3
     IL_0006:  ret
   } // end of method CCtorDUWithMember03a::set_x
 
@@ -118,7 +122,7 @@
 .class private abstract auto ansi sealed ''.$CCtorDUWithMember03a
        extends [mscorlib]System.Object
 {
-  .field static assembly int32 'x@3-1'
+  .field static assembly int32 x@3
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 init@
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -129,9 +133,9 @@
   {
     // Code size       7 (0x7)
     .maxstack  8
-    .line 3,3 : 1,18 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember03a.fs'
+    .line 3,3 : 1,18 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember03a.fs'
     IL_0000:  ldc.i4.1
-    IL_0001:  stsfld     int32 ''.$CCtorDUWithMember03a::'x@3-1'
+    IL_0001:  stsfld     int32 ''.$CCtorDUWithMember03a::x@3
     IL_0006:  ret
   } // end of method $CCtorDUWithMember03a::.cctor
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
index 4063e241fda..9818c01e75f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CCtorDUWithMember04
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CCtorDUWithMember04
 {
-  // Offset: 0x00000000 Length: 0x0000029D
+  // Offset: 0x00000000 Length: 0x00000293
+}
+.mresource public FSharpSignatureDataB.CCtorDUWithMember04
+{
+  // Offset: 0x00000298 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.CCtorDUWithMember04
 {
-  // Offset: 0x000002A8 Length: 0x000000B2
+  // Offset: 0x000002A0 Length: 0x000000B2
 }
 .module CCtorDUWithMember04.exe
-// MVID: {59B1923F-CF28-717B-A745-03833F92B159}
+// MVID: {5E172EE9-CF28-717B-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00AA0000
+// Image base: 0x00BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -68,7 +72,7 @@
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_0,
              [1] int32 V_1)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 2,2 : 1,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember04.fs'
+    .line 2,2 : 1,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember04.fs'
     IL_0000:  ldstr      "File1.x = %A"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
@@ -118,7 +122,7 @@
     // Code size       7 (0x7)
     .maxstack  3
     .locals init ([0] int32 x)
-    .line 3,3 : 1,10 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember04a.fs'
+    .line 3,3 : 1,10 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CCtorDUWithMember\\CCtorDUWithMember04a.fs'
     IL_0000:  call       int32 CCtorDUWithMember04a::get_x()
     IL_0005:  stloc.0
     IL_0006:  ret
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompareIL.cmd b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompareIL.cmd
index 1786d4bc552..0e3c4acf219 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompareIL.cmd
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompareIL.cmd
@@ -5,5 +5,11 @@ IF NOT ERRORLEVEL 0 exit 1
 
 echo %~dp0..\..\..\testenv\bin\ILComparer.exe "%~n1.il.bsl" "%~n1.il"
      %~dp0..\..\..\testenv\bin\ILComparer.exe "%~n1.il.bsl" "%~n1.il"
+
+if /i "%TEST_UPDATE_BSL%" == "1" (
+  echo copy /y "%~n1.il" "%~n1.il.bsl"
+  copy /y "%~n1.il" "%~n1.il.bsl"
+)
+
 exit /b %ERRORLEVEL%
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
index 0b9f0b91042..d499744c0e5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CompiledNameAttribute01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute01
 {
-  // Offset: 0x00000000 Length: 0x00000272
+  // Offset: 0x00000000 Length: 0x00000266
+}
+.mresource public FSharpSignatureDataB.CompiledNameAttribute01
+{
+  // Offset: 0x00000270 Length: 0x00000009
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute01
 {
-  // Offset: 0x00000278 Length: 0x00000086
+  // Offset: 0x00000280 Length: 0x00000086
 }
 .module CompiledNameAttribute01.exe
-// MVID: {59B1923F-EF5A-FC2A-A745-03833F92B159}
+// MVID: {5E172EE9-EF5A-FC2A-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00ED0000
+// Image base: 0x05690000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     // Code size       2 (0x2)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 11,12 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute01.fs'
+    .line 4,4 : 11,12 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute01.fs'
     IL_0000:  ldarg.0
     IL_0001:  ret
   } // end of method CompiledNameAttribute01::SomeCompiledName
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
index 6adf54e44d5..880b10e280a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CompiledNameAttribute02
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute02
 {
-  // Offset: 0x00000000 Length: 0x000002E8
+  // Offset: 0x00000000 Length: 0x000002E4
+}
+.mresource public FSharpSignatureDataB.CompiledNameAttribute02
+{
+  // Offset: 0x000002E8 Length: 0x00000011
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute02
 {
-  // Offset: 0x000002F0 Length: 0x000000CD
+  // Offset: 0x00000300 Length: 0x000000CD
+}
+.mresource public FSharpOptimizationDataB.CompiledNameAttribute02
+{
+  // Offset: 0x000003D8 Length: 0x00000006
 }
 .module CompiledNameAttribute02.exe
-// MVID: {59B1923F-F755-F3C0-A745-03833F92B159}
+// MVID: {5E172EE9-F755-F3C0-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x018A0000
+// Image base: 0x00BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +71,7 @@
       // Code size       4 (0x4)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 34,39 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute02.fs'
+      .line 5,5 : 34,39 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute02.fs'
       IL_0000:  ldarg.1
       IL_0001:  ldarg.2
       IL_0002:  add
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
index 228aa3dd3bb..f1225f0a8d0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CompiledNameAttribute03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute03
 {
-  // Offset: 0x00000000 Length: 0x0000027D
+  // Offset: 0x00000000 Length: 0x00000271
+}
+.mresource public FSharpSignatureDataB.CompiledNameAttribute03
+{
+  // Offset: 0x00000278 Length: 0x00000009
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute03
 {
   // Offset: 0x00000288 Length: 0x00000086
 }
 .module CompiledNameAttribute03.exe
-// MVID: {59B1923F-2CE4-60B9-A745-03833F92B159}
+// MVID: {5E172EE9-2CE4-60B9-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03120000
+// Image base: 0x00A60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     // Code size       7 (0x7)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 15,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute03.fs'
+    .line 4,4 : 15,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute03.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.1
     IL_0002:  sub
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
index 6007efcdfb7..3d173122a1a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CompiledNameAttribute04
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute04
 {
-  // Offset: 0x00000000 Length: 0x00000CE9
+  // Offset: 0x00000000 Length: 0x00000CD1
+}
+.mresource public FSharpSignatureDataB.CompiledNameAttribute04
+{
+  // Offset: 0x00000CD8 Length: 0x00000110
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute04
 {
-  // Offset: 0x00000CF0 Length: 0x000002CB
+  // Offset: 0x00000DF0 Length: 0x000002CB
+}
+.mresource public FSharpOptimizationDataB.CompiledNameAttribute04
+{
+  // Offset: 0x000010C0 Length: 0x0000004E
 }
 .module CompiledNameAttribute04.exe
-// MVID: {59B1923F-34DF-584F-A745-03833F92B159}
+// MVID: {5E172EE9-34DF-584F-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01680000
+// Image base: 0x05A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -74,7 +82,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute04.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute04.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
index 056640724cf..3801147eea9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr01
 {
-  // Offset: 0x00000000 Length: 0x000001F8
+  // Offset: 0x00000000 Length: 0x0000020E
+}
+.mresource public FSharpSignatureDataB.ComputationExpr01
+{
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ComputationExpr01
 {
-  // Offset: 0x00000200 Length: 0x0000007D
+  // Offset: 0x00000220 Length: 0x0000007D
 }
 .module ComputationExpr01.exe
-// MVID: {5A1F62A7-3703-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-3703-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x007B0000
+// Image base: 0x068A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +87,7 @@
       // Code size       15 (0xf)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 8,8 : 9,17 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr01.fs'
+      .line 8,8 : 9,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr01/res1@8::builder@
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
index 80dd23ca0b0..def473dac08 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr02
 {
-  // Offset: 0x00000000 Length: 0x000001F8
+  // Offset: 0x00000000 Length: 0x0000020E
+}
+.mresource public FSharpSignatureDataB.ComputationExpr02
+{
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ComputationExpr02
 {
-  // Offset: 0x00000200 Length: 0x0000007D
+  // Offset: 0x00000220 Length: 0x0000007D
 }
 .module ComputationExpr02.exe
-// MVID: {5A1F62A7-3624-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-3624-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01010000
+// Image base: 0x069E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -84,7 +88,7 @@
       .maxstack  7
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 8,8 : 18,33 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr02.fs'
+      .line 8,8 : 18,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr02.fs'
       IL_0000:  ldstr      "hello"
       IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
       IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
index 46926f5d00e..5ecaa602414 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr03
 {
-  // Offset: 0x00000000 Length: 0x00000222
+  // Offset: 0x00000000 Length: 0x00000238
+}
+.mresource public FSharpSignatureDataB.ComputationExpr03
+{
+  // Offset: 0x00000240 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ComputationExpr03
 {
-  // Offset: 0x00000228 Length: 0x0000008C
+  // Offset: 0x00000248 Length: 0x0000008C
 }
 .module ComputationExpr03.exe
-// MVID: {5A1F62A7-3649-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-3649-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BF0000
+// Image base: 0x06F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -55,7 +59,7 @@
        extends [mscorlib]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 'res2@8-1'
+  .class auto ansi serializable sealed nested assembly beforefieldinit res2@8
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
   {
     .field public class [ComputationExprLibrary]Library.EventuallyBuilder builder@
@@ -73,9 +77,9 @@
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
       IL_0006:  ldarg.0
       IL_0007:  ldarg.1
-      IL_0008:  stfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/'res2@8-1'::builder@
+      IL_0008:  stfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/res2@8::builder@
       IL_000d:  ret
-    } // end of method 'res2@8-1'::.ctor
+    } // end of method res2@8::.ctor
 
     .method public strict virtual instance class [ComputationExprLibrary]Library.Eventually`1 
             Invoke(class [FSharp.Core]Microsoft.FSharp.Core.Unit unitVar) cil managed
@@ -84,7 +88,7 @@
       .maxstack  7
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 8,8 : 18,33 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr03.fs'
+      .line 8,8 : 18,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr03.fs'
       IL_0000:  ldstr      "hello"
       IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
       IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
@@ -95,16 +99,16 @@
       IL_001a:  stloc.0
       .line 9,9 : 9,21 ''
       IL_001b:  ldarg.0
-      IL_001c:  ldfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/'res2@8-1'::builder@
+      IL_001c:  ldfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/res2@8::builder@
       IL_0021:  ldloc.0
       IL_0022:  ldloc.0
       IL_0023:  add
       IL_0024:  tail.
       IL_0026:  callvirt   instance class [ComputationExprLibrary]Library.Eventually`1 [ComputationExprLibrary]Library.EventuallyBuilder::Return(!!0)
       IL_002b:  ret
-    } // end of method 'res2@8-1'::Invoke
+    } // end of method res2@8::Invoke
 
-  } // end of class 'res2@8-1'
+  } // end of class res2@8
 
   .class auto ansi serializable sealed nested assembly beforefieldinit 'res3@17-2'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
@@ -295,7 +299,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::'res2@6-2'
+    IL_0000:  ldsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::res2@6
     IL_0005:  ret
   } // end of method ComputationExpr03::get_res2
 
@@ -325,7 +329,7 @@
 .class private abstract auto ansi sealed ''.$ComputationExpr03
        extends [mscorlib]System.Object
 {
-  .field static assembly class [ComputationExprLibrary]Library.Eventually`1 'res2@6-2'
+  .field static assembly class [ComputationExprLibrary]Library.Eventually`1 res2@6
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [ComputationExprLibrary]Library.Eventually`1 res3@12
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -347,10 +351,10 @@
     IL_0005:  stloc.2
     IL_0006:  ldloc.2
     IL_0007:  ldloc.2
-    IL_0008:  newobj     instance void ComputationExpr03/'res2@8-1'::.ctor(class [ComputationExprLibrary]Library.EventuallyBuilder)
+    IL_0008:  newobj     instance void ComputationExpr03/res2@8::.ctor(class [ComputationExprLibrary]Library.EventuallyBuilder)
     IL_000d:  callvirt   instance class [ComputationExprLibrary]Library.Eventually`1 [ComputationExprLibrary]Library.EventuallyBuilder::Delay(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
     IL_0012:  dup
-    IL_0013:  stsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::'res2@6-2'
+    IL_0013:  stsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::res2@6
     IL_0018:  stloc.0
     .line 10,10 : 1,25 ''
     IL_0019:  call       class [ComputationExprLibrary]Library.Eventually`1 ComputationExpr03::get_res2()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
index 6f211063ee2..abbfeb2028a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr04
 {
-  // Offset: 0x00000000 Length: 0x000001F8
+  // Offset: 0x00000000 Length: 0x0000020E
+}
+.mresource public FSharpSignatureDataB.ComputationExpr04
+{
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ComputationExpr04
 {
-  // Offset: 0x00000200 Length: 0x0000007D
+  // Offset: 0x00000220 Length: 0x0000007D
 }
 .module ComputationExpr04.exe
-// MVID: {5A1F62A7-366A-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-366A-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04DD0000
+// Image base: 0x073C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -85,7 +89,7 @@
       .locals init ([0] int32 x,
                [1] string V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 7,7 : 22,37 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr04.fs'
+      .line 7,7 : 22,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr04.fs'
       IL_0000:  ldstr      "hello"
       IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
       IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
index 8f5858d32b2..7b127095623 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr05
 {
-  // Offset: 0x00000000 Length: 0x000001F8
+  // Offset: 0x00000000 Length: 0x0000020E
+}
+.mresource public FSharpSignatureDataB.ComputationExpr05
+{
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ComputationExpr05
 {
-  // Offset: 0x00000200 Length: 0x0000007D
+  // Offset: 0x00000220 Length: 0x0000007D
 }
 .module ComputationExpr05.exe
-// MVID: {5A1F62A7-3687-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-3687-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x039D0000
+// Image base: 0x056B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -79,7 +83,7 @@
       // Code size       1 (0x1)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 68,70 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr05.fs'
+      .line 9,9 : 68,70 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr05.fs'
       IL_0000:  ret
     } // end of method 'res5@9-1'::'System-IDisposable-Dispose'
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
index 93152a9b90f..b1281cbd296 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr06
 {
-  // Offset: 0x00000000 Length: 0x000001F8
+  // Offset: 0x00000000 Length: 0x0000020E
+}
+.mresource public FSharpSignatureDataB.ComputationExpr06
+{
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ComputationExpr06
 {
-  // Offset: 0x00000200 Length: 0x0000007D
+  // Offset: 0x00000220 Length: 0x0000007D
 }
 .module ComputationExpr06.exe
-// MVID: {5A1F62A7-35A8-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-35A8-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00DD0000
+// Image base: 0x07000000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -80,7 +84,7 @@
       // Code size       15 (0xf)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 15,21 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr06.fs'
+      .line 9,9 : 15,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr06.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 ComputationExpr06/'res6@9-1'::x
       IL_0006:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::op_Dereference(class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
index 2e07f1e3d66..6123bc95719 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr07
 {
-  // Offset: 0x00000000 Length: 0x000001F8
+  // Offset: 0x00000000 Length: 0x0000020E
+}
+.mresource public FSharpSignatureDataB.ComputationExpr07
+{
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ComputationExpr07
 {
-  // Offset: 0x00000200 Length: 0x0000007D
+  // Offset: 0x00000220 Length: 0x0000007D
 }
 .module ComputationExpr07.exe
-// MVID: {5A1F62A7-35BD-E566-A745-0383A7621F5A}
+// MVID: {5E172EEA-35BD-E566-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03800000
+// Image base: 0x05490000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -89,7 +93,7 @@
       .maxstack  7
       .locals init ([0] int32 v)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 9,29 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr07.fs'
+      .line 9,9 : 9,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr07.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 10,10 : 13,24 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
index 70c28499d91..207466bed34 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_CSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ArrayOfArray_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x0000026E
+  // Offset: 0x00000000 Length: 0x0000026A
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_CSInterface
+{
+  // Offset: 0x00000270 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_CSInterface
 {
-  // Offset: 0x00000278 Length: 0x000000A6
+  // Offset: 0x00000280 Length: 0x000000A6
 }
 .module DoNotBoxStruct_ArrayOfArray_CSInterface.exe
-// MVID: {59B1920A-FF24-C89E-A745-03830A92B159}
+// MVID: {5E172EEA-FF24-C89E-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x015B0000
+// Image base: 0x07000000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       27 (0x1b)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 55,74 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_CSInterface.fs'
+    .line 5,5 : 55,74 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.0
     IL_0002:  ldelem     !!T[]
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
index 4693af05dc0..62f05da4440 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_FSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ArrayOfArray_FSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000272
+  // Offset: 0x00000000 Length: 0x0000026E
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface
+{
+  // Offset: 0x00000278 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface
 {
-  // Offset: 0x00000278 Length: 0x000000A6
+  // Offset: 0x00000288 Length: 0x000000A6
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface.exe
-// MVID: {59B1920A-8A45-C8A0-A745-03830A92B159}
+// MVID: {5E172EEA-8A45-C8A0-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00680000
+// Image base: 0x06E90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 'F@5-4'
+  .class auto ansi serializable sealed nested assembly beforefieldinit F@5
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2
   {
     .method assembly specialname rtspecialname 
@@ -64,7 +68,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor()
       IL_0006:  ret
-    } // end of method 'F@5-4'::.ctor
+    } // end of method F@5::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Core.Unit 
             Invoke(int32 x) cil managed
@@ -72,12 +76,12 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 71,73 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface.fs'
+      .line 5,5 : 71,73 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface.fs'
       IL_0000:  ldnull
       IL_0001:  ret
-    } // end of method 'F@5-4'::Invoke
+    } // end of method F@5::Invoke
 
-  } // end of class 'F@5-4'
+  } // end of class F@5
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T[][] x) cil managed
   {
@@ -91,7 +95,7 @@
     IL_0008:  ldelem     !!T
     IL_000d:  box        !!T
     IL_0012:  unbox.any  class [mscorlib]System.IObservable`1
-    IL_0017:  newobj     instance void DoNotBoxStruct_ArrayOfArray_FSInterface/'F@5-4'::.ctor()
+    IL_0017:  newobj     instance void DoNotBoxStruct_ArrayOfArray_FSInterface/F@5::.ctor()
     IL_001c:  tail.
     IL_001e:  call       void [FSharp.Core]Microsoft.FSharp.Control.CommonExtensions::AddToObservable(class [mscorlib]System.IObservable`1,
                                                                                                              class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
index 1ef23f5de14..70b56fb264e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x00000291
+  // Offset: 0x00000000 Length: 0x0000028D
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
+{
+  // Offset: 0x00000298 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000298 Length: 0x000000BA
+  // Offset: 0x000002A8 Length: 0x000000BA
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.exe
-// MVID: {59B1920A-1475-D984-A745-03830A92B159}
+// MVID: {5E172EEA-1475-D984-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x015B0000
+// Image base: 0x05130000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -73,7 +77,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.2
       IL_0001:  stloc.0
       .line 6,6 : 80,82 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
index ca6aa2077fe..fda1b46ad9f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_Array_CSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_Array_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000255
+  // Offset: 0x00000000 Length: 0x00000251
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_CSInterface
+{
+  // Offset: 0x00000258 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_CSInterface
 {
-  // Offset: 0x00000260 Length: 0x00000098
+  // Offset: 0x00000268 Length: 0x00000098
 }
 .module DoNotBoxStruct_Array_CSInterface.exe
-// MVID: {59B1920A-1735-654E-A745-03830A92B159}
+// MVID: {5E172EEA-1735-654E-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x031D0000
+// Image base: 0x05450000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       21 (0x15)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 53,68 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_CSInterface.fs'
+    .line 5,5 : 53,68 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.0
     IL_0002:  readonly.
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
index 6b25b5eec24..60b58866f5a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_Array_FSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_Array_FSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000259
+  // Offset: 0x00000000 Length: 0x00000255
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface
+{
+  // Offset: 0x00000260 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface
 {
-  // Offset: 0x00000260 Length: 0x00000098
+  // Offset: 0x00000270 Length: 0x00000098
 }
 .module DoNotBoxStruct_Array_FSInterface.exe
-// MVID: {59B1920A-1737-9DA5-A745-03830A92B159}
+// MVID: {5E172EEA-1737-9DA5-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00300000
+// Image base: 0x06C00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 'F@5-5'
+  .class auto ansi serializable sealed nested assembly beforefieldinit F@5
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2
   {
     .method assembly specialname rtspecialname 
@@ -64,7 +68,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor()
       IL_0006:  ret
-    } // end of method 'F@5-5'::.ctor
+    } // end of method F@5::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Core.Unit 
             Invoke(int32 x) cil managed
@@ -72,12 +76,12 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 65,67 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface.fs'
+      .line 5,5 : 65,67 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface.fs'
       IL_0000:  ldnull
       IL_0001:  ret
-    } // end of method 'F@5-5'::Invoke
+    } // end of method F@5::Invoke
 
-  } // end of class 'F@5-5'
+  } // end of class F@5
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T[] x) cil managed
   {
@@ -89,7 +93,7 @@
     IL_0002:  ldelem     !!T
     IL_0007:  box        !!T
     IL_000c:  unbox.any  class [mscorlib]System.IObservable`1
-    IL_0011:  newobj     instance void DoNotBoxStruct_Array_FSInterface/'F@5-5'::.ctor()
+    IL_0011:  newobj     instance void DoNotBoxStruct_Array_FSInterface/F@5::.ctor()
     IL_0016:  tail.
     IL_0018:  call       void [FSharp.Core]Microsoft.FSharp.Control.CommonExtensions::AddToObservable(class [mscorlib]System.IObservable`1,
                                                                                                              class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
index c4a168a2d73..abc136e380d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x00000278
+  // Offset: 0x00000000 Length: 0x00000273
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface_NoExtMeth
+{
+  // Offset: 0x00000278 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000280 Length: 0x000000AC
+  // Offset: 0x00000288 Length: 0x000000AC
 }
 .module DoNotBoxStruct_Array_FSInterface_NoExtMeth.exe
-// MVID: {59B1920A-8127-3EE3-A745-03830A92B159}
+// MVID: {5E172EEA-8127-3EE3-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00740000
+// Image base: 0x06E20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 autochar serializable sealed nested assembly beforefieldinit specialname 'F@6-1'
+  .class auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
          extends [mscorlib]System.Object
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
@@ -63,7 +67,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ret
-    } // end of method 'F@6-1'::.ctor
+    } // end of method F@6::.ctor
 
     .method assembly hidebysig instance void 
             Invoke(object x,
@@ -73,14 +77,14 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.2
       IL_0001:  stloc.0
       .line 6,6 : 74,76 ''
       IL_0002:  ret
-    } // end of method 'F@6-1'::Invoke
+    } // end of method F@6::Invoke
 
-  } // end of class 'F@6-1'
+  } // end of class F@6
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T[] x) cil managed
   {
@@ -91,9 +95,9 @@
     IL_0001:  ldc.i4.0
     IL_0002:  readonly.
     IL_0004:  ldelema    !!T
-    IL_0009:  newobj     instance void DoNotBoxStruct_Array_FSInterface_NoExtMeth/'F@6-1'::.ctor()
-    IL_000e:  ldftn      instance void DoNotBoxStruct_Array_FSInterface_NoExtMeth/'F@6-1'::Invoke(object,
-                                                                                                  int32)
+    IL_0009:  newobj     instance void DoNotBoxStruct_Array_FSInterface_NoExtMeth/F@6::.ctor()
+    IL_000e:  ldftn      instance void DoNotBoxStruct_Array_FSInterface_NoExtMeth/F@6::Invoke(object,
+                                                                                              int32)
     IL_0014:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
                                                                                                                  native int)
     IL_0019:  constrained. !!T
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
index cfeba995ccf..6a0cc6bc5c5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_MDArray_CSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_MDArray_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x0000025C
+  // Offset: 0x00000000 Length: 0x00000258
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_CSInterface
+{
+  // Offset: 0x00000260 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_CSInterface
 {
-  // Offset: 0x00000260 Length: 0x0000009C
+  // Offset: 0x00000270 Length: 0x0000009C
 }
 .module DoNotBoxStruct_MDArray_CSInterface.exe
-// MVID: {59B1920A-24A8-8796-A745-03830A92B159}
+// MVID: {5E172EEA-24A8-8796-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00DD0000
+// Image base: 0x04D60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       22 (0x16)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 54,71 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_CSInterface.fs'
+    .line 5,5 : 54,71 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.0
     IL_0002:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
index c0d5f4ce7db..e00dbe4d4b5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_MDArray_FSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_MDArray_FSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000260
+  // Offset: 0x00000000 Length: 0x0000025C
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface
+{
+  // Offset: 0x00000260 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface
 {
-  // Offset: 0x00000268 Length: 0x0000009C
+  // Offset: 0x00000270 Length: 0x0000009C
 }
 .module DoNotBoxStruct_MDArray_FSInterface.exe
-// MVID: {59B1920A-8279-DA45-A745-03830A92B159}
+// MVID: {5E172EEA-8279-DA45-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00F20000
+// Image base: 0x05790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 'F@5-6'
+  .class auto ansi serializable sealed nested assembly beforefieldinit F@5
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2
   {
     .method assembly specialname rtspecialname 
@@ -64,7 +68,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor()
       IL_0006:  ret
-    } // end of method 'F@5-6'::.ctor
+    } // end of method F@5::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Core.Unit 
             Invoke(int32 x) cil managed
@@ -72,12 +76,12 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 68,70 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface.fs'
+      .line 5,5 : 68,70 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface.fs'
       IL_0000:  ldnull
       IL_0001:  ret
-    } // end of method 'F@5-6'::Invoke
+    } // end of method F@5::Invoke
 
-  } // end of class 'F@5-6'
+  } // end of class F@5
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T[0...,0...] x) cil managed
   {
@@ -91,7 +95,7 @@
                                                           int32)
     IL_0008:  box        !!T
     IL_000d:  unbox.any  class [mscorlib]System.IObservable`1
-    IL_0012:  newobj     instance void DoNotBoxStruct_MDArray_FSInterface/'F@5-6'::.ctor()
+    IL_0012:  newobj     instance void DoNotBoxStruct_MDArray_FSInterface/F@5::.ctor()
     IL_0017:  tail.
     IL_0019:  call       void [FSharp.Core]Microsoft.FSharp.Control.CommonExtensions::AddToObservable(class [mscorlib]System.IObservable`1,
                                                                                                              class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
index 00d5ffc2e07..dde8183148b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x0000027F
+  // Offset: 0x00000000 Length: 0x0000027A
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
+{
+  // Offset: 0x00000280 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000288 Length: 0x000000B0
+  // Offset: 0x00000290 Length: 0x000000B0
 }
 .module DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.exe
-// MVID: {59B1920A-A67D-867A-A745-03830A92B159}
+// MVID: {5E172EEA-A67D-867A-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010C0000
+// Image base: 0x070E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 autochar serializable sealed nested assembly beforefieldinit specialname 'F@6-2'
+  .class auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
          extends [mscorlib]System.Object
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
@@ -63,7 +67,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ret
-    } // end of method 'F@6-2'::.ctor
+    } // end of method F@6::.ctor
 
     .method assembly hidebysig instance void 
             Invoke(object x,
@@ -73,14 +77,14 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.2
       IL_0001:  stloc.0
       .line 6,6 : 77,79 ''
       IL_0002:  ret
-    } // end of method 'F@6-2'::Invoke
+    } // end of method F@6::Invoke
 
-  } // end of class 'F@6-2'
+  } // end of class F@6
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T[0...,0...] x) cil managed
   {
@@ -93,9 +97,9 @@
     IL_0003:  readonly.
     IL_0005:  call       instance !!T& !!T[0...,0...]::Address(int32,
                                                                int32)
-    IL_000a:  newobj     instance void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/'F@6-2'::.ctor()
-    IL_000f:  ldftn      instance void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/'F@6-2'::Invoke(object,
-                                                                                                    int32)
+    IL_000a:  newobj     instance void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/F@6::.ctor()
+    IL_000f:  ldftn      instance void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/F@6::Invoke(object,
+                                                                                                int32)
     IL_0015:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
                                                                                                                  native int)
     IL_001a:  constrained. !!T
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
index 4b9a226ab6a..4b8db85a65b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_NoArray_CSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_NoArray_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x0000024C
+  // Offset: 0x00000000 Length: 0x00000248
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_CSInterface
+{
+  // Offset: 0x00000250 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_CSInterface
 {
-  // Offset: 0x00000250 Length: 0x0000009C
+  // Offset: 0x00000260 Length: 0x0000009C
 }
 .module DoNotBoxStruct_NoArray_CSInterface.exe
-// MVID: {59B1920A-5654-8082-A745-03830A92B159}
+// MVID: {5E172EEA-5654-8082-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B50000
+// Image base: 0x05080000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  3
     .locals init ([0] !!T V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 51,62 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_CSInterface.fs'
+    .line 5,5 : 51,62 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloca.s   V_0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
index 02f0492ad4a..dfa1f69aed6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_NoArray_FSInterface
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_NoArray_FSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000250
+  // Offset: 0x00000000 Length: 0x0000024C
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface
+{
+  // Offset: 0x00000250 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface
 {
-  // Offset: 0x00000258 Length: 0x0000009C
+  // Offset: 0x00000260 Length: 0x0000009C
 }
 .module DoNotBoxStruct_NoArray_FSInterface.exe
-// MVID: {59B1920A-3F8A-B9D0-A745-03830A92B159}
+// MVID: {5E172EEA-3F8A-B9D0-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00680000
+// Image base: 0x04D90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 'F@5-7'
+  .class auto ansi serializable sealed nested assembly beforefieldinit F@5
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2
   {
     .method assembly specialname rtspecialname 
@@ -64,7 +68,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor()
       IL_0006:  ret
-    } // end of method 'F@5-7'::.ctor
+    } // end of method F@5::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Core.Unit 
             Invoke(int32 x) cil managed
@@ -72,12 +76,12 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 59,61 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface.fs'
+      .line 5,5 : 59,61 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface.fs'
       IL_0000:  ldnull
       IL_0001:  ret
-    } // end of method 'F@5-7'::Invoke
+    } // end of method F@5::Invoke
 
-  } // end of class 'F@5-7'
+  } // end of class F@5
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T x) cil managed
   {
@@ -87,7 +91,7 @@
     IL_0000:  ldarg.0
     IL_0001:  box        !!T
     IL_0006:  unbox.any  class [mscorlib]System.IObservable`1
-    IL_000b:  newobj     instance void DoNotBoxStruct_NoArray_FSInterface/'F@5-7'::.ctor()
+    IL_000b:  newobj     instance void DoNotBoxStruct_NoArray_FSInterface/F@5::.ctor()
     IL_0010:  tail.
     IL_0012:  call       void [FSharp.Core]Microsoft.FSharp.Control.CommonExtensions::AddToObservable(class [mscorlib]System.IObservable`1,
                                                                                                              class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
index 92d007fed43..b734be5dd3b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x0000026F
+  // Offset: 0x00000000 Length: 0x0000026A
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
+{
+  // Offset: 0x00000270 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000278 Length: 0x000000B0
+  // Offset: 0x00000280 Length: 0x000000B0
 }
 .module DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.exe
-// MVID: {59B1920A-CD0A-F713-A745-03830A92B159}
+// MVID: {5E172EEA-CD0A-F713-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00720000
+// Image base: 0x05780000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -51,7 +55,7 @@
        extends [mscorlib]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 autochar serializable sealed nested assembly beforefieldinit specialname 'F@6-3'
+  .class auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
          extends [mscorlib]System.Object
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
@@ -63,7 +67,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ret
-    } // end of method 'F@6-3'::.ctor
+    } // end of method F@6::.ctor
 
     .method assembly hidebysig instance void 
             Invoke(object x,
@@ -73,14 +77,14 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.2
       IL_0001:  stloc.0
       .line 6,6 : 68,70 ''
       IL_0002:  ret
-    } // end of method 'F@6-3'::Invoke
+    } // end of method F@6::Invoke
 
-  } // end of class 'F@6-3'
+  } // end of class F@6
 
   .method public static void  F<(class [FSharp.Core]Microsoft.FSharp.Control.IEvent`2,int32>) T>(!!T x) cil managed
   {
@@ -91,9 +95,9 @@
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloca.s   V_0
-    IL_0004:  newobj     instance void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/'F@6-3'::.ctor()
-    IL_0009:  ldftn      instance void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/'F@6-3'::Invoke(object,
-                                                                                                    int32)
+    IL_0004:  newobj     instance void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/F@6::.ctor()
+    IL_0009:  ldftn      instance void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/F@6::Invoke(object,
+                                                                                                int32)
     IL_000f:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
                                                                                                                  native int)
     IL_0014:  constrained. !!T
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
index 2faba000cc7..12879c75dea 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_ToString
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ToString
 {
-  // Offset: 0x00000000 Length: 0x00000208
+  // Offset: 0x00000000 Length: 0x00000204
+}
+.mresource public FSharpSignatureDataB.DoNotBoxStruct_ToString
+{
+  // Offset: 0x00000208 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ToString
 {
   // Offset: 0x00000210 Length: 0x00000086
 }
 .module DoNotBoxStruct_ToString.exe
-// MVID: {59B1920A-8D34-C606-A745-03830A92B159}
+// MVID: {5E172EEA-8D34-C606-A745-0383EA2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02CC0000
+// Image base: 0x05180000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  3
     .locals init ([0] !!T V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 22,34 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ToString.fs'
+    .line 5,5 : 22,34 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ToString.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloca.s   V_0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
index 601e4ffc1e7..c850d3c5f73 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly GenIter01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.GenIter01
 {
-  // Offset: 0x00000000 Length: 0x000001FF
+  // Offset: 0x00000000 Length: 0x000001F3
+}
+.mresource public FSharpSignatureDataB.GenIter01
+{
+  // Offset: 0x000001F8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.GenIter01
 {
-  // Offset: 0x00000208 Length: 0x0000007A
+  // Offset: 0x00000200 Length: 0x0000007A
 }
 .module GenIter01.exe
-// MVID: {5B9A6329-F836-DC98-A745-038329639A5B}
+// MVID: {5E172EE9-F836-DC98-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01080000
+// Image base: 0x06990000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,7 +99,7 @@
       .maxstack  8
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 GenIter01/squaresOfOneToTen@5::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
index aa203793fe4..d3529d70cb0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly GenIter02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.GenIter02
 {
-  // Offset: 0x00000000 Length: 0x00000200
+  // Offset: 0x00000000 Length: 0x000001F4
+}
+.mresource public FSharpSignatureDataB.GenIter02
+{
+  // Offset: 0x000001F8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.GenIter02
 {
-  // Offset: 0x00000208 Length: 0x0000007B
+  // Offset: 0x00000200 Length: 0x0000007B
 }
 .module GenIter02.exe
-// MVID: {5B9A6329-F857-DC98-A745-038329639A5B}
+// MVID: {5E172EE9-F857-DC98-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02900000
+// Image base: 0x05200000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,7 +99,7 @@
       .maxstack  8
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter02.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter02.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 GenIter02/squaresOfOneToTenB@5::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
index 88bd760bc85..b11ae5dd02d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly GenIter03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.GenIter03
 {
-  // Offset: 0x00000000 Length: 0x00000200
+  // Offset: 0x00000000 Length: 0x000001F4
+}
+.mresource public FSharpSignatureDataB.GenIter03
+{
+  // Offset: 0x000001F8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.GenIter03
 {
-  // Offset: 0x00000208 Length: 0x0000007B
+  // Offset: 0x00000200 Length: 0x0000007B
 }
 .module GenIter03.exe
-// MVID: {5B9A6329-F77C-DC98-A745-038329639A5B}
+// MVID: {5E172EE9-F77C-DC98-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026B0000
+// Image base: 0x06D80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,7 +99,7 @@
       .maxstack  8
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter03.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter03.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 GenIter03/squaresOfOneToTenC@4::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
index 25a08dfd652..525d99725ee 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly GenIter04
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.GenIter04
 {
-  // Offset: 0x00000000 Length: 0x000001F0
+  // Offset: 0x00000000 Length: 0x000001E4
+}
+.mresource public FSharpSignatureDataB.GenIter04
+{
+  // Offset: 0x000001E8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.GenIter04
 {
-  // Offset: 0x000001F8 Length: 0x0000007B
+  // Offset: 0x000001F0 Length: 0x0000007B
 }
 .module GenIter04.exe
-// MVID: {5B9A6329-F79D-DC98-A745-038329639A5B}
+// MVID: {5E172EE9-F79D-DC98-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00790000
+// Image base: 0x05200000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,7 +99,7 @@
       .maxstack  8
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter04.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\GeneratedIterators\\GenIter04.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 GenIter04/squaresOfOneToTenD@4::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
index 37c0b51c0e3..bcda8a39a7c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly InequalityComparison01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.InequalityComparison01
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x0000020A
+}
+.mresource public FSharpSignatureDataB.InequalityComparison01
+{
+  // Offset: 0x00000210 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.InequalityComparison01
 {
-  // Offset: 0x00000218 Length: 0x00000085
+  // Offset: 0x00000220 Length: 0x00000085
 }
 .module InequalityComparison01.exe
-// MVID: {59B19213-263A-E6D5-A745-03831392B159}
+// MVID: {5E172EE9-263A-E6D5-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x06F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     // Code size       8 (0x8)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 27,33 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison01.fs'
+    .line 3,3 : 27,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison01.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.1
     IL_0002:  cgt
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
index 6ce221af23c..bb4deb3a3a0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly InequalityComparison02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.InequalityComparison02
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x0000020A
+}
+.mresource public FSharpSignatureDataB.InequalityComparison02
+{
+  // Offset: 0x00000210 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.InequalityComparison02
 {
-  // Offset: 0x00000218 Length: 0x00000085
+  // Offset: 0x00000220 Length: 0x00000085
 }
 .module InequalityComparison02.exe
-// MVID: {59B19213-263A-E72C-A745-03831392B159}
+// MVID: {5E172EE9-263A-E72C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02D40000
+// Image base: 0x06800000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     // Code size       8 (0x8)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 27,33 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison02.fs'
+    .line 3,3 : 27,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison02.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.1
     IL_0002:  clt
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
index 96a9c5591cc..486ec3ca464 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly InequalityComparison03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.InequalityComparison03
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x0000020A
+}
+.mresource public FSharpSignatureDataB.InequalityComparison03
+{
+  // Offset: 0x00000210 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.InequalityComparison03
 {
-  // Offset: 0x00000218 Length: 0x00000085
+  // Offset: 0x00000220 Length: 0x00000085
 }
 .module InequalityComparison03.exe
-// MVID: {59B19213-263A-E70B-A745-03831392B159}
+// MVID: {5E172EE9-263A-E70B-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x008E0000
+// Image base: 0x06F80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     // Code size       5 (0x5)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 27,32 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison03.fs'
+    .line 3,3 : 27,32 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison03.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.1
     IL_0002:  clt
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
index 5209536406c..463b9ce1162 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly InequalityComparison04
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.InequalityComparison04
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x0000020A
+}
+.mresource public FSharpSignatureDataB.InequalityComparison04
+{
+  // Offset: 0x00000210 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.InequalityComparison04
 {
-  // Offset: 0x00000218 Length: 0x00000085
+  // Offset: 0x00000220 Length: 0x00000085
 }
 .module InequalityComparison04.exe
-// MVID: {59B19213-263A-E772-A745-03831392B159}
+// MVID: {5E172EE9-263A-E772-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00F20000
+// Image base: 0x06740000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     // Code size       5 (0x5)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 27,32 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison04.fs'
+    .line 3,3 : 27,32 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison04.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.1
     IL_0002:  cgt
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
index 173552b2fa4..d3be0b41b70 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly InequalityComparison05
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.InequalityComparison05
 {
-  // Offset: 0x00000000 Length: 0x00000236
+  // Offset: 0x00000000 Length: 0x00000232
+}
+.mresource public FSharpSignatureDataB.InequalityComparison05
+{
+  // Offset: 0x00000238 Length: 0x0000000A
 }
 .mresource public FSharpOptimizationData.InequalityComparison05
 {
-  // Offset: 0x00000240 Length: 0x00000085
+  // Offset: 0x00000248 Length: 0x00000085
 }
 .module InequalityComparison05.exe
-// MVID: {59B19213-263A-E751-A745-03831392B159}
+// MVID: {5E172EE9-263A-E751-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x001D0000
+// Image base: 0x06AE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +65,7 @@
     // Code size       12 (0xc)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 40,55 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison05.fs'
+    .line 3,3 : 40,55 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\InequalityComparison\\InequalityComparison05.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.1
     IL_0002:  ble.s      IL_0006
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
index 831514e5f3c..29cc4a14779 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ListExpressionSteppingTest1
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ListExpressionSteppingTest1
 {
-  // Offset: 0x00000000 Length: 0x0000026D
+  // Offset: 0x00000000 Length: 0x00000269
+}
+.mresource public FSharpSignatureDataB.ListExpressionSteppingTest1
+{
+  // Offset: 0x00000270 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest1
 {
   // Offset: 0x00000278 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest1.exe
-// MVID: {59B1920C-50CF-F6CE-A745-03830C92B159}
+// MVID: {5E172EE8-50CF-F6CE-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x030B0000
+// Image base: 0x04D20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -90,7 +94,7 @@
         // Code size       66 (0x42)
         .maxstack  6
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest1.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest1.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 ListExpressionSteppingTest1/ListExpressionSteppingTest1/f0@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
index 2b86c1c4ba1..e8408fc48f6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ListExpressionSteppingTest2
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ListExpressionSteppingTest2
 {
-  // Offset: 0x00000000 Length: 0x0000026D
+  // Offset: 0x00000000 Length: 0x00000269
+}
+.mresource public FSharpSignatureDataB.ListExpressionSteppingTest2
+{
+  // Offset: 0x00000270 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest2
 {
   // Offset: 0x00000278 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest2.exe
-// MVID: {59B1920C-D3DE-B780-A745-03830C92B159}
+// MVID: {5E172EE8-D3DE-B780-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00690000
+// Image base: 0x00B90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -90,7 +94,7 @@
         // Code size       123 (0x7b)
         .maxstack  6
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest2.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest2.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 ListExpressionSteppingTest2/ListExpressionSteppingTest2/f1@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
index 864056dbe8c..1735b9fd58d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ListExpressionSteppingTest3
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ListExpressionSteppingTest3
 {
-  // Offset: 0x00000000 Length: 0x0000027D
+  // Offset: 0x00000000 Length: 0x00000279
+}
+.mresource public FSharpSignatureDataB.ListExpressionSteppingTest3
+{
+  // Offset: 0x00000280 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest3
 {
-  // Offset: 0x00000288 Length: 0x000000AF
+  // Offset: 0x00000290 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest3.exe
-// MVID: {59B1920C-AE45-39B4-A745-03830C92B159}
+// MVID: {5E172EE8-AE45-39B4-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00FF0000
+// Image base: 0x00BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,7 +99,7 @@
         // Code size       116 (0x74)
         .maxstack  6
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest3.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest3.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 ListExpressionSteppingTest3/ListExpressionSteppingTest3/f2@7::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
index 2d0ccb9e33d..10e15495ff0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly ListExpressionSteppingTest4
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ListExpressionSteppingTest4
 {
-  // Offset: 0x00000000 Length: 0x00000275
+  // Offset: 0x00000000 Length: 0x00000269
+}
+.mresource public FSharpSignatureDataB.ListExpressionSteppingTest4
+{
+  // Offset: 0x00000270 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest4
 {
-  // Offset: 0x00000280 Length: 0x000000AF
+  // Offset: 0x00000278 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest4.exe
-// MVID: {5B9A68C1-3154-FA67-A745-0383C1689A5B}
+// MVID: {5E172EE8-3154-FA67-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x018D0000
+// Image base: 0x050B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -101,7 +105,7 @@
         .maxstack  6
         .locals init ([0] int32 z)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest4.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest4.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 ListExpressionSteppingTest4/ListExpressionSteppingTest4/f3@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
index 39def210b7f..71d72eea401 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly ListExpressionSteppingTest5
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ListExpressionSteppingTest5
 {
-  // Offset: 0x00000000 Length: 0x00000275
+  // Offset: 0x00000000 Length: 0x00000269
+}
+.mresource public FSharpSignatureDataB.ListExpressionSteppingTest5
+{
+  // Offset: 0x00000270 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest5
 {
-  // Offset: 0x00000280 Length: 0x000000AF
+  // Offset: 0x00000278 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest5.exe
-// MVID: {5B9A6329-CBE3-BFEA-A745-038329639A5B}
+// MVID: {5E172EE8-CBE3-BFEA-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x027C0000
+// Image base: 0x05180000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -101,7 +105,7 @@
         .maxstack  6
         .locals init ([0] int32 z)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest5.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest5.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 ListExpressionSteppingTest5/ListExpressionSteppingTest5/f4@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
index 2d43c04e954..b354ad7db9d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly ListExpressionSteppingTest6
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ListExpressionSteppingTest6
 {
-  // Offset: 0x00000000 Length: 0x0000029D
+  // Offset: 0x00000000 Length: 0x00000291
+}
+.mresource public FSharpSignatureDataB.ListExpressionSteppingTest6
+{
+  // Offset: 0x00000298 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest6
 {
   // Offset: 0x000002A8 Length: 0x000000BC
 }
 .module ListExpressionSteppingTest6.exe
-// MVID: {5B9A6329-98A2-AB14-A745-038329639A5B}
+// MVID: {5E172EE8-98A2-AB14-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x007B0000
+// Image base: 0x057E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -108,7 +112,7 @@
         .locals init ([0] int32 x,
                  [1] int32 V_1)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest6.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ListExpressionStepping\\ListExpressionSteppingTest6.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 ListExpressionSteppingTest6/ListExpressionSteppingTest6/f7@7::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
index af04f94f49e..118e00512ae 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.AggressiveInlining
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.AggressiveInlining
 {
-  // Offset: 0x00000000 Length: 0x0000034C
+  // Offset: 0x00000000 Length: 0x00000347
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.AggressiveInlining
+{
+  // Offset: 0x00000350 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.AggressiveInlining
 {
-  // Offset: 0x00000350 Length: 0x00000085
+  // Offset: 0x00000360 Length: 0x00000085
 }
 .module MethodImplAttribute.AggressiveInlining.dll
-// MVID: {59B1920C-66DC-14D3-A745-03830C92B159}
+// MVID: {5E172EE8-66DC-14D3-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02B20000
+// Image base: 0x071D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.AggressiveInlining.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.AggressiveInlining.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
index b37321a6b45..772633b0749 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.ForwardRef
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.ForwardRef
 {
-  // Offset: 0x00000000 Length: 0x00000331
+  // Offset: 0x00000000 Length: 0x0000032D
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.ForwardRef
+{
+  // Offset: 0x00000338 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.ForwardRef
 {
-  // Offset: 0x00000338 Length: 0x0000007D
+  // Offset: 0x00000348 Length: 0x0000007D
 }
 .module MethodImplAttribute.ForwardRef.dll
-// MVID: {59B1920C-C517-03FF-A745-03830C92B159}
+// MVID: {5E172EE8-C517-03FF-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x05250000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.ForwardRef.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.ForwardRef.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
index 5695375e4e0..2950354ee78 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.InternalCall
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.InternalCall
 {
-  // Offset: 0x00000000 Length: 0x00000339
+  // Offset: 0x00000000 Length: 0x00000335
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.InternalCall
+{
+  // Offset: 0x00000340 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.InternalCall
 {
-  // Offset: 0x00000340 Length: 0x0000007F
+  // Offset: 0x00000350 Length: 0x0000007F
 }
 .module MethodImplAttribute.InternalCall.dll
-// MVID: {59B1920C-FBF7-6A35-A745-03830C92B159}
+// MVID: {5E172EE8-FBF7-6A35-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x015B0000
+// Image base: 0x06E70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.InternalCall.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.InternalCall.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
index 6801bbb4405..b0f9638afa9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.NoInlining
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.NoInlining
 {
-  // Offset: 0x00000000 Length: 0x00000331
+  // Offset: 0x00000000 Length: 0x0000032D
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.NoInlining
+{
+  // Offset: 0x00000338 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.NoInlining
 {
-  // Offset: 0x00000338 Length: 0x0000007D
+  // Offset: 0x00000348 Length: 0x0000007D
 }
 .module MethodImplAttribute.NoInlining.dll
-// MVID: {59B1920C-F47B-58B3-A745-03830C92B159}
+// MVID: {5E172EE8-F47B-58B3-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x012B0000
+// Image base: 0x05880000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoInlining.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoInlining.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
index 37557234689..a0c9572e55c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.NoOptimization
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.NoOptimization
 {
-  // Offset: 0x00000000 Length: 0x0000033D
+  // Offset: 0x00000000 Length: 0x00000339
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.NoOptimization
+{
+  // Offset: 0x00000340 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.NoOptimization
 {
-  // Offset: 0x00000348 Length: 0x00000081
+  // Offset: 0x00000350 Length: 0x00000081
 }
 .module MethodImplAttribute.NoOptimization.dll
-// MVID: {59B1920C-D394-5177-A745-03830C92B159}
+// MVID: {5E172EE8-D394-5177-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x006A0000
+// Image base: 0x06360000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoOptimization.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoOptimization.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
index 6ded00a8d83..25c341fbd82 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.PreserveSig
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.PreserveSig
 {
-  // Offset: 0x00000000 Length: 0x00000336
+  // Offset: 0x00000000 Length: 0x00000332
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.PreserveSig
+{
+  // Offset: 0x00000338 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.PreserveSig
 {
-  // Offset: 0x00000340 Length: 0x0000007E
+  // Offset: 0x00000348 Length: 0x0000007E
 }
 .module MethodImplAttribute.PreserveSig.dll
-// MVID: {59B1920C-0C64-31CC-A745-03830C92B159}
+// MVID: {5E172EE8-0C64-31CC-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00D30000
+// Image base: 0x06B10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.PreserveSig.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.PreserveSig.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
index 4fbf40b8d9e..76ec08780d2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.Synchronized
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.Synchronized
 {
-  // Offset: 0x00000000 Length: 0x00000337
+  // Offset: 0x00000000 Length: 0x00000333
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.Synchronized
+{
+  // Offset: 0x00000338 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.Synchronized
 {
-  // Offset: 0x00000340 Length: 0x0000007F
+  // Offset: 0x00000348 Length: 0x0000007F
 }
 .module MethodImplAttribute.Synchronized.dll
-// MVID: {59B1920C-D8F1-2CC7-A745-03830C92B159}
+// MVID: {5E172EE8-D8F1-2CC7-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x00A00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Synchronized.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Synchronized.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
index 15db6ae085e..6a0823cee6b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplAttribute.Unmanaged
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.Unmanaged
 {
-  // Offset: 0x00000000 Length: 0x0000032E
+  // Offset: 0x00000000 Length: 0x0000032A
+}
+.mresource public FSharpSignatureDataB.MethodImplAttribute.Unmanaged
+{
+  // Offset: 0x00000330 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.Unmanaged
 {
-  // Offset: 0x00000338 Length: 0x0000007C
+  // Offset: 0x00000340 Length: 0x0000007C
 }
 .module MethodImplAttribute.Unmanaged.dll
-// MVID: {59B1920C-FF34-309C-A745-03830C92B159}
+// MVID: {5E172EE8-FF34-309C-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x013D0000
+// Image base: 0x06FB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Unmanaged.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Unmanaged.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
index 0bae910d0f1..6039244c15e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly AbstractClass
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.AbstractClass
 {
-  // Offset: 0x00000000 Length: 0x00000306
+  // Offset: 0x00000000 Length: 0x00000302
+}
+.mresource public FSharpSignatureDataB.AbstractClass
+{
+  // Offset: 0x00000308 Length: 0x00000015
 }
 .mresource public FSharpOptimizationData.AbstractClass
 {
-  // Offset: 0x00000310 Length: 0x000000B1
+  // Offset: 0x00000328 Length: 0x000000B1
+}
+.mresource public FSharpOptimizationDataB.AbstractClass
+{
+  // Offset: 0x000003E0 Length: 0x00000003
 }
 .module AbstractClass.exe
-// MVID: {59B19213-333C-8BAF-A745-03831392B159}
+// MVID: {5E172EE9-333C-8BAF-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010A0000
+// Image base: 0x06BC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +70,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\AbstractClass.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\AbstractClass.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
index af9a419018c..4ef8a731858 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:6:0:0
+  .ver 4:7:0:0
 }
 .assembly AnonRecd
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.AnonRecd
 {
-  // Offset: 0x00000000 Length: 0x000001CE
+  // Offset: 0x00000000 Length: 0x000001C2
+}
+.mresource public FSharpSignatureDataB.AnonRecd
+{
+  // Offset: 0x000001C8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.AnonRecd
 {
-  // Offset: 0x000001D8 Length: 0x0000006B
+  // Offset: 0x000001D0 Length: 0x0000006B
 }
 .module AnonRecd.exe
-// MVID: {5CBDEF61-C42F-5208-A745-038361EFBD5C}
+// MVID: {5E172EE9-C42F-5208-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00D20000
+// Image base: 0x05610000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     .locals init ([0] int32 x,
              [1] class '<>f__AnonymousType1912756633`2' a)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 5,22 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\AnonRecd.fs'
+    .line 4,4 : 5,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\AnonRecd.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  stloc.0
     .line 6,6 : 5,31 ''
@@ -164,7 +168,7 @@
     // Code size       104 (0x68)
     .maxstack  5
     .locals init ([0] int32 V_0)
-    .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\unknown'
+    .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\unknown'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl
index dcaa46948ee..f5371aab3c8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ArgumentNamesInClosures01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.ArgumentNamesInClosures01
 {
-  // Offset: 0x00000000 Length: 0x0000039F
+  // Offset: 0x00000000 Length: 0x0000039B
+}
+.mresource public FSharpSignatureDataB.ArgumentNamesInClosures01
+{
+  // Offset: 0x000003A0 Length: 0x00000021
 }
 .mresource public FSharpOptimizationData.ArgumentNamesInClosures01
 {
-  // Offset: 0x000003A8 Length: 0x0000010D
+  // Offset: 0x000003C8 Length: 0x0000010D
+}
+.mresource public FSharpOptimizationDataB.ArgumentNamesInClosures01
+{
+  // Offset: 0x000004E0 Length: 0x0000000F
 }
 .module ArgumentNamesInClosures01.dll
-// MVID: {59B19213-39CA-41B5-A745-03831392B159}
+// MVID: {5E172EE9-39CA-41B5-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02A00000
+// Image base: 0x06D60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +69,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 36,36 : 29,44 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\ArgumentNamesInClosures01.fs'
+      .line 36,36 : 29,44 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\ArgumentNamesInClosures01.fs'
       IL_0000:  ldarg.0
       IL_0001:  tail.
       IL_0003:  callvirt   instance int32 [mscorlib]System.Object::GetHashCode()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
index 6fab8d600ef..abe476356b5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CodeGenRenamings01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CodeGenRenamings01
 {
-  // Offset: 0x00000000 Length: 0x000003CC
+  // Offset: 0x00000000 Length: 0x000003C8
+}
+.mresource public FSharpSignatureDataB.CodeGenRenamings01
+{
+  // Offset: 0x000003D0 Length: 0x00000019
 }
 .mresource public FSharpOptimizationData.CodeGenRenamings01
 {
-  // Offset: 0x000003D0 Length: 0x0000011B
+  // Offset: 0x000003F0 Length: 0x0000011B
 }
 .module CodeGenRenamings01.exe
-// MVID: {59B19213-8173-986B-A745-03831392B159}
+// MVID: {5E172EE9-8173-986B-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010A0000
+// Image base: 0x04E70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -86,7 +90,7 @@
       // Code size       103 (0x67)
       .maxstack  7
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\CodeGenRenamings01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\CodeGenRenamings01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 CodeGenRenamings01/seq1@9::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
index 63d76598150..4fcbfcabad5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly CustomAttributeGenericParameter01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.CustomAttributeGenericParameter01
 {
-  // Offset: 0x00000000 Length: 0x000002C2
+  // Offset: 0x00000000 Length: 0x000002BE
+}
+.mresource public FSharpSignatureDataB.CustomAttributeGenericParameter01
+{
+  // Offset: 0x000002C8 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.CustomAttributeGenericParameter01
 {
-  // Offset: 0x000002C8 Length: 0x0000007A
+  // Offset: 0x000002D8 Length: 0x0000007A
 }
 .module CustomAttributeGenericParameter01.exe
-// MVID: {59B19213-F08A-F524-A745-03831392B159}
+// MVID: {5E172EE9-F08A-F524-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x001D0000
+// Image base: 0x05490000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     // Code size       2 (0x2)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 48,49 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\CustomAttributeGenericParameter01.fs'
+    .line 4,4 : 48,49 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\CustomAttributeGenericParameter01.fs'
     IL_0000:  ldarg.0
     IL_0001:  ret
   } // end of method M::f
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
index d4e75ea07e1..569dd25add2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Decimal01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Decimal01
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Decimal01
 {
-  // Offset: 0x00000148 Length: 0x00000050
+  // Offset: 0x00000140 Length: 0x00000050
 }
 .module Decimal01.exe
-// MVID: {59B19213-F150-FA46-A745-03831392B159}
+// MVID: {5E172EE9-F150-FA46-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x05AC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       13 (0xd)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 9,13 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\Decimal01.fs'
+    .line 6,6 : 9,13 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Decimal01.fs'
     IL_0000:  ldc.i4.s   12
     IL_0002:  ldc.i4.0
     IL_0003:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
index 4768f783d4c..566922839df 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly EntryPoint01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.EntryPoint01
 {
-  // Offset: 0x00000000 Length: 0x00000253
+  // Offset: 0x00000000 Length: 0x0000024F
+}
+.mresource public FSharpSignatureDataB.EntryPoint01
+{
+  // Offset: 0x00000258 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.EntryPoint01
 {
-  // Offset: 0x00000258 Length: 0x00000090
+  // Offset: 0x00000268 Length: 0x00000090
 }
 .module EntryPoint01.exe
-// MVID: {59B19213-9846-72C1-A745-03831392B159}
+// MVID: {5E172EE9-9846-72C1-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00680000
+// Image base: 0x05A10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -69,7 +73,7 @@
     // Code size       39 (0x27)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 8,8 : 9,39 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\EntryPoint01.fs'
+    .line 8,8 : 9,39 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\EntryPoint01.fs'
     .line 100001,100001 : 0,0 ''
     IL_0000:  ldc.i4.0
     IL_0001:  stsfld     int32 ''.$EntryPoint01::init@
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
index 5d270545498..c7e2dd89161 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly EqualsOnUnions01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.EqualsOnUnions01
 {
-  // Offset: 0x00000000 Length: 0x0000064B
+  // Offset: 0x00000000 Length: 0x0000063B
+}
+.mresource public FSharpSignatureDataB.EqualsOnUnions01
+{
+  // Offset: 0x00000640 Length: 0x0000007B
 }
 .mresource public FSharpOptimizationData.EqualsOnUnions01
 {
-  // Offset: 0x00000650 Length: 0x000001C7
+  // Offset: 0x000006C0 Length: 0x000001C7
+}
+.mresource public FSharpOptimizationDataB.EqualsOnUnions01
+{
+  // Offset: 0x00000890 Length: 0x0000002A
 }
 .module EqualsOnUnions01.exe
-// MVID: {59B19213-BBFB-14A0-A745-03831392B159}
+// MVID: {5E172EE9-BBFB-14A0-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01350000
+// Image base: 0x06840000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -351,7 +359,7 @@
                [7] int32 V_7,
                [8] int32 V_8)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\EqualsOnUnions01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\EqualsOnUnions01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
index 0f5a2183244..d1b2c04707a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ForLoop01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.ForLoop01
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.ForLoop01
 {
-  // Offset: 0x00000148 Length: 0x00000050
+  // Offset: 0x00000140 Length: 0x00000050
 }
 .module ForLoop01.exe
-// MVID: {59B19213-1795-791C-A745-03831392B159}
+// MVID: {5E172EE9-1795-791C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x056B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,7 +71,7 @@
              [3] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_3,
              [4] int32 V_4)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 1,24 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\ForLoop01.fs'
+    .line 5,5 : 1,24 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\ForLoop01.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.1
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
index f54c8480177..fe28223388d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ForLoop02
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.ForLoop02
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.ForLoop02
 {
-  // Offset: 0x00000148 Length: 0x00000050
+  // Offset: 0x00000140 Length: 0x00000050
 }
 .module ForLoop02.exe
-// MVID: {59B19213-1736-791C-A745-03831392B159}
+// MVID: {5E172EE9-1736-791C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03030000
+// Image base: 0x05390000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -69,7 +69,7 @@
              [1] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_1,
              [2] int32 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 1,19 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\ForLoop02.fs'
+    .line 5,5 : 1,19 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\ForLoop02.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  stloc.0
     IL_0002:  br.s       IL_0022
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
index e6fda0879b7..a0998d6e8b5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ForLoop03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ForLoop03
 {
-  // Offset: 0x00000000 Length: 0x000001FA
+  // Offset: 0x00000000 Length: 0x000001F6
+}
+.mresource public FSharpSignatureDataB.ForLoop03
+{
+  // Offset: 0x00000200 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.ForLoop03
 {
-  // Offset: 0x00000200 Length: 0x0000007B
+  // Offset: 0x00000210 Length: 0x0000007B
 }
 .module ForLoop03.exe
-// MVID: {59B19213-1757-791C-A745-03831392B159}
+// MVID: {5E172EE9-1757-791C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00680000
+// Image base: 0x06820000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -73,7 +77,7 @@
              [6] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_6,
              [7] int32 V_7)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 10,10 : 4,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\ForLoop03.fs'
+    .line 10,10 : 4,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\ForLoop03.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     .line 11,11 : 4,28 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
index eca246c526b..90b16fdc3c9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly GeneralizationOnUnions01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.GeneralizationOnUnions01
 {
-  // Offset: 0x00000000 Length: 0x00000699
+  // Offset: 0x00000000 Length: 0x00000689
+}
+.mresource public FSharpSignatureDataB.GeneralizationOnUnions01
+{
+  // Offset: 0x00000690 Length: 0x0000007F
 }
 .mresource public FSharpOptimizationData.GeneralizationOnUnions01
 {
-  // Offset: 0x000006A0 Length: 0x000001F4
+  // Offset: 0x00000718 Length: 0x000001F4
+}
+.mresource public FSharpOptimizationDataB.GeneralizationOnUnions01
+{
+  // Offset: 0x00000910 Length: 0x0000002A
 }
 .module GeneralizationOnUnions01.exe
-// MVID: {59B19213-4CA2-8CD1-A745-03831392B159}
+// MVID: {5E172EE9-4CA2-8CD1-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x014C0000
+// Image base: 0x05970000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -148,7 +156,7 @@
       // Code size       38 (0x26)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\GeneralizationOnUnions01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\GeneralizationOnUnions01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
index 0715db93d79..f24c9360fab 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly GenericTypeStaticField01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.GenericTypeStaticField01
 {
-  // Offset: 0x00000000 Length: 0x00000608
+  // Offset: 0x00000000 Length: 0x00000604
+}
+.mresource public FSharpSignatureDataB.GenericTypeStaticField01
+{
+  // Offset: 0x00000608 Length: 0x0000004C
 }
 .mresource public FSharpOptimizationData.GenericTypeStaticField01
 {
-  // Offset: 0x00000610 Length: 0x000001E7
+  // Offset: 0x00000658 Length: 0x000001E1
+}
+.mresource public FSharpOptimizationDataB.GenericTypeStaticField01
+{
+  // Offset: 0x00000840 Length: 0x00000018
 }
 .module GenericTypeStaticField01.exe
-// MVID: {59B19213-1E75-7E6B-A745-03831392B159}
+// MVID: {5E172EE9-1E75-7E6B-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00730000
+// Image base: 0x07000000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +71,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\GenericTypeStaticField01.fs'
+      .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\GenericTypeStaticField01.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl
index 3505d4f8e23..cf0b0512acb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly IfThenElse01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.IfThenElse01
 {
-  // Offset: 0x00000000 Length: 0x00000201
+  // Offset: 0x00000000 Length: 0x000001FD
+}
+.mresource public FSharpSignatureDataB.IfThenElse01
+{
+  // Offset: 0x00000208 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.IfThenElse01
 {
-  // Offset: 0x00000208 Length: 0x00000092
+  // Offset: 0x00000210 Length: 0x00000092
 }
 .module IfThenElse01.dll
-// MVID: {59B19213-2D6C-0B5D-A745-03831392B159}
+// MVID: {5E172EE9-2D6C-0B5D-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BD0000
+// Image base: 0x067D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -119,7 +123,7 @@
         .maxstack  7
         .locals init ([0] class IfThenElse01/M/f5@5 V_0)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 5,5 : 48,63 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\IfThenElse01.fs'
+        .line 5,5 : 48,63 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\IfThenElse01.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      class IfThenElse01/M/f5@5 class IfThenElse01/M/f5@5T::self0@
         IL_0006:  stloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
index 8c6ee74160d..773e36db404 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly LetIfThenElse01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.LetIfThenElse01
 {
-  // Offset: 0x00000000 Length: 0x000001E5
+  // Offset: 0x00000000 Length: 0x000001D9
+}
+.mresource public FSharpSignatureDataB.LetIfThenElse01
+{
+  // Offset: 0x000001E0 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.LetIfThenElse01
 {
   // Offset: 0x000001F0 Length: 0x00000076
 }
 .module LetIfThenElse01.exe
-// MVID: {59B19213-BE5A-D8FD-A745-03831392B159}
+// MVID: {5E172EE9-BE5A-D8FD-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02940000
+// Image base: 0x06FC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -65,7 +69,7 @@
              [6] int32 y2,
              [7] valuetype [mscorlib]System.DateTime V_7)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 12,51 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\LetIfThenElse01.fs'
+    .line 6,6 : 12,51 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\LetIfThenElse01.fs'
     IL_0000:  call       valuetype [mscorlib]System.DateTime [mscorlib]System.DateTime::get_Now()
     IL_0005:  stloc.1
     IL_0006:  ldloca.s   V_1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
index 641008a218f..5ad0e6d87df 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Lock01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Lock01
 {
-  // Offset: 0x00000000 Length: 0x00000184
+  // Offset: 0x00000000 Length: 0x00000180
+}
+.mresource public FSharpSignatureDataB.Lock01
+{
+  // Offset: 0x00000188 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.Lock01
 {
-  // Offset: 0x00000188 Length: 0x00000064
+  // Offset: 0x00000190 Length: 0x00000064
 }
 .module Lock01.exe
-// MVID: {59B19213-2BCA-B308-A745-03831392B159}
+// MVID: {5E172EE9-2BCA-B308-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02FB0000
+// Image base: 0x059A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +76,7 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 20,20 : 19,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\Lock01.fs'
+      .line 20,20 : 19,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Lock01.fs'
       IL_0000:  ldnull
       IL_0001:  ret
     } // end of method clo@20::Invoke
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
index a4ee5c51231..316736df6c0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Marshal
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Marshal
 {
-  // Offset: 0x00000000 Length: 0x0000050B
+  // Offset: 0x00000000 Length: 0x00000507
+}
+.mresource public FSharpSignatureDataB.Marshal
+{
+  // Offset: 0x00000510 Length: 0x00000025
 }
 .mresource public FSharpOptimizationData.Marshal
 {
-  // Offset: 0x00000510 Length: 0x0000004E
+  // Offset: 0x00000540 Length: 0x0000004E
 }
 .module Marshal.exe
-// MVID: {59B19213-7500-369C-A745-03831392B159}
+// MVID: {5E172EE9-7500-369C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01080000
+// Image base: 0x05560000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
index 9a2538f734d..3bc3d8dc0ae 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplNoInline
 {
@@ -25,20 +25,28 @@
 }
 .mresource public FSharpSignatureData.MethodImplNoInline
 {
-  // Offset: 0x00000000 Length: 0x000002FF
+  // Offset: 0x00000000 Length: 0x000002FB
+}
+.mresource public FSharpSignatureDataB.MethodImplNoInline
+{
+  // Offset: 0x00000300 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.MethodImplNoInline
 {
-  // Offset: 0x00000308 Length: 0x000000F5
+  // Offset: 0x00000310 Length: 0x000000F5
+}
+.mresource public FSharpOptimizationDataB.MethodImplNoInline
+{
+  // Offset: 0x00000410 Length: 0x00000009
 }
 .module MethodImplNoInline.exe
-// MVID: {59B19213-4480-09E2-A745-03831392B159}
+// MVID: {5E172EE9-4480-09E2-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00D80000
+// Image base: 0x056D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
index 784e3d51a37..382e101a175 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly MethodImplNoInline02
 {
@@ -25,20 +25,28 @@
 }
 .mresource public FSharpSignatureData.MethodImplNoInline02
 {
-  // Offset: 0x00000000 Length: 0x00000305
+  // Offset: 0x00000000 Length: 0x00000301
+}
+.mresource public FSharpSignatureDataB.MethodImplNoInline02
+{
+  // Offset: 0x00000308 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.MethodImplNoInline02
 {
-  // Offset: 0x00000310 Length: 0x000000F9
+  // Offset: 0x00000318 Length: 0x000000F9
+}
+.mresource public FSharpOptimizationDataB.MethodImplNoInline02
+{
+  // Offset: 0x00000418 Length: 0x00000009
 }
 .module MethodImplNoInline02.exe
-// MVID: {59B19213-084F-1A8E-A745-03831392B159}
+// MVID: {5E172EE9-084F-1A8E-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x012C0000
+// Image base: 0x06510000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
index 479fa38706d..d59358b23c4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ModuleWithExpression01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ModuleWithExpression01
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x0000020A
+}
+.mresource public FSharpSignatureDataB.ModuleWithExpression01
+{
+  // Offset: 0x00000210 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.ModuleWithExpression01
 {
   // Offset: 0x00000218 Length: 0x000000A6
 }
 .module ModuleWithExpression01.exe
-// MVID: {59B19213-CD1E-A8B4-A745-03831392B159}
+// MVID: {5E172EE9-CD1E-A8B4-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x030A0000
+// Image base: 0x06CF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -88,7 +92,7 @@
     .maxstack  3
     .locals init ([0] int32 x)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 8,8 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\ModuleWithExpression01.fs'
+    .line 8,8 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\ModuleWithExpression01.fs'
     IL_0000:  ldstr      "hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
index 2e111b971f8..0f5279f2c01 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly NoBoxingOnDispose01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.NoBoxingOnDispose01
 {
-  // Offset: 0x00000000 Length: 0x0000021A
+  // Offset: 0x00000000 Length: 0x00000216
+}
+.mresource public FSharpSignatureDataB.NoBoxingOnDispose01
+{
+  // Offset: 0x00000220 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.NoBoxingOnDispose01
 {
-  // Offset: 0x00000220 Length: 0x0000007F
+  // Offset: 0x00000230 Length: 0x0000007F
 }
 .module NoBoxingOnDispose01.exe
-// MVID: {59B19213-4EA9-C934-A745-03831392B159}
+// MVID: {5E172EE9-4EA9-C934-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00590000
+// Image base: 0x06550000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +64,7 @@
              [2] class [FSharp.Core]Microsoft.FSharp.Core.Unit V_2,
              [3] !!T a)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 3,16 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\NoBoxingOnDispose01.fs'
+    .line 6,6 : 3,16 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\NoBoxingOnDispose01.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     .line 6,6 : 3,16 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
index 5209960dc5f..5157c0a2df9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly NonEscapingArguments02
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.NonEscapingArguments02
 {
-  // Offset: 0x00000000 Length: 0x00000359
+  // Offset: 0x00000000 Length: 0x00000355
+}
+.mresource public FSharpSignatureDataB.NonEscapingArguments02
+{
+  // Offset: 0x00000360 Length: 0x0000001C
 }
 .mresource public FSharpOptimizationData.NonEscapingArguments02
 {
-  // Offset: 0x00000360 Length: 0x000001A4
+  // Offset: 0x00000380 Length: 0x0000019E
+}
+.mresource public FSharpOptimizationDataB.NonEscapingArguments02
+{
+  // Offset: 0x00000528 Length: 0x0000000D
 }
 .module NonEscapingArguments02.dll
-// MVID: {59B19213-BB56-6582-A745-03831392B159}
+// MVID: {5E172EE9-BB56-6582-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01730000
+// Image base: 0x00B50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +70,7 @@
       // Code size       21 (0x15)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\NonEscapingArguments02.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\NonEscapingArguments02.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
index 5a8b4ef3b76..1efb93c58ae 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly PreserveSig
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.PreserveSig
 {
-  // Offset: 0x00000000 Length: 0x000002F5
+  // Offset: 0x00000000 Length: 0x000002F1
+}
+.mresource public FSharpSignatureDataB.PreserveSig
+{
+  // Offset: 0x000002F8 Length: 0x0000000F
 }
 .mresource public FSharpOptimizationData.PreserveSig
 {
-  // Offset: 0x00000300 Length: 0x0000004A
+  // Offset: 0x00000310 Length: 0x0000004A
 }
 .module PreserveSig.dll
-// MVID: {59B19213-E8CC-64FE-A745-03831392B159}
+// MVID: {5E172EE9-E8CC-64FE-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01660000
+// Image base: 0x070E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl
index 5ccceb26460..f9abdfc4e7e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Seq_for_all01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Seq_for_all01
 {
-  // Offset: 0x00000000 Length: 0x000001AB
+  // Offset: 0x00000000 Length: 0x000001A7
+}
+.mresource public FSharpSignatureDataB.Seq_for_all01
+{
+  // Offset: 0x000001B0 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.Seq_for_all01
 {
-  // Offset: 0x000001B0 Length: 0x00000072
+  // Offset: 0x000001B8 Length: 0x00000072
 }
 .module Seq_for_all01.exe
-// MVID: {59B19213-D30D-BA80-A745-03831392B159}
+// MVID: {5E172EE9-D30D-BA80-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02A60000
+// Image base: 0x00B80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +76,7 @@
       // Code size       14 (0xe)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 31,47 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\Seq_for_all01.fs'
+      .line 5,5 : 31,47 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Seq_for_all01.fs'
       IL_0000:  ldc.i4.1
       IL_0001:  brtrue.s   IL_0005
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
index b3476b282f7..e9547bf842d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Structs01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Structs01
 {
-  // Offset: 0x00000000 Length: 0x0000074D
+  // Offset: 0x00000000 Length: 0x0000073D
+}
+.mresource public FSharpSignatureDataB.Structs01
+{
+  // Offset: 0x00000748 Length: 0x00000093
 }
 .mresource public FSharpOptimizationData.Structs01
 {
-  // Offset: 0x00000758 Length: 0x00000231
+  // Offset: 0x000007E0 Length: 0x00000231
+}
+.mresource public FSharpOptimizationDataB.Structs01
+{
+  // Offset: 0x00000A18 Length: 0x00000035
 }
 .module Structs01.exe
-// MVID: {59B19213-701F-5E27-A745-03831392B159}
+// MVID: {5E172EE9-701F-5E27-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01470000
+// Image base: 0x06F50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +80,7 @@
                [2] int32 V_2,
                [3] int32 V_3)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 7,7 : 6,10 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\Structs01.fs'
+      .line 7,7 : 6,10 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Structs01.fs'
       IL_0000:  ldarga.s   obj
       IL_0002:  stloc.0
       IL_0003:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
index dc002382e1d..4a6acdcb362 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Structs02
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Structs02
 {
-  // Offset: 0x00000000 Length: 0x00000787
+  // Offset: 0x00000000 Length: 0x00000777
+}
+.mresource public FSharpSignatureDataB.Structs02
+{
+  // Offset: 0x00000780 Length: 0x00000096
 }
 .mresource public FSharpOptimizationData.Structs02
 {
-  // Offset: 0x00000790 Length: 0x00000237
+  // Offset: 0x00000820 Length: 0x00000237
+}
+.mresource public FSharpOptimizationDataB.Structs02
+{
+  // Offset: 0x00000A60 Length: 0x00000035
 }
 .module Structs02.exe
-// MVID: {59B19213-7040-5E27-A745-03831392B159}
+// MVID: {5E172EE9-7040-5E27-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002F0000
+// Image base: 0x05800000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +91,7 @@
                [2] int32 V_2,
                [3] int32 V_3)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 6,6 : 6,11 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\Structs02.fs'
+      .line 6,6 : 6,11 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Structs02.fs'
       IL_0000:  ldarga.s   obj
       IL_0002:  stloc.0
       IL_0003:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
index e3e7795ebd4..9fff6dd6eb2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly StructsAsArrayElements01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.StructsAsArrayElements01
 {
-  // Offset: 0x00000000 Length: 0x00000758
+  // Offset: 0x00000000 Length: 0x00000754
+}
+.mresource public FSharpSignatureDataB.StructsAsArrayElements01
+{
+  // Offset: 0x00000758 Length: 0x0000009B
 }
 .mresource public FSharpOptimizationData.StructsAsArrayElements01
 {
-  // Offset: 0x00000760 Length: 0x0000022C
+  // Offset: 0x000007F8 Length: 0x0000022C
+}
+.mresource public FSharpOptimizationDataB.StructsAsArrayElements01
+{
+  // Offset: 0x00000A28 Length: 0x00000038
 }
 .module StructsAsArrayElements01.dll
-// MVID: {5B17FC4F-29F3-6E68-A745-03834FFC175B}
+// MVID: {5E172EE9-29F3-6E68-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00E30000
+// Image base: 0x06F10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -73,7 +81,7 @@
                [2] int32 V_2,
                [3] int32 V_3)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 7,7 : 6,7 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\StructsAsArrayElements01.fs'
+      .line 7,7 : 6,7 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\StructsAsArrayElements01.fs'
       IL_0000:  ldarga.s   obj
       IL_0002:  stloc.0
       IL_0003:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
index 63da7e6e404..ce48c684fae 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TryWith_NoFilterBlocks01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.TryWith_NoFilterBlocks01
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.TryWith_NoFilterBlocks01
 {
-  // Offset: 0x00000168 Length: 0x0000005F
+  // Offset: 0x00000160 Length: 0x0000005F
 }
 .module TryWith_NoFilterBlocks01.exe
-// MVID: {59B19213-3DEF-9A40-A745-03831392B159}
+// MVID: {5E172EE9-3DEF-9A40-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x017A0000
+// Image base: 0x04EC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -70,7 +70,7 @@
              [2] class [mscorlib]System.Exception e,
              [3] class [mscorlib]System.Exception V_3)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 3,5 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\TryWith_NoFilterBlocks01.fs'
+    .line 4,4 : 3,5 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\TryWith_NoFilterBlocks01.fs'
     .try
     {
       IL_0000:  ldnull
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
index 5f937b00b51..220781c651f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly extern cas
 {
@@ -36,20 +36,28 @@
 }
 .mresource public FSharpSignatureData.cas
 {
-  // Offset: 0x00000000 Length: 0x000005DF
+  // Offset: 0x00000000 Length: 0x00000619
+}
+.mresource public FSharpSignatureDataB.cas
+{
+  // Offset: 0x00000620 Length: 0x00000026
 }
 .mresource public FSharpOptimizationData.cas
 {
-  // Offset: 0x000005E8 Length: 0x000000F3
+  // Offset: 0x00000650 Length: 0x000000F3
+}
+.mresource public FSharpOptimizationDataB.cas
+{
+  // Offset: 0x00000748 Length: 0x00000008
 }
 .module cas.exe
-// MVID: {59B19213-35EA-18E3-A745-03831392B159}
+// MVID: {5E172EE9-35EA-18E3-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x006A0000
+// Image base: 0x05200000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -76,7 +84,7 @@
         // Code size       9 (0x9)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\cas.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\cas.fs'
         IL_0000:  ldarg.0
         IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
         IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
index a30c4a069bd..5ed2e0e184d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly comparison_decimal01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.comparison_decimal01
 {
-  // Offset: 0x00000000 Length: 0x00000176
+  // Offset: 0x00000000 Length: 0x00000172
 }
 .mresource public FSharpOptimizationData.comparison_decimal01
 {
-  // Offset: 0x00000180 Length: 0x0000005B
+  // Offset: 0x00000178 Length: 0x0000005B
 }
 .module comparison_decimal01.exe
-// MVID: {59B19240-76D8-7EE3-A745-03834092B159}
+// MVID: {5E172EE9-76D8-7EE3-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02980000
+// Image base: 0x058B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       228 (0xe4)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 9,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
+    .line 4,4 : 9,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
     IL_0000:  ldc.i4.s   10
     IL_0002:  ldc.i4.0
     IL_0003:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
index 78bfe96fcc7..ecdb8d88438 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -38,20 +38,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Aggregates01
 {
-  // Offset: 0x00000000 Length: 0x00000614
+  // Offset: 0x00000000 Length: 0x00000608
+}
+.mresource public FSharpSignatureDataB.Linq101Aggregates01
+{
+  // Offset: 0x00000610 Length: 0x00000027
 }
 .mresource public FSharpOptimizationData.Linq101Aggregates01
 {
-  // Offset: 0x00000618 Length: 0x00000211
+  // Offset: 0x00000640 Length: 0x00000211
 }
 .module Linq101Aggregates01.exe
-// MVID: {5B9A632A-D281-4783-A745-03832A639A5B}
+// MVID: {5E172EEB-D281-4783-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026B0000
+// Image base: 0x00B90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -105,7 +109,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Aggregates01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Aggregates01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Aggregates01/uniqueFactors@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
index b0aa6e961a6..1f216de4386 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.Linq101ElementOperators01
 {
-  // Offset: 0x00000000 Length: 0x0000038A
+  // Offset: 0x00000000 Length: 0x0000037E
+}
+.mresource public FSharpSignatureDataB.Linq101ElementOperators01
+{
+  // Offset: 0x00000388 Length: 0x0000000C
 }
 .mresource public FSharpOptimizationData.Linq101ElementOperators01
 {
-  // Offset: 0x00000390 Length: 0x00000127
+  // Offset: 0x00000398 Length: 0x00000127
 }
 .module Linq101ElementOperators01.exe
-// MVID: {5B9A632A-19D7-C20D-A745-03832A639A5B}
+// MVID: {5E172EEB-19D7-C20D-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x028F0000
+// Image base: 0x05170000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -100,7 +104,7 @@
       .locals init ([0] class [Utils]Utils/Product V_0,
                [1] class [Utils]Utils/Product p)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101ElementOperators01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101ElementOperators01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101ElementOperators01/products12@12::pc
       IL_0006:  ldc.i4.1
@@ -1471,7 +1475,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::'products@8-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::products@8
     IL_0005:  ret
   } // end of method Linq101ElementOperators01::get_products
 
@@ -1527,7 +1531,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::'numbers2@48-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::numbers2@48
     IL_0005:  ret
   } // end of method Linq101ElementOperators01::get_numbers2
 
@@ -1588,7 +1592,7 @@
 .class private abstract auto ansi sealed ''.$Linq101ElementOperators01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@8-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@8
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [Utils]Utils/Product products12@10
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1598,7 +1602,7 @@
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 firstNumOrDefault@29
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'numbers2@48-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numbers2@48
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 fourthLowNum@50
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1625,7 +1629,7 @@
     .line 8,8 : 1,32 ''
     IL_0000:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_0005:  dup
-    IL_0006:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::'products@8-2'
+    IL_0006:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::products@8
     IL_000b:  stloc.0
     IL_000c:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_0011:  stloc.s    V_8
@@ -1746,7 +1750,7 @@
     IL_013b:  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_0140:  dup
-    IL_0141:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::'numbers2@48-2'
+    IL_0141:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101ElementOperators01::numbers2@48
     IL_0146:  stloc.s    numbers2
     IL_0148:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_014d:  stloc.s    V_10
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
index 050bdf1cc6d..8c3e02b38d1 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern System.Core
 {
@@ -38,20 +38,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Grouping01
 {
-  // Offset: 0x00000000 Length: 0x0000040F
+  // Offset: 0x00000000 Length: 0x00000403
+}
+.mresource public FSharpSignatureDataB.Linq101Grouping01
+{
+  // Offset: 0x00000408 Length: 0x0000001E
 }
 .mresource public FSharpOptimizationData.Linq101Grouping01
 {
-  // Offset: 0x00000418 Length: 0x00000129
+  // Offset: 0x00000430 Length: 0x00000129
 }
 .module Linq101Grouping01.exe
-// MVID: {5B9A68C1-FB79-E5BF-A745-0383C1689A5B}
+// MVID: {5E172EEB-FB79-E5BF-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x025F0000
+// Image base: 0x06EC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -89,7 +93,7 @@
       .maxstack  6
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 14,14 : 9,28 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Grouping01.fs'
+      .line 14,14 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Grouping01.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 15,15 : 9,29 ''
@@ -1095,7 +1099,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::'numbers@10-3'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::numbers@10
     IL_0005:  ret
   } // end of method Linq101Grouping01::get_numbers
 
@@ -1113,7 +1117,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::'words@20-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::words@20
     IL_0005:  ret
   } // end of method Linq101Grouping01::get_words
 
@@ -1131,7 +1135,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::'products@30-4'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::products@30
     IL_0005:  ret
   } // end of method Linq101Grouping01::get_products
 
@@ -1223,15 +1227,15 @@
 {
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 digits@7
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'numbers@10-3'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numbers@10
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2[] numberGroups@12
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'words@20-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 words@20
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2[] wordGroups@22
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@30-4'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@30
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2[] orderGroups@32
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1329,7 +1333,7 @@
     IL_00ad:  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_00b2:  dup
-    IL_00b3:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::'numbers@10-3'
+    IL_00b3:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::numbers@10
     IL_00b8:  stloc.1
     .line 12,17 : 1,21 ''
     IL_00b9:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1383,7 +1387,7 @@
     IL_0152:  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_0157:  dup
-    IL_0158:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::'words@20-2'
+    IL_0158:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::words@20
     IL_015d:  stloc.3
     .line 22,27 : 1,21 ''
     IL_015e:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1419,7 +1423,7 @@
     .line 30,30 : 1,32 ''
     IL_01bc:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_01c1:  dup
-    IL_01c2:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::'products@30-4'
+    IL_01c2:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Grouping01::products@30
     IL_01c7:  stloc.s    products
     .line 32,37 : 1,21 ''
     IL_01c9:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl
index f985ce06194..9450225888b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -38,20 +38,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Joins01
 {
-  // Offset: 0x00000000 Length: 0x00000316
+  // Offset: 0x00000000 Length: 0x0000030A
+}
+.mresource public FSharpSignatureDataB.Linq101Joins01
+{
+  // Offset: 0x00000310 Length: 0x00000011
 }
 .mresource public FSharpOptimizationData.Linq101Joins01
 {
-  // Offset: 0x00000320 Length: 0x000000C3
+  // Offset: 0x00000328 Length: 0x000000C3
 }
 .module Linq101Joins01.exe
-// MVID: {5B9A68C1-151B-685E-A745-0383C1689A5B}
+// MVID: {5E172EEB-151B-685E-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026A0000
+// Image base: 0x05180000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -81,7 +85,7 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 14,14 : 32,33 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Joins01.fs'
+      .line 14,14 : 32,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Joins01.fs'
       IL_0000:  ldarg.1
       IL_0001:  ret
     } // end of method q@14::Invoke
@@ -955,7 +959,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::'categories@8-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::categories@8
     IL_0005:  ret
   } // end of method Linq101Joins01::get_categories
 
@@ -964,7 +968,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::'products@9-6'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::products@9
     IL_0005:  ret
   } // end of method Linq101Joins01::get_products
 
@@ -1045,9 +1049,9 @@
 .class private abstract auto ansi sealed ''.$Linq101Joins01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'categories@8-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 categories@8
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@9-6'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@9
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2[] q@11
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1094,12 +1098,12 @@
     IL_0032:  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_0037:  dup
-    IL_0038:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::'categories@8-2'
+    IL_0038:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::categories@8
     IL_003d:  stloc.0
     .line 9,9 : 1,32 ''
     IL_003e:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_0043:  dup
-    IL_0044:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::'products@9-6'
+    IL_0044:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Joins01::products@9
     IL_0049:  stloc.1
     .line 11,16 : 1,21 ''
     IL_004a:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl
index 79848765473..b87ab4c1ecc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Ordering01
 {
-  // Offset: 0x00000000 Length: 0x000003BA
+  // Offset: 0x00000000 Length: 0x000003AE
+}
+.mresource public FSharpSignatureDataB.Linq101Ordering01
+{
+  // Offset: 0x000003B8 Length: 0x00000012
 }
 .mresource public FSharpOptimizationData.Linq101Ordering01
 {
-  // Offset: 0x000003C0 Length: 0x00000134
+  // Offset: 0x000003D0 Length: 0x00000134
 }
 .module Linq101Ordering01.exe
-// MVID: {5B9A632A-649A-6956-A745-03832A639A5B}
+// MVID: {5E172EEB-649A-6956-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00AD0000
+// Image base: 0x05770000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -100,7 +104,7 @@
       .locals init ([0] string V_0,
                [1] string w)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Ordering01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Ordering01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Ordering01/sortedWords@11::pc
       IL_0006:  ldc.i4.1
@@ -1745,7 +1749,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::'words@8-4'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::words@8
     IL_0005:  ret
   } // end of method Linq101Ordering01::get_words
 
@@ -1772,7 +1776,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::'products@23-8'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::products@23
     IL_0005:  ret
   } // end of method Linq101Ordering01::get_products
 
@@ -1799,7 +1803,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::'digits@49-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::digits@49
     IL_0005:  ret
   } // end of method Linq101Ordering01::get_digits
 
@@ -1877,19 +1881,19 @@
 .class private abstract auto ansi sealed ''.$Linq101Ordering01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'words@8-4'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 words@8
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 sortedWords@9
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 sortedWords2@16
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@23-8'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@23
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [Utils]Utils/Product[] sortedProducts@24
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [Utils]Utils/Product[] sortedProducts2@42
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'digits@49-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 digits@49
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 sortedDigits@50
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1931,7 +1935,7 @@
     IL_001e:  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_0023:  dup
-    IL_0024:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::'words@8-4'
+    IL_0024:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::words@8
     IL_0029:  stloc.0
     .line 9,13 : 1,20 ''
     IL_002a:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1974,7 +1978,7 @@
     .line 23,23 : 1,32 ''
     IL_008c:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_0091:  dup
-    IL_0092:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::'products@23-8'
+    IL_0092:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::products@23
     IL_0097:  stloc.3
     .line 24,29 : 1,21 ''
     IL_0098:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -2052,7 +2056,7 @@
     IL_0179:  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_017e:  dup
-    IL_017f:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::'digits@49-2'
+    IL_017f:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Ordering01::digits@49
     IL_0184:  stloc.s    digits
     .line 50,55 : 1,20 ''
     IL_0186:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
index b210d7f3c90..99a2d4bebe9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Partitioning01
 {
-  // Offset: 0x00000000 Length: 0x000003DE
+  // Offset: 0x00000000 Length: 0x000003D2
+}
+.mresource public FSharpSignatureDataB.Linq101Partitioning01
+{
+  // Offset: 0x000003D8 Length: 0x00000014
 }
 .mresource public FSharpOptimizationData.Linq101Partitioning01
 {
-  // Offset: 0x000003E8 Length: 0x00000138
+  // Offset: 0x000003F0 Length: 0x00000138
 }
 .module Linq101Partitioning01.exe
-// MVID: {5B9A632A-B280-A6A2-A745-03832A639A5B}
+// MVID: {5E172EEB-B280-A6A2-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00AF0000
+// Image base: 0x05A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -100,7 +104,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Partitioning01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Partitioning01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Partitioning01/first3Numbers@12::pc
       IL_0006:  ldc.i4.1
@@ -1817,7 +1821,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::'numbers@7-5'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::numbers@7
     IL_0005:  ret
   } // end of method Linq101Partitioning01::get_numbers
 
@@ -1835,7 +1839,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::'customers@17-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::customers@17
     IL_0005:  ret
   } // end of method Linq101Partitioning01::get_customers
 
@@ -1937,11 +1941,11 @@
 .class private abstract auto ansi sealed ''.$Linq101Partitioning01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'numbers@7-5'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numbers@7
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 first3Numbers@10
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'customers@17-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 customers@17
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`3[] WAOrders@18
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -2009,7 +2013,7 @@
     IL_003d:  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_0042:  dup
-    IL_0043:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::'numbers@7-5'
+    IL_0043:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::numbers@7
     IL_0048:  stloc.0
     .line 10,14 : 1,20 ''
     IL_0049:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -2033,7 +2037,7 @@
     .line 17,17 : 1,34 ''
     IL_0076:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getCustomerList()
     IL_007b:  dup
-    IL_007c:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::'customers@17-2'
+    IL_007c:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Partitioning01::customers@17
     IL_0081:  stloc.2
     .line 18,24 : 1,21 ''
     IL_0082:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
index d2b715c5820..1b8a3483f5b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -38,20 +38,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Quantifiers01
 {
-  // Offset: 0x00000000 Length: 0x0000039F
+  // Offset: 0x00000000 Length: 0x00000393
+}
+.mresource public FSharpSignatureDataB.Linq101Quantifiers01
+{
+  // Offset: 0x00000398 Length: 0x00000012
 }
 .mresource public FSharpOptimizationData.Linq101Quantifiers01
 {
-  // Offset: 0x000003A8 Length: 0x000000FF
+  // Offset: 0x000003B0 Length: 0x000000FF
 }
 .module Linq101Quantifiers01.exe
-// MVID: {5B9A632A-76DD-E373-A745-03832A639A5B}
+// MVID: {5E172EEB-76DD-E373-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x025D0000
+// Image base: 0x070E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -105,7 +109,7 @@
       .locals init ([0] string V_0,
                [1] string w)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Quantifiers01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Quantifiers01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Quantifiers01/iAfterE@12::pc
       IL_0006:  ldc.i4.1
@@ -1250,7 +1254,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::'words@8-6'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::words@8
     IL_0005:  ret
   } // end of method Linq101Quantifiers01::get_words
 
@@ -1268,7 +1272,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::'products@17-10'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::products@17
     IL_0005:  ret
   } // end of method Linq101Quantifiers01::get_products
 
@@ -1286,7 +1290,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::'numbers@28-7'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::numbers@28
     IL_0005:  ret
   } // end of method Linq101Quantifiers01::get_numbers
 
@@ -1353,15 +1357,15 @@
 .class private abstract auto ansi sealed ''.$Linq101Quantifiers01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'words@8-6'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 words@8
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly bool iAfterE@10
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@17-10'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@17
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2>[] productGroups@19
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'numbers@28-7'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numbers@28
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly bool onlyOdd@30
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1400,7 +1404,7 @@
     IL_0028:  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_002d:  dup
-    IL_002e:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::'words@8-6'
+    IL_002e:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::words@8
     IL_0033:  stloc.0
     IL_0034:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_0039:  ldnull
@@ -1419,7 +1423,7 @@
     .line 17,17 : 1,32 ''
     IL_0057:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_005c:  dup
-    IL_005d:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::'products@17-10'
+    IL_005d:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::products@17
     IL_0062:  stloc.2
     .line 19,25 : 1,21 ''
     IL_0063:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1480,7 +1484,7 @@
     IL_00fb:  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_0100:  dup
-    IL_0101:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::'numbers@28-7'
+    IL_0101:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Quantifiers01::numbers@28
     IL_0106:  stloc.s    numbers
     IL_0108:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_010d:  ldnull
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
index 8afae23a726..ce67b47d3c2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Select01
 {
-  // Offset: 0x00000000 Length: 0x00000663
+  // Offset: 0x00000000 Length: 0x00000657
+}
+.mresource public FSharpSignatureDataB.Linq101Select01
+{
+  // Offset: 0x00000660 Length: 0x00000035
 }
 .mresource public FSharpOptimizationData.Linq101Select01
 {
-  // Offset: 0x00000668 Length: 0x00000204
+  // Offset: 0x000006A0 Length: 0x00000204
 }
 .module Linq101Select01.exe
-// MVID: {5B9A632A-6057-8F80-A745-03832A639A5B}
+// MVID: {5E172EEB-6057-8F80-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00FF0000
+// Image base: 0x069B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -77,7 +81,7 @@
       .maxstack  5
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 12,12 : 9,28 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Select01.fs'
+      .line 12,12 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Select01.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 13,13 : 9,23 ''
@@ -2535,7 +2539,7 @@
 
   } // end of class 'pairs@75-3'
 
-  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@83-3'
+  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@83-1'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,object>>
   {
     .field public class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder builder@
@@ -2555,12 +2559,12 @@
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,object>>::.ctor()
       IL_0006:  ldarg.0
       IL_0007:  ldarg.1
-      IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@83-3'::builder@
+      IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@83-1'::builder@
       IL_000d:  ldarg.0
       IL_000e:  ldarg.2
-      IL_000f:  stfld      class [Utils]Utils/Customer Linq101Select01/'orders@83-3'::c
+      IL_000f:  stfld      class [Utils]Utils/Customer Linq101Select01/'orders@83-1'::c
       IL_0014:  ret
-    } // end of method 'orders@83-3'::.ctor
+    } // end of method 'orders@83-1'::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,object> 
             Invoke(class [Utils]Utils/Order _arg2) cil managed
@@ -2573,20 +2577,20 @@
       IL_0001:  stloc.0
       .line 84,84 : 9,34 ''
       IL_0002:  ldarg.0
-      IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@83-3'::builder@
+      IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@83-1'::builder@
       IL_0008:  ldarg.0
-      IL_0009:  ldfld      class [Utils]Utils/Customer Linq101Select01/'orders@83-3'::c
+      IL_0009:  ldfld      class [Utils]Utils/Customer Linq101Select01/'orders@83-1'::c
       IL_000e:  ldloc.0
       IL_000f:  newobj     instance void class [mscorlib]System.Tuple`2::.ctor(!0,
                                                                                                                                      !1)
       IL_0014:  tail.
       IL_0016:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Yield,object>(!!0)
       IL_001b:  ret
-    } // end of method 'orders@83-3'::Invoke
+    } // end of method 'orders@83-1'::Invoke
 
-  } // end of class 'orders@83-3'
+  } // end of class 'orders@83-1'
 
-  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@82-2'
+  .class auto ansi serializable sealed nested assembly beforefieldinit orders@82
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [mscorlib]System.Collections.IEnumerable>>
   {
     .field public class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder builder@
@@ -2604,9 +2608,9 @@
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [mscorlib]System.Collections.IEnumerable>>::.ctor()
       IL_0006:  ldarg.0
       IL_0007:  ldarg.1
-      IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@82-2'::builder@
+      IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/orders@82::builder@
       IL_000d:  ret
-    } // end of method 'orders@82-2'::.ctor
+    } // end of method orders@82::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,class [mscorlib]System.Collections.IEnumerable> 
             Invoke(class [Utils]Utils/Customer _arg1) cil managed
@@ -2619,26 +2623,26 @@
       IL_0001:  stloc.0
       .line 83,83 : 9,29 ''
       IL_0002:  ldarg.0
-      IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@82-2'::builder@
+      IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/orders@82::builder@
       IL_0008:  ldarg.0
-      IL_0009:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@82-2'::builder@
+      IL_0009:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/orders@82::builder@
       IL_000e:  ldloc.0
       IL_000f:  callvirt   instance class [Utils]Utils/Order[] [Utils]Utils/Customer::get_Orders()
       IL_0014:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Source(class [mscorlib]System.Collections.Generic.IEnumerable`1)
       IL_0019:  ldarg.0
-      IL_001a:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/'orders@82-2'::builder@
+      IL_001a:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Select01/orders@82::builder@
       IL_001f:  ldloc.0
-      IL_0020:  newobj     instance void Linq101Select01/'orders@83-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder,
+      IL_0020:  newobj     instance void Linq101Select01/'orders@83-1'::.ctor(class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder,
                                                                               class [Utils]Utils/Customer)
       IL_0025:  tail.
       IL_0027:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::For,object>(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
       IL_002c:  ret
-    } // end of method 'orders@82-2'::Invoke
+    } // end of method orders@82::Invoke
 
-  } // end of class 'orders@82-2'
+  } // end of class orders@82
 
-  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@84-4'
+  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@84-2'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,bool>
   {
     .method assembly specialname rtspecialname 
@@ -2651,7 +2655,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,bool>::.ctor()
       IL_0006:  ret
-    } // end of method 'orders@84-4'::.ctor
+    } // end of method 'orders@84-2'::.ctor
 
     .method public strict virtual instance bool 
             Invoke(class [mscorlib]System.Tuple`2 tupledArg) cil managed
@@ -2683,11 +2687,11 @@
       IL_0022:  call       bool [mscorlib]System.Decimal::op_LessThan(valuetype [mscorlib]System.Decimal,
                                                                       valuetype [mscorlib]System.Decimal)
       IL_0027:  ret
-    } // end of method 'orders@84-4'::Invoke
+    } // end of method 'orders@84-2'::Invoke
 
-  } // end of class 'orders@84-4'
+  } // end of class 'orders@84-2'
 
-  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@85-5'
+  .class auto ansi serializable sealed nested assembly beforefieldinit 'orders@85-3'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [mscorlib]System.Tuple`3>
   {
     .method assembly specialname rtspecialname 
@@ -2700,7 +2704,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [mscorlib]System.Tuple`3>::.ctor()
       IL_0006:  ret
-    } // end of method 'orders@85-5'::.ctor
+    } // end of method 'orders@85-3'::.ctor
 
     .method public strict virtual instance class [mscorlib]System.Tuple`3 
             Invoke(class [mscorlib]System.Tuple`2 tupledArg) cil managed
@@ -2727,9 +2731,9 @@
                                                                                                                                 !1,
                                                                                                                                 !2)
       IL_0025:  ret
-    } // end of method 'orders@85-5'::Invoke
+    } // end of method 'orders@85-3'::Invoke
 
-  } // end of class 'orders@85-5'
+  } // end of class 'orders@85-3'
 
   .class auto ansi serializable sealed nested assembly beforefieldinit 'orders2@92-1'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,object>>
@@ -3382,7 +3386,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'numbers@7-9'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::numbers@7
     IL_0005:  ret
   } // end of method Linq101Select01::get_numbers
 
@@ -3400,7 +3404,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'products@17-12'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::products@17
     IL_0005:  ret
   } // end of method Linq101Select01::get_products
 
@@ -3418,7 +3422,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'strings@26-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::strings@26
     IL_0005:  ret
   } // end of method Linq101Select01::get_strings
 
@@ -3436,7 +3440,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'words@34-8'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::words@34
     IL_0005:  ret
   } // end of method Linq101Select01::get_words
 
@@ -3472,7 +3476,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'digits@57-4'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::digits@57
     IL_0005:  ret
   } // end of method Linq101Select01::get_digits
 
@@ -3517,7 +3521,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'customers@79-4'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::customers@79
     IL_0005:  ret
   } // end of method Linq101Select01::get_customers
 
@@ -3697,19 +3701,19 @@
 .class private abstract auto ansi sealed ''.$Linq101Select01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'numbers@7-9'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numbers@7
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numsPlusOne@10
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@17-12'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@17
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Collections.Generic.IEnumerable`1 productNames@19
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'strings@26-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 strings@26
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 textNums@27
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'words@34-8'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 words@34
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2[] upperLowerWords@36
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -3717,7 +3721,7 @@
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`3[] productInfos@50
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'digits@57-4'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 digits@57
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lowNums@58
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -3727,7 +3731,7 @@
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`2[] pairs@70
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'customers@79-4'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 customers@79
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Tuple`3[] orders@80
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -3816,7 +3820,7 @@
     IL_003d:  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_0042:  dup
-    IL_0043:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'numbers@7-9'
+    IL_0043:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::numbers@7
     IL_0048:  stloc.0
     .line 10,14 : 1,20 ''
     IL_0049:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -3834,7 +3838,7 @@
     .line 17,17 : 1,32 ''
     IL_0064:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_0069:  dup
-    IL_006a:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'products@17-12'
+    IL_006a:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::products@17
     IL_006f:  stloc.2
     IL_0070:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_0075:  stloc.s    V_22
@@ -3880,7 +3884,7 @@
     IL_00ea:  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_00ef:  dup
-    IL_00f0:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'strings@26-2'
+    IL_00f0:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::strings@26
     IL_00f5:  stloc.s    strings
     .line 27,31 : 1,20 ''
     IL_00f7:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -3907,7 +3911,7 @@
     IL_0131:  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_0136:  dup
-    IL_0137:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'words@34-8'
+    IL_0137:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::words@34
     IL_013c:  stloc.s    words
     .line 36,40 : 1,20 ''
     IL_013e:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -3951,7 +3955,7 @@
     .line 57,57 : 1,21 ''
     IL_0192:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 Linq101Select01::get_strings()
     IL_0197:  dup
-    IL_0198:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'digits@57-4'
+    IL_0198:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::digits@57
     IL_019d:  stloc.s    digits
     .line 58,63 : 1,20 ''
     IL_019f:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -4098,7 +4102,7 @@
     .line 79,79 : 1,34 ''
     IL_030a:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getCustomerList()
     IL_030f:  dup
-    IL_0310:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::'customers@79-4'
+    IL_0310:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Select01::customers@79
     IL_0315:  stloc.s    customers
     .line 80,86 : 1,21 ''
     IL_0317:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -4110,13 +4114,13 @@
     IL_0326:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 Linq101Select01::get_customers()
     IL_032b:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Source(class [mscorlib]System.Collections.Generic.IEnumerable`1)
     IL_0330:  ldloc.s    V_31
-    IL_0332:  newobj     instance void Linq101Select01/'orders@82-2'::.ctor(class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder)
+    IL_0332:  newobj     instance void Linq101Select01/orders@82::.ctor(class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder)
     IL_0337:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::For,class [mscorlib]System.Collections.IEnumerable>(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                                                                                                                                                                        class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
-    IL_033c:  newobj     instance void Linq101Select01/'orders@84-4'::.ctor()
+    IL_033c:  newobj     instance void Linq101Select01/'orders@84-2'::.ctor()
     IL_0341:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Where,class [mscorlib]System.Collections.IEnumerable>(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
-    IL_0346:  newobj     instance void Linq101Select01/'orders@85-5'::.ctor()
+    IL_0346:  newobj     instance void Linq101Select01/'orders@85-3'::.ctor()
     IL_034b:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Select,class [mscorlib]System.Collections.IEnumerable,class [mscorlib]System.Tuple`3>(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                                                                                                                                                                                class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
     IL_0350:  callvirt   instance class [mscorlib]System.Collections.Generic.IEnumerable`1 class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,class [mscorlib]System.Collections.IEnumerable>::get_Source()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
index 7b308ef661d..22a4c46def5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.Linq101SetOperators01
 {
-  // Offset: 0x00000000 Length: 0x00000398
+  // Offset: 0x00000000 Length: 0x0000038C
+}
+.mresource public FSharpSignatureDataB.Linq101SetOperators01
+{
+  // Offset: 0x00000390 Length: 0x0000000E
 }
 .mresource public FSharpOptimizationData.Linq101SetOperators01
 {
-  // Offset: 0x000003A0 Length: 0x0000011E
+  // Offset: 0x000003A8 Length: 0x0000011E
 }
 .module Linq101SetOperators01.exe
-// MVID: {5B9A632A-4EE5-349F-A745-03832A639A5B}
+// MVID: {5E172EEB-4EE5-349F-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026A0000
+// Image base: 0x00BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -55,7 +59,7 @@
        extends [mscorlib]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 autochar serializable sealed nested assembly beforefieldinit specialname 'uniqueFactors@13-1'
+  .class auto autochar serializable sealed nested assembly beforefieldinit specialname uniqueFactors@13
          extends class [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
@@ -80,17 +84,17 @@
       .maxstack  8
       IL_0000:  ldarg.0
       IL_0001:  ldarg.1
-      IL_0002:  stfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+      IL_0002:  stfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
       IL_0007:  ldarg.0
       IL_0008:  ldarg.2
-      IL_0009:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_0009:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       IL_000e:  ldarg.0
       IL_000f:  ldarg.3
-      IL_0010:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::current
+      IL_0010:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::current
       IL_0015:  ldarg.0
       IL_0016:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1::.ctor()
       IL_001b:  ret
-    } // end of method 'uniqueFactors@13-1'::.ctor
+    } // end of method uniqueFactors@13::.ctor
 
     .method public strict virtual instance int32 
             GenerateNext(class [mscorlib]System.Collections.Generic.IEnumerable`1& next) cil managed
@@ -100,9 +104,9 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101SetOperators01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101SetOperators01.fs'
       IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_0001:  ldfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       IL_0006:  ldc.i4.1
       IL_0007:  sub
       IL_0008:  switch     ( 
@@ -135,18 +139,18 @@
       IL_002b:  ldarg.0
       IL_002c:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 Linq101SetOperators01::get_factorsOf300()
       IL_0031:  callvirt   instance class [mscorlib]System.Collections.Generic.IEnumerator`1 class [mscorlib]System.Collections.Generic.IEnumerable`1::GetEnumerator()
-      IL_0036:  stfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+      IL_0036:  stfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
       IL_003b:  ldarg.0
       IL_003c:  ldc.i4.1
-      IL_003d:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_003d:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       .line 13,13 : 9,33 ''
       IL_0042:  ldarg.0
-      IL_0043:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+      IL_0043:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
       IL_0048:  callvirt   instance bool [mscorlib]System.Collections.IEnumerator::MoveNext()
       IL_004d:  brfalse.s  IL_0070
 
       IL_004f:  ldarg.0
-      IL_0050:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+      IL_0050:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
       IL_0055:  callvirt   instance !0 class [mscorlib]System.Collections.Generic.IEnumerator`1::get_Current()
       IL_005a:  stloc.0
       .line 13,13 : 9,33 ''
@@ -154,11 +158,11 @@
       IL_005c:  stloc.1
       IL_005d:  ldarg.0
       IL_005e:  ldc.i4.2
-      IL_005f:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_005f:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       .line 14,14 : 9,17 ''
       IL_0064:  ldarg.0
       IL_0065:  ldloc.1
-      IL_0066:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::current
+      IL_0066:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::current
       IL_006b:  ldc.i4.1
       IL_006c:  ret
 
@@ -168,24 +172,24 @@
 
       IL_0070:  ldarg.0
       IL_0071:  ldc.i4.3
-      IL_0072:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_0072:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       .line 13,13 : 9,33 ''
       IL_0077:  ldarg.0
-      IL_0078:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+      IL_0078:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
       IL_007d:  call       void [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::Dispose>(!!0)
       IL_0082:  nop
       IL_0083:  ldarg.0
       IL_0084:  ldnull
-      IL_0085:  stfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+      IL_0085:  stfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
       IL_008a:  ldarg.0
       IL_008b:  ldc.i4.3
-      IL_008c:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_008c:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       IL_0091:  ldarg.0
       IL_0092:  ldc.i4.0
-      IL_0093:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::current
+      IL_0093:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::current
       IL_0098:  ldc.i4.0
       IL_0099:  ret
-    } // end of method 'uniqueFactors@13-1'::GenerateNext
+    } // end of method uniqueFactors@13::GenerateNext
 
     .method public strict virtual instance void 
             Close() cil managed
@@ -197,7 +201,7 @@
                [2] class [mscorlib]System.Exception e)
       .line 100001,100001 : 0,0 ''
       IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_0001:  ldfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       IL_0006:  ldc.i4.3
       IL_0007:  sub
       IL_0008:  switch     ( 
@@ -213,7 +217,7 @@
       .try
       {
         IL_001a:  ldarg.0
-        IL_001b:  ldfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+        IL_001b:  ldfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
         IL_0020:  switch     ( 
                               IL_0037,
                               IL_0039,
@@ -251,19 +255,19 @@
         IL_004c:  nop
         IL_004d:  ldarg.0
         IL_004e:  ldc.i4.3
-        IL_004f:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+        IL_004f:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
         IL_0054:  ldarg.0
-        IL_0055:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/'uniqueFactors@13-1'::'enum'
+        IL_0055:  ldfld      class [mscorlib]System.Collections.Generic.IEnumerator`1 Linq101SetOperators01/uniqueFactors@13::'enum'
         IL_005a:  call       void [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::Dispose>(!!0)
         IL_005f:  nop
         .line 100001,100001 : 0,0 ''
         IL_0060:  nop
         IL_0061:  ldarg.0
         IL_0062:  ldc.i4.3
-        IL_0063:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+        IL_0063:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
         IL_0068:  ldarg.0
         IL_0069:  ldc.i4.0
-        IL_006a:  stfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::current
+        IL_006a:  stfld      int32 Linq101SetOperators01/uniqueFactors@13::current
         IL_006f:  ldnull
         IL_0070:  stloc.1
         IL_0071:  leave.s    IL_007f
@@ -303,7 +307,7 @@
 
       .line 100001,100001 : 0,0 ''
       IL_0093:  ret
-    } // end of method 'uniqueFactors@13-1'::Close
+    } // end of method uniqueFactors@13::Close
 
     .method public strict virtual instance bool 
             get_CheckClose() cil managed
@@ -312,7 +316,7 @@
       .maxstack  8
       .line 100001,100001 : 0,0 ''
       IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::pc
+      IL_0001:  ldfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       IL_0006:  switch     ( 
                             IL_001d,
                             IL_001f,
@@ -354,7 +358,7 @@
 
       IL_0036:  ldc.i4.0
       IL_0037:  ret
-    } // end of method 'uniqueFactors@13-1'::get_CheckClose
+    } // end of method uniqueFactors@13::get_CheckClose
 
     .method public strict virtual instance int32 
             get_LastGenerated() cil managed
@@ -364,9 +368,9 @@
       // Code size       7 (0x7)
       .maxstack  8
       IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 Linq101SetOperators01/'uniqueFactors@13-1'::current
+      IL_0001:  ldfld      int32 Linq101SetOperators01/uniqueFactors@13::current
       IL_0006:  ret
-    } // end of method 'uniqueFactors@13-1'::get_LastGenerated
+    } // end of method uniqueFactors@13::get_LastGenerated
 
     .method public strict virtual instance class [mscorlib]System.Collections.Generic.IEnumerator`1 
             GetFreshEnumerator() cil managed
@@ -378,13 +382,13 @@
       IL_0000:  ldnull
       IL_0001:  ldc.i4.0
       IL_0002:  ldc.i4.0
-      IL_0003:  newobj     instance void Linq101SetOperators01/'uniqueFactors@13-1'::.ctor(class [mscorlib]System.Collections.Generic.IEnumerator`1,
-                                                                                           int32,
-                                                                                           int32)
+      IL_0003:  newobj     instance void Linq101SetOperators01/uniqueFactors@13::.ctor(class [mscorlib]System.Collections.Generic.IEnumerator`1,
+                                                                                       int32,
+                                                                                       int32)
       IL_0008:  ret
-    } // end of method 'uniqueFactors@13-1'::GetFreshEnumerator
+    } // end of method uniqueFactors@13::GetFreshEnumerator
 
-  } // end of class 'uniqueFactors@13-1'
+  } // end of class uniqueFactors@13
 
   .class auto ansi serializable sealed nested assembly beforefieldinit 'categoryNames@22-1'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
@@ -1484,7 +1488,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'factorsOf300@9-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::factorsOf300@9
     IL_0005:  ret
   } // end of method Linq101SetOperators01::get_factorsOf300
 
@@ -1493,7 +1497,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'uniqueFactors@11-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::uniqueFactors@11
     IL_0005:  ret
   } // end of method Linq101SetOperators01::get_uniqueFactors
 
@@ -1502,7 +1506,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'products@18-14'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::products@18
     IL_0005:  ret
   } // end of method Linq101SetOperators01::get_products
 
@@ -1520,7 +1524,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'customers@28-6'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::customers@28
     IL_0005:  ret
   } // end of method Linq101SetOperators01::get_customers
 
@@ -1589,15 +1593,15 @@
 .class private abstract auto ansi sealed ''.$Linq101SetOperators01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'factorsOf300@9-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 factorsOf300@9
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'uniqueFactors@11-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 uniqueFactors@11
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@18-14'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@18
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 categoryNames@20
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'customers@28-6'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 customers@28
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Collections.Generic.IEnumerable`1 productFirstChars@30
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1641,7 +1645,7 @@
     IL_001e:  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_0023:  dup
-    IL_0024:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'factorsOf300@9-2'
+    IL_0024:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::factorsOf300@9
     IL_0029:  stloc.0
     .line 11,15 : 1,20 ''
     IL_002a:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1650,20 +1654,20 @@
     IL_0033:  ldnull
     IL_0034:  ldc.i4.0
     IL_0035:  ldc.i4.0
-    IL_0036:  newobj     instance void Linq101SetOperators01/'uniqueFactors@13-1'::.ctor(class [mscorlib]System.Collections.Generic.IEnumerator`1,
-                                                                                         int32,
-                                                                                         int32)
+    IL_0036:  newobj     instance void Linq101SetOperators01/uniqueFactors@13::.ctor(class [mscorlib]System.Collections.Generic.IEnumerator`1,
+                                                                                     int32,
+                                                                                     int32)
     IL_003b:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2::.ctor(class [mscorlib]System.Collections.Generic.IEnumerable`1)
     IL_0040:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Distinct(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2)
     IL_0045:  callvirt   instance class [mscorlib]System.Collections.Generic.IEnumerable`1 class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2::get_Source()
     IL_004a:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.SeqModule::ToList(class [mscorlib]System.Collections.Generic.IEnumerable`1)
     IL_004f:  dup
-    IL_0050:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'uniqueFactors@11-2'
+    IL_0050:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::uniqueFactors@11
     IL_0055:  stloc.1
     .line 18,18 : 1,32 ''
     IL_0056:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_005b:  dup
-    IL_005c:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'products@18-14'
+    IL_005c:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::products@18
     IL_0061:  stloc.2
     .line 20,25 : 1,20 ''
     IL_0062:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1685,7 +1689,7 @@
     .line 28,28 : 1,34 ''
     IL_008e:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getCustomerList()
     IL_0093:  dup
-    IL_0094:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::'customers@28-6'
+    IL_0094:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101SetOperators01::customers@28
     IL_0099:  stloc.s    customers
     IL_009b:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_00a0:  stloc.s    V_9
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
index b673d1193cc..b202473c938 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly extern Utils
 {
@@ -33,20 +33,24 @@
 }
 .mresource public FSharpSignatureData.Linq101Where01
 {
-  // Offset: 0x00000000 Length: 0x000003D6
+  // Offset: 0x00000000 Length: 0x000003CA
+}
+.mresource public FSharpSignatureDataB.Linq101Where01
+{
+  // Offset: 0x000003D0 Length: 0x00000012
 }
 .mresource public FSharpOptimizationData.Linq101Where01
 {
-  // Offset: 0x000003E0 Length: 0x0000012E
+  // Offset: 0x000003E8 Length: 0x0000012E
 }
 .module Linq101Where01.exe
-// MVID: {5B9A632A-FF23-CD21-A745-03832A639A5B}
+// MVID: {5E172EEB-FF23-CD21-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x009E0000
+// Image base: 0x06990000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -55,7 +59,7 @@
        extends [mscorlib]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 'lowNums@14-3'
+  .class auto ansi serializable sealed nested assembly beforefieldinit lowNums@14
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
   {
     .field public class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder builder@
@@ -73,9 +77,9 @@
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
       IL_0006:  ldarg.0
       IL_0007:  ldarg.1
-      IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Where01/'lowNums@14-3'::builder@
+      IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Where01/lowNums@14::builder@
       IL_000d:  ret
-    } // end of method 'lowNums@14-3'::.ctor
+    } // end of method lowNums@14::.ctor
 
     .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 
             Invoke(int32 _arg1) cil managed
@@ -84,21 +88,21 @@
       .maxstack  6
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 14,14 : 9,28 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Where01.fs'
+      .line 14,14 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Where01.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 15,15 : 9,22 ''
       IL_0002:  ldarg.0
-      IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Where01/'lowNums@14-3'::builder@
+      IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder Linq101Where01/lowNums@14::builder@
       IL_0008:  ldloc.0
       IL_0009:  tail.
       IL_000b:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Yield(!!0)
       IL_0010:  ret
-    } // end of method 'lowNums@14-3'::Invoke
+    } // end of method lowNums@14::Invoke
 
-  } // end of class 'lowNums@14-3'
+  } // end of class lowNums@14
 
-  .class auto ansi serializable sealed nested assembly beforefieldinit 'lowNums@15-4'
+  .class auto ansi serializable sealed nested assembly beforefieldinit 'lowNums@15-1'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2
   {
     .method assembly specialname rtspecialname 
@@ -111,7 +115,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor()
       IL_0006:  ret
-    } // end of method 'lowNums@15-4'::.ctor
+    } // end of method 'lowNums@15-1'::.ctor
 
     .method public strict virtual instance bool 
             Invoke(int32 n) cil managed
@@ -123,11 +127,11 @@
       IL_0001:  ldc.i4.5
       IL_0002:  clt
       IL_0004:  ret
-    } // end of method 'lowNums@15-4'::Invoke
+    } // end of method 'lowNums@15-1'::Invoke
 
-  } // end of class 'lowNums@15-4'
+  } // end of class 'lowNums@15-1'
 
-  .class auto ansi serializable sealed nested assembly beforefieldinit 'lowNums@16-5'
+  .class auto ansi serializable sealed nested assembly beforefieldinit 'lowNums@16-2'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2
   {
     .method assembly specialname rtspecialname 
@@ -140,7 +144,7 @@
       IL_0000:  ldarg.0
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor()
       IL_0006:  ret
-    } // end of method 'lowNums@16-5'::.ctor
+    } // end of method 'lowNums@16-2'::.ctor
 
     .method public strict virtual instance int32 
             Invoke(int32 n) cil managed
@@ -150,9 +154,9 @@
       .line 16,16 : 16,17 ''
       IL_0000:  ldarg.1
       IL_0001:  ret
-    } // end of method 'lowNums@16-5'::Invoke
+    } // end of method 'lowNums@16-2'::Invoke
 
-  } // end of class 'lowNums@16-5'
+  } // end of class 'lowNums@16-2'
 
   .class auto ansi serializable sealed nested assembly beforefieldinit soldOutProducts@24
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
@@ -915,7 +919,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'numbers@9-11'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::numbers@9
     IL_0005:  ret
   } // end of method Linq101Where01::get_numbers
 
@@ -924,7 +928,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'lowNums@12-2'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::lowNums@12
     IL_0005:  ret
   } // end of method Linq101Where01::get_lowNums
 
@@ -933,7 +937,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'products@20-16'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::products@20
     IL_0005:  ret
   } // end of method Linq101Where01::get_products
 
@@ -960,7 +964,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'customers@38-8'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::customers@38
     IL_0005:  ret
   } // end of method Linq101Where01::get_customers
 
@@ -978,7 +982,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'digits@48-6'
+    IL_0000:  ldsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::digits@48
     IL_0005:  ret
   } // end of method Linq101Where01::get_digits
 
@@ -1050,21 +1054,21 @@
 .class private abstract auto ansi sealed ''.$Linq101Where01
        extends [mscorlib]System.Object
 {
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'numbers@9-11'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 numbers@9
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'lowNums@12-2'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lowNums@12
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'products@20-16'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 products@20
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Collections.Generic.IEnumerable`1 soldOutProducts@22
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Collections.Generic.IEnumerable`1 expensiveInStockProducts@30
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'customers@38-8'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 customers@38
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [Utils]Utils/Customer[] waCustomers@40
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 'digits@48-6'
+  .field static assembly class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 digits@48
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [mscorlib]System.Collections.Generic.IEnumerable`1 shortDigits@49
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -1124,7 +1128,7 @@
     IL_003d:  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_0042:  dup
-    IL_0043:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'numbers@9-11'
+    IL_0043:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::numbers@9
     IL_0048:  stloc.0
     .line 12,17 : 1,20 ''
     IL_0049:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1136,24 +1140,24 @@
     IL_0058:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 Linq101Where01::get_numbers()
     IL_005d:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Source(class [mscorlib]System.Collections.Generic.IEnumerable`1)
     IL_0062:  ldloc.s    V_9
-    IL_0064:  newobj     instance void Linq101Where01/'lowNums@14-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder)
+    IL_0064:  newobj     instance void Linq101Where01/lowNums@14::.ctor(class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder)
     IL_0069:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::For(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                           class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
-    IL_006e:  newobj     instance void Linq101Where01/'lowNums@15-4'::.ctor()
+    IL_006e:  newobj     instance void Linq101Where01/'lowNums@15-1'::.ctor()
     IL_0073:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Where(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
-    IL_0078:  newobj     instance void Linq101Where01/'lowNums@16-5'::.ctor()
+    IL_0078:  newobj     instance void Linq101Where01/'lowNums@16-2'::.ctor()
     IL_007d:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2 [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder::Select(class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2,
                                                                                                                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2)
     IL_0082:  callvirt   instance class [mscorlib]System.Collections.Generic.IEnumerable`1 class [FSharp.Core]Microsoft.FSharp.Linq.QuerySource`2::get_Source()
     IL_0087:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::OfSeq(class [mscorlib]System.Collections.Generic.IEnumerable`1)
     IL_008c:  dup
-    IL_008d:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'lowNums@12-2'
+    IL_008d:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::lowNums@12
     IL_0092:  stloc.1
     .line 20,20 : 1,32 ''
     IL_0093:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getProductList()
     IL_0098:  dup
-    IL_0099:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'products@20-16'
+    IL_0099:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::products@20
     IL_009e:  stloc.2
     IL_009f:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
     IL_00a4:  stloc.s    V_10
@@ -1202,7 +1206,7 @@
     .line 38,38 : 1,34 ''
     IL_012a:  call       class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [Utils]Utils::getCustomerList()
     IL_012f:  dup
-    IL_0130:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'customers@38-8'
+    IL_0130:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::customers@38
     IL_0135:  stloc.s    customers
     .line 40,45 : 1,21 ''
     IL_0137:  call       class [FSharp.Core]Microsoft.FSharp.Linq.QueryBuilder [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::get_query()
@@ -1261,7 +1265,7 @@
     IL_01e6:  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_01eb:  dup
-    IL_01ec:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::'digits@48-6'
+    IL_01ec:  stsfld     class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$Linq101Where01::digits@48
     IL_01f1:  stloc.s    digits
     .line 49,55 : 1,21 ''
     IL_01f3:  newobj     instance void Linq101Where01/shortDigits@55::.ctor()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
index 884c03da12a..292e94a8948 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest1
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest1
 {
-  // Offset: 0x00000000 Length: 0x00000267
+  // Offset: 0x00000000 Length: 0x00000263
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest1
+{
+  // Offset: 0x00000268 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest1
 {
   // Offset: 0x00000270 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest1.exe
-// MVID: {59B19240-2432-947D-A745-03834092B159}
+// MVID: {5E172EEB-2432-947D-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x06570000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -90,7 +94,7 @@
         // Code size       66 (0x42)
         .maxstack  6
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest1.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest1.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 SeqExpressionSteppingTest1/SeqExpressionSteppingTest1/f0@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
index e5450059c32..bac373d1c8e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest2
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest2
 {
-  // Offset: 0x00000000 Length: 0x00000267
+  // Offset: 0x00000000 Length: 0x00000263
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest2
+{
+  // Offset: 0x00000268 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest2
 {
   // Offset: 0x00000270 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest2.exe
-// MVID: {59B19240-2432-951E-A745-03834092B159}
+// MVID: {5E172EEB-2432-951E-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00690000
+// Image base: 0x06CF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -90,7 +94,7 @@
         // Code size       123 (0x7b)
         .maxstack  6
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest2.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest2.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 SeqExpressionSteppingTest2/SeqExpressionSteppingTest2/f1@5::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
index 37e1a739636..9448b989f16 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest3
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest3
 {
-  // Offset: 0x00000000 Length: 0x00000277
+  // Offset: 0x00000000 Length: 0x00000273
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest3
+{
+  // Offset: 0x00000278 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest3
 {
-  // Offset: 0x00000280 Length: 0x000000AD
+  // Offset: 0x00000288 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest3.exe
-// MVID: {59B19240-2432-943F-A745-03834092B159}
+// MVID: {5E172EEB-2432-943F-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02660000
+// Image base: 0x06F30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,7 +99,7 @@
         // Code size       116 (0x74)
         .maxstack  6
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest3.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest3.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 SeqExpressionSteppingTest3/SeqExpressionSteppingTest3/f2@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
index ea764c62bb0..93d2751ce6f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest4
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest4
 {
-  // Offset: 0x00000000 Length: 0x0000026F
+  // Offset: 0x00000000 Length: 0x00000263
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest4
+{
+  // Offset: 0x00000268 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest4
 {
-  // Offset: 0x00000278 Length: 0x000000AD
+  // Offset: 0x00000270 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest4.exe
-// MVID: {5B9A68C1-2432-93E0-A745-0383C1689A5B}
+// MVID: {5E172EEB-2432-93E0-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00760000
+// Image base: 0x06F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -101,7 +105,7 @@
         .maxstack  6
         .locals init ([0] int32 z)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest4.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest4.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 SeqExpressionSteppingTest4/SeqExpressionSteppingTest4/f3@5::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
index 0af7608e807..109bbf0dd1b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest5
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest5
 {
-  // Offset: 0x00000000 Length: 0x0000026F
+  // Offset: 0x00000000 Length: 0x00000263
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest5
+{
+  // Offset: 0x00000268 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest5
 {
-  // Offset: 0x00000278 Length: 0x000000AD
+  // Offset: 0x00000270 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest5.exe
-// MVID: {5B9A632A-2432-9401-A745-03832A639A5B}
+// MVID: {5E172EEB-2432-9401-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026A0000
+// Image base: 0x00B50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -101,7 +105,7 @@
         .maxstack  6
         .locals init ([0] int32 z)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest5.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest5.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 SeqExpressionSteppingTest5/SeqExpressionSteppingTest5/f4@5::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
index d06d692b20b..34db9d218d3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest6
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest6
 {
-  // Offset: 0x00000000 Length: 0x000002A4
+  // Offset: 0x00000000 Length: 0x00000298
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest6
+{
+  // Offset: 0x000002A0 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest6
 {
-  // Offset: 0x000002A8 Length: 0x000000BA
+  // Offset: 0x000002B0 Length: 0x000000BA
 }
 .module SeqExpressionSteppingTest6.exe
-// MVID: {5B9A632A-2432-94A2-A745-03832A639A5B}
+// MVID: {5E172EEB-2432-94A2-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01330000
+// Image base: 0x05500000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -108,7 +112,7 @@
         .locals init ([0] int32 x,
                  [1] int32 V_1)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest6.fs'
+        .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest6.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      int32 SeqExpressionSteppingTest6/SeqExpressionSteppingTest6/f7@6::pc
         IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
index ae9e2337813..b7891e4f00c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionSteppingTest7
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionSteppingTest7
 {
-  // Offset: 0x00000000 Length: 0x00000272
+  // Offset: 0x00000000 Length: 0x00000266
+}
+.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest7
+{
+  // Offset: 0x00000270 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest7
 {
-  // Offset: 0x00000278 Length: 0x00000098
+  // Offset: 0x00000280 Length: 0x00000098
 }
 .module SeqExpressionSteppingTest7.exe
-// MVID: {5B9A632A-2432-93C3-A745-03832A639A5B}
+// MVID: {5E172EEB-2432-93C3-A745-0383EB2E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02450000
+// Image base: 0x056D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -88,7 +92,7 @@
       .locals init ([0] string V_0,
                [1] !a V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest7.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionStepping\\SeqExpressionSteppingTest7.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 class SeqExpressionSteppingTest7/f@5::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
index d03a45be913..cb1dc0dcf4d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionTailCalls01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionTailCalls01
 {
-  // Offset: 0x00000000 Length: 0x0000021D
+  // Offset: 0x00000000 Length: 0x00000219
+}
+.mresource public FSharpSignatureDataB.SeqExpressionTailCalls01
+{
+  // Offset: 0x00000220 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.SeqExpressionTailCalls01
 {
   // Offset: 0x00000228 Length: 0x0000008C
 }
 .module SeqExpressionTailCalls01.exe
-// MVID: {59B19240-093A-A6BE-A745-03834092B159}
+// MVID: {5E172EE9-093A-A6BE-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x027D0000
+// Image base: 0x07150000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,7 +95,7 @@
       // Code size       108 (0x6c)
       .maxstack  7
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionTailCalls\\SeqExpressionTailCalls01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionTailCalls\\SeqExpressionTailCalls01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 SeqExpressionTailCalls01/rwalk@3::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
index 4cca2bf3f7c..113a6903e16 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SeqExpressionTailCalls02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SeqExpressionTailCalls02
 {
-  // Offset: 0x00000000 Length: 0x00000256
+  // Offset: 0x00000000 Length: 0x00000252
+}
+.mresource public FSharpSignatureDataB.SeqExpressionTailCalls02
+{
+  // Offset: 0x00000258 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.SeqExpressionTailCalls02
 {
-  // Offset: 0x00000260 Length: 0x0000009E
+  // Offset: 0x00000268 Length: 0x0000009E
 }
 .module SeqExpressionTailCalls02.exe
-// MVID: {59B19240-093A-EC43-A745-03834092B159}
+// MVID: {5E172EE9-093A-EC43-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x017C0000
+// Image base: 0x071D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,7 +95,7 @@
       // Code size       108 (0x6c)
       .maxstack  7
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SeqExpressionTailCalls\\SeqExpressionTailCalls02.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SeqExpressionTailCalls\\SeqExpressionTailCalls02.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 SeqExpressionTailCalls02/rwalk1@5::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
index bf83c61d107..12e248098a4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
@@ -1,4 +1,4 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
index bf83c61d107..12e248098a4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
@@ -1,4 +1,4 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
index c29de0c7bdc..5434a3a9e45 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly LetBinding01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.LetBinding01
 {
-  // Offset: 0x00000000 Length: 0x000001B4
+  // Offset: 0x00000000 Length: 0x000001B0
+}
+.mresource public FSharpSignatureDataB.LetBinding01
+{
+  // Offset: 0x000001B8 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.LetBinding01
 {
-  // Offset: 0x000001B8 Length: 0x00000070
+  // Offset: 0x000001C0 Length: 0x00000070
 }
 .module LetBinding01.exe
-// MVID: {59B19250-269D-BEEF-A745-03835092B159}
+// MVID: {5E172EE8-269D-BEEF-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01570000
+// Image base: 0x070F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +87,7 @@
     .maxstack  4
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 1,11 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\StaticInit\\LetBinding01.fs'
+    .line 5,5 : 1,11 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\LetBinding01.fs'
     IL_0000:  call       class [FSharp.Core]Microsoft.FSharp.Core.Unit LetBinding01::get_x()
     IL_0005:  pop
     .line 6,6 : 1,17 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
index 2dd345fe2d4..c54bea6ecd5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly StaticInit_Class01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.StaticInit_Class01
 {
-  // Offset: 0x00000000 Length: 0x00000335
+  // Offset: 0x00000000 Length: 0x0000032F
+}
+.mresource public FSharpSignatureDataB.StaticInit_Class01
+{
+  // Offset: 0x00000338 Length: 0x00000011
 }
 .mresource public FSharpOptimizationData.StaticInit_Class01
 {
-  // Offset: 0x00000340 Length: 0x000000AD
+  // Offset: 0x00000350 Length: 0x000000AD
+}
+.mresource public FSharpOptimizationDataB.StaticInit_Class01
+{
+  // Offset: 0x00000408 Length: 0x00000003
 }
 .module StaticInit_Class01.dll
-// MVID: {59B19250-EC34-E66E-A745-03835092B159}
+// MVID: {5E172EE8-EC34-E66E-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00FE0000
+// Image base: 0x06510000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,14 +64,14 @@
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
     .field static assembly int32 x
-    .field static assembly int32 'init@4-1'
+    .field static assembly int32 init@4
     .method public specialname rtspecialname 
             instance void  .ctor(valuetype [mscorlib]System.DateTime s) cil managed
     {
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Class01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Class01.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
@@ -79,7 +87,7 @@
       .maxstack  8
       .line 7,7 : 23,37 ''
       IL_0000:  volatile.
-      IL_0002:  ldsfld     int32 StaticInit_ClassS01/C::'init@4-1'
+      IL_0002:  ldsfld     int32 StaticInit_ClassS01/C::init@4
       IL_0007:  ldc.i4.1
       IL_0008:  bge.s      IL_000c
 
@@ -138,7 +146,7 @@
     IL_000a:  stsfld     int32 StaticInit_ClassS01/C::x
     IL_000f:  ldc.i4.1
     IL_0010:  volatile.
-    IL_0012:  stsfld     int32 StaticInit_ClassS01/C::'init@4-1'
+    IL_0012:  stsfld     int32 StaticInit_ClassS01/C::init@4
     .line 4,4 : 6,7 ''
     IL_0017:  ret
   } // end of method $StaticInit_ClassS01::.cctor
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
index c9cd745c46a..32669ce9feb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly StaticInit_Module01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.StaticInit_Module01
 {
-  // Offset: 0x00000000 Length: 0x000002A7
+  // Offset: 0x00000000 Length: 0x000002A3
+}
+.mresource public FSharpSignatureDataB.StaticInit_Module01
+{
+  // Offset: 0x000002A8 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.StaticInit_Module01
 {
   // Offset: 0x000002B0 Length: 0x000000DF
 }
 .module StaticInit_Module01.dll
-// MVID: {59B19250-705F-DF4F-A745-03835092B159}
+// MVID: {5E172EE8-705F-DF4F-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00370000
+// Image base: 0x05400000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -94,7 +98,7 @@
     {
       // Code size       6 (0x6)
       .maxstack  8
-      IL_0000:  ldsfld     int32 ''.$StaticInit_Module01::'x@5-1'
+      IL_0000:  ldsfld     int32 ''.$StaticInit_Module01::x@5
       IL_0005:  ret
     } // end of method M::get_x
 
@@ -110,7 +114,7 @@
 .class private abstract auto ansi sealed ''.$StaticInit_Module01
        extends [mscorlib]System.Object
 {
-  .field static assembly initonly int32 'x@5-1'
+  .field static assembly initonly int32 x@5
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly initonly int32 y@7
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -129,11 +133,11 @@
              [1] int32 y,
              [2] int32 z)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 3,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Module01.fs'
+    .line 5,5 : 3,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Module01.fs'
     IL_0000:  ldstr      "1"
     IL_0005:  callvirt   instance int32 [mscorlib]System.String::get_Length()
     IL_000a:  dup
-    IL_000b:  stsfld     int32 ''.$StaticInit_Module01::'x@5-1'
+    IL_000b:  stsfld     int32 ''.$StaticInit_Module01::x@5
     IL_0010:  stloc.0
     .line 7,7 : 5,27 ''
     IL_0011:  call       int32 StaticInit_Module01/M::get_x()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
index 55664ad8b3a..d02093b7658 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly StaticInit_Struct01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.StaticInit_Struct01
 {
-  // Offset: 0x00000000 Length: 0x000007B1
+  // Offset: 0x00000000 Length: 0x000007A1
+}
+.mresource public FSharpSignatureDataB.StaticInit_Struct01
+{
+  // Offset: 0x000007A8 Length: 0x0000009B
 }
 .mresource public FSharpOptimizationData.StaticInit_Struct01
 {
-  // Offset: 0x000007B8 Length: 0x0000021F
+  // Offset: 0x00000848 Length: 0x0000021F
+}
+.mresource public FSharpOptimizationDataB.StaticInit_Struct01
+{
+  // Offset: 0x00000A70 Length: 0x00000035
 }
 .module StaticInit_Struct01.dll
-// MVID: {59B19250-05F6-D6CB-A745-03835092B159}
+// MVID: {5E172EE8-05F6-D6CB-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02BA0000
+// Image base: 0x07070000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,7 +79,7 @@
       .maxstack  5
       .locals init ([0] valuetype StaticInit_Struct01/C& V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 4,4 : 6,7 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Struct01.fs'
+      .line 4,4 : 6,7 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Struct01.fs'
       IL_0000:  ldarga.s   obj
       IL_0002:  stloc.0
       IL_0003:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
index aa77b1c7e0e..485613166c2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch01
 {
-  // Offset: 0x00000000 Length: 0x0000021C
+  // Offset: 0x00000000 Length: 0x00000210
+}
+.mresource public FSharpSignatureDataB.SteppingMatch01
+{
+  // Offset: 0x00000218 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.SteppingMatch01
 {
-  // Offset: 0x00000220 Length: 0x0000007A
+  // Offset: 0x00000228 Length: 0x0000007A
 }
 .module SteppingMatch01.dll
-// MVID: {59B19213-ABFD-13F6-A745-03831392B159}
+// MVID: {5E172EE8-ABFD-13F6-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00CA0000
+// Image base: 0x06540000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -59,7 +63,7 @@
              [1] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`2/Choice2Of2 V_1,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`2/Choice1Of2 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch01.fs'
+    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch01.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
index 453261211ee..0d83af4b9e2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch02
 {
-  // Offset: 0x00000000 Length: 0x0000021C
+  // Offset: 0x00000000 Length: 0x00000210
+}
+.mresource public FSharpSignatureDataB.SteppingMatch02
+{
+  // Offset: 0x00000218 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.SteppingMatch02
 {
-  // Offset: 0x00000220 Length: 0x0000007A
+  // Offset: 0x00000228 Length: 0x0000007A
 }
 .module SteppingMatch02.dll
-// MVID: {59B19213-CAC2-C63D-A745-03831392B159}
+// MVID: {5E172EE8-CAC2-C63D-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01090000
+// Image base: 0x06E60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -59,7 +63,7 @@
              [1] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`2/Choice1Of2 V_1,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`2/Choice2Of2 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch02.fs'
+    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch02.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
index f2ced1b23d2..5dbc80fbea3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch03
 {
-  // Offset: 0x00000000 Length: 0x00000231
+  // Offset: 0x00000000 Length: 0x00000225
+}
+.mresource public FSharpSignatureDataB.SteppingMatch03
+{
+  // Offset: 0x00000230 Length: 0x00000009
 }
 .mresource public FSharpOptimizationData.SteppingMatch03
 {
-  // Offset: 0x00000238 Length: 0x0000007A
+  // Offset: 0x00000240 Length: 0x0000007A
 }
 .module SteppingMatch03.dll
-// MVID: {59B19213-4E87-D110-A745-03831392B159}
+// MVID: {5E172EE8-4E87-D110-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00D00000
+// Image base: 0x07340000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +65,7 @@
              [3] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`3/Choice2Of3 V_3,
              [4] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`3/Choice3Of3 V_4)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch03.fs'
+    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch03.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
index dc909634a1a..2cce90853e3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch04
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch04
 {
-  // Offset: 0x00000000 Length: 0x00000232
+  // Offset: 0x00000000 Length: 0x00000226
+}
+.mresource public FSharpSignatureDataB.SteppingMatch04
+{
+  // Offset: 0x00000230 Length: 0x00000009
 }
 .mresource public FSharpOptimizationData.SteppingMatch04
 {
-  // Offset: 0x00000238 Length: 0x0000007B
+  // Offset: 0x00000240 Length: 0x0000007B
 }
 .module SteppingMatch04.dll
-// MVID: {59B19213-6D4C-8357-A745-03831392B159}
+// MVID: {5E172EE8-6D4C-8357-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02770000
+// Image base: 0x05030000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +65,7 @@
              [3] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`3/Choice3Of3 V_3,
              [4] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`3/Choice1Of3 V_4)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch04.fs'
+    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch04.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
index 8da1f763ae7..b55e53fda35 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch05
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch05
 {
-  // Offset: 0x00000000 Length: 0x00000232
+  // Offset: 0x00000000 Length: 0x00000226
+}
+.mresource public FSharpSignatureDataB.SteppingMatch05
+{
+  // Offset: 0x00000230 Length: 0x00000009
 }
 .mresource public FSharpOptimizationData.SteppingMatch05
 {
-  // Offset: 0x00000238 Length: 0x0000007B
+  // Offset: 0x00000240 Length: 0x0000007B
 }
 .module SteppingMatch05.dll
-// MVID: {59B19213-30E9-4ADA-A745-03831392B159}
+// MVID: {5E172EE8-30E9-4ADA-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02FF0000
+// Image base: 0x04F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +65,7 @@
              [3] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`3/Choice2Of3 V_3,
              [4] class [FSharp.Core]Microsoft.FSharp.Core.FSharpChoice`3/Choice1Of3 V_4)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch05.fs'
+    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch05.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
index 078b8cd73e3..7f698c780df 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch06
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch06
 {
-  // Offset: 0x00000000 Length: 0x0000067D
+  // Offset: 0x00000000 Length: 0x0000066D
+}
+.mresource public FSharpSignatureDataB.SteppingMatch06
+{
+  // Offset: 0x00000678 Length: 0x0000007D
 }
 .mresource public FSharpOptimizationData.SteppingMatch06
 {
-  // Offset: 0x00000688 Length: 0x000001D9
+  // Offset: 0x00000700 Length: 0x000001D9
+}
+.mresource public FSharpOptimizationDataB.SteppingMatch06
+{
+  // Offset: 0x000008E0 Length: 0x0000002A
 }
 .module SteppingMatch06.dll
-// MVID: {59B19213-4FAE-FD21-A745-03831392B159}
+// MVID: {5E172EE8-4FAE-FD21-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x028F0000
+// Image base: 0x069B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -210,7 +218,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch06.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch06.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
index a897b0908a0..1af0d6ccf76 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch07
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch07
 {
-  // Offset: 0x00000000 Length: 0x0000067D
+  // Offset: 0x00000000 Length: 0x0000066D
+}
+.mresource public FSharpSignatureDataB.SteppingMatch07
+{
+  // Offset: 0x00000678 Length: 0x0000007D
 }
 .mresource public FSharpOptimizationData.SteppingMatch07
 {
-  // Offset: 0x00000688 Length: 0x000001D9
+  // Offset: 0x00000700 Length: 0x000001D9
+}
+.mresource public FSharpOptimizationDataB.SteppingMatch07
+{
+  // Offset: 0x000008E0 Length: 0x0000002A
 }
 .module SteppingMatch07.dll
-// MVID: {59B19213-D373-07F3-A745-03831392B159}
+// MVID: {5E172EE8-D373-07F3-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03330000
+// Image base: 0x065C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -210,7 +218,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch07.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch07.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
index 5d87f08136f..6b13007efbf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch08
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch08
 {
-  // Offset: 0x00000000 Length: 0x000001DF
+  // Offset: 0x00000000 Length: 0x000001DB
+}
+.mresource public FSharpSignatureDataB.SteppingMatch08
+{
+  // Offset: 0x000001E0 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.SteppingMatch08
 {
   // Offset: 0x000001E8 Length: 0x00000079
 }
 .module SteppingMatch08.dll
-// MVID: {59B19213-F238-BA3A-A745-03831392B159}
+// MVID: {5E172EE8-F238-BA3A-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00C70000
+// Image base: 0x056B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  3
     .locals init ([0] int32 b)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch08.fs'
+    .line 5,5 : 9,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch08.fs'
     IL_0000:  ldarg.0
     IL_0001:  switch     ( 
                           IL_000c)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
index 5baef73c908..39c3f3fb590 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly SteppingMatch09
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch09
 {
-  // Offset: 0x00000000 Length: 0x00000318
+  // Offset: 0x00000000 Length: 0x0000030C
+}
+.mresource public FSharpSignatureDataB.SteppingMatch09
+{
+  // Offset: 0x00000310 Length: 0x00000013
 }
 .mresource public FSharpOptimizationData.SteppingMatch09
 {
-  // Offset: 0x00000320 Length: 0x000000EB
+  // Offset: 0x00000328 Length: 0x000000EB
 }
 .module SteppingMatch09.dll
-// MVID: {59B19213-4935-D6AC-A745-03831392B159}
+// MVID: {5E172EE8-4935-D6AC-A745-0383E82E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00390000
+// Image base: 0x05AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -112,7 +116,7 @@
       .maxstack  6
       .locals init ([0] class SteppingMatch09/GenericInner@15 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 16,16 : 6,21 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch09.fs'
+      .line 16,16 : 6,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SteppingMatch\\SteppingMatch09.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      class SteppingMatch09/GenericInner@15 class SteppingMatch09/GenericInner@15T::self0@
       IL_0006:  stloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl
index 6a80341afe9..b1ba5f7ff5d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction1
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction1
 {
-  // Offset: 0x00000000 Length: 0x000001CA
+  // Offset: 0x00000000 Length: 0x000001C6
+}
+.mresource public FSharpSignatureDataB.TestFunction1
+{
+  // Offset: 0x000001D0 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.TestFunction1
 {
-  // Offset: 0x000001D0 Length: 0x00000070
+  // Offset: 0x000001D8 Length: 0x00000070
 }
 .module TestFunction1.exe
-// MVID: {59B19208-65FC-8929-A745-03830892B159}
+// MVID: {5E172EE9-65FC-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03230000
+// Image base: 0x069B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction1.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction1.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl
index 868ca11e97b..a1c2c866b17 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction10
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction10
 {
-  // Offset: 0x00000000 Length: 0x000001C9
+  // Offset: 0x00000000 Length: 0x000001C5
+}
+.mresource public FSharpSignatureDataB.TestFunction10
+{
+  // Offset: 0x000001D0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction10
 {
-  // Offset: 0x000001D0 Length: 0x00000072
+  // Offset: 0x000001D8 Length: 0x00000072
 }
 .module TestFunction10.exe
-// MVID: {59B199CC-A624-44FB-A745-0383CC99B159}
+// MVID: {5E172EE9-A624-44FB-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00DA0000
+// Image base: 0x05680000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +65,7 @@
              [2] int32 y,
              [3] int32 x)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction10.fs'
+    .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction10.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.1
     IL_0002:  newobj     instance void class [mscorlib]System.Tuple`2::.ctor(!0,
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
index a23943d01bf..715397bf45f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction13
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction13
 {
-  // Offset: 0x00000000 Length: 0x0000020F
+  // Offset: 0x00000000 Length: 0x00000203
+}
+.mresource public FSharpSignatureDataB.TestFunction13
+{
+  // Offset: 0x00000208 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.TestFunction13
 {
   // Offset: 0x00000218 Length: 0x00000072
 }
 .module TestFunction13.exe
-// MVID: {59B199CC-A624-451C-A745-0383CC99B159}
+// MVID: {5E172EE9-A624-451C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01000000
+// Image base: 0x057C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     // Code size       30 (0x1e)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,16 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction13.fs'
+    .line 5,5 : 5,16 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction13.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.0
     IL_0002:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl
index a139e414063..e57bd3bedf4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction14
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction14
 {
-  // Offset: 0x00000000 Length: 0x000001EA
+  // Offset: 0x00000000 Length: 0x000001E6
+}
+.mresource public FSharpSignatureDataB.TestFunction14
+{
+  // Offset: 0x000001F0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction14
 {
-  // Offset: 0x000001F0 Length: 0x00000072
+  // Offset: 0x000001F8 Length: 0x00000072
 }
 .module TestFunction14.exe
-// MVID: {59B19208-A624-4587-A745-03830892B159}
+// MVID: {5E172EE9-A624-4587-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x006B0000
+// Image base: 0x04E50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +76,7 @@
       // Code size       10 (0xa)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 24,27 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction14.fs'
+      .line 5,5 : 24,27 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction14.fs'
       IL_0000:  ldarg.1
       IL_0001:  ldc.i4.2
       IL_0002:  tail.
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
index 35254e97c34..911dac5fe28 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction16
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction16
 {
-  // Offset: 0x00000000 Length: 0x00000693
+  // Offset: 0x00000000 Length: 0x00000683
+}
+.mresource public FSharpSignatureDataB.TestFunction16
+{
+  // Offset: 0x00000688 Length: 0x0000007F
 }
 .mresource public FSharpOptimizationData.TestFunction16
 {
-  // Offset: 0x00000698 Length: 0x000001CD
+  // Offset: 0x00000710 Length: 0x000001CD
+}
+.mresource public FSharpOptimizationDataB.TestFunction16
+{
+  // Offset: 0x000008E8 Length: 0x0000002A
 }
 .module TestFunction16.exe
-// MVID: {59B199CC-A624-45C5-A745-0383CC99B159}
+// MVID: {5E172EE9-A624-45C5-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01940000
+// Image base: 0x04E90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -186,7 +194,7 @@
                [7] int32 V_7,
                [8] int32 V_8)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction16.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction16.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
index cc502982e7b..dadc8afd4ee 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction17
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction17
 {
-  // Offset: 0x00000000 Length: 0x0000067E
+  // Offset: 0x00000000 Length: 0x0000066E
+}
+.mresource public FSharpSignatureDataB.TestFunction17
+{
+  // Offset: 0x00000678 Length: 0x0000007E
 }
 .mresource public FSharpOptimizationData.TestFunction17
 {
-  // Offset: 0x00000688 Length: 0x000001CD
+  // Offset: 0x00000700 Length: 0x000001CD
+}
+.mresource public FSharpOptimizationDataB.TestFunction17
+{
+  // Offset: 0x000008D8 Length: 0x0000002A
 }
 .module TestFunction17.exe
-// MVID: {59B199CC-A624-45A8-A745-0383CC99B159}
+// MVID: {5E172EE9-A624-45A8-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x027C0000
+// Image base: 0x06F60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -129,7 +137,7 @@
                [5] int32 V_5,
                [6] int32 V_6)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction17.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction17.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl
index f5468bf0fd6..cce7c1e9bd0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction19
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction19
 {
-  // Offset: 0x00000000 Length: 0x00000352
+  // Offset: 0x00000000 Length: 0x0000034E
+}
+.mresource public FSharpSignatureDataB.TestFunction19
+{
+  // Offset: 0x00000358 Length: 0x00000021
 }
 .mresource public FSharpOptimizationData.TestFunction19
 {
-  // Offset: 0x00000358 Length: 0x00000100
+  // Offset: 0x00000380 Length: 0x00000100
+}
+.mresource public FSharpOptimizationDataB.TestFunction19
+{
+  // Offset: 0x00000488 Length: 0x0000000E
 }
 .module TestFunction19.exe
-// MVID: {59B19208-A624-46AE-A745-03830892B159}
+// MVID: {5E172EE9-A624-46AE-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x016D0000
+// Image base: 0x06BC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +72,7 @@
       // Code size       23 (0x17)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction19.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction19.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl
index 5b65668cd8c..4d3dbfa0114 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction20
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction20
 {
-  // Offset: 0x00000000 Length: 0x00000393
+  // Offset: 0x00000000 Length: 0x0000038F
+}
+.mresource public FSharpSignatureDataB.TestFunction20
+{
+  // Offset: 0x00000398 Length: 0x00000026
 }
 .mresource public FSharpOptimizationData.TestFunction20
 {
-  // Offset: 0x00000398 Length: 0x00000100
+  // Offset: 0x000003C8 Length: 0x00000100
+}
+.mresource public FSharpOptimizationDataB.TestFunction20
+{
+  // Offset: 0x000004D0 Length: 0x0000000E
 }
 .module TestFunction20.exe
-// MVID: {59B19208-A643-44FB-A745-03830892B159}
+// MVID: {5E172EE9-A643-44FB-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01320000
+// Image base: 0x06F00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +74,7 @@
       .locals init ([0] int32 z,
                [1] int32 w)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction20.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction20.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
index 30b59304c56..6ee932c09a7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction21
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction21
 {
-  // Offset: 0x00000000 Length: 0x00000685
+  // Offset: 0x00000000 Length: 0x00000675
+}
+.mresource public FSharpSignatureDataB.TestFunction21
+{
+  // Offset: 0x00000680 Length: 0x0000007E
 }
 .mresource public FSharpOptimizationData.TestFunction21
 {
-  // Offset: 0x00000690 Length: 0x000001CD
+  // Offset: 0x00000708 Length: 0x000001CD
+}
+.mresource public FSharpOptimizationDataB.TestFunction21
+{
+  // Offset: 0x000008E0 Length: 0x0000002A
 }
 .module TestFunction21.exe
-// MVID: {59B19208-A643-45E6-A745-03830892B159}
+// MVID: {5E172EE9-A643-45E6-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00F80000
+// Image base: 0x05720000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -186,7 +194,7 @@
                [7] int32 V_7,
                [8] int32 V_8)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction21.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction21.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
index fffbcac4e2f..660f8639b94 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction23
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction23
 {
-  // Offset: 0x00000000 Length: 0x00000346
+  // Offset: 0x00000000 Length: 0x0000033A
+}
+.mresource public FSharpSignatureDataB.TestFunction23
+{
+  // Offset: 0x00000340 Length: 0x0000001C
 }
 .mresource public FSharpOptimizationData.TestFunction23
 {
-  // Offset: 0x00000350 Length: 0x000000E3
+  // Offset: 0x00000360 Length: 0x000000E3
+}
+.mresource public FSharpOptimizationDataB.TestFunction23
+{
+  // Offset: 0x00000448 Length: 0x00000008
 }
 .module TestFunction23.exe
-// MVID: {59B19208-A643-451C-A745-03830892B159}
+// MVID: {5E172EE9-A643-451C-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02D60000
+// Image base: 0x05940000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +71,7 @@
       // Code size       31 (0x1f)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction23.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction23.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
index bdbd5f41fc7..09467e000a1 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction24
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.TestFunction24
 {
-  // Offset: 0x00000000 Length: 0x0000075B
+  // Offset: 0x00000000 Length: 0x0000074B
+}
+.mresource public FSharpSignatureDataB.TestFunction24
+{
+  // Offset: 0x00000750 Length: 0x0000008A
 }
 .mresource public FSharpOptimizationData.TestFunction24
 {
-  // Offset: 0x00000760 Length: 0x00000228
+  // Offset: 0x000007E0 Length: 0x00000228
+}
+.mresource public FSharpOptimizationDataB.TestFunction24
+{
+  // Offset: 0x00000A10 Length: 0x0000002A
 }
 .module TestFunction24.exe
-// MVID: {59B19208-A643-4587-A745-03830892B159}
+// MVID: {5E172EE9-A643-4587-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01080000
+// Image base: 0x06910000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -151,7 +159,7 @@
                [5] int32 V_5,
                [6] int32 V_6)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction24.fs'
+      .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction24.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldnull
       IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl
index d543e2e48bb..583cc50e989 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction3b
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction3b
 {
-  // Offset: 0x00000000 Length: 0x00000200
+  // Offset: 0x00000000 Length: 0x000001FC
+}
+.mresource public FSharpSignatureDataB.TestFunction3b
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction3b
 {
-  // Offset: 0x00000208 Length: 0x0000008A
+  // Offset: 0x00000210 Length: 0x0000008A
 }
 .module TestFunction3b.exe
-// MVID: {59B19208-A662-4FC9-A745-03830892B159}
+// MVID: {5E172EE9-A662-4FC9-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x06E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3b.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3b.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
index dc790e1200b..7f7e50e44c2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction3c
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction3c
 {
-  // Offset: 0x00000000 Length: 0x00000200
+  // Offset: 0x00000000 Length: 0x000001FC
+}
+.mresource public FSharpSignatureDataB.TestFunction3c
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction3c
 {
-  // Offset: 0x00000208 Length: 0x0000008A
+  // Offset: 0x00000210 Length: 0x0000008A
 }
 .module TestFunction3c.exe
-// MVID: {59B19208-A662-4FAC-A745-03830892B159}
+// MVID: {5E172EE9-A662-4FAC-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02B20000
+// Image base: 0x00BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3c.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3c.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
index a92010a91c4..2c26fddbff7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction9b4
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction9b4
 {
-  // Offset: 0x00000000 Length: 0x0000024C
+  // Offset: 0x00000000 Length: 0x00000240
+}
+.mresource public FSharpSignatureDataB.TestFunction9b4
+{
+  // Offset: 0x00000248 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction9b4
 {
-  // Offset: 0x00000250 Length: 0x00000085
+  // Offset: 0x00000258 Length: 0x00000085
 }
 .module TestFunction9b4.exe
-// MVID: {5B17FC67-A091-56C1-A745-038367FC175B}
+// MVID: {5E172EE9-A091-56C1-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026C0000
+// Image base: 0x00BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -58,7 +62,7 @@
     .maxstack  3
     .locals init ([0] !!a V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 8,8 : 12,16 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b4.fs'
+    .line 8,8 : 12,16 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b4.fs'
     IL_0000:  ldloc.0
     IL_0001:  ret
   } // end of method TestFunction9b4::Null
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl
index 5fc9397c162..2f582c9d70f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction11
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction11
 {
-  // Offset: 0x00000000 Length: 0x000001E8
+  // Offset: 0x00000000 Length: 0x000001E4
+}
+.mresource public FSharpSignatureDataB.TestFunction11
+{
+  // Offset: 0x000001E8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction11
 {
   // Offset: 0x000001F0 Length: 0x00000072
 }
 .module TestFunction11.exe
-// MVID: {59B19208-A624-45E6-A745-03830892B159}
+// MVID: {5E172EE9-A624-45E6-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01080000
+// Image base: 0x05160000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     // Code size       30 (0x1e)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,27 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction11.fs'
+    .line 5,5 : 5,27 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction11.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.0
     IL_0002:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl
index 2f7b3efff8e..b9f94f0cfc3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction12
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction12
 {
-  // Offset: 0x00000000 Length: 0x000001DB
+  // Offset: 0x00000000 Length: 0x000001D7
+}
+.mresource public FSharpSignatureDataB.TestFunction12
+{
+  // Offset: 0x000001E0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction12
 {
-  // Offset: 0x000001E0 Length: 0x00000072
+  // Offset: 0x000001E8 Length: 0x00000072
 }
 .module TestFunction12.exe
-// MVID: {59B19208-A624-4539-A745-03830892B159}
+// MVID: {5E172EE9-A624-4539-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x04EF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction12.fs'
+    .line 5,5 : 5,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction12.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldarg.0
     IL_0002:  add
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl
index ae9215ad18e..d15bf2944bf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction15
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction15
 {
-  // Offset: 0x00000000 Length: 0x000001EA
+  // Offset: 0x00000000 Length: 0x000001E6
+}
+.mresource public FSharpSignatureDataB.TestFunction15
+{
+  // Offset: 0x000001F0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction15
 {
-  // Offset: 0x000001F0 Length: 0x00000072
+  // Offset: 0x000001F8 Length: 0x00000072
 }
 .module TestFunction15.exe
-// MVID: {59B19208-A624-4662-A745-03830892B159}
+// MVID: {5E172EE9-A624-4662-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02B10000
+// Image base: 0x06B50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +76,7 @@
       // Code size       4 (0x4)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 6,6 : 35,40 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction15.fs'
+      .line 6,6 : 35,40 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction15.fs'
       IL_0000:  ldarg.1
       IL_0001:  ldc.i4.1
       IL_0002:  add
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
index 80848608547..7af2e22b838 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction18
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction18
 {
-  // Offset: 0x00000000 Length: 0x000001ED
+  // Offset: 0x00000000 Length: 0x000001E1
+}
+.mresource public FSharpSignatureDataB.TestFunction18
+{
+  // Offset: 0x000001E8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction18
 {
-  // Offset: 0x000001F8 Length: 0x00000072
+  // Offset: 0x000001F0 Length: 0x00000072
 }
 .module TestFunction18.exe
-// MVID: {59B19208-A624-4603-A745-03830892B159}
+// MVID: {5E172EE9-A624-4603-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x019B0000
+// Image base: 0x06DC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       11 (0xb)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,38 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction18.fs'
+    .line 5,5 : 5,38 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction18.fs'
     IL_0000:  ldstr      "hello"
     IL_0005:  call       void [mscorlib]System.Console::WriteLine(string)
     IL_000a:  ret
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl
index 92ec82161db..75931b4de0d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction2
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction2
 {
-  // Offset: 0x00000000 Length: 0x000001FD
+  // Offset: 0x00000000 Length: 0x000001F9
+}
+.mresource public FSharpSignatureDataB.TestFunction2
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction2
 {
-  // Offset: 0x00000208 Length: 0x00000088
+  // Offset: 0x00000210 Length: 0x00000088
 }
 .module TestFunction2.exe
-// MVID: {59B19208-661D-8929-A745-03830892B159}
+// MVID: {5E172EE9-661D-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x00B50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction2.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction2.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl
index 3c7a947a3b4..9f81a1be9e7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22
 {
-  // Offset: 0x00000000 Length: 0x0000015B
+  // Offset: 0x00000000 Length: 0x00000157
 }
 .mresource public FSharpOptimizationData.Testfunction22
 {
   // Offset: 0x00000160 Length: 0x00000055
 }
 .module Testfunction22.exe
-// MVID: {59B199CC-5AA3-4518-A745-0383CC99B159}
+// MVID: {5E172EE9-5AA3-4518-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x06940000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       6 (0x6)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 1,27 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22.fs'
+    .line 3,3 : 1,27 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22.fs'
     IL_0000:  call       void [mscorlib]System.Console::WriteLine()
     IL_0005:  ret
   } // end of method $Testfunction22::main@
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl
index ac3e76f8f2e..eb6f4e5f165 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22b
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22b
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22b
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22b.exe
-// MVID: {59B19208-8504-18B7-A745-03830892B159}
+// MVID: {5E172EE9-8504-18B7-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x00A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       6 (0x6)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,35 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22b.fs'
+    .line 3,3 : 9,35 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22b.fs'
     IL_0000:  call       void [mscorlib]System.Console::WriteLine()
     IL_0005:  ret
   } // end of method $Testfunction22b::main@
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl
index e5640da7b20..f4af3fd91a3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22c
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22c
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22c
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22c.exe
-// MVID: {59B19208-459D-3DF8-A745-03830892B159}
+// MVID: {5E172EE9-459D-3DF8-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03000000
+// Image base: 0x06E00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       6 (0x6)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 10,36 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22c.fs'
+    .line 3,3 : 10,36 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22c.fs'
     IL_0000:  call       void [mscorlib]System.Console::WriteLine()
     IL_0005:  ret
   } // end of method $Testfunction22c::main@
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl
index 06dc2c7b954..f07f8d59a71 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22d
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22d
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22d
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22d.exe
-// MVID: {59B19208-FDCA-89B1-A745-03830892B159}
+// MVID: {5E172EE9-FDCA-89B1-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00720000
+// Image base: 0x06E70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       6 (0x6)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 4,30 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22d.fs'
+    .line 3,3 : 4,30 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22d.fs'
     IL_0000:  call       void [mscorlib]System.Console::WriteLine()
     IL_0005:  ret
   } // end of method $Testfunction22d::main@
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl
index ed2dae30740..ee505ba231a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22e
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22e
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22e
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22e.exe
-// MVID: {59B19208-C83B-1CB9-A745-03830892B159}
+// MVID: {5E172EE9-C83B-1CB9-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x06C70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       12 (0xc)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 1,11 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22e.fs'
+    .line 3,3 : 1,11 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22e.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  brfalse.s  IL_000b
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
index 2dd07a07bb2..b143dedc64a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22f
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22f
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22f
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22f.exe
-// MVID: {59B19208-C040-2523-A745-03830892B159}
+// MVID: {5E172EE9-C040-2523-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x012C0000
+// Image base: 0x05030000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -67,7 +67,7 @@
     .maxstack  4
     .locals init ([0] string V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 1,15 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22f.fs'
+    .line 3,3 : 1,15 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22f.fs'
     IL_0000:  ldstr      "A"
     IL_0005:  stloc.0
     IL_0006:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl
index 629593f6e0a..0d44c25cc2c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22g
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22g
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22g
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22g.exe
-// MVID: {59B19208-CA89-74DB-A745-03830892B159}
+// MVID: {5E172EE9-CA89-74DB-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x012F0000
+// Image base: 0x00B70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       22 (0x16)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 1,13 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22g.fs'
+    .line 3,3 : 1,13 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22g.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  brfalse.s  IL_0005
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl
index 7fcae895abd..b43d454eef8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Testfunction22h
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22h
 {
-  // Offset: 0x00000000 Length: 0x0000015D
+  // Offset: 0x00000000 Length: 0x00000159
 }
 .mresource public FSharpOptimizationData.Testfunction22h
 {
-  // Offset: 0x00000168 Length: 0x00000056
+  // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22h.exe
-// MVID: {59B19208-0266-39F6-A745-03830892B159}
+// MVID: {5E172EE9-0266-39F6-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00370000
+// Image base: 0x066E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -68,7 +68,7 @@
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.Unit V_0,
              [1] class [mscorlib]System.Exception V_1)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 4,30 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22h.fs'
+    .line 4,4 : 4,30 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22h.fs'
     .try
     {
       IL_0000:  call       void [mscorlib]System.Console::WriteLine()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl
index 2a64c727d05..5dcd2b82863 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction3
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction3
 {
-  // Offset: 0x00000000 Length: 0x000001FD
+  // Offset: 0x00000000 Length: 0x000001F9
+}
+.mresource public FSharpSignatureDataB.TestFunction3
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction3
 {
-  // Offset: 0x00000208 Length: 0x00000088
+  // Offset: 0x00000210 Length: 0x00000088
 }
 .module TestFunction3.exe
-// MVID: {59B19208-663A-8929-A745-03830892B159}
+// MVID: {5E172EE9-663A-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x013E0000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl
index 0b9818bebb3..7f61c60ec26 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction4
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction4
 {
-  // Offset: 0x00000000 Length: 0x000001FD
+  // Offset: 0x00000000 Length: 0x000001F9
+}
+.mresource public FSharpSignatureDataB.TestFunction4
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction4
 {
-  // Offset: 0x00000208 Length: 0x00000088
+  // Offset: 0x00000210 Length: 0x00000088
 }
 .module TestFunction4.exe
-// MVID: {59B19208-665B-8929-A745-03830892B159}
+// MVID: {5E172EE9-665B-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x026C0000
+// Image base: 0x05670000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction4.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction4.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl
index fb983f1af1e..a94a6c3d37b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction5
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction5
 {
-  // Offset: 0x00000000 Length: 0x000001FD
+  // Offset: 0x00000000 Length: 0x000001F9
+}
+.mresource public FSharpSignatureDataB.TestFunction5
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction5
 {
-  // Offset: 0x00000208 Length: 0x00000088
+  // Offset: 0x00000210 Length: 0x00000088
 }
 .module TestFunction5.exe
-// MVID: {59B19208-6570-8929-A745-03830892B159}
+// MVID: {5E172EE9-6570-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010A0000
+// Image base: 0x06EC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction5.fs'
+    .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction5.fs'
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl
index dcb8a71396b..03ea295784b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction6
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction6
 {
-  // Offset: 0x00000000 Length: 0x00000205
+  // Offset: 0x00000000 Length: 0x000001F9
+}
+.mresource public FSharpSignatureDataB.TestFunction6
+{
+  // Offset: 0x00000200 Length: 0x00000006
 }
 .mresource public FSharpOptimizationData.TestFunction6
 {
   // Offset: 0x00000210 Length: 0x00000088
 }
 .module TestFunction6.exe
-// MVID: {5B17FC67-6591-8929-A745-038367FC175B}
+// MVID: {5E172EE9-6591-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03360000
+// Image base: 0x04F50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -73,7 +77,7 @@
       .maxstack  6
       .locals init ([0] int32 y)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 11,11 : 8,31 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction6.fs'
+      .line 11,11 : 8,31 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction6.fs'
       IL_0000:  call       int32 TestFunction6::TestFunction1()
       IL_0005:  stloc.0
       .line 12,12 : 8,23 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl
index a9af9b236e4..519884b0e16 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction7
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction7
 {
-  // Offset: 0x00000000 Length: 0x000001BF
+  // Offset: 0x00000000 Length: 0x000001BB
+}
+.mresource public FSharpSignatureDataB.TestFunction7
+{
+  // Offset: 0x000001C0 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.TestFunction7
 {
   // Offset: 0x000001C8 Length: 0x00000070
 }
 .module TestFunction7.exe
-// MVID: {59B19208-65AE-8929-A745-03830892B159}
+// MVID: {5E172EE9-65AE-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00E30000
+// Image base: 0x05860000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  4
     .locals init ([0] int32 r)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,22 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction7.fs'
+    .line 5,5 : 5,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction7.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     .line 6,6 : 5,16 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl
index 328e4809402..4db474cc748 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction8
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction8
 {
-  // Offset: 0x00000000 Length: 0x000001C8
+  // Offset: 0x00000000 Length: 0x000001C4
+}
+.mresource public FSharpSignatureDataB.TestFunction8
+{
+  // Offset: 0x000001C8 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.TestFunction8
 {
   // Offset: 0x000001D0 Length: 0x00000070
 }
 .module TestFunction8.exe
-// MVID: {59B19208-65CF-8929-A745-03830892B159}
+// MVID: {5E172EE9-65CF-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01010000
+// Image base: 0x056C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       16 (0x10)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,18 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction8.fs'
+    .line 5,5 : 5,18 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction8.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.3
     IL_0002:  ble.s      IL_0006
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl
index b7e4921fdc3..b5e1f1b9a87 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction9
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction9
 {
-  // Offset: 0x00000000 Length: 0x000001D6
+  // Offset: 0x00000000 Length: 0x000001D2
+}
+.mresource public FSharpSignatureDataB.TestFunction9
+{
+  // Offset: 0x000001D8 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.TestFunction9
 {
   // Offset: 0x000001E0 Length: 0x00000070
 }
 .module TestFunction9.exe
-// MVID: {59B19208-64F4-8929-A745-03830892B159}
+// MVID: {5E172EE9-64F4-8929-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x016E0000
+// Image base: 0x00BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +60,7 @@
     // Code size       40 (0x28)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9.fs'
+    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.3
     IL_0002:  sub
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl
index a4168bde720..cb14e633848 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction9b
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction9b
 {
-  // Offset: 0x00000000 Length: 0x000001F6
+  // Offset: 0x00000000 Length: 0x000001F2
+}
+.mresource public FSharpSignatureDataB.TestFunction9b
+{
+  // Offset: 0x000001F8 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction9b
 {
   // Offset: 0x00000200 Length: 0x00000072
 }
 .module TestFunction9b.exe
-// MVID: {59B19208-A52C-4FC9-A745-03830892B159}
+// MVID: {5E172EE9-A52C-4FC9-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01AA0000
+// Image base: 0x00BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -69,7 +73,7 @@
              [11] int32 V_11,
              [12] int32 V_12)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b.fs'
+    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl
index 28857893620..0044e07c896 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction9b1
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction9b1
 {
-  // Offset: 0x00000000 Length: 0x00000208
+  // Offset: 0x00000000 Length: 0x00000204
+}
+.mresource public FSharpSignatureDataB.TestFunction9b1
+{
+  // Offset: 0x00000208 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction9b1
 {
   // Offset: 0x00000210 Length: 0x00000083
 }
 .module TestFunction9b1.exe
-// MVID: {59B19208-A406-DAF4-A745-03830892B159}
+// MVID: {5E172EE9-A406-DAF4-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02730000
+// Image base: 0x06F00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -69,7 +73,7 @@
              [11] int32 V_11,
              [12] int32 V_12)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b1.fs'
+    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b1.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl
index 005b49c3081..96c84014e70 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction9b2
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction9b2
 {
-  // Offset: 0x00000000 Length: 0x00000208
+  // Offset: 0x00000000 Length: 0x00000204
+}
+.mresource public FSharpSignatureDataB.TestFunction9b2
+{
+  // Offset: 0x00000208 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction9b2
 {
   // Offset: 0x00000210 Length: 0x00000083
 }
 .module TestFunction9b2.exe
-// MVID: {59B19208-9C0B-E35E-A745-03830892B159}
+// MVID: {5E172EE9-9C0B-E35E-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00730000
+// Image base: 0x06F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -69,7 +73,7 @@
              [11] int32 V_11,
              [12] int32 V_12)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b2.fs'
+    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b2.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl
index dc4f68ffb80..c8fc0f585ac 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TestFunction9b3
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TestFunction9b3
 {
-  // Offset: 0x00000000 Length: 0x00000208
+  // Offset: 0x00000000 Length: 0x00000204
+}
+.mresource public FSharpSignatureDataB.TestFunction9b3
+{
+  // Offset: 0x00000208 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.TestFunction9b3
 {
   // Offset: 0x00000210 Length: 0x00000083
 }
 .module TestFunction9b3.exe
-// MVID: {59B19208-C1A4-612A-A745-03830892B159}
+// MVID: {5E172EE9-C1A4-612A-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00680000
+// Image base: 0x05230000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -69,7 +73,7 @@
              [11] int32 V_11,
              [12] int32 V_12)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b3.fs'
+    .line 5,5 : 5,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction9b3.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl
index 4474ab67ae3..4cfa4c873fd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:6:0:0
+  .ver 4:7:0:0
 }
 .assembly OptionalArg01
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.OptionalArg01
 {
-  // Offset: 0x00000000 Length: 0x00000466
+  // Offset: 0x00000000 Length: 0x0000045A
+}
+.mresource public FSharpSignatureDataB.OptionalArg01
+{
+  // Offset: 0x00000460 Length: 0x00000030
 }
 .mresource public FSharpOptimizationData.OptionalArg01
 {
-  // Offset: 0x00000470 Length: 0x00000445
+  // Offset: 0x00000498 Length: 0x00000445
+}
+.mresource public FSharpOptimizationDataB.OptionalArg01
+{
+  // Offset: 0x000008E8 Length: 0x00000039
 }
 .module OptionalArg01.exe
-// MVID: {5CB489E1-4F48-B5AF-A745-0383E189B45C}
+// MVID: {5E172EE9-4F48-B5AF-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x067B0000
+// Image base: 0x07070000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +69,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\OptionalArg01.fs'
+      .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\OptionalArg01.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl
index 36d04a11dc5..41c2675e53d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple01
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple01
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple01.exe
-// MVID: {59B19208-6FDB-3E0B-A745-03830892B159}
+// MVID: {5E172EE9-6FDB-3E0B-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x051A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +62,7 @@
     // Code size       1 (0x1)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,10 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple01.fs'
+    .line 3,3 : 9,10 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple01.fs'
     IL_0000:  ret
   } // end of method $Tuple01::main@
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl
index a668638daa3..cd04e5b9c84 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple02
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple02
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple02
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple02.exe
-// MVID: {59B19208-ECCC-7D58-A745-03830892B159}
+// MVID: {5E172EE9-ECCC-7D58-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02C00000
+// Image base: 0x05620000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,12 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple02.fs'
+    .line 3,3 : 9,12 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple02.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  newobj     instance void class [mscorlib]System.Tuple`2::.ctor(!0,
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl
index db8af4b0cfa..6ee3041c00d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple03
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple03
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple03
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple03.exe
-// MVID: {59B19208-AD65-A299-A745-03830892B159}
+// MVID: {5E172EE9-AD65-A299-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00AF0000
+// Image base: 0x05540000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       10 (0xa)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,14 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple03.fs'
+    .line 3,3 : 9,14 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple03.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl
index a35c62c665d..0a248cbd7d6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple04
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple04
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple04
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple04.exe
-// MVID: {59B19208-6A2E-9E97-A745-03830892B159}
+// MVID: {5E172EE9-6A2E-9E97-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x001E0000
+// Image base: 0x06A60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       11 (0xb)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,16 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple04.fs'
+    .line 3,3 : 9,16 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple04.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl
index 07388eb7f39..03cab27231b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple05
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple05
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple05
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple05.exe
-// MVID: {59B19208-349F-319F-A745-03830892B159}
+// MVID: {5E172EE9-349F-319F-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00730000
+// Image base: 0x064E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       12 (0xc)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,18 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple05.fs'
+    .line 3,3 : 9,18 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple05.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl
index adbe519a887..11f513347a2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple06
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple06
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple06
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple06.exe
-// MVID: {59B19208-67E0-4675-A745-03830892B159}
+// MVID: {5E172EE9-67E0-4675-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02A20000
+// Image base: 0x06BC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       13 (0xd)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,20 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple06.fs'
+    .line 3,3 : 9,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple06.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl
index e42f75990a8..79065231c12 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple07
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple07
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple07
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple07.exe
-// MVID: {59B19208-7229-962D-A745-03830892B159}
+// MVID: {5E172EE9-7229-962D-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x017A0000
+// Image base: 0x05600000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       14 (0xe)
     .maxstack  9
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,22 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple07.fs'
+    .line 3,3 : 9,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple07.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl
index d029623cf32..dca270786d7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Tuple08
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Tuple08
 {
-  // Offset: 0x00000000 Length: 0x0000013F
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Tuple08
 {
-  // Offset: 0x00000148 Length: 0x0000004E
+  // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple08.exe
-// MVID: {59B19208-E542-67B3-A745-03830892B159}
+// MVID: {5E172EE9-E542-67B3-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00390000
+// Image base: 0x050B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       20 (0x14)
     .maxstack  10
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,24 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\Tuple08.fs'
+    .line 3,3 : 9,24 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\Tuple08.fs'
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.2
     IL_0002:  ldc.i4.3
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
index 8feaefd480e..9087fdc720a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly TupleElimination
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.TupleElimination
 {
-  // Offset: 0x00000000 Length: 0x00000236
+  // Offset: 0x00000000 Length: 0x0000022A
+}
+.mresource public FSharpSignatureDataB.TupleElimination
+{
+  // Offset: 0x00000230 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.TupleElimination
 {
   // Offset: 0x00000240 Length: 0x0000007B
 }
 .module TupleElimination.exe
-// MVID: {5B17FC67-DFDD-92DF-A745-038367FC175B}
+// MVID: {5E172EE9-DFDD-92DF-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02760000
+// Image base: 0x057F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  4
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 15,27 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\TupleElimination.fs'
+    .line 5,5 : 15,27 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\TupleElimination.fs'
     IL_0000:  ldstr      "%A"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,!!a>::.ctor(string)
     IL_000a:  stloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl
index 1626f867b9d..6f2d0089f8b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly TupleMonster
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.TupleMonster
 {
-  // Offset: 0x00000000 Length: 0x00000149
+  // Offset: 0x00000000 Length: 0x00000145
 }
 .mresource public FSharpOptimizationData.TupleMonster
 {
   // Offset: 0x00000150 Length: 0x00000053
 }
 .module TupleMonster.exe
-// MVID: {59B19208-1552-41D8-A745-03830892B159}
+// MVID: {5E172EE9-1552-41D8-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010B0000
+// Image base: 0x06B30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
     // Code size       74 (0x4a)
     .maxstack  28
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,137 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\TupleMonster.fs'
+    .line 3,3 : 9,137 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\TupleMonster.fs'
     IL_0000:  ldc.i4.s   97
     IL_0002:  ldc.i4.s   98
     IL_0004:  ldc.i4.s   99
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl
index 768deb722a1..5bd6576a64b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,12 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:5:0:0
-}
-.assembly extern System.ValueTuple
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 4:0:1:0
+  .ver 4:7:0:0
 }
 .assembly ValueTupleAliasConstructor
 {
@@ -34,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ValueTupleAliasConstructor
 {
-  // Offset: 0x00000000 Length: 0x000001EA
+  // Offset: 0x00000000 Length: 0x000001E0
+}
+.mresource public FSharpSignatureDataB.ValueTupleAliasConstructor
+{
+  // Offset: 0x000001E8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.ValueTupleAliasConstructor
 {
   // Offset: 0x000001F0 Length: 0x00000061
 }
 .module ValueTupleAliasConstructor.exe
-// MVID: {5B9C53DD-A8CF-BB34-A745-0383DD539C5B}
+// MVID: {5E172EE9-A8CF-BB34-A745-0383E92E175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01B00000
+// Image base: 0x06D20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,11 +70,11 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 3,3 : 9,22 'c:\\kevinransom\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Tuples\\ValueTupleAliasConstructor.fs'
+    .line 3,3 : 9,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\ValueTupleAliasConstructor.fs'
     IL_0000:  ldc.i4.2
     IL_0001:  ldc.i4.2
-    IL_0002:  newobj     instance void valuetype [System.ValueTuple]System.ValueTuple`2::.ctor(!0,
-                                                                                                            !1)
+    IL_0002:  newobj     instance void valuetype [mscorlib]System.ValueTuple`2::.ctor(!0,
+                                                                                                   !1)
     IL_0007:  pop
     IL_0008:  ret
   } // end of method $ValueTupleAliasConstructor::main@
diff --git a/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl b/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl
index 54cc47dfc7d..d45a480f910 100644
--- a/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl
@@ -31,10 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001A8
 }
+.mresource public FSharpSignatureDataB.LazyNoInline01
+{
+  // Offset: 0x00000000 Length: 0x000001A8
+}
 .mresource public FSharpOptimizationData.LazyNoInline01
 {
   // Offset: 0x000001B0 Length: 0x00000074
 }
+.mresource public FSharpOptimizationDataB.LazyNoInline01
+{
+  // Offset: 0x000001B0 Length: 0x00000074
+}
 .module LazyNoInline01.exe
 // MVID: {4CDA515D-3328-E592-A745-03835D51DA4C}
 .imagebase 0x00400000
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl
index 2ef3abcd84a..627d723ea7d 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl
@@ -96,6 +96,8 @@ Copyright (c) Microsoft Corporation. All Rights Reserved.
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
+--checknulls[+|-]                        Enable nullness declarations and
+                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl
index 7f0560a46c0..aa3952904d4 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl
@@ -1,4 +1,4 @@
-Microsoft (R) F# Compiler version 11.0.50518.0
+Microsoft (R) F# Compiler version 10.2.3 for F# 4.5
 Copyright (c) Microsoft Corporation. All Rights Reserved.
 
 error FS0207: No inputs specified
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl
index cf97598d925..d4ab9baa531 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl
@@ -47,6 +47,8 @@ Usage: fsharpi  [script.fsx []]
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
+--checknulls[+|-]                        Enable nullness declarations and
+                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
index 230f23f0f92..77e0f3acbf4 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
@@ -1,5 +1,5 @@
 
-Usage: fsi.exe  [script.fsx []]
+Usage: fsiAnyCpu.exe  [script.fsx []]
 
 
 		- INPUT FILES -
@@ -47,6 +47,8 @@ Usage: fsi.exe  [script.fsx []]
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
+--checknulls[+|-]                        Enable nullness declarations and
+                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
index 9e8af92856a..88db1ec8fad 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
@@ -1,7 +1,7 @@
 Microsoft (R) F# Interactive version 10.2.3 for F# 4.5
 Copyright (c) Microsoft Corporation. All Rights Reserved.
 
-Usage: fsi.exe  [script.fsx []]
+Usage: fsiAnyCpu.exe  [script.fsx []]
 
 
 		- INPUT FILES -
@@ -49,6 +49,8 @@ Usage: fsi.exe  [script.fsx []]
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
+--checknulls[+|-]                        Enable nullness declarations and
+                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/Conformance/Expressions/BindingExpressions/Binding/in05.fs b/tests/fsharpqa/Source/Conformance/Expressions/BindingExpressions/Binding/in05.fs
index eaefd989c14..0c386d1676d 100644
--- a/tests/fsharpqa/Source/Conformance/Expressions/BindingExpressions/Binding/in05.fs
+++ b/tests/fsharpqa/Source/Conformance/Expressions/BindingExpressions/Binding/in05.fs
@@ -4,8 +4,8 @@
 // I'm adding these cases to make sure we do not accidentally change the behavior from version to version
 // Eventually, we will deprecated them - and the specs will be updated.
 //The type 'int' does not match the type 'unit'$
-//Type mismatch\. Expecting a.    ''a -> 'b'    .but given a.    ''a -> unit'    .The type 'int' does not match the type 'unit'$
 //The result of this expression has type 'bool' and is implicitly ignored\. Consider using 'ignore' to discard this value explicitly, e\.g\. 'expr \|> ignore', or 'let' to bind the result to a name, e\.g\. 'let result = expr'.$
+
 module E = 
     let a = 3 in
         a + 1 |> ignore
diff --git a/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override02.fsx b/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override02.fsx
index d2eb3f460ae..08eb1ecdafd 100644
--- a/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override02.fsx
+++ b/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override02.fsx
@@ -22,11 +22,11 @@ type T4() =
     inherit CSLib5.B1()
     override x.M(i : int) = 2     // ERROR {expected}
 
-//Cannot override inherited member 'B1::M' because it is sealed$
-//Cannot override inherited member 'B1::M' because it is sealed$
-//Cannot override inherited member 'B1::M' because it is sealed$
+//Cannot override inherited member 'CSLib.B1::M' because it is sealed$
+//Cannot override inherited member 'CSLib2.B1::M' because it is sealed$
+//Cannot override inherited member 'CSLib4.B1::M' because it is sealed$
 //No implementation was given for those members:
 //	'CSLib5\.B0\.M\(c: char, a: int\) : int'
 //	'CSLib5\.B0\.N\(c: char, a: int\) : int'
 //This type is 'abstract' since some abstract members have not been given an implementation\. If this is intentional then add the '\[\]' attribute to your type\.$
-//Cannot override inherited member 'B1::M' because it is sealed$
\ No newline at end of file
+//Cannot override inherited member 'CSLib5.B1::M' because it is sealed$
\ No newline at end of file
diff --git a/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override03.fsx b/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override03.fsx
index 9414401cb12..5767cfa602e 100644
--- a/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override03.fsx
+++ b/tests/fsharpqa/Source/Conformance/ObjectOrientedTypeDefinitions/ClassTypes/MemberDeclarations/E_Sealed_Member_Override03.fsx
@@ -14,5 +14,5 @@ type T2() =
     override x.M(o : obj) = 12
     override x.M(i : int) = 2     // ERROR {expected}
 
-//Cannot override inherited member 'B1::M' because it is sealed$
-//Cannot override inherited member 'B1::M' because it is sealed$
\ No newline at end of file
+//Cannot override inherited member 'CSLib.B1::M' because it is sealed$
+//Cannot override inherited member 'CSLib2.B1::M' because it is sealed$
\ No newline at end of file
diff --git a/tests/fsharpqa/Source/Import/E_SealedMethod.fs b/tests/fsharpqa/Source/Import/E_SealedMethod.fs
index c3e4790d3dd..2abecd67045 100644
--- a/tests/fsharpqa/Source/Import/E_SealedMethod.fs
+++ b/tests/fsharpqa/Source/Import/E_SealedMethod.fs
@@ -1,6 +1,6 @@
 // #Regression #NoMT #Import 
 // Dev11 Bug 90642
-//Cannot override inherited member 'Class2::F' because it is sealed$
+//Cannot override inherited member 'ClassLibrary1.Class2::F' because it is sealed$
 
 type MyClass() =
     inherit ClassLibrary1.Class2()
diff --git a/tests/fsharpqa/Source/Optimizations/CompareIL.cmd b/tests/fsharpqa/Source/Optimizations/CompareIL.cmd
index 0462386d285..0b48c2a26da 100644
--- a/tests/fsharpqa/Source/Optimizations/CompareIL.cmd
+++ b/tests/fsharpqa/Source/Optimizations/CompareIL.cmd
@@ -5,5 +5,12 @@ IF NOT ERRORLEVEL 0 exit 1
 
 echo ..\..\..\testenv\bin\ILComparer.exe "%~n1.il.bsl" "%~n1.il"
 ..\..\..\testenv\bin\ILComparer.exe "%~n1.il.bsl" "%~n1.il"
+
+
+if /i "%TEST_UPDATE_BSL%" == "1" (
+  echo copy /y "%~n1.il" "%~n1.il.bsl"
+  copy /y "%~n1.il" "%~n1.il.bsl"
+)
+
 exit /b %ERRORLEVEL%
 
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
index 38b3a3aa80c..d8b5a12e1e4 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ForEachOnArray01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ForEachOnArray01
 {
-  // Offset: 0x00000000 Length: 0x000001E0
+  // Offset: 0x00000000 Length: 0x000001DC
+}
+.mresource public FSharpSignatureDataB.ForEachOnArray01
+{
+  // Offset: 0x000001E0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ForEachOnArray01
 {
   // Offset: 0x000001E8 Length: 0x0000007C
 }
 .module ForEachOnArray01.dll
-// MVID: {59B18AEE-7E2E-D3AE-A745-0383EE8AB159}
+// MVID: {5E1730A7-7E2E-D3AE-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00D00000
+// Image base: 0x06F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -59,7 +63,7 @@
              [1] int32 V_1,
              [2] int32 x)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 6,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ForEachOnArray01.fs'
+    .line 6,6 : 6,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnArray01.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     .line 7,7 : 6,21 ''
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
index 14d6a854963..b3042358a47 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ForEachOnList01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ForEachOnList01
 {
-  // Offset: 0x00000000 Length: 0x000002ED
+  // Offset: 0x00000000 Length: 0x000002E9
+}
+.mresource public FSharpSignatureDataB.ForEachOnList01
+{
+  // Offset: 0x000002F0 Length: 0x00000016
 }
 .mresource public FSharpOptimizationData.ForEachOnList01
 {
-  // Offset: 0x000002F8 Length: 0x000000DB
+  // Offset: 0x00000310 Length: 0x000000DB
 }
 .module ForEachOnList01.dll
-// MVID: {59B18AEE-56DF-F74F-A745-0383EE8AB159}
+// MVID: {5E1730A7-56DF-F74F-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x054B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +76,7 @@
       // Code size       4 (0x4)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 39,39 : 21,26 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ForEachOnList01.fs'
+      .line 39,39 : 21,26 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnList01.fs'
       IL_0000:  ldarg.1
       IL_0001:  ldc.i4.1
       IL_0002:  add
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
index 0db8de85fcc..a1883132d90 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ForEachOnString01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ForEachOnString01
 {
-  // Offset: 0x00000000 Length: 0x00000354
+  // Offset: 0x00000000 Length: 0x00000350
+}
+.mresource public FSharpSignatureDataB.ForEachOnString01
+{
+  // Offset: 0x00000358 Length: 0x0000001B
 }
 .mresource public FSharpOptimizationData.ForEachOnString01
 {
-  // Offset: 0x00000358 Length: 0x000000FF
+  // Offset: 0x00000378 Length: 0x000000FF
 }
 .module ForEachOnString01.dll
-// MVID: {59B18AEE-105C-852B-A745-0383EE8AB159}
+// MVID: {5E1730A7-105C-852B-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x05680000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -72,7 +76,7 @@
       // Code size       6 (0x6)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 55,55 : 21,39 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ForEachOnString01.fs'
+      .line 55,55 : 21,39 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnString01.fs'
       IL_0000:  ldarg.1
       IL_0001:  conv.i4
       IL_0002:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
index 4dd6df631f0..4902a1b0cdf 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly NoAllocationOfTuple01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.NoAllocationOfTuple01
 {
-  // Offset: 0x00000000 Length: 0x000001E0
+  // Offset: 0x00000000 Length: 0x000001DC
+}
+.mresource public FSharpSignatureDataB.NoAllocationOfTuple01
+{
+  // Offset: 0x000001E0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.NoAllocationOfTuple01
 {
   // Offset: 0x000001E8 Length: 0x00000085
 }
 .module NoAllocationOfTuple01.dll
-// MVID: {59B18AEE-13B5-F699-A745-0383EE8AB159}
+// MVID: {5E1730A7-13B5-F699-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x03460000
+// Image base: 0x05930000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +64,7 @@
              [2] int32 V_2,
              [3] int32 j)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 5,31 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\NoAllocationOfTuple01.fs'
+    .line 6,6 : 5,31 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoAllocationOfTuple01.fs'
     IL_0000:  ldarg.0
     IL_0001:  call       !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::ZeroCreate(int32)
     IL_0006:  stloc.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
index 41dcfaf2ed2..1aa6020c9bb 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly NoIEnumerable01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable01
 {
-  // Offset: 0x00000000 Length: 0x000001D1
+  // Offset: 0x00000000 Length: 0x000001CD
+}
+.mresource public FSharpSignatureDataB.NoIEnumerable01
+{
+  // Offset: 0x000001D8 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.NoIEnumerable01
 {
-  // Offset: 0x000001D8 Length: 0x0000006C
+  // Offset: 0x000001E0 Length: 0x0000006C
 }
 .module NoIEnumerable01.dll
-// MVID: {59B18AEE-31A1-8DCB-A745-0383EE8AB159}
+// MVID: {5E1730A7-31A1-8DCB-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x013E0000
+// Image base: 0x05070000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -59,7 +63,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\NoIEnumerable01.fsx'
+    .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable01.fsx'
     IL_0000:  ldc.i4.1
     IL_0001:  stloc.1
     IL_0002:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
index 12424f0aa91..68961b8d50c 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly NoIEnumerable02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable02
 {
-  // Offset: 0x00000000 Length: 0x000001D1
+  // Offset: 0x00000000 Length: 0x000001CD
+}
+.mresource public FSharpSignatureDataB.NoIEnumerable02
+{
+  // Offset: 0x000001D8 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.NoIEnumerable02
 {
-  // Offset: 0x000001D8 Length: 0x0000006C
+  // Offset: 0x000001E0 Length: 0x0000006C
 }
 .module NoIEnumerable02.dll
-// MVID: {59B18AEE-5066-4012-A745-0383EE8AB159}
+// MVID: {5E1730A7-5066-4012-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00720000
+// Image base: 0x06710000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -59,7 +63,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 7,7 : 4,24 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\NoIEnumerable02.fsx'
+    .line 7,7 : 4,24 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable02.fsx'
     IL_0000:  ldc.i4.s   100
     IL_0002:  stloc.1
     IL_0003:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
index 7223d4a04bd..566158e52b2 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly NoIEnumerable03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable03
 {
-  // Offset: 0x00000000 Length: 0x000001DF
+  // Offset: 0x00000000 Length: 0x000001DB
+}
+.mresource public FSharpSignatureDataB.NoIEnumerable03
+{
+  // Offset: 0x000001E0 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.NoIEnumerable03
 {
-  // Offset: 0x000001E8 Length: 0x0000006C
+  // Offset: 0x000001F0 Length: 0x0000006C
 }
 .module NoIEnumerable03.dll
-// MVID: {59B18AEE-7903-6020-A745-0383EE8AB159}
+// MVID: {5E1730A7-7903-6020-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01970000
+// Image base: 0x06DC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +65,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\NoIEnumerable03.fsx'
+    .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable03.fsx'
     IL_0000:  ldarg.0
     IL_0001:  stloc.1
     IL_0002:  ldarg.1
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
index a27da5651f5..b1c638497e2 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ZeroToArrLength01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ZeroToArrLength01
 {
-  // Offset: 0x00000000 Length: 0x000001E0
+  // Offset: 0x00000000 Length: 0x000001DC
+}
+.mresource public FSharpSignatureDataB.ZeroToArrLength01
+{
+  // Offset: 0x000001E0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ZeroToArrLength01
 {
   // Offset: 0x000001E8 Length: 0x0000007B
 }
 .module ZeroToArrLength01.dll
-// MVID: {59B18AEE-A3D0-03A7-A745-0383EE8AB159}
+// MVID: {5E1730A7-A3D0-03A7-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02E70000
+// Image base: 0x063B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  5
     .locals init ([0] int32 i)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 5,35 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ZeroToArrLength01.fs'
+    .line 6,6 : 5,35 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ZeroToArrLength01.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     IL_0002:  br.s       IL_0010
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
index eedc9d7bee3..c6714454cc9 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly ZeroToArrLength02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.ZeroToArrLength02
 {
-  // Offset: 0x00000000 Length: 0x000001E0
+  // Offset: 0x00000000 Length: 0x000001DC
+}
+.mresource public FSharpSignatureDataB.ZeroToArrLength02
+{
+  // Offset: 0x000001E0 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.ZeroToArrLength02
 {
   // Offset: 0x000001E8 Length: 0x0000007B
 }
 .module ZeroToArrLength02.dll
-// MVID: {59B18AEE-A36B-03A7-A745-0383EE8AB159}
+// MVID: {5E1730A7-A36B-03A7-A745-0383A730175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01550000
+// Image base: 0x053F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +61,7 @@
     .maxstack  5
     .locals init ([0] int32 i)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 5,41 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ZeroToArrLength02.fs'
+    .line 6,6 : 5,41 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ZeroToArrLength02.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     IL_0002:  br.s       IL_0010
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
index 974905405eb..18b6bb63b63 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare01
 {
-  // Offset: 0x00000000 Length: 0x00000225
+  // Offset: 0x00000000 Length: 0x00000221
+}
+.mresource public FSharpSignatureDataB.Compare01
+{
+  // Offset: 0x00000228 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare01
 {
   // Offset: 0x00000230 Length: 0x000000B2
 }
 .module Compare01.dll
-// MVID: {59B18AEE-04A0-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-04A0-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00FF0000
+// Image base: 0x056F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +67,7 @@
                [1] int32 i,
                [2] int32 V_2)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare01.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare01.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 9,9 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
index 74bd16af665..65b7f84e90a 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare02
 {
-  // Offset: 0x00000000 Length: 0x0000022C
+  // Offset: 0x00000000 Length: 0x00000228
+}
+.mresource public FSharpSignatureDataB.Compare02
+{
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare02
 {
-  // Offset: 0x00000230 Length: 0x000000B9
+  // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare02.dll
-// MVID: {59B18AEE-0481-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-0481-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x07320000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +68,7 @@
                [2] int32 V_2,
                [3] int32 V_3)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare02.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare02.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
index c31f8088d27..ee89ec6eb92 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare03
 {
-  // Offset: 0x00000000 Length: 0x00000237
+  // Offset: 0x00000000 Length: 0x00000233
+}
+.mresource public FSharpSignatureDataB.Compare03
+{
+  // Offset: 0x00000238 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare03
 {
   // Offset: 0x00000240 Length: 0x000000B9
 }
 .module Compare03.dll
-// MVID: {59B18AEE-0562-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-0562-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x057B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -65,7 +69,7 @@
                [3] int32 V_3,
                [4] int32 V_4)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare03.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare03.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
index 0a5d7ed4b4f..ca7777463a2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare04
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare04
 {
-  // Offset: 0x00000000 Length: 0x00000237
+  // Offset: 0x00000000 Length: 0x00000233
+}
+.mresource public FSharpSignatureDataB.Compare04
+{
+  // Offset: 0x00000238 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare04
 {
   // Offset: 0x00000240 Length: 0x000000B9
 }
 .module Compare04.dll
-// MVID: {59B18AEE-053B-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-053B-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x013E0000
+// Image base: 0x06B40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +70,7 @@
                [4] int32 V_4,
                [5] int32 V_5)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare04.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare04.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
index 1b66e37d298..e9cc40ad02f 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare05
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Compare05
 {
-  // Offset: 0x00000000 Length: 0x000006EC
+  // Offset: 0x00000000 Length: 0x000006DC
+}
+.mresource public FSharpSignatureDataB.Compare05
+{
+  // Offset: 0x000006E0 Length: 0x0000007E
 }
 .mresource public FSharpOptimizationData.Compare05
 {
-  // Offset: 0x000006F0 Length: 0x000003BA
+  // Offset: 0x00000768 Length: 0x000003BA
+}
+.mresource public FSharpOptimizationDataB.Compare05
+{
+  // Offset: 0x00000B28 Length: 0x00000057
 }
 .module Compare05.dll
-// MVID: {59B18AEE-051C-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-051C-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x069B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare05.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare05.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
index 49c709033de..3f763a998d7 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare06
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Compare06
 {
-  // Offset: 0x00000000 Length: 0x000006DF
+  // Offset: 0x00000000 Length: 0x000006CF
+}
+.mresource public FSharpSignatureDataB.Compare06
+{
+  // Offset: 0x000006D8 Length: 0x0000007D
 }
 .mresource public FSharpOptimizationData.Compare06
 {
-  // Offset: 0x000006E8 Length: 0x000003BC
+  // Offset: 0x00000760 Length: 0x000003BC
+}
+.mresource public FSharpOptimizationDataB.Compare06
+{
+  // Offset: 0x00000B20 Length: 0x00000057
 }
 .module Compare06.dll
-// MVID: {59B18AEE-04FD-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-04FD-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02E80000
+// Image base: 0x05770000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -130,7 +138,7 @@
                  [2] int32 V_2,
                  [3] int32 V_3)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare06.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare06.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
index 70335b05d20..499467aa795 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare07
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Compare07
 {
-  // Offset: 0x00000000 Length: 0x0000089A
+  // Offset: 0x00000000 Length: 0x0000088A
+}
+.mresource public FSharpSignatureDataB.Compare07
+{
+  // Offset: 0x00000890 Length: 0x000000A8
 }
 .mresource public FSharpOptimizationData.Compare07
 {
-  // Offset: 0x000008A0 Length: 0x00000692
+  // Offset: 0x00000940 Length: 0x0000068C
+}
+.mresource public FSharpOptimizationDataB.Compare07
+{
+  // Offset: 0x00000FD0 Length: 0x000000B8
 }
 .module Compare07.dll
-// MVID: {59B18AEE-05DE-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-05DE-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02BA0000
+// Image base: 0x053D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] !a V_4,
                  [5] !a V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare07.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare07.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
index 29f55a0cb58..09c05d056eb 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare08
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare08
 {
-  // Offset: 0x00000000 Length: 0x00000230
+  // Offset: 0x00000000 Length: 0x0000022C
+}
+.mresource public FSharpSignatureDataB.Compare08
+{
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare08
 {
   // Offset: 0x00000238 Length: 0x000000B2
 }
 .module Compare08.dll
-// MVID: {59B18AEE-03E7-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-03E7-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01590000
+// Image base: 0x06730000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +68,7 @@
                [2] uint8[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare08.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare08.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,35 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
index 4d890783eed..9b68d8c4e46 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare09
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare09
 {
-  // Offset: 0x00000000 Length: 0x00000230
+  // Offset: 0x00000000 Length: 0x0000022C
+}
+.mresource public FSharpSignatureDataB.Compare09
+{
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare09
 {
   // Offset: 0x00000238 Length: 0x000000B2
 }
 .module Compare09.dll
-// MVID: {59B18AEE-03C8-F88E-A745-0383EE8AB159}
+// MVID: {5E1730AF-03C8-F88E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01020000
+// Image base: 0x070F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +68,7 @@
                [2] int32[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare09.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare09.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,31 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
index 16bada503c5..b71c9aaadc7 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare10
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Compare10
 {
-  // Offset: 0x00000000 Length: 0x00000AA4
+  // Offset: 0x00000000 Length: 0x00000A94
+}
+.mresource public FSharpSignatureDataB.Compare10
+{
+  // Offset: 0x00000A98 Length: 0x000000FA
 }
 .mresource public FSharpOptimizationData.Compare10
 {
-  // Offset: 0x00000AA8 Length: 0x0000058E
+  // Offset: 0x00000B98 Length: 0x0000058E
+}
+.mresource public FSharpOptimizationDataB.Compare10
+{
+  // Offset: 0x00001130 Length: 0x000000AE
 }
 .module Compare10.dll
-// MVID: {59B18AEE-04BF-1753-A745-0383EE8AB159}
+// MVID: {5E1730AF-04BF-1753-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002E0000
+// Image base: 0x06610000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare10.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare10.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
index 7f37b719bb4..20add977d22 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Compare11
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare11
 {
-  // Offset: 0x00000000 Length: 0x00000230
+  // Offset: 0x00000000 Length: 0x0000022C
+}
+.mresource public FSharpSignatureDataB.Compare11
+{
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Compare11
 {
   // Offset: 0x00000238 Length: 0x000000B1
 }
 .module Compare11.dll
-// MVID: {59B18AEE-04A0-1753-A745-0383EE8AB159}
+// MVID: {5E1730AF-04A0-1753-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010A0000
+// Image base: 0x06F30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare11.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare11.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 9,9 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
index c722fc2d31f..e005866e8db 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals01
 {
-  // Offset: 0x00000000 Length: 0x00000234
+  // Offset: 0x00000000 Length: 0x00000230
+}
+.mresource public FSharpSignatureDataB.Equals01
+{
+  // Offset: 0x00000238 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Equals01
 {
-  // Offset: 0x00000238 Length: 0x000000B6
+  // Offset: 0x00000240 Length: 0x000000B6
 }
 .module Equals01.dll
-// MVID: {59B18AEE-0759-50B1-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-50B1-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02D70000
+// Image base: 0x073C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals01.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals01.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
index aa7bbc68da5..c23fa1704d4 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly Equals02
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals02
 {
-  // Offset: 0x00000000 Length: 0x0000023C
+  // Offset: 0x00000000 Length: 0x00000230
+}
+.mresource public FSharpSignatureDataB.Equals02
+{
+  // Offset: 0x00000238 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Equals02
 {
   // Offset: 0x00000240 Length: 0x000000B6
 }
 .module Equals02.dll
-// MVID: {5B18753B-0759-B6D8-A745-03833B75185B}
+// MVID: {5E1730AF-0759-B6D8-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00F20000
+// Image base: 0x05A30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,18 +61,19 @@
     .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 bool  f4_tuple4() cil managed
     {
-      // Code size       44 (0x2c)
+      // Code size       36 (0x24)
       .maxstack  4
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals02.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals02.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
       IL_0002:  ldc.i4.0
       IL_0003:  stloc.1
       IL_0004:  br.s       IL_001a
+
       .line 9,9 : 12,26 ''
       IL_0006:  ldstr      "five"
       IL_000b:  ldstr      "5"
@@ -83,17 +88,22 @@
       IL_001a:  ldloc.1
       IL_001b:  ldc.i4     0x989681
       IL_0020:  blt.s      IL_0006
+
       .line 10,10 : 8,9 ''
       IL_0022:  ldloc.0
       IL_0023:  ret
     } // end of method EqualsMicroPerfAndCodeGenerationTests::f4_tuple4
+
   } // end of class EqualsMicroPerfAndCodeGenerationTests
+
 } // end of class Equals02
+
 .class private abstract auto ansi sealed ''.$Equals02$fsx
        extends [mscorlib]System.Object
 {
 } // end of class ''.$Equals02$fsx
 
+
 // =============================================================
 
 // *********** DISASSEMBLY COMPLETE ***********************
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
index e222d314825..cbf79485ac2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly Equals03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals03
 {
-  // Offset: 0x00000000 Length: 0x0000023C
+  // Offset: 0x00000000 Length: 0x00000230
+}
+.mresource public FSharpSignatureDataB.Equals03
+{
+  // Offset: 0x00000238 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Equals03
 {
   // Offset: 0x00000240 Length: 0x000000B6
 }
 .module Equals03.dll
-// MVID: {5B18753B-0759-3313-A745-03833B75185B}
+// MVID: {5E1730AF-0759-3313-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02630000
+// Image base: 0x057B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals03.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals03.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
index 6ad198b4879..ef7c077b6c5 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals04
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Equals04
 {
-  // Offset: 0x00000000 Length: 0x000006E8
+  // Offset: 0x00000000 Length: 0x000006D8
+}
+.mresource public FSharpSignatureDataB.Equals04
+{
+  // Offset: 0x000006E0 Length: 0x0000007E
 }
 .mresource public FSharpOptimizationData.Equals04
 {
-  // Offset: 0x000006F0 Length: 0x000003B7
+  // Offset: 0x00000768 Length: 0x000003B7
+}
+.mresource public FSharpOptimizationDataB.Equals04
+{
+  // Offset: 0x00000B28 Length: 0x00000057
 }
 .module Equals04.dll
-// MVID: {59B18AEE-0759-EA8A-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-EA8A-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x00BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals04.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals04.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
index ecc013d450a..bd1eb917243 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals05
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Equals05
 {
-  // Offset: 0x00000000 Length: 0x000006DB
+  // Offset: 0x00000000 Length: 0x000006CB
+}
+.mresource public FSharpSignatureDataB.Equals05
+{
+  // Offset: 0x000006D0 Length: 0x0000007D
 }
 .mresource public FSharpOptimizationData.Equals05
 {
-  // Offset: 0x000006E0 Length: 0x000003B9
+  // Offset: 0x00000758 Length: 0x000003B9
+}
+.mresource public FSharpOptimizationDataB.Equals05
+{
+  // Offset: 0x00000B18 Length: 0x00000057
 }
 .module Equals05.dll
-// MVID: {59B18AEE-0759-CBC5-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-CBC5-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x033B0000
+// Image base: 0x05060000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -130,7 +138,7 @@
                  [2] int32 V_2,
                  [3] int32 V_3)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals05.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals05.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
index 91247bff24d..d39e63f68c2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals06
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Equals06
 {
-  // Offset: 0x00000000 Length: 0x00000896
+  // Offset: 0x00000000 Length: 0x00000886
+}
+.mresource public FSharpSignatureDataB.Equals06
+{
+  // Offset: 0x00000890 Length: 0x000000A8
 }
 .mresource public FSharpOptimizationData.Equals06
 {
-  // Offset: 0x000008A0 Length: 0x0000068E
+  // Offset: 0x00000940 Length: 0x00000688
+}
+.mresource public FSharpOptimizationDataB.Equals06
+{
+  // Offset: 0x00000FD0 Length: 0x000000B8
 }
 .module Equals06.dll
-// MVID: {59B18AEE-0759-31EC-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-31EC-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01B90000
+// Image base: 0x05310000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] !a V_4,
                  [5] !a V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals06.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals06.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
index 91f97c289a2..1f55a16962a 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals07
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals07
 {
-  // Offset: 0x00000000 Length: 0x0000022D
+  // Offset: 0x00000000 Length: 0x00000229
+}
+.mresource public FSharpSignatureDataB.Equals07
+{
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Equals07
 {
   // Offset: 0x00000238 Length: 0x000000AF
 }
 .module Equals07.dll
-// MVID: {59B18AEE-0759-AE27-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-AE27-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01C80000
+// Image base: 0x06D50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +68,7 @@
                [2] uint8[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals07.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals07.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 6,6 : 8,35 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
index 55da6ee102e..ab5e14981d9 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals08
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals08
 {
-  // Offset: 0x00000000 Length: 0x0000022D
+  // Offset: 0x00000000 Length: 0x00000229
+}
+.mresource public FSharpSignatureDataB.Equals08
+{
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Equals08
 {
   // Offset: 0x00000238 Length: 0x000000AF
 }
 .module Equals08.dll
-// MVID: {59B18AEE-0759-659E-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-659E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01090000
+// Image base: 0x05790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +68,7 @@
                [2] int32[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals08.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals08.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 6,6 : 8,31 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
index 8985acaa02b..ab32955f118 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Equals09
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Equals09
 {
-  // Offset: 0x00000000 Length: 0x00000AA0
+  // Offset: 0x00000000 Length: 0x00000A90
+}
+.mresource public FSharpSignatureDataB.Equals09
+{
+  // Offset: 0x00000A98 Length: 0x000000FA
 }
 .mresource public FSharpOptimizationData.Equals09
 {
-  // Offset: 0x00000AA8 Length: 0x0000058B
+  // Offset: 0x00000B98 Length: 0x0000058B
+}
+.mresource public FSharpOptimizationDataB.Equals09
+{
+  // Offset: 0x00001128 Length: 0x000000AE
 }
 .module Equals09.dll
-// MVID: {59B18AEE-0759-46D9-A745-0383EE8AB159}
+// MVID: {5E1730AF-0759-46D9-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02720000
+// Image base: 0x05840000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals09.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals09.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
index cb63a42741b..400236e5cd7 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash01
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash01
 {
-  // Offset: 0x00000000 Length: 0x00000219
+  // Offset: 0x00000000 Length: 0x00000215
+}
+.mresource public FSharpSignatureDataB.Hash01
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash01
 {
-  // Offset: 0x00000220 Length: 0x000000A9
+  // Offset: 0x00000228 Length: 0x000000A9
 }
 .module Hash01.dll
-// MVID: {59B18AEE-9642-78D3-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-78D3-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02FB0000
+// Image base: 0x07320000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash01.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash01.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
index 985bcae6f37..9177cfa8665 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash02
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Hash02
 {
-  // Offset: 0x00000000 Length: 0x00000220
+  // Offset: 0x00000000 Length: 0x0000021C
+}
+.mresource public FSharpSignatureDataB.Hash02
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash02
 {
   // Offset: 0x00000228 Length: 0x0000010B
 }
+.mresource public FSharpOptimizationDataB.Hash02
+{
+  // Offset: 0x00000338 Length: 0x00000006
+}
 .module Hash02.dll
-// MVID: {59B18AEE-9642-796E-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-796E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01920000
+// Image base: 0x06F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +68,7 @@
       // Code size       1 (0x1)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 7,8 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash02.fsx'
+      .line 7,8 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash02.fsx'
       IL_0000:  ret
     } // end of method HashMicroPerfAndCodeGenerationTests::f4_triple
 
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
index 4a2c0b76fb2..2a018d24c40 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash03
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash03
 {
-  // Offset: 0x00000000 Length: 0x00000220
+  // Offset: 0x00000000 Length: 0x0000021C
+}
+.mresource public FSharpSignatureDataB.Hash03
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash03
 {
   // Offset: 0x00000228 Length: 0x000000B0
 }
 .module Hash03.dll
-// MVID: {59B18AEE-9642-788D-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-788D-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x02DA0000
+// Image base: 0x04DA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash03.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash03.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 7,7 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
index 550faa686b6..8a6b8f247da 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash04
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash04
 {
-  // Offset: 0x00000000 Length: 0x00000220
+  // Offset: 0x00000000 Length: 0x0000021C
+}
+.mresource public FSharpSignatureDataB.Hash04
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash04
 {
   // Offset: 0x00000228 Length: 0x000000B0
 }
 .module Hash04.dll
-// MVID: {59B18AEE-9642-7838-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-7838-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x012B0000
+// Image base: 0x070E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash04.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash04.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 7,7 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
index 50ea47e8580..d7f94e86198 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash05
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Hash05
 {
-  // Offset: 0x00000000 Length: 0x000006E0
+  // Offset: 0x00000000 Length: 0x000006D0
+}
+.mresource public FSharpSignatureDataB.Hash05
+{
+  // Offset: 0x000006D8 Length: 0x0000007E
 }
 .mresource public FSharpOptimizationData.Hash05
 {
-  // Offset: 0x000006E8 Length: 0x000003B1
+  // Offset: 0x00000760 Length: 0x000003B1
+}
+.mresource public FSharpOptimizationDataB.Hash05
+{
+  // Offset: 0x00000B18 Length: 0x00000057
 }
 .module Hash05.dll
-// MVID: {59B18AEE-9642-7857-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-7857-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01AC0000
+// Image base: 0x06520000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash05.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash05.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
index df45d5ddbdb..43217dbd501 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash06
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Hash06
 {
-  // Offset: 0x00000000 Length: 0x000006E1
+  // Offset: 0x00000000 Length: 0x000006D1
+}
+.mresource public FSharpSignatureDataB.Hash06
+{
+  // Offset: 0x000006D8 Length: 0x0000007E
 }
 .mresource public FSharpOptimizationData.Hash06
 {
-  // Offset: 0x000006E8 Length: 0x000003B2
+  // Offset: 0x00000760 Length: 0x000003B2
+}
+.mresource public FSharpOptimizationDataB.Hash06
+{
+  // Offset: 0x00000B18 Length: 0x00000057
 }
 .module Hash06.dll
-// MVID: {59B18AEE-9642-78F2-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-78F2-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01040000
+// Image base: 0x05800000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash06.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash06.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
index b57640a2818..0f180e46b95 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash07
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash07
 {
-  // Offset: 0x00000000 Length: 0x0000021A
+  // Offset: 0x00000000 Length: 0x00000216
+}
+.mresource public FSharpSignatureDataB.Hash07
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash07
 {
-  // Offset: 0x00000220 Length: 0x000000AA
+  // Offset: 0x00000228 Length: 0x000000AA
 }
 .module Hash07.dll
-// MVID: {59B18AEE-9642-7811-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-7811-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x010A0000
+// Image base: 0x04FE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +66,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash07.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash07.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
index a0945b3885d..f4bec6fd3d1 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash08
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Hash08
 {
-  // Offset: 0x00000000 Length: 0x000006D3
+  // Offset: 0x00000000 Length: 0x000006C3
+}
+.mresource public FSharpSignatureDataB.Hash08
+{
+  // Offset: 0x000006C8 Length: 0x0000007D
 }
 .mresource public FSharpOptimizationData.Hash08
 {
-  // Offset: 0x000006D8 Length: 0x000003B3
+  // Offset: 0x00000750 Length: 0x000003B3
+}
+.mresource public FSharpOptimizationDataB.Hash08
+{
+  // Offset: 0x00000B08 Length: 0x00000057
 }
 .module Hash08.dll
-// MVID: {59B18AEE-9642-77BC-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-77BC-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01AA0000
+// Image base: 0x00BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -130,7 +138,7 @@
                  [2] int32 V_2,
                  [3] int32 V_3)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash08.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash08.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
index df7b115d207..d0b2ac38926 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash09
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Hash09
 {
-  // Offset: 0x00000000 Length: 0x0000088E
+  // Offset: 0x00000000 Length: 0x0000087E
+}
+.mresource public FSharpSignatureDataB.Hash09
+{
+  // Offset: 0x00000888 Length: 0x000000A8
 }
 .mresource public FSharpOptimizationData.Hash09
 {
-  // Offset: 0x00000898 Length: 0x00000686
+  // Offset: 0x00000938 Length: 0x00000680
+}
+.mresource public FSharpOptimizationDataB.Hash09
+{
+  // Offset: 0x00000FC0 Length: 0x000000B8
 }
 .module Hash09.dll
-// MVID: {59B18AEE-9642-77DB-A745-0383EE8AB159}
+// MVID: {5E1730AF-9642-77DB-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00690000
+// Image base: 0x05650000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] !a V_4,
                  [5] !a V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash09.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash09.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
index 20c3ceeb8f6..715ff21fe3f 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash10
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash10
 {
-  // Offset: 0x00000000 Length: 0x00000219
+  // Offset: 0x00000000 Length: 0x00000215
+}
+.mresource public FSharpSignatureDataB.Hash10
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash10
 {
-  // Offset: 0x00000220 Length: 0x000000A9
+  // Offset: 0x00000228 Length: 0x000000A9
 }
 .module Hash10.dll
-// MVID: {59B18AEE-9661-78B4-A745-0383EE8AB159}
+// MVID: {5E1730AF-9661-78B4-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01080000
+// Image base: 0x07020000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +67,7 @@
                [1] int32 i,
                [2] int32 V_2)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 6,6 : 8,36 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash10.fsx'
+      .line 6,6 : 8,36 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash10.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  ldc.i4.1
       IL_0002:  ldc.i4.s   100
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
index f4eb5020175..439d78276c7 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash11
 {
@@ -29,20 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash11
 {
-  // Offset: 0x00000000 Length: 0x00000219
+  // Offset: 0x00000000 Length: 0x00000215
+}
+.mresource public FSharpSignatureDataB.Hash11
+{
+  // Offset: 0x00000220 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.Hash11
 {
-  // Offset: 0x00000220 Length: 0x000000A9
+  // Offset: 0x00000228 Length: 0x000000A9
 }
 .module Hash11.dll
-// MVID: {59B18AEE-9661-78D3-A745-0383EE8AB159}
+// MVID: {5E1730AF-9661-78D3-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x002D0000
+// Image base: 0x06F40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +67,7 @@
                [1] int32 i,
                [2] int32 V_2)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 6,6 : 8,32 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash11.fsx'
+      .line 6,6 : 8,32 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash11.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  ldc.i4.1
       IL_0002:  ldc.i4.s   100
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
index 9c5bfb73cf3..c68d74528d6 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Hash12
 {
@@ -29,20 +29,28 @@
 }
 .mresource public FSharpSignatureData.Hash12
 {
-  // Offset: 0x00000000 Length: 0x00000A98
+  // Offset: 0x00000000 Length: 0x00000A88
+}
+.mresource public FSharpSignatureDataB.Hash12
+{
+  // Offset: 0x00000A90 Length: 0x000000FA
 }
 .mresource public FSharpOptimizationData.Hash12
 {
-  // Offset: 0x00000AA0 Length: 0x00000585
+  // Offset: 0x00000B90 Length: 0x00000585
+}
+.mresource public FSharpOptimizationDataB.Hash12
+{
+  // Offset: 0x00001120 Length: 0x000000AE
 }
 .module Hash12.dll
-// MVID: {59B18AEE-9661-796E-A745-0383EE8AB159}
+// MVID: {5E1730AF-9661-796E-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01080000
+// Image base: 0x065B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -187,7 +195,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash12.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash12.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
index aa979cf89ae..0e031b8b9cf 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Match01
 {
@@ -25,20 +25,28 @@
 }
 .mresource public FSharpSignatureData.Match01
 {
-  // Offset: 0x00000000 Length: 0x000006F6
+  // Offset: 0x00000000 Length: 0x000006E6
+}
+.mresource public FSharpSignatureDataB.Match01
+{
+  // Offset: 0x000006F0 Length: 0x00000086
 }
 .mresource public FSharpOptimizationData.Match01
 {
-  // Offset: 0x00000700 Length: 0x000003B7
+  // Offset: 0x00000780 Length: 0x000003B7
+}
+.mresource public FSharpOptimizationDataB.Match01
+{
+  // Offset: 0x00000B40 Length: 0x0000005F
 }
 .module Match01.dll
-// MVID: {59B18AF8-FAFE-C8E4-A745-0383F88AB159}
+// MVID: {5E1730AF-FAFE-C8E4-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x01790000
+// Image base: 0x05060000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
index a22def741ec..8d0a08e9e5d 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:1:0
+  .ver 4:7:0:0
 }
 .assembly Match02
 {
@@ -25,20 +25,28 @@
 }
 .mresource public FSharpSignatureData.Match02
 {
-  // Offset: 0x00000000 Length: 0x00000490
+  // Offset: 0x00000000 Length: 0x00000484
+}
+.mresource public FSharpSignatureDataB.Match02
+{
+  // Offset: 0x00000488 Length: 0x00000035
 }
 .mresource public FSharpOptimizationData.Match02
 {
-  // Offset: 0x00000498 Length: 0x000002EE
+  // Offset: 0x000004C8 Length: 0x000002EE
+}
+.mresource public FSharpOptimizationDataB.Match02
+{
+  // Offset: 0x000007C0 Length: 0x0000004C
 }
 .module Match02.dll
-// MVID: {59B18AF8-6125-4D81-A745-0383F88AB159}
+// MVID: {5E1730AF-6125-4D81-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x015D0000
+// Image base: 0x056F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
index 7e07ff48ffd..0c6d1abf883 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:4:3:0
+  .ver 4:7:0:0
 }
 .assembly StructUnion01
 {
@@ -25,20 +25,28 @@
 }
 .mresource public FSharpSignatureData.StructUnion01
 {
-  // Offset: 0x00000000 Length: 0x0000087E
+  // Offset: 0x00000000 Length: 0x0000087A
+}
+.mresource public FSharpSignatureDataB.StructUnion01
+{
+  // Offset: 0x00000880 Length: 0x000000B0
 }
 .mresource public FSharpOptimizationData.StructUnion01
 {
-  // Offset: 0x00000888 Length: 0x00000421
+  // Offset: 0x00000938 Length: 0x00000421
+}
+.mresource public FSharpOptimizationDataB.StructUnion01
+{
+  // Offset: 0x00000D60 Length: 0x00000067
 }
 .module StructUnion01.dll
-// MVID: {5B1ED843-D3E9-6B24-A745-038343D81E5B}
+// MVID: {5E1730AF-D3E9-6B24-A745-0383AF30175E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x017F0000
+// Image base: 0x07190000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/test.lst b/tests/fsharpqa/Source/test.lst
index 8a3aeac76b2..2fbcd34ec3d 100644
--- a/tests/fsharpqa/Source/test.lst
+++ b/tests/fsharpqa/Source/test.lst
@@ -14,10 +14,8 @@ CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\DoNotBoxStruct
 CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\GeneratedIterators
 CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\InequalityComparison
 CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\ListExpressionStepping
-CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\LiteralValue
 CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\MethodImplAttribute
 CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\Misc
-CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\Mutation
 CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\Operators
 Retry,CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\QueryExpressionStepping
 Retry,CodeGen01,NoMT,CodeGen				CodeGen\EmittedIL\SeqExpressionStepping
diff --git a/tests/service/ExprTests.fs b/tests/service/ExprTests.fs
index 9eecc27e4c3..56ff726e1c3 100644
--- a/tests/service/ExprTests.fs
+++ b/tests/service/ExprTests.fs
@@ -2715,8 +2715,14 @@ let ``Test Operator Declarations for String`` () =
         "let testStringToUInt32Operator(e1) = LanguagePrimitives.ParseUInt32 (e1) @ (47,47--47,56)";
         "let testStringToInt64Operator(e1) = LanguagePrimitives.ParseInt64 (e1) @ (48,47--48,55)";
         "let testStringToUInt64Operator(e1) = LanguagePrimitives.ParseUInt64 (e1) @ (49,47--49,56)";
+#if USES_FSHARP_CORE_45_PACKAGE
+        // the definition of these operators has changed slightly in latest FSharp.Core
         "let testStringToSingleOperator(e1) = Single.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (52,47--52,57)";
         "let testStringToDoubleOperator(e1) = Double.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (53,47--53,55)";
+#else
+        "let testStringToSingleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> Microsoft.FSharp.Core.exn) else ()); Single.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (52,47--52,57)";
+        "let testStringToDoubleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> Microsoft.FSharp.Core.exn) else ()); Double.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (53,47--53,55)";
+#endif
         "let testStringToDecimalOperator(e1) = Decimal.Parse (e1,167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (54,47--54,57)";
         "let testStringToCharOperator(e1) = Char.Parse (e1) @ (55,47--55,54)";
 #if DEBUG
diff --git a/tests/service/data/TestTP/ProvidedTypes.fs b/tests/service/data/TestTP/ProvidedTypes.fs
index 51cdb0bddd0..323df18d426 100644
--- a/tests/service/data/TestTP/ProvidedTypes.fs
+++ b/tests/service/data/TestTP/ProvidedTypes.fs
@@ -50,7 +50,7 @@ module internal Misc =
     let isEmpty s = s = ExpectedStackState.Empty
     let isAddress s = s = ExpectedStackState.Address
 
-    let nonNull str x = if x=null then failwith ("Null in " + str) else x
+    let failIfNull str x = if x=null then failwith ("Null in " + str) else x
     
     let notRequired opname item = 
         let msg = sprintf "The operation '%s' on item '%s' should not be called on provided type, member or parameter" opname item
@@ -651,7 +651,7 @@ type ProvidedConstructor(parameters : ProvidedParameter list) =
     override __.GetParameters() = parameters |> List.toArray 
     override __.Attributes = ctorAttributes
     override __.Name = if isStatic() then ".cctor" else ".ctor"
-    override __.DeclaringType = declaringType |> nonNull "ProvidedConstructor.DeclaringType"                                   
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedConstructor.DeclaringType"                                   
     override __.IsDefined(_attributeType, _inherit) = true 
 
     override __.Invoke(_invokeAttr, _binder, _parameters, _culture)      = notRequired "Invoke" (nameText())
@@ -737,7 +737,7 @@ type ProvidedMethod(methodName: string, parameters: ProvidedParameter list, retu
     override __.GetParameters() = argParams |> Array.ofList
     override __.Attributes = methodAttrs
     override __.Name = methodName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedMethod.DeclaringType"                                   
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedMethod.DeclaringType"                                   
     override __.IsDefined(_attributeType, _inherit) : bool = true
     override __.MemberType = MemberTypes.Method
     override __.CallingConvention = 
@@ -820,7 +820,7 @@ type ProvidedProperty(propertyName: string, propertyType: Type, ?parameters: Pro
     override __.CanWrite = hasSetter()
     override __.GetValue(_obj, _invokeAttr, _binder, _index, _culture) : obj = notRequired "GetValue" propertyName
     override __.Name = propertyName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedProperty.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedProperty.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Property
 
     override __.ReflectedType                                     = notRequired "ReflectedType" propertyName
@@ -874,7 +874,7 @@ type ProvidedEvent(eventName:string,eventHandlerType:Type) =
     override __.GetRemoveMethod _nonPublic = remover.Force() :> MethodInfo
     override __.Attributes = EventAttributes.None
     override __.Name = eventName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedEvent.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedEvent.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Event
 
     override __.GetRaiseMethod _nonPublic                      = notRequired "GetRaiseMethod" eventName
@@ -909,7 +909,7 @@ type ProvidedLiteralField(fieldName:string,fieldType:Type,literalValue:obj) =
     override __.GetRawConstantValue()  = literalValue
     override __.Attributes = FieldAttributes.Static ||| FieldAttributes.Literal ||| FieldAttributes.Public
     override __.Name = fieldName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedLiteralField.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedLiteralField.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Field
 
     override __.ReflectedType                                     = notRequired "ReflectedType" fieldName
@@ -948,7 +948,7 @@ type ProvidedField(fieldName:string,fieldType:Type) =
     override __.GetRawConstantValue()  = null
     override __.Attributes = fieldAttrs
     override __.Name = fieldName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedField.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedField.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Field
 
     override __.ReflectedType                                     = notRequired "ReflectedType" fieldName
diff --git a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
index dd3be821094..f4dd4d29dfd 100644
--- a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
@@ -42,7 +42,6 @@ module BraceCompletionSessionProviderHelpers =
     [] 
     let BraceCompletion = "Brace_Completion"
 
-[]
 type IEditorBraceCompletionSession =
     inherit ILanguageService
 
@@ -58,7 +57,7 @@ type IEditorBraceCompletionSession =
 type IEditorBraceCompletionSessionFactory =
     inherit ILanguageService
 
-    abstract TryCreateSession : Document * openingPosition: int * openingBrace: char * CancellationToken -> IEditorBraceCompletionSession
+    abstract TryCreateSession : Document * openingPosition: int * openingBrace: char * CancellationToken -> IEditorBraceCompletionSession?
 
 type BraceCompletionSession 
     (
@@ -73,7 +72,7 @@ type BraceCompletionSession
     ) =
 
     let mutable closingPoint = subjectBuffer.CurrentSnapshot.CreateTrackingPoint(openingPoint.Position, PointTrackingMode.Positive)
-    let mutable openingPoint : ITrackingPoint = null
+    let mutable openingPoint : ITrackingPoint? = null
     let editorOperations = editorOperationsFactoryService.GetEditorOperations(textView)
 
     member __.EndSession() =
@@ -193,6 +192,9 @@ type BraceCompletionSession
                         
         member this.PreBackspace handledCommand =
             handledCommand <- false
+            match openingPoint with 
+            | null -> ()
+            | NonNull openingPoint -> 
 
             let caretPos = tryGetCaretPosition this
             let snapshot = subjectBuffer.CurrentSnapshot
@@ -484,20 +486,20 @@ type EditorBraceCompletionSessionFactory() =
                         | _ -> true // anything else is a valid classification type
                     ))                
 
-    member __.CreateEditorSession(_document, _openingPosition, openingBrace, _cancellationToken) =
+    member __.CreateEditorSession(_document, _openingPosition, openingBrace, _cancellationToken) : IEditorBraceCompletionSession? =
         match openingBrace with
-        | Parenthesis.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession
-        | CurlyBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession
-        | SquareBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession
-        | VerticalBar.OpenCharacter -> VerticalBarCompletionSession() :> IEditorBraceCompletionSession
-        | AngleBrackets.OpenCharacter -> AngleBracketCompletionSession() :> IEditorBraceCompletionSession
-        | DoubleQuote.OpenCharacter -> DoubleQuoteCompletionSession() :> IEditorBraceCompletionSession
-        | Asterisk.OpenCharacter -> AsteriskCompletionSession() :> IEditorBraceCompletionSession
+        | Parenthesis.OpenCharacter -> ParenthesisCompletionSession() :> _
+        | CurlyBrackets.OpenCharacter -> ParenthesisCompletionSession() :> _
+        | SquareBrackets.OpenCharacter -> ParenthesisCompletionSession() :> _
+        | VerticalBar.OpenCharacter -> VerticalBarCompletionSession() :> _
+        | AngleBrackets.OpenCharacter -> AngleBracketCompletionSession() :> _
+        | DoubleQuote.OpenCharacter -> DoubleQuoteCompletionSession() :> _
+        | Asterisk.OpenCharacter -> AsteriskCompletionSession() :> _
         | _ -> null
 
     interface IEditorBraceCompletionSessionFactory with
 
-        member this.TryCreateSession(document, openingPosition, openingBrace, cancellationToken) = 
+        member this.TryCreateSession(document, openingPosition, openingBrace, cancellationToken) : IEditorBraceCompletionSession? = 
             if this.IsSupportedOpeningBrace(openingBrace) && this.CheckCodeContext(document, openingPosition, openingBrace, cancellationToken) then
                 this.CreateEditorSession(document, openingPosition, openingBrace, cancellationToken)
             else
@@ -526,7 +528,9 @@ type BraceCompletionSessionProvider
                 maybe {
                     let! document =       openingPoint.Snapshot.GetOpenDocumentInCurrentContextWithChanges() |> Option.ofObj
                     let! sessionFactory = document.TryGetLanguageService()
-                    let! session =        sessionFactory.TryCreateSession(document, openingPoint.Position, openingBrace, CancellationToken.None) |> Option.ofObj
+                    let! session =
+                        sessionFactory.TryCreateSession(document, openingPoint.Position, openingBrace, CancellationToken.None)
+                        |> Option.ofObj
 
                     let undoHistory = undoManager.GetTextBufferUndoManager(textView.TextBuffer).TextBufferUndoHistory
                     return BraceCompletionSession(
diff --git a/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs b/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
index 749c3ceed7a..14d3ffcc040 100644
--- a/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
+++ b/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
@@ -118,19 +118,19 @@ module internal ClassificationDefinitions =
 
 
     []
-    let FSharpFunctionClassificationType : ClassificationTypeDefinition = null
+    let FSharpFunctionClassificationType : ClassificationTypeDefinition? = null
 
     []
-    let FSharpMutableVarClassificationType : ClassificationTypeDefinition = null
+    let FSharpMutableVarClassificationType : ClassificationTypeDefinition? = null
 
     []
-    let FSharpPrintfClassificationType : ClassificationTypeDefinition = null
+    let FSharpPrintfClassificationType : ClassificationTypeDefinition? = null
 
     []
-    let FSharpPropertyClassificationType : ClassificationTypeDefinition = null
+    let FSharpPropertyClassificationType : ClassificationTypeDefinition? = null
 
     []
-    let FSharpDisposableClassificationType : ClassificationTypeDefinition = null
+    let FSharpDisposableClassificationType : ClassificationTypeDefinition? = null
 
     [)>]
     []
diff --git a/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs b/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs
index eaf4b541a84..22c97e903e3 100644
--- a/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs
+++ b/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs
@@ -78,12 +78,12 @@ type internal CodeLensProvider
     [); Name("CodeLens");
       Order(Before = PredefinedAdornmentLayers.Text);
       TextViewRole(PredefinedTextViewRoles.Document)>]
-    member val CodeLensAdornmentLayerDefinition : AdornmentLayerDefinition = null with get, set
+    member val CodeLensAdornmentLayerDefinition : AdornmentLayerDefinition? = null with get, set
     
     [); Name("LineLens");
       Order(Before = PredefinedAdornmentLayers.Text);
       TextViewRole(PredefinedTextViewRoles.Document)>]
-    member val LineLensAdornmentLayerDefinition : AdornmentLayerDefinition = null with get, set
+    member val LineLensAdornmentLayerDefinition : AdornmentLayerDefinition? = null with get, set
 
     interface IViewTaggerProvider with
         override __.CreateTagger(view, buffer) =
diff --git a/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs b/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
index 668606afa20..2fbc530af95 100644
--- a/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
+++ b/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
@@ -35,7 +35,7 @@ type internal CodeLens(taggedText, computed, fullTypeSignature, uiElement) =
     member val TaggedText: Async<(ResizeArray * QuickInfoNavigation) option> = taggedText
     member val Computed: bool = computed with get, set
     member val FullTypeSignature: string = fullTypeSignature 
-    member val UiElement: UIElement = uiElement with get, set
+    member val UiElement: UIElement? = uiElement with get, set
 
 type internal FSharpCodeLensService
     (
@@ -330,7 +330,10 @@ type internal FSharpCodeLensService
 #if DEBUG
                             logInfof "Adding ui element for %A" (codeLens.TaggedText)
 #endif
-                            let uiElement = codeLens.UiElement
+                            // TODO NULLNESS - check that doing nothing when codeLens.UiElement is null is ok
+                            match codeLens.UiElement with 
+                            | null -> ()
+                            | NonNull uiElement ->
                             let animation = 
                                 DoubleAnimation(
                                     To = Nullable 0.8,
@@ -354,23 +357,26 @@ type internal FSharpCodeLensService
             for value in tagsToUpdate do
                 let trackingSpan, (newTrackingSpan, _, codeLens) = value.Key, value.Value
                 lineLens.RemoveCodeLens trackingSpan |> ignore
-                let Grid = lineLens.AddCodeLens newTrackingSpan
-                if codeLens.Computed && (isNull codeLens.UiElement |> not) then
-                    let uiElement = codeLens.UiElement
-                    lineLens.AddUiElementToCodeLensOnce (newTrackingSpan, uiElement)
+                let grid = lineLens.AddCodeLens newTrackingSpan
+                // logInfof "Trackingspan %A is being added." trackingSpan 
+                if codeLens.Computed then 
+                    match codeLens.UiElement with 
+                    | null -> ()
+                    | NonNull uiElement ->
+                        lineLens.AddUiElementToCodeLensOnce (newTrackingSpan, uiElement)
                 else
-                    Grid.IsVisibleChanged
+                    grid.IsVisibleChanged
                     |> Event.filter (fun eventArgs -> eventArgs.NewValue :?> bool)
                     |> Event.add (createCodeLensUIElement codeLens newTrackingSpan)
 
             for value in codeLensToAdd do
                 let trackingSpan, codeLens = value
-                let Grid = lineLens.AddCodeLens trackingSpan
+                let grid = lineLens.AddCodeLens trackingSpan
 #if DEBUG
                 logInfof "Trackingspan %A is being added." trackingSpan
 #endif
                 
-                Grid.IsVisibleChanged
+                grid.IsVisibleChanged
                 |> Event.filter (fun eventArgs -> eventArgs.NewValue :?> bool)
                 |> Event.add (createCodeLensUIElement codeLens trackingSpan)
 
diff --git a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
index 389d50b3cba..8bd4779ab2c 100644
--- a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
+++ b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
@@ -17,13 +17,12 @@ open Microsoft.VisualStudio.FSharp.Interactive
 
 type internal FsiCommandFilter(serviceProvider: System.IServiceProvider) =
 
-    let loadPackage (guidString: string) =
+    let loadPackage (guidString: string) : Lazy =
       lazy(
         let shell = serviceProvider.GetService(typeof) :?> IVsShell
         let packageToBeLoadedGuid = ref (Guid(guidString))       
         match shell.LoadPackage packageToBeLoadedGuid with
-        | VSConstants.S_OK, pkg ->
-            pkg :?> Package
+        | VSConstants.S_OK, pkg -> unbox pkg 
         | _ -> null)
 
     let fsiPackage = loadPackage FSharpConstants.fsiPackageGuidString
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index 86484f79739..a18d1673997 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -264,10 +264,10 @@ module Exception =
     /// messages recursively.
     let flattenMessage (root: System.Exception) =
 
-        let rec flattenInner (exc: System.Exception) =
+        let rec flattenInner (exc: System.Exception?) =
             match exc with
             | null -> []
-            | _ -> [exc.Message] @ (flattenInner exc.InnerException)
+            | NonNull exc -> [exc.Message] @ (flattenInner exc.InnerException)
         
         // If an aggregate exception only has a single inner exception, use that as the root
         match root with
diff --git a/vsintegration/src/FSharp.Editor/Common/Logging.fs b/vsintegration/src/FSharp.Editor/Common/Logging.fs
index cc37f948f42..ef3f72481e0 100644
--- a/vsintegration/src/FSharp.Editor/Common/Logging.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Logging.fs
@@ -29,7 +29,9 @@ open Config
 
 type [] Logger []
     ([)>] serviceProvider: IServiceProvider) =
-    let outputWindow = serviceProvider.GetService() |> Option.ofObj
+    let outputWindow =
+        serviceProvider.GetService()
+        |> Option.ofObj
 
     let createPane () =
         outputWindow |> Option.iter (fun x -> 
diff --git a/vsintegration/src/FSharp.Editor/Common/Vs.fs b/vsintegration/src/FSharp.Editor/Common/Vs.fs
index ee17ab8b381..2d56ef60419 100644
--- a/vsintegration/src/FSharp.Editor/Common/Vs.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Vs.fs
@@ -65,14 +65,14 @@ module internal VsTextLines =
         dataBuffer.CurrentSnapshot.GetText()
 
 module internal VsRunningDocumentTable = 
-    let FindDocumentWithoutLocking(rdt:IVsRunningDocumentTable, url:string) : (IVsHierarchy * IVsTextLines) option =
-        let (hr:int, hier:IVsHierarchy, _itemid:uint32, unkData:IntPtr, _cookie:uint32) = rdt.FindAndLockDocument(uint32 _VSRDTFLAGS.RDT_NoLock, url)
+    let FindDocumentWithoutLocking(rdt:IVsRunningDocumentTable, url:string) : (IVsHierarchy? * IVsTextLines?) option =
+        let (hr:int, hier:IVsHierarchy?, _itemid:uint32, unkData:IntPtr, _cookie:uint32) = rdt.FindAndLockDocument(uint32 _VSRDTFLAGS.RDT_NoLock, url)
         try
             if Com.Succeeded(hr) then 
                 let bufferObject = 
                     if unkData=IntPtr.Zero then null
                     else Marshal.GetObjectForIUnknown(unkData)
-                let buffer = 
+                let buffer : IVsTextLines? = 
                     match bufferObject with 
                     | :? IVsTextLines as tl -> tl
                     | _ -> null
diff --git a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
index 9ec89f069dd..9bf837e1447 100644
--- a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
@@ -138,7 +138,6 @@ type internal FSharpCompletionProvider
             let maxHints = if mruItems.Values.Count = 0 then 0 else Seq.max mruItems.Values
 
             declarationItems |> Array.iteri (fun number declarationItem ->
-                let glyph = Tokenizer.FSharpGlyphToRoslynGlyph (declarationItem.Glyph, declarationItem.Accessibility)
                 let name =
                     match declarationItem.NamespaceToOpen with
                     | Some namespaceToOpen -> sprintf "%s (open %s)" declarationItem.Name namespaceToOpen
@@ -153,7 +152,8 @@ type internal FSharpCompletionProvider
                     | _, idents -> Array.last idents
 
                 let completionItem = 
-                    FSharpCommonCompletionItem.Create(name, null, rules = getRules intellisenseOptions.ShowAfterCharIsTyped, glyph = Nullable glyph, filterText = filterText)
+                    let glyph = Tokenizer.FSharpGlyphToRoslynGlyph (declarationItem.Glyph, declarationItem.Accessibility)
+                    FSharpCommonCompletionItem.Create(name, displayTextSuffix = null, glyph = Nullable glyph, rules = getRules intellisenseOptions.ShowAfterCharIsTyped, filterText = filterText)
                                         .AddProperty(FullNamePropName, declarationItem.FullName)
                         
                 let completionItem =
diff --git a/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj b/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
index c4cc9fc07f8..62a805af8a6 100644
--- a/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
+++ b/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
@@ -10,6 +10,7 @@
     true
     $(SystemValueTupleVersion)
     $(OtherFlags) --warnon:1182 --subsystemversion:6.00
+    $(OtherFlags) /checknulls
     false
   
 
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs b/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
index cadf0d33e06..95364adfe46 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
@@ -29,10 +29,8 @@ module Constants =
 []
 type FSharpEditorFactory(parentPackage: ShellPackage) =
 
-    let serviceProvider = 
-        if parentPackage = null then
-            nullArg "parentPackage"
-        parentPackage :> IServiceProvider
+    let parentPackage = nullArgCheck "parentPackage" parentPackage 
+    let serviceProvider = parentPackage :> IServiceProvider
     let componentModel = serviceProvider.GetService(typeof) :?> IComponentModel
     let editorAdaptersFactoryService = componentModel.GetService()
     let contentTypeRegistryService = componentModel.GetService()
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
index f02f4e344b4..e30d92cad29 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
@@ -35,11 +35,11 @@ type internal FSharpCheckerWorkspaceService =
 type internal RoamingProfileStorageLocation(keyName: string) =
     inherit OptionStorageLocation()
     
-    member __.GetKeyNameForLanguage(languageName: string) =
+    member __.GetKeyNameForLanguage(languageName: string?) =
         let unsubstitutedKeyName = keyName
         match languageName with
         | null -> unsubstitutedKeyName
-        | _ ->
+        | NonNull languageName ->
             let substituteLanguageName = if languageName = FSharpConstants.FSharpLanguageName then "FSharp" else languageName
             unsubstitutedKeyName.Replace("%LANGUAGE%", substituteLanguageName)
  
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs b/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs
index 426ecf9a5f2..615cd26fa80 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs
@@ -115,7 +115,7 @@ type internal LegacyProjectWorkspaceMap(solution: IVsSolution,
             // Roslyn is expecting site to be an IVsHierarchy.
             // It just so happens that the object that implements IProvideProjectSite is also
             // an IVsHierarchy. This assertion is to ensure that the assumption holds true.
-            Debug.Assert(not (isNull hierarchy), "About to CreateProjectContext with a non-hierarchy site")
+            Debug.Assert(not (isNull (box hierarchy)), "About to CreateProjectContext with a non-hierarchy site")
 
             let projectContext = 
                 projectContextFactory.CreateProjectContext(
diff --git a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
index a607442e462..bd82efb9673 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
@@ -23,16 +23,16 @@ open FSharp.Compiler.SourceCodeServices
 
 module private Symbol =
     let fullName (root: ISymbol) : string =
-        let rec inner parts (sym: ISymbol) =
+        let rec inner parts (sym: ISymbol?) =
             match sym with
             | null ->
                 parts
             // TODO: do we have any other terminating cases?
-            | sym when sym.Kind = SymbolKind.NetModule || sym.Kind = SymbolKind.Assembly ->
+            | NonNull sym when sym.Kind = SymbolKind.NetModule || sym.Kind = SymbolKind.Assembly ->
                 parts
-            | sym when sym.MetadataName <> "" ->
+            | NonNull sym when sym.MetadataName <> "" ->
                 inner (sym.MetadataName :: parts) sym.ContainingSymbol
-            | sym ->
+            | NonNull sym ->
                 inner parts sym.ContainingSymbol
 
         inner [] root |> String.concat "."
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
index a1022788ab6..93c785e3c85 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
@@ -18,7 +18,6 @@ open Microsoft.VisualStudio.Shell.Interop
 open Microsoft.VisualStudio.Utilities
 open Microsoft.VisualStudio.Shell
 
-[]
 type internal FSharpNavigableSymbol(item: FSharpNavigableItem, span: SnapshotSpan, gtd: GoToDefinition, statusBar: StatusBar) =
     interface INavigableSymbol with
         member __.Navigate(_: INavigableRelationship) =
@@ -35,7 +34,7 @@ type internal FSharpNavigableSymbolSource(checkerProvider: FSharpCheckerProvider
     let statusBar = StatusBar(serviceProvider.GetService())
 
     interface INavigableSymbolSource with
-        member __.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) =
+        member __.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) : Task =
             // Yes, this is a code smell. But this is how the editor API accepts what we would treat as None.
             if disposed then null
             else
@@ -64,7 +63,7 @@ type internal FSharpNavigableSymbolSource(checkerProvider: FSharpCheckerProvider
                             let declarationSpan = Span(declarationTextSpan.Start, declarationTextSpan.Length)
                             let symbolSpan = SnapshotSpan(snapshot, declarationSpan)
 
-                            return FSharpNavigableSymbol(navigableItem, symbolSpan, gtd, statusBar) :> INavigableSymbol
+                            return FSharpNavigableSymbol(navigableItem, symbolSpan, gtd, statusBar) :> INavigableSymbol?
                         else 
                             statusBar.TempMessage(SR.CannotDetermineSymbol())
 
@@ -76,6 +75,8 @@ type internal FSharpNavigableSymbolSource(checkerProvider: FSharpCheckerProvider
                         // The NavigableSymbols API accepts 'null' when there's nothing to navigate to.
                         return null
                 }
+                // Async
+                // --> Async
                 |> Async.map Option.toObj
                 |> RoslynHelpers.StartAsyncAsTask cancellationToken
         
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
index d8edebd3ac1..f078803c12c 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
@@ -15,7 +15,7 @@ open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Navigation
 
 open FSharp.Compiler.SourceCodeServices
 
-type internal NavigationBarSymbolItem(text, glyph, spans, childItems) =
+type internal NavigationBarSymbolItem(text, glyph, spans, childItems: FSharpNavigationBarItem[]?) =
     inherit FSharpNavigationBarItem(text, glyph, spans, childItems)
 
 [)>]
diff --git a/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs b/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
index a6ea0c90332..1c0c70390a8 100644
--- a/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
+++ b/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
@@ -205,10 +205,10 @@ type internal FSharpAsyncQuickInfoSource
 
         // This method can be called from the background thread.
         // Do not call IServiceProvider.GetService here.
-        override __.GetQuickInfoItemAsync(session:IAsyncQuickInfoSession, cancellationToken:CancellationToken) : Task =
+        override __.GetQuickInfoItemAsync(session:IAsyncQuickInfoSession, cancellationToken:CancellationToken) : Task =
             let triggerPoint = session.GetTriggerPoint(textBuffer.CurrentSnapshot)
             match triggerPoint.HasValue with
-            | false -> Task.FromResult(null)
+            | false -> Task.FromResult(null)
             | true ->
                 let triggerPoint = triggerPoint.GetValueOrDefault()
                 let documentationBuilder = XmlDocumentation.CreateDocumentationBuilder(xmlMemberIndexService)
@@ -227,7 +227,7 @@ type internal FSharpAsyncQuickInfoSource
                         let navigation = QuickInfoNavigation(statusBar, checkerProvider.Checker, projectInfoManager, document, symbolUse.RangeAlternate)
                         let content = QuickInfoViewProvider.provideContent(imageId, mainDescription, docs, navigation)
                         let span = getTrackingSpan quickInfo.Span
-                        return QuickInfoItem(span, content)
+                        return (QuickInfoItem(span, content) : QuickInfoItem?)
 
                     | Some sigQuickInfo, Some targetQuickInfo ->
                         let mainDescription, targetDocumentation, sigDocumentation, typeParameterMap, exceptions, usage = ResizeArray(), ResizeArray(), ResizeArray(), ResizeArray(), ResizeArray(), ResizeArray()
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs b/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
index bbe816faf91..0f0b1dbda15 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
@@ -66,7 +66,7 @@ module internal Hooks =
     let private withFSIToolWindow (this:Package) f =
         queryFSIToolWindow true this f ()
 
-    let OnMLSend (this:Package) (action : FsiEditorSendAction) (sender:obj) (e:EventArgs) =
+    let OnMLSend (this:Package) (action : FsiEditorSendAction) (sender:obj) (e:EventArgs?) =
         withFSIToolWindow this (fun window ->
             match action with
             | ExecuteSelection -> window.MLSendSelection(sender, e)
diff --git a/vsintegration/src/FSharp.VS.FSI/sessions.fs b/vsintegration/src/FSharp.VS.FSI/sessions.fs
index 96585aafcc6..f117643ff0f 100644
--- a/vsintegration/src/FSharp.VS.FSI/sessions.fs
+++ b/vsintegration/src/FSharp.VS.FSI/sessions.fs
@@ -255,8 +255,6 @@ let fsiStartInfo channelName =
     procInfo
 
 
-let nonNull = function null -> false | (s:string) -> true
-
 /// Represents an active F# Interactive process to which Visual Studio is connected via stdin/stdout/stderr and a remoting channel
 type FsiSession() = 
     let randomSalt = System.Random()
@@ -336,9 +334,9 @@ type FsiSession() =
 
     member x.SendInput (str: string) = inputQueue.Post(str)
 
-    member x.Output      = Observable.filter nonNull fsiOutput.Publish
+    member x.Output      = Observable.filter (isNull >> not) fsiOutput.Publish
 
-    member x.Error       = Observable.filter nonNull fsiError.Publish
+    member x.Error       = Observable.filter (isNull >> not) fsiError.Publish
 
     member x.Exited      = (cmdProcess.Exited |> Observable.map id)
 
diff --git a/vsintegration/tests/MockTypeProviders/DummyProviderForLanguageServiceTesting/ProvidedTypes.fs b/vsintegration/tests/MockTypeProviders/DummyProviderForLanguageServiceTesting/ProvidedTypes.fs
index f01c8bdac18..bf318be647d 100644
--- a/vsintegration/tests/MockTypeProviders/DummyProviderForLanguageServiceTesting/ProvidedTypes.fs
+++ b/vsintegration/tests/MockTypeProviders/DummyProviderForLanguageServiceTesting/ProvidedTypes.fs
@@ -596,7 +596,7 @@ module internal Misc =
     let isEmpty s = s = ExpectedStackState.Empty
     let isAddress s = s = ExpectedStackState.Address
 
-    let nonNull str x = if x=null then failwith ("Null in " + str) else x
+    let failIfNull str x = if x=null then failwith ("Null in " + str) else x
     
     let notRequired opname item = 
         let msg = sprintf "The operation '%s' on item '%s' should not be called on provided type, member or parameter" opname item
@@ -844,7 +844,7 @@ type ProvidedConstructor(parameters : ProvidedParameter list) =
     override __.GetParameters() = parameters |> List.toArray 
     override __.Attributes = ctorAttributes
     override __.Name = if isStatic() then ".cctor" else ".ctor"
-    override __.DeclaringType = declaringType |> nonNull "ProvidedConstructor.DeclaringType"                                   
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedConstructor.DeclaringType"                                   
     override __.IsDefined(_attributeType, _inherit) = true 
 
     override __.Invoke(_invokeAttr, _binder, _parameters, _culture)      = notRequired "Invoke" (nameText())
@@ -930,7 +930,7 @@ type ProvidedMethod(methodName: string, parameters: ProvidedParameter list, retu
     override __.GetParameters() = argParams |> Array.ofList
     override __.Attributes = methodAttrs
     override __.Name = methodName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedMethod.DeclaringType"                                   
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedMethod.DeclaringType"                                   
     override __.IsDefined(_attributeType, _inherit) : bool = true
     override __.MemberType = MemberTypes.Method
     override __.CallingConvention = 
@@ -1013,7 +1013,7 @@ type ProvidedProperty(propertyName: string, propertyType: Type, ?parameters: Pro
     override __.CanWrite = hasSetter()
     override __.GetValue(_obj, _invokeAttr, _binder, _index, _culture) : obj = notRequired "GetValue" propertyName
     override __.Name = propertyName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedProperty.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedProperty.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Property
 
     override __.ReflectedType                                     = notRequired "ReflectedType" propertyName
@@ -1067,7 +1067,7 @@ type ProvidedEvent(eventName:string,eventHandlerType:Type) =
     override __.GetRemoveMethod _nonPublic = remover.Force() :> MethodInfo
     override __.Attributes = EventAttributes.None
     override __.Name = eventName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedEvent.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedEvent.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Event
 
     override __.GetRaiseMethod _nonPublic                      = notRequired "GetRaiseMethod" eventName
@@ -1102,7 +1102,7 @@ type ProvidedLiteralField(fieldName:string,fieldType:Type,literalValue:obj) =
     override __.GetRawConstantValue()  = literalValue
     override __.Attributes = FieldAttributes.Static ||| FieldAttributes.Literal ||| FieldAttributes.Public
     override __.Name = fieldName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedLiteralField.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedLiteralField.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Field
 
     override __.ReflectedType                                     = notRequired "ReflectedType" fieldName
@@ -1141,7 +1141,7 @@ type ProvidedField(fieldName:string,fieldType:Type) =
     override __.GetRawConstantValue()  = null
     override __.Attributes = fieldAttrs
     override __.Name = fieldName
-    override __.DeclaringType = declaringType |> nonNull "ProvidedField.DeclaringType"
+    override __.DeclaringType = declaringType |> failIfNull "ProvidedField.DeclaringType"
     override __.MemberType : MemberTypes = MemberTypes.Field
 
     override __.ReflectedType                                     = notRequired "ReflectedType" fieldName
diff --git a/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs b/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs
index a308bec56aa..df34a06c9b9 100644
--- a/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs
+++ b/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs
@@ -57,6 +57,10 @@ type UsingMSBuild() as this =
         let ok = errors |> List.exists (fun err -> err.Message = text)
         Assert.IsTrue(ok, sprintf "Error list should contain '%s' message" text)
 
+    let assertContainsContains (errors : list) text = 
+        let ok = errors |> List.exists (fun err -> err.Message.Contains(text))
+        Assert.IsTrue(ok, sprintf "Error list should contain '%s' message" text)
+
     let assertExpectedErrorMessages expected (actual: list) =
         let normalizeCR input = System.Text.RegularExpressions.Regex.Replace(input, @"\r\n|\n\r|\n|\r", "\r\n")
         let actual = 

From 7e0a7680a74507f8dc4105c493c853f839598463 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 24 Apr 2020 13:39:35 +0100
Subject: [PATCH 002/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index db7f74e2f3f..731ed80cf41 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -394,7 +394,7 @@ module internal ExtensionTyping =
             let argTypes = args |> Array.map (fun arg -> arg.RawSystemType)
             ProvidedType.CreateNoContext(x.MakeGenericType(argTypes))
 
-        member __.AsProvidedVar name = ProvidedVar.Create ctxt (Quotations.Var(name, x))
+        member __.AsProvidedVar name = ProvidedVar.CreateNonNull ctxt (Quotations.Var(name, x))
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         static member Create ctxt x : ProvidedType = 

From 9188adb19278762350b9f2bcf0b052f4eadb74fa Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 24 Apr 2020 19:16:39 +0100
Subject: [PATCH 003/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 89 +++++++++++++++++++++++++----------
 1 file changed, 63 insertions(+), 26 deletions(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 731ed80cf41..97d4aac4878 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -359,7 +359,7 @@ module internal ExtensionTyping =
         member __.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
         /// Type.BaseType can be null when Type is interface or object
         member __.BaseType = x.BaseType |> ProvidedType.Create ctxt
-        member __.GetStaticParameters(provider: ITypeProvider) = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
+        member __.GetStaticParameters(provider: ITypeProvider) = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArrayNonNull ctxt
         /// Type.GetElementType can be null if i.e. Type is not array\pointer\byref type
         member __.GetElementType() = x.GetElementType() |> ProvidedType.Create ctxt
         member __.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
@@ -412,10 +412,14 @@ module internal ExtensionTyping =
             | null -> nullArg name 
             | t -> ProvidedType (t, ctxt)
 
-        static member CreateArray ctxt xs = 
-            match box xs with
-            | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedType.CreateNonNull ctxt)
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+        static member CreateArray ctxt (xs: Type[]) : ProvidedType[] = 
+#else
+        static member CreateArray ctxt (xs: Type[]?) : ProvidedType[]? = 
+#endif
+            match xs with
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedType.CreateNonNull ctxt)
 
         static member CreateNoContext (x:Type) = ProvidedType.Create ProvidedTypeContext.Empty x
 
@@ -534,10 +538,19 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
         
-        static member CreateArray ctxt (xs: ParameterInfo[]) : ProvidedParameterInfo[] = 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+        static member CreateArray ctxt (xs: ParameterInfo[]) : ParameterInfo[] = 
+#else
+        static member CreateArray ctxt (xs: ParameterInfo[]?) : ProvidedParameterInfo[]? = 
+#endif
+            match xs with 
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
+        
+        static member CreateArrayNonNull ctxt xs : ProvidedParameterInfo[] = 
             match box xs with 
             | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
+            | _  -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
         
         interface IProvidedCustomAttributeProvider with 
             member __.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
@@ -600,7 +613,7 @@ module internal ExtensionTyping =
         static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
-        member __.GetStaticParametersForMethod(provider: ITypeProvider) = 
+        member __.GetStaticParametersForMethod(provider: ITypeProvider) : ProvidedParameterInfo[] = 
             let bindingFlags = BindingFlags.Instance ||| BindingFlags.NonPublic ||| BindingFlags.Public 
 
             let staticParams = 
@@ -619,7 +632,7 @@ module internal ExtensionTyping =
                         with err -> raise (StripException (StripException err))
                     paramsAsObj :?> System.Reflection.ParameterInfo[] 
 
-            staticParams |> ProvidedParameterInfo.CreateArray ctxt
+            staticParams |> ProvidedParameterInfo.CreateArrayNonNull ctxt
 
         member __.ApplyStaticArgumentsForMethod(provider: ITypeProvider, fullNameAfterArguments: string, staticArgs: obj[]) = 
             let bindingFlags = BindingFlags.Instance ||| BindingFlags.Public ||| BindingFlags.InvokeMethod
@@ -669,10 +682,14 @@ module internal ExtensionTyping =
             | null -> null 
             | NonNull x -> ProvidedFieldInfo (x, ctxt)
 
-        static member CreateArray ctxt xs : ProvidedFieldInfo[] = 
-            match box xs with 
-            | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt)
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+        static member CreateArray ctxt (xs: FieldInfo[]) : ProvidedFieldInfo[] = 
+#else
+        static member CreateArray ctxt (xs: FieldInfo[]?) : ProvidedFieldInfo[]? = 
+#endif
+            match xs with 
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt)
 
         member __.IsInitOnly = x.IsInitOnly
         member __.IsStatic = x.IsStatic
@@ -715,10 +732,14 @@ module internal ExtensionTyping =
             | null -> null
             | NonNull x -> ProvidedMethodInfo (x, ctxt)
 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         static member CreateArray ctxt (xs: MethodInfo[]) : ProvidedMethodInfo[] = 
-            match box xs with 
-            | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt)
+#else
+        static member CreateArray ctxt (xs: MethodInfo[]?) : ProvidedMethodInfo[]? = 
+#endif
+            match xs with 
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt)
 
         member __.Handle = x
         member __.MetadataToken = x.MetadataToken
@@ -750,10 +771,14 @@ module internal ExtensionTyping =
             | null -> null 
             | NonNull x -> ProvidedPropertyInfo (x, ctxt)
 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         static member CreateArray ctxt xs : ProvidedPropertyInfo[] = 
-            match box xs with
-            | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt)
+#else
+        static member CreateArray ctxt (xs: PropertyInfo[]?) : ProvidedPropertyInfo[]? = 
+#endif
+            match xs with
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt)
 
         member __.Handle = x
 
@@ -791,10 +816,14 @@ module internal ExtensionTyping =
             | null -> null 
             | NonNull x -> ProvidedEventInfo (x, ctxt)
         
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         static member CreateArray ctxt xs : ProvidedEventInfo[] = 
-            match box xs with 
-            | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt)
+#else
+        static member CreateArray ctxt (xs: EventInfo[]?) : ProvidedEventInfo[]? = 
+#endif
+            match xs with 
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt)
         
         member __.Handle = x
 
@@ -828,10 +857,14 @@ module internal ExtensionTyping =
             | null -> null 
             | NonNull x -> ProvidedConstructorInfo (x, ctxt)
 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         static member CreateArray ctxt xs : ProvidedConstructorInfo[] = 
-            match box xs with 
-            | null -> [| |]
-            | _ -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt)
+#else
+        static member CreateArray ctxt (xs: ConstructorInfo[]?) : ProvidedConstructorInfo[]? = 
+#endif
+            match xs with 
+            | null -> null
+            | NonNull xs -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt)
 
         member __.Handle = x
         override __.Equals y = assert false; match y with :? ProvidedConstructorInfo as y -> x.Equals y.Handle | _ -> false
@@ -955,7 +988,7 @@ module internal ExtensionTyping =
         static member CreateNonNull ctxt t = 
             ProvidedVar (t, ctxt)
 
-        static member CreateArray ctxt xs = 
+        static member CreateArray ctxt xs : ProvidedVar[] = 
             match box xs with 
             | null -> [| |]
             | _ -> xs |> Array.map (ProvidedVar.CreateNonNull ctxt)
@@ -986,7 +1019,11 @@ module internal ExtensionTyping =
             errorR(Error(FSComp.SR.etMustNotBeGeneric fullName, m))  
         if TryTypeMember(st, fullName, "IsArray", m, false, fun st->st.IsArray) |> unmarshal then 
             errorR(Error(FSComp.SR.etMustNotBeAnArray fullName, m))  
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         TryTypeMember(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore
+#else
+        TryTypeMember(st, fullName, "GetInterfaces", m, null, fun st -> st.GetInterfaces()) |> ignore
+#endif
 
 
     /// Verify that a provided type has the expected name

From 51d262b859c98ac86e5dcca1077ac4555b58fba6 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 27 Apr 2020 13:44:37 +0100
Subject: [PATCH 004/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 97d4aac4878..8ee25fab4f5 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -539,7 +539,7 @@ module internal ExtensionTyping =
         static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
         
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-        static member CreateArray ctxt (xs: ParameterInfo[]) : ParameterInfo[] = 
+        static member CreateArray ctxt (xs: ParameterInfo[]) : ProvidedParameterInfo[] = 
 #else
         static member CreateArray ctxt (xs: ParameterInfo[]?) : ProvidedParameterInfo[]? = 
 #endif

From d0ed213f0c55318441b52144e9968381fa09874f Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 27 Apr 2020 15:04:53 +0100
Subject: [PATCH 005/112] fix tests

---
 tests/fsharp/tests.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/fsharp/tests.fs b/tests/fsharp/tests.fs
index 78ac86ce3c6..8d12e14d22f 100644
--- a/tests/fsharp/tests.fs
+++ b/tests/fsharp/tests.fs
@@ -218,7 +218,7 @@ module CoreTests =
     let ``test int32-FSI_BASIC`` () = singleTestBuildAndRun "core/int32" FSI_BASIC
 
 
-#if !FSHARP_SUITE_DRIVES_CORECLR_TESTS
+#if !NETCOREAPP
     []
     let ``subtype-langversion-50-checknulls`` () =
         let cfg = testConfig "core/subtype"

From 1700f703cdd28b4d7d83e0f6d4151d26eca523e7 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 27 Apr 2020 17:12:31 +0100
Subject: [PATCH 006/112] fix provider test

---
 src/fsharp/ConstraintSolver.fs        |  1 +
 src/fsharp/ExtensionTyping.fs         | 29 +++++++++++++++------------
 src/fsharp/FSharp.Core/prim-types.fsi |  2 +-
 3 files changed, 18 insertions(+), 14 deletions(-)

diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 8fef9170ef1..31acc7fb176 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -1170,6 +1170,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
     | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2)      -> 
         SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> 
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2)
+
     | TType_forall(tps1, rty1), TType_forall(tps2, rty2) -> 
         if tps1.Length <> tps2.Length then localAbortD else
         let aenv = aenv.BindEquivTypars tps1 tps2 
diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 8ee25fab4f5..96563a62472 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -181,7 +181,7 @@ module internal ExtensionTyping =
     let unmarshal (t: Tainted<_>) = t.PUntaintNoFailure id
 
     /// Try to access a member on a provided type, catching and reporting errors
-    let TryTypeMember<'T,'U>(st: Tainted<'T>, fullName, memberName, m, recover, f: 'T -> 'U) =
+    let TryTypeMember<'T,'U>(st: Tainted<'T>, fullName, memberName, m, recover, f: 'T -> 'U) : Tainted<'U> =
         try
             st.PApply (f, m)
         with :? TypeProviderError as tpe -> 
@@ -197,8 +197,12 @@ module internal ExtensionTyping =
             [||]
 
     /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
-    let TryTypeMemberNonNull (st: Tainted<_>, fullName, memberName, m, recover, f) =
-        match TryTypeMember(st, fullName, memberName, m, recover, f) with 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    let TryTypeMemberNonNull<'T, 'U>(st: Tainted<'T>, fullName, memberName, m, recover, (f: 'T -> 'U) : Tainted<'U> =
+#else
+    let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, (recover: 'U), (f: 'T -> 'U?)) : Tainted<'U> =
+#endif
+        match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
         | Tainted.Null -> 
             errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m)); 
             st.PApplyNoFailure(fun _ -> recover)
@@ -359,7 +363,11 @@ module internal ExtensionTyping =
         member __.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
         /// Type.BaseType can be null when Type is interface or object
         member __.BaseType = x.BaseType |> ProvidedType.Create ctxt
-        member __.GetStaticParameters(provider: ITypeProvider) = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArrayNonNull ctxt
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+        member __.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[] = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
+#else
+        member __.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[]? = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
+#endif
         /// Type.GetElementType can be null if i.e. Type is not array\pointer\byref type
         member __.GetElementType() = x.GetElementType() |> ProvidedType.Create ctxt
         member __.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
@@ -1019,12 +1027,7 @@ module internal ExtensionTyping =
             errorR(Error(FSComp.SR.etMustNotBeGeneric fullName, m))  
         if TryTypeMember(st, fullName, "IsArray", m, false, fun st->st.IsArray) |> unmarshal then 
             errorR(Error(FSComp.SR.etMustNotBeAnArray fullName, m))  
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-        TryTypeMember(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore
-#else
-        TryTypeMember(st, fullName, "GetInterfaces", m, null, fun st -> st.GetInterfaces()) |> ignore
-#endif
-
+        TryTypeMemberNonNull(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore
 
     /// Verify that a provided type has the expected name
     let ValidateExpectedName m expectedPath expectedName (st : Tainted) =
@@ -1183,8 +1186,8 @@ module internal ExtensionTyping =
         | -1 -> ()
         | n -> errorR(Error(FSComp.SR.etIllegalCharactersInTypeName(string expectedName.[n], expectedName), m))  
 
-        let staticParameters = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
-        if staticParameters.PUntaint((fun a -> a.Length), m)  = 0 then 
+        let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
+        if staticParameters.PUntaint((fun a -> (nonNull a).Length), m)  = 0 then 
             ValidateProvidedTypeAfterStaticInstantiation(m, st, expectedPath, expectedName)
 
 
@@ -1294,7 +1297,7 @@ module internal ExtensionTyping =
                     // Otherwise, use the full path of the erased type, including mangled arguments
                     let nm = typeBeforeArguments.PUntaint((fun x -> x.Name), m)
                     let enc, _ = ILPathToProvidedType (typeBeforeArguments, m)
-                    let staticParams = typeBeforeArguments.PApplyWithProvider((fun (mb, resolver) -> mb.GetStaticParameters resolver), range=m) 
+                    let staticParams : Tainted = typeBeforeArguments.PApplyWithProvider((fun (st, resolver) -> st.GetStaticParameters resolver |> nonNull), range=m) 
                     let mangledName = ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams, m)
                     enc @ [ mangledName ]
  
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index f317466f8c3..fbbbd29ef7a 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -2321,7 +2321,7 @@ namespace Microsoft.FSharp.Core
 
         /// Asserts that the value is non-null.
         /// The value to check.
-        /// True when value is null, false otherwise.
+        /// The value when it is not null. If the value is null an exception is raised.
         []
         val inline nonNull : value: 'T? -> 'T when 'T : not struct and 'T : not null
 

From 21851b0ce4a309b78609232c2e63bedfbe653920 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 29 Apr 2020 15:15:52 +0100
Subject: [PATCH 007/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 96563a62472..e5dcef2875c 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -198,7 +198,7 @@ module internal ExtensionTyping =
 
     /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    let TryTypeMemberNonNull<'T, 'U>(st: Tainted<'T>, fullName, memberName, m, recover, (f: 'T -> 'U) : Tainted<'U> =
+    let TryTypeMemberNonNull<'T, 'U>(st: Tainted<'T>, fullName, memberName, m, recover, (f: 'T -> 'U)) : Tainted<'U> =
 #else
     let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, (recover: 'U), (f: 'T -> 'U?)) : Tainted<'U> =
 #endif

From b5c74f6224969cbc9668cf750a43b56ce99b0378 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 29 Apr 2020 15:40:05 +0100
Subject: [PATCH 008/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index e5dcef2875c..f29ec18c21d 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -199,10 +199,11 @@ module internal ExtensionTyping =
     /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
     let TryTypeMemberNonNull<'T, 'U>(st: Tainted<'T>, fullName, memberName, m, recover, (f: 'T -> 'U)) : Tainted<'U> =
+        match TryTypeMember(st, fullName, memberName, m, withNull recover, f) with 
 #else
     let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, (recover: 'U), (f: 'T -> 'U?)) : Tainted<'U> =
-#endif
         match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
+#endif
         | Tainted.Null -> 
             errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m)); 
             st.PApplyNoFailure(fun _ -> recover)

From 880032c284ffd8dac92304bdffb2391e8db986f1 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 29 Apr 2020 16:04:01 +0100
Subject: [PATCH 009/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index f29ec18c21d..2be89755b1f 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -1187,7 +1187,11 @@ module internal ExtensionTyping =
         | -1 -> ()
         | n -> errorR(Error(FSComp.SR.etIllegalCharactersInTypeName(string expectedName.[n], expectedName), m))  
 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+        let staticParameters = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
+#else
         let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
+#endif
         if staticParameters.PUntaint((fun a -> (nonNull a).Length), m)  = 0 then 
             ValidateProvidedTypeAfterStaticInstantiation(m, st, expectedPath, expectedName)
 

From 7381ecb7679658ece0d2beb7ba91d49b0cf367f9 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 29 Apr 2020 17:07:27 +0100
Subject: [PATCH 010/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 2be89755b1f..259343b206b 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -198,10 +198,10 @@ module internal ExtensionTyping =
 
     /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    let TryTypeMemberNonNull<'T, 'U>(st: Tainted<'T>, fullName, memberName, m, recover, (f: 'T -> 'U)) : Tainted<'U> =
-        match TryTypeMember(st, fullName, memberName, m, withNull recover, f) with 
+    let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
+        match TryTypeMember(st, fullName, memberName, m, recover, f) with 
 #else
-    let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, (recover: 'U), (f: 'T -> 'U?)) : Tainted<'U> =
+    let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U?)) : Tainted<'U> =
         match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
 #endif
         | Tainted.Null -> 

From 356dfd057bca82f96c4cf668112b5fdde4cef2fc Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 3 Jun 2020 17:19:04 +0100
Subject: [PATCH 011/112] fix build

---
 src/absil/bytes.fs                            |   2 -
 src/fsharp/FSharp.Core/quotations.fs          |   8 +-
 src/fsharp/IlxGen.fs                          |   1 +
 src/fsharp/MethodCalls.fs                     |   2 +-
 src/fsharp/QuotationTranslator.fs             | 155 +-----------------
 src/fsharp/SyntaxTree.fs                      |   3 -
 src/fsharp/TypedTree.fs                       |   7 +-
 src/fsharp/xlf/FSComp.txt.cs.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.de.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.es.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.fr.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.it.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.ja.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.ko.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.pl.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.pt-BR.xlf           |  60 +++++++
 src/fsharp/xlf/FSComp.txt.ru.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.tr.xlf              |  60 +++++++
 src/fsharp/xlf/FSComp.txt.zh-Hans.xlf         |  60 +++++++
 src/fsharp/xlf/FSComp.txt.zh-Hant.xlf         |  60 +++++++
 src/fsharp/xlf/FSStrings.cs.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.de.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.es.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.fr.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.it.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.ja.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.ko.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.pl.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.pt-BR.xlf            |  20 +++
 src/fsharp/xlf/FSStrings.ru.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.tr.xlf               |  20 +++
 src/fsharp/xlf/FSStrings.zh-Hans.xlf          |  20 +++
 src/fsharp/xlf/FSStrings.zh-Hant.xlf          |  20 +++
 ..._ArrayOfArray_FSInterface_NoExtMeth.il.bsl |  24 ---
 ...xStruct_Array_FSInterface_NoExtMeth.il.bsl |  51 ------
 ...truct_MDArray_FSInterface_NoExtMeth.il.bsl |  51 ------
 ...truct_NoArray_FSInterface_NoExtMeth.il.bsl |  47 ------
 .../Linq101Aggregates01.il.bsl                |  23 ---
 .../Linq101Quantifiers01.il.bsl               |  23 ---
 .../Linq101Select01.il.bsl                    |  23 ---
 .../StaticInit/StaticInit_Struct01.il.bsl     |  23 ---
 .../fsi/help/help40-nologo.437.1033.bsl       |   4 -
 .../fsi/help/help40.437.1033.bsl              |   4 -
 43 files changed, 1049 insertions(+), 442 deletions(-)

diff --git a/src/absil/bytes.fs b/src/absil/bytes.fs
index 646eb76770a..fbd699dae4e 100644
--- a/src/absil/bytes.fs
+++ b/src/absil/bytes.fs
@@ -396,8 +396,6 @@ type ByteMemory with
     static member FromArray bytes =
         ByteArrayMemory.FromArray(bytes, 0, bytes.Length)
 
-    static member Empty with get() = ByteMemory.FromArray [| |]
-
 type internal ByteStream = 
     { bytes: ReadOnlyByteMemory
       mutable pos: int 
diff --git a/src/fsharp/FSharp.Core/quotations.fs b/src/fsharp/FSharp.Core/quotations.fs
index 9f3d59caccf..8c5c5c2824a 100644
--- a/src/fsharp/FSharp.Core/quotations.fs
+++ b/src/fsharp/FSharp.Core/quotations.fs
@@ -1928,15 +1928,15 @@ type Expr with
         checkNonNull "methodInfo" methodInfo
         mkInstanceMethodCall (obj, methodInfo, arguments)
 
-    static member CallWithWitnesses (methodInfo: MethodInfo, methodInfoWithWitnesses: MethodInfo, witnessArguments, arguments) =
+    static member CallWithWitnesses (methodInfo: MethodInfo, methodInfoWithWitnesses: MethodInfo, witnesses, arguments) =
         checkNonNull "methodInfo" methodInfo
         checkNonNull "methodInfoWithWitnesses" methodInfoWithWitnesses
-        mkStaticMethodCallW (methodInfo, methodInfoWithWitnesses, List.length witnessArguments, witnessArguments@arguments)
+        mkStaticMethodCallW (methodInfo, methodInfoWithWitnesses, List.length witnesses, witnesses@arguments)
 
-    static member CallWithWitnesses (obj: Expr, methodInfo: MethodInfo, methodInfoWithWitnesses: MethodInfo, witnessArguments, arguments) =
+    static member CallWithWitnesses (obj: Expr, methodInfo: MethodInfo, methodInfoWithWitnesses: MethodInfo, witnesses, arguments) =
         checkNonNull "methodInfo" methodInfo
         checkNonNull "methodInfoWithWitnesses" methodInfoWithWitnesses
-        mkInstanceMethodCallW (obj, methodInfo, methodInfoWithWitnesses, List.length witnessArguments, witnessArguments@arguments)
+        mkInstanceMethodCallW (obj, methodInfo, methodInfoWithWitnesses, List.length witnesses, witnesses@arguments)
 
     static member Coerce (source: Expr, target: Type) =
         checkNonNull "target" target
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 6ffe20ef830..c0406481115 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -7760,6 +7760,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                          .WithAccess(access)
                          .WithInitSemantics(ILTypeInit.BeforeField)
 
+               let tdef2 = g.EraseClassUnionDef tref tdef cuinfo
 
                // Discard the user-supplied (i.e. prim-type.fs) implementations of the get_Empty, get_IsEmpty, get_Value and get_None and Some methods.
                // This is because we will replace their implementations by ones that load the unique
diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs
index 88df119aaf2..2f11c3a3dae 100644
--- a/src/fsharp/MethodCalls.fs
+++ b/src/fsharp/MethodCalls.fs
@@ -1948,7 +1948,7 @@ let GenWitnessExprLambda amap g m (traitInfo: TraitConstraintInfo) =
     let vsl = List.mapSquared fst vse
     match GenWitnessExpr amap g m traitInfo (List.concat (List.mapSquared snd vse)) with 
     | Some expr -> 
-        Choice2Of2 (mkMemberLambdas m [] None None vsl (expr, tyOfExpr g expr))
+        Choice2Of2 (mkMemberLambdas g m [] None None vsl (expr, tyOfExpr g expr))
     | None -> 
         Choice1Of2 traitInfo
 
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index f9a3ad02dc4..f961cfdffce 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -245,10 +245,6 @@ let rec EmitDebugInfoIfNecessary cenv env m astExpr : QP.ExprData =
 and ConvExpr cenv env (expr : Expr) =
     EmitDebugInfoIfNecessary cenv env expr.Range (ConvExprCore cenv env expr)
 
-<<<<<<< HEAD
-and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.ExprData = 
-    let g = cenv.g
-=======
 and GetWitnessArgs cenv (env : QuotationTranslationEnv) m tps tyargs =
     let g = cenv.g
     if g.generateWitnesses && not env.suppressWitnesses then 
@@ -283,7 +279,6 @@ and ConvWitnessInfo cenv env m traitInfo =
         QP.mkHole(ConvType cenv env m holeTy, idx)
 
 and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.ExprData =
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
     let g = cenv.g
 
@@ -300,21 +295,12 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
     // Recognize applications of module functions.
     match expr with
     // Detect expression tree exprSplices
-<<<<<<< HEAD
-    | Expr.App (InnerExprPat (Expr.Val (vf, _, _)), _, _, x0 :: rest, m) 
-           when isSplice g vf -> 
-        let idx = cenv.exprSplices.Count
-        let ty = tyOfExpr g expr
-        
-        match (freeInExpr CollectTyparsAndLocalsNoCaching x0).FreeLocals |> Seq.tryPick (fun v -> if env.vs.ContainsVal v then Some v else None) with 
-=======
     | Expr.App (InnerExprPat(Expr.Val (vf, _, _)), _, _, x0 :: rest, m)
            when isSplice g vf ->
         let idx = cenv.exprSplices.Count
         let ty = tyOfExpr g expr
 
         match (freeInExpr CollectTyparsAndLocalsNoCaching x0).FreeLocals |> Seq.tryPick (fun v -> if env.vs.ContainsVal v then Some v else None) with
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
         | Some v -> errorR(Error(FSComp.SR.crefBoundVarUsedInSplice(v.DisplayName), v.Range))
         | None -> ()
 
@@ -322,36 +308,18 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
         let hole = QP.mkHole(ConvType cenv env m ty, idx)
         (hole, rest) ||> List.fold (fun fR arg -> QP.mkApp (fR, ConvExpr cenv env arg))
 
-<<<<<<< HEAD
-    | ModuleValueOrMemberUse g (vref, vFlags, _f, _fty, tyargs, curriedArgs) 
-        when not (isSplice g vref) ->
-        let m = expr.Range 
-
-        let (numEnclTypeArgs,_,isNewObj,valUseFlags,isSelfInit,takesInstanceArg,isPropGet,isPropSet) = 
-            GetMemberCallInfo g (vref,vFlags)
-=======
     | ModuleValueOrMemberUse g (vref, vFlags, _f, _fty, tyargs, curriedArgs)
         when not (isSplice g vref) ->
         let m = expr.Range
 
         let (numEnclTypeArgs, _, isNewObj, valUseFlags, isSelfInit, takesInstanceArg, isPropGet, isPropSet) =
             GetMemberCallInfo g (vref, vFlags)
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
         let isMember, tps, witnessInfos, curriedArgInfos, retTy =
             match vref.MemberInfo with
             | Some _ when not vref.IsExtensionMember ->
                 // This is an application of a member method
                 // We only count one argument block for these.
-<<<<<<< HEAD
-                let tps, curriedArgInfos, retTy, _ = GetTypeOfIntrinsicMemberInCompiledForm g vref 
-                true, tps, curriedArgInfos, retTy
-            | _ -> 
-                // This is an application of a module value or extension member
-                let arities = arityOfVal vref.Deref 
-                let tps, curriedArgInfos, retTy, _ = GetTopValTypeInCompiledForm g arities vref.Type m
-                false, tps, curriedArgInfos, retTy
-=======
                 let tps, witnessInfos, curriedArgInfos, retTy, _ = GetTypeOfIntrinsicMemberInCompiledForm g vref
                 true, tps, witnessInfos, curriedArgInfos, retTy
             | _ ->
@@ -360,7 +328,6 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
                 let numEnclosingTypars = CountEnclosingTyparsOfActualParentOfVal vref.Deref
                 let tps, witnessInfos, curriedArgInfos, retTy, _ = GetTopValTypeInCompiledForm g arities numEnclosingTypars vref.Type m
                 false, tps, witnessInfos, curriedArgInfos, retTy
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
         // Compute the object arguments as they appear in a compiled call
         // Strip off the object argument, if any. The curriedArgInfos are already adjusted to compiled member form
@@ -380,19 +347,6 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
            ((List.truncate nCurriedArgInfos curriedArgs, curriedArgInfos) ||> List.exists2 (fun arg argInfo ->
                        (argInfo.Length > (tryDestRefTupleExpr arg).Length)))
         then
-<<<<<<< HEAD
-            if verboseCReflect then 
-                dprintfn "vref.DisplayName = %A was under applied" vref.DisplayName 
-            // Too few arguments or incorrect tupling? Convert to a lambda and beta-reduce the 
-            // partially applied arguments to 'let' bindings 
-            let topValInfo = 
-               match vref.ValReprInfo with 
-               | None -> error(InternalError("no arity information found for F# value " + vref.LogicalName,vref.Range))
-               | Some a -> a 
-
-            let expr,exprty = AdjustValForExpectedArity g m vref vFlags topValInfo 
-            ConvExpr cenv env (MakeApplicationAndBetaReduce g (expr,exprty,[tyargs],curriedArgs,m)) 
-=======
             if verboseCReflect then
                 dprintfn "vref.DisplayName = %A was under applied" vref.DisplayName
             // Too few arguments or incorrect tupling? Convert to a lambda and beta-reduce the
@@ -404,7 +358,6 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
 
             let expr, exprty = AdjustValForExpectedArity g m vref vFlags topValInfo
             ConvExpr cenv env (MakeApplicationAndBetaReduce g (expr, exprty, [tyargs], curriedArgs, m))
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
         else
             // Too many arguments? Chop
             let (curriedArgs: Expr list ), laterArgs = List.splitAt nCurriedArgInfos curriedArgs
@@ -469,17 +422,10 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
             List.fold (fun fR arg -> QP.mkApp (fR, ConvExpr cenv env arg)) callR laterArgs
 
 
-<<<<<<< HEAD
-    // Blast type application nodes and expression application nodes apart so values are left with just their type arguments 
-    | Expr.App (f, fty, (_ :: _ as tyargs),(_ :: _ as args), m) -> 
-      let rfty = applyForallTy g fty tyargs
-      ConvExpr cenv env (primMkApp (primMkApp (f,fty) tyargs [] m, rfty) [] args m) 
-=======
     // Blast type application nodes and expression application nodes apart so values are left with just their type arguments
     | Expr.App (f, fty, (_ :: _ as tyargs), (_ :: _ as args), m) ->
         let rfty = applyForallTy g fty tyargs
         ConvExpr cenv env (primMkApp (primMkApp (f, fty) tyargs [] m, rfty) [] args m)
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
     // Uses of possibly-polymorphic values
     | Expr.App (InnerExprPat(Expr.Val (vref, _vFlags, m)), _fty, tyargs, [], _) ->
@@ -511,28 +457,17 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
          let bindsR = List.zip vsR (binds |> List.map (fun b -> ConvExpr cenv env b.Expr))
          QP.mkLetRec(bindsR, bodyR)
 
-<<<<<<< HEAD
-    | Expr.Lambda (_, _, _, vs, b, _, _) -> 
-        let v,b = MultiLambdaToTupledLambda g vs b 
-        let vR = ConvVal cenv env v 
-        let bR = ConvExpr cenv (BindVal env v) b 
-=======
     | Expr.Lambda (_, _, _, vs, b, _, _) ->
         let v, b = MultiLambdaToTupledLambda g vs b
         let vR = ConvVal cenv env v
         let bR = ConvExpr cenv (BindVal env v) b
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
         QP.mkLambda(vR, bR)
 
     | Expr.Quote (ast, _, _, _, ety) ->
         // F# 2.0-3.1 had a bug with nested 'raw' quotations. F# 4.0 + FSharp.Core 4.4.0.0+ allows us to do the right thing.
         if cenv.quotationFormat.SupportsDeserializeEx &&
            // Look for a 'raw' quotation
-<<<<<<< HEAD
-           tyconRefEq g (tcrefOfAppTy g ety) g.raw_expr_tcr 
-=======
            tyconRefEq g (tcrefOfAppTy g ety) g.raw_expr_tcr
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
         then
             QP.mkQuoteRaw40(ConvExpr cenv env ast)
         else
@@ -546,18 +481,6 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
         ConvDecisionTree cenv env tgs typR dtree
 
     // initialization check
-<<<<<<< HEAD
-    | Expr.Sequential (ObjectInitializationCheck g, x1, NormalSeq, _, _) -> ConvExpr cenv env x1
-    | Expr.Sequential (x0,x1,NormalSeq,_,_)  -> QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1)
-    | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod],_,m) when isDelegateTy g ty -> 
-         let f = mkLambdas g m tps tmvs (e,GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod))
-         let fR = ConvExpr cenv env f 
-         let tyargR = ConvType cenv env m ctyp 
-         QP.mkDelegate(tyargR, fR)
-
-    | Expr.StaticOptimization (_, _, x, _) ->
-        ConvExpr cenv env x
-=======
     | Expr.Sequential (ObjectInitializationCheck g, x1, NormalSeq, _, _) ->
         ConvExpr cenv env x1
 
@@ -565,31 +488,22 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
         QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1)
 
     | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy g ty ->
-        let f = mkLambdas m tps tmvs (e, GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod))
+        let f = mkLambdas g m tps tmvs (e, GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod))
         let fR = ConvExpr cenv env f
         let tyargR = ConvType cenv env m ctyp
         QP.mkDelegate(tyargR, fR)
 
     | Expr.StaticOptimization (_, _, x, _) ->
          ConvExpr cenv env x
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
     | Expr.TyChoose _ ->
         ConvExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr)
 
-<<<<<<< HEAD
-    | Expr.Sequential  (x0, x1, ThenDoSeq, _, _)
-        -> QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1)
-
-    | Expr.Obj (_lambdaId, _typ, _basev, _basecall, _overrides, _iimpls, m) -> 
-        wfail(Error(FSComp.SR.crefQuotationsCantContainObjExprs(),m))
-=======
     | Expr.Sequential  (x0, x1, ThenDoSeq, _, _) ->
         QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1)
 
     | Expr.Obj (_lambdaId, _typ, _basev, _basecall, _overrides, _iimpls, m) ->
         wfail(Error(FSComp.SR.crefQuotationsCantContainObjExprs(), m))
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
     | Expr.Op (op, tyargs, args, m) ->
         match op, tyargs, args with
@@ -656,24 +570,14 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
             let argsR = ConvLValueArgs cenv env args
             QP.mkFieldSet(parentTyconR, fspec.Name, tyargsR, argsR)
 
-<<<<<<< HEAD
-        | TOp.ILAsm ([ AI_ceq ], _), _,[arg1; arg2]  -> 
-=======
         | TOp.ILAsm ([ AI_ceq ], _), _, [arg1;arg2]  ->
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
             let ty = tyOfExpr g arg1
             let eq = mkCallEqualsOperator g m ty arg1 arg2
             ConvExpr cenv env eq
 
-<<<<<<< HEAD
-        | TOp.ILAsm ([ I_throw ], _), _, [arg1]  -> 
-            let raiseExpr = mkCallRaise g m (tyOfExpr g expr) arg1 
-            ConvExpr cenv env raiseExpr        
-=======
         | TOp.ILAsm ([ I_throw ], _), _, [arg1]  ->
             let raiseExpr = mkCallRaise g m (tyOfExpr g expr) arg1
             ConvExpr cenv env raiseExpr
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
         | TOp.ILAsm (_il, _), _, _                         ->
             wfail(Error(FSComp.SR.crefQuotationsCantContainInlineIL(), m))
@@ -720,24 +624,14 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
 
         | TOp.Coerce, [tgtTy;srcTy], [x]  ->
             let xR = ConvExpr cenv env x
-<<<<<<< HEAD
-            if typeEquiv g tgtTy srcTy then 
-=======
             if typeEquiv g tgtTy srcTy then
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
                 xR
             else
                 QP.mkCoerce(ConvType cenv env m tgtTy, xR)
 
-<<<<<<< HEAD
-        | TOp.Reraise, [toTy], []         -> 
-            // rebuild reraise() and Convert 
-            mkReraiseLibCall g toTy m |> ConvExpr cenv env 
-=======
         | TOp.Reraise, [toTy], []         ->
             // rebuild reraise() and Convert
             mkReraiseLibCall g toTy m |> ConvExpr cenv env
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
         | TOp.LValueOp (LAddrOf _, vref), [], [] ->
             QP.mkAddressOf(ConvValRef false cenv env m vref [])
@@ -747,17 +641,10 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
 
         | TOp.LValueOp (LSet, vref), [], [e] ->
             // Sets of module values become property sets
-<<<<<<< HEAD
-            match vref.DeclaringEntity with 
-            | Parent tcref when IsCompiledAsStaticProperty g vref.Deref  -> 
-                let parentTyconR = ConvTyconRef cenv tcref m 
-                let propName = vref.CompiledName cenv.g.CompilerGlobalState
-=======
             match vref.DeclaringEntity with
             | Parent tcref when IsCompiledAsStaticProperty g vref.Deref  ->
                 let parentTyconR = ConvTyconRef cenv tcref m
                 let propName = vref.CompiledName g.CompilerGlobalState
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
                 let propTy = ConvType cenv env m vref.Type
                 QP.mkPropSet( (parentTyconR, propName, propTy, []), [], [ConvExpr cenv env e])
             | _ ->
@@ -771,19 +658,11 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
 
         | TOp.While _, [], [Expr.Lambda (_, _, _, [_], test, _, _);Expr.Lambda (_, _, _, [_], body, _, _)]  ->
               QP.mkWhileLoop(ConvExpr cenv env test, ConvExpr cenv env body)
-<<<<<<< HEAD
-        
-        | TOp.For (_, FSharpForLoopUp), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody g (arr, elemTy, body)] ->
-            let lim1 = 
-                let len = mkCallArrayLength g lm elemTy arr // Array.length arr
-                mkCallSubtractionOperator g lm g.int32_ty len (Expr.Const(Const.Int32 1, m, g.int32_ty)) // len - 1
-=======
 
         | TOp.For (_, FSharpForLoopUp), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody g (arr, elemTy, body)] ->
             let lim1 =
                 let len = mkCallArrayLength g lm elemTy arr // Array.length arr
                 mkCallSubtractionOperator g lm g.int32_ty len (Expr.Const (Const.Int32 1, m, g.int32_ty)) // len - 1
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
             QP.mkForLoop(ConvExpr cenv env lim0, ConvExpr cenv env lim1, ConvExpr cenv env body)
 
         | TOp.For (_, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _);Expr.Lambda (_, _, _, [_], lim1, _, _);body]  ->
@@ -812,19 +691,11 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
             let envh = BindVal env vh
             QP.mkTryWith(ConvExpr cenv env e1, vfR, ConvExpr cenv envf ef, vhR, ConvExpr cenv envh eh)
 
-<<<<<<< HEAD
-        | TOp.Bytes bytes, [], [] -> 
-              ConvExpr cenv env (Expr.Op (TOp.Array, [g.byte_ty], List.ofArray (Array.map (mkByte g m) bytes), m))
-
-        | TOp.UInt16s arr, [], [] ->
-              ConvExpr cenv env (Expr.Op(TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m))
-=======
         | TOp.Bytes bytes, [], [] ->
             ConvExpr cenv env (Expr.Op (TOp.Array, [g.byte_ty], List.ofArray (Array.map (mkByte g m) bytes), m))
 
         | TOp.UInt16s arr, [], [] ->
             ConvExpr cenv env (Expr.Op (TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m))
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
         | TOp.UInt16s arr, [], [] -> 
               ConvExpr cenv env (Expr.Op(TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m))
@@ -881,16 +752,11 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
         | _ -> 
             wfail(InternalError( "Unexpected expression shape",m))
 
-<<<<<<< HEAD
-    | _ -> 
-        wfail(InternalError(sprintf "unhandled construct in AST: %A" expr,expr.Range))
-=======
     | Expr.WitnessArg (traitInfo, m) ->
         ConvWitnessInfo cenv env m traitInfo
 
     | _ ->
         wfail(InternalError(sprintf "unhandled construct in AST: %A" expr, expr.Range))
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 and ConvLdfld cenv env m (fspec: ILFieldSpec) enclTypeArgs args =
     let tyargsR = ConvTypes cenv env m enclTypeArgs
@@ -1040,16 +906,6 @@ and ConvObjectModelCallCore cenv env m (isPropGet, isPropSet, isNewObj, parentTy
 and ConvModuleValueApp cenv env m (vref:ValRef) tyargs witnessArgs (args: Expr list list) =
     EmitDebugInfoIfNecessary cenv env m (ConvModuleValueAppCore cenv env m vref tyargs witnessArgs args)
 
-<<<<<<< HEAD
-and ConvModuleValueAppCore cenv env m (vref: ValRef) tyargs (args: Expr list list) =
-    let g = cenv.g
-    match vref.DeclaringEntity with 
-    | ParentNone -> failwith "ConvModuleValueApp"
-    | Parent tcref -> 
-        let isProperty = IsCompiledAsStaticProperty g vref.Deref
-        let tcrefR = ConvTyconRef cenv tcref m 
-        let tyargsR = ConvTypes cenv env m tyargs 
-=======
 and ConvModuleValueAppCore cenv env m (vref: ValRef) tyargs witnessArgsR (curriedArgs: Expr list list) =
     match vref.DeclaringEntity with
     | ParentNone -> failwith "ConvModuleValueAppCore"
@@ -1057,7 +913,6 @@ and ConvModuleValueAppCore cenv env m (vref: ValRef) tyargs witnessArgsR (currie
         let isProperty = IsCompiledAsStaticProperty cenv.g vref.Deref
         let tcrefR = ConvTyconRef cenv tcref m
         let tyargsR = ConvTypes cenv env m tyargs
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
         let nm = vref.CompiledName cenv.g.CompilerGlobalState
         let uncurriedArgsR = ConvExprs cenv env (List.concat curriedArgs)
         let allArgsR = witnessArgsR @ uncurriedArgsR
@@ -1093,13 +948,6 @@ and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs =
         | ParentNone ->
               // References to local values are embedded by value
               if not holeOk then wfail(Error(FSComp.SR.crefNoSetOfHole(), m))
-<<<<<<< HEAD
-              let idx = cenv.exprSplices.Count 
-              cenv.exprSplices.Add((mkCallLiftValueWithName g m vty v.LogicalName (exprForValRef m vref), m))
-              QP.mkHole(ConvType cenv env m vty, idx)
-        | Parent _ -> 
-              ConvModuleValueApp cenv env m vref tyargs []
-=======
               let idx = cenv.exprSplices.Count
               let liftExpr = mkCallLiftValueWithName cenv.g m vty v.LogicalName (exprForValRef m vref)
               cenv.exprSplices.Add((liftExpr, m))
@@ -1109,7 +957,6 @@ and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs =
             // First-class use or use of type function
             let witnessArgs = GetWitnessArgs cenv env m vref.Typars tyargs
             ConvModuleValueApp cenv env m vref tyargs witnessArgs [] 
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 and ConvUnionCaseRef cenv (ucref: UnionCaseRef) m =
     let g = cenv.g
diff --git a/src/fsharp/SyntaxTree.fs b/src/fsharp/SyntaxTree.fs
index 8b77e008357..d4884459959 100644
--- a/src/fsharp/SyntaxTree.fs
+++ b/src/fsharp/SyntaxTree.fs
@@ -524,7 +524,6 @@ type SynType =
        value: SynType *
        range: range
 
-<<<<<<< HEAD
     /// F# syntax : type | null
     | WithNull of
         innerType: SynType *
@@ -532,13 +531,11 @@ type SynType =
         range:range
 
     /// Gets the syntax range of this constuct
-=======
     | Paren of
       innerType: SynType *
       range: range
 
     /// Gets the syntax range of this construct
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
     member x.Range =
         match x with
         | SynType.App (range=m)
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 88662283bfc..f2238ca6d96 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -5151,17 +5151,14 @@ type CcuThunk =
         ccu.target
    
     /// Indicates if this assembly reference is unresolved
-    member ccu.IsUnresolvedReference = isNull (ccu.target :> obj)
-
-    member ccu.IsUnresolvedReference = isNull (box ccu.target) || ccu.orphanfixup
+    member ccu.IsUnresolvedReference = isNull (box ccu.target)
 #else
     member ccu.Deref = 
         match ccu.target with 
         | null -> raise(UnresolvedReferenceNoRange ccu.name)
-        | _ when ccu.orphanfixup -> raise(UnresolvedReferenceNoRange ccu.name)
         | NonNull tg -> tg
 
-    member ccu.IsUnresolvedReference = isNull ccu.target || ccu.orphanfixup
+    member ccu.IsUnresolvedReference = isNull ccu.target
 #endif
    
     /// Ensure the ccu is derefable in advance. Supply a path to attach to any resulting error message.
diff --git a/src/fsharp/xlf/FSComp.txt.cs.xlf b/src/fsharp/xlf/FSComp.txt.cs.xlf
index ed77595f9ec..c5c98bd5e27 100644
--- a/src/fsharp/xlf/FSComp.txt.cs.xlf
+++ b/src/fsharp/xlf/FSComp.txt.cs.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Dostupná přetížení:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Známé typy argumentů: {0}
@@ -42,6 +52,11 @@
         Známý typ parametru: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Argument na indexu {0} neodpovídá
@@ -52,6 +67,21 @@
         Argument {0} neodpovídá
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          – {0}
@@ -157,6 +197,11 @@
         Hlavička zdroje začínající na posunu {0} má chybný formát.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Zobrazte si povolené hodnoty verze jazyka a pak zadejte požadovanou verzi, například latest nebo preview.
@@ -217,16 +262,31 @@
         Atributy nejde použít pro rozšíření typů.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! se nedá kombinovat s and!.
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Konstrukt let! ... and! ... se dá použít jen v případě, že tvůrce výpočetních výrazů definuje buď metodu {0}, nebo vhodné metody MergeSource a Bind.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.de.xlf b/src/fsharp/xlf/FSComp.txt.de.xlf
index 75e1e434bde..782349e3e3f 100644
--- a/src/fsharp/xlf/FSComp.txt.de.xlf
+++ b/src/fsharp/xlf/FSComp.txt.de.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Verfügbare Überladungen:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Bekannte Argumenttypen: {0}
@@ -42,6 +52,11 @@
         Bekannter Typparameter: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Das Argument bei Index {0} stimmt nicht überein.
@@ -52,6 +67,21 @@
         Das Argument "{0}" stimmt nicht überein.
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         Der Ressourcenheader, der am Offset {0} beginnt, ist fehlerhaft formatiert.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Zeigen Sie die zulässigen Werte für die Sprachversion an. Geben Sie die Sprachversion als "latest" oder "preview" an.
@@ -217,16 +262,31 @@
         Attribute können nicht auf Typerweiterungen angewendet werden.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         "use!" darf nicht mit "and!" kombiniert werden.
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Das Konstrukt "let! ... and! ..." kann nur verwendet werden, wenn der Berechnungsausdrucks-Generator entweder eine {0}-Methode oder geeignete MergeSource- und Bind-Methoden definiert.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.es.xlf b/src/fsharp/xlf/FSComp.txt.es.xlf
index 29796a6dfa0..c5cc46a7842 100644
--- a/src/fsharp/xlf/FSComp.txt.es.xlf
+++ b/src/fsharp/xlf/FSComp.txt.es.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Sobrecargas disponibles:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Tipos de argumentos conocidos: {0}
@@ -42,6 +52,11 @@
         Parámetro de tipo conocido: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         El argumento del índice {0} no coincide.
@@ -52,6 +67,21 @@
         El argumento "{0}" no coincide.
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         El encabezado de los recursos que comienza en el desplazamiento {0} está mal formado.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Mostrar los valores permitidos para la versión de idioma, especificar la versión de idioma como "latest" "preview"
@@ -217,16 +262,31 @@
         Los atributos no se pueden aplicar a las extensiones de tipo.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         No se puede combinar use! con and!
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         La construcción "let! ... and! ..." solo se puede usar si el generador de expresiones de cálculo define un método "{0}" o bien los métodos "MergeSource" y "Bind" adecuados.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.fr.xlf b/src/fsharp/xlf/FSComp.txt.fr.xlf
index 215e51ed83a..938c1658ba8 100644
--- a/src/fsharp/xlf/FSComp.txt.fr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.fr.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Surcharges disponibles :\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Types d'argument connus : {0}
@@ -42,6 +52,11 @@
         Paramètre de type connu : {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         L'argument à l'index {0} ne correspond pas
@@ -52,6 +67,21 @@
         L'argument '{0}' ne correspond pas
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         L'en-tête de ressource commençant au décalage {0} est mal formé.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Afficher les valeurs autorisées pour la version du langage, spécifier la version du langage comme 'dernière' ou 'préversion'
@@ -217,16 +262,31 @@
         Impossible d'appliquer des attributs aux extensions de type.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! ne peut pas être combiné avec and!
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         La construction 'let! ... and! ...' peut uniquement être utilisée si le générateur d'expressions de calcul définit une méthode '{0}' ou les méthodes 'MergeSource' et 'Bind' appropriées
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index 95dd027b56c..f260747d3b2 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Overload disponibili:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Tipi di argomenti noti: {0}
@@ -42,6 +52,11 @@
         Parametro di tipo noto: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         L'argomento alla posizione di indice {0} non corrisponde
@@ -52,6 +67,21 @@
         L'argomento '{0}' non corrisponde
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         L'intestazione di risorsa che inizia a partire dall'offset {0} non è valida.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Visualizza i valori consentiti per la versione del linguaggio. Specificare la versione del linguaggio, ad esempio 'latest' o 'preview'
@@ -217,16 +262,31 @@
         Gli attributi non possono essere applicati a estensioni di tipo.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         Non è possibile combinare use! con and!
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         È possibile usare il costrutto 'let! ... and! ...' solo se il generatore di espressioni di calcolo definisce un metodo '{0}' o metodi 'MergeSource' e 'Bind' appropriati
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index a7cc70a5d7b..bf650eebd68 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         使用可能なオーバーロード:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         既知の型の引数: {0}
@@ -42,6 +52,11 @@
         既知の型パラメーター: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         インデックス {0} の引数が一致しません
@@ -52,6 +67,21 @@
         引数 '{0}' が一致しません
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         オフセット {0} で始まるリソース ヘッダーの形式に誤りがあります。
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         言語バージョンで許可された値を表示し、'最新' や 'プレビュー' などの言語バージョンを指定する
@@ -217,16 +262,31 @@
         属性を型拡張に適用することはできません。
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! を and! と組み合わせて使用することはできません
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         'let! ... and! ...' コンストラクトは、コンピュテーション式ビルダーが '{0}' メソッドまたは適切な 'MergeSource' および 'Bind' メソッドのいずれかを定義している場合にのみ使用できます
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.ko.xlf b/src/fsharp/xlf/FSComp.txt.ko.xlf
index ba3c18b364b..2ea71ba5a40 100644
--- a/src/fsharp/xlf/FSComp.txt.ko.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ko.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         사용 가능한 오버로드:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         알려진 인수 형식: {0}
@@ -42,6 +52,11 @@
         알려진 형식 매개 변수: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         인덱스 {0}의 인수가 일치하지 않습니다.
@@ -52,6 +67,21 @@
         '{0}' 인수가 일치하지 않습니다.
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         오프셋 {0}에서 시작하는 리소스 헤더의 형식이 잘못되었습니다.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         언어 버전의 허용된 값을 표시하고 '최신' 또는 '미리 보기'와 같은 언어 버전을 지정합니다.
@@ -217,16 +262,31 @@
         형식 확장에 특성을 적용할 수 없습니다.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use!는 and!와 함께 사용할 수 없습니다.
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         'let! ... and! ...' 구문은 계산 식 작성기에서 '{0}' 메서드 또는 적절한 'MergeSource' 및 'Bind' 메서드를 정의한 경우에만 사용할 수 있습니다.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.pl.xlf b/src/fsharp/xlf/FSComp.txt.pl.xlf
index 589a8289735..2555bc2fe2a 100644
--- a/src/fsharp/xlf/FSComp.txt.pl.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pl.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Dostępne przeciążenia:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Znane typy argumentów: {0}
@@ -42,6 +52,11 @@
         Parametr znanego typu: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Argument pod indeksem {0} nie jest zgodny
@@ -52,6 +67,21 @@
         Argument „{0}” nie jest zgodny
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          — {0}
@@ -157,6 +197,11 @@
         Nagłówek zasobu rozpoczynający się od przesunięcia {0} jest nieprawidłowo sformułowany.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Wyświetl dozwolone wartości dla wersji językowej; określ wersję językową, np. „latest” lub „preview”
@@ -217,16 +262,31 @@
         Atrybutów nie można stosować do rozszerzeń typu.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         Elementu use! nie można łączyć z elementem and!
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Konstrukcji „let! ... and! ...” można użyć tylko wtedy, gdy konstruktor wyrażeń obliczeniowych definiuje metodę „{0}” lub odpowiednie metody „MergeSource” i „Bind”
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
index a077131b7e9..fcc938d7293 100644
--- a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Sobrecargas disponíveis:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Tipos de argumentos conhecidos: {0}
@@ -42,6 +52,11 @@
         Parâmetro de tipo conhecido: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         O argumento no índice {0} não corresponde
@@ -52,6 +67,21 @@
         O argumento '{0}' não corresponde
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         O cabeçalho do recurso que começa no deslocamento {0} está malformado.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Exibe os valores permitidos para a versão do idioma, especifica a versão do idioma, como 'mais recente ' ou 'prévia'
@@ -217,16 +262,31 @@
         Os atributos não podem ser aplicados às extensões de tipo.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! não pode ser combinado com and!
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         O constructo 'let! ... and! ...' só pode ser usado se o construtor de expressões de computação definir um método '{0}' ou um método 'MergeSource' ou 'Bind' apropriado
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.ru.xlf b/src/fsharp/xlf/FSComp.txt.ru.xlf
index 65b2f2a5a62..a212a39dcaa 100644
--- a/src/fsharp/xlf/FSComp.txt.ru.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ru.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Доступные перегрузки:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Известные типы аргументов: {0}
@@ -42,6 +52,11 @@
         Известный параметр типа: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Аргумент в индексе {0} не соответствует
@@ -52,6 +67,21 @@
         Аргумент "{0}" не соответствует
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         Заголовок ресурса некорректен начиная со смещения {0}.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Отображение допустимых значений для версии языка. Укажите версию языка, например, "latest" или "preview".
@@ -217,16 +262,31 @@
         Атрибуты не могут быть применены к расширениям типа.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! запрещено сочетать с and!
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Конструкцию "let! ... and! ..." можно использовать только в том случае, если построитель выражений с вычислениями определяет либо метод "{0}", либо соответствующие методы "MergeSource" и "Bind"
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index 12de7ace2af..3256b8444c2 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         Kullanılabilir aşırı yüklemeler:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         Bilinen bağımsız değişken türleri: {0}
@@ -42,6 +52,11 @@
         Bilinen tür parametresi: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         {0} dizinindeki bağımsız değişken eşleşmiyor
@@ -52,6 +67,21 @@
         '{0}' bağımsız değişkeni eşleşmiyor
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         {0} uzaklığında başlayan kaynak üst bilgisi hatalı biçimlendirilmiş.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Dil sürümü için izin verilen değerleri görüntüleyin, dil sürümünü 'en son' veya 'önizleme' örneklerindeki gibi belirtin
@@ -217,16 +262,31 @@
         Öznitelikler tür uzantılarına uygulanamaz.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use!, and! ile birleştirilemez
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         'let! ... and! ...' yapısı, yalnızca hesaplama ifadesi oluşturucu bir '{0}' metodunu ya da uygun 'MergeSource' ve 'Bind' metotlarını tanımlarsa kullanılabilir
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
index 3ac95b32420..0d8c05f2fa8 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         可用重载:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         已知参数类型: {0}
@@ -42,6 +52,11 @@
         已知类型参数: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         索引 {0} 处的参数不匹配
@@ -52,6 +67,21 @@
         参数 "{0}" 不匹配
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         以偏移量 {0} 开始的资源标头格式不正确。
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         显示语言版本的允许值，指定语言版本，如“最新”或“预览”
@@ -217,16 +262,31 @@
         属性不可应用于类型扩展。
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! 不得与 and! 结合使用
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         仅当计算表达式生成器定义了 "{0}" 方法或适当的 "MergeSource" 和 "Bind" 方法时，才可以使用 "let! ... and! ..." 构造
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
index 67e36cfcfeb..000f1b3c73c 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
@@ -12,11 +12,21 @@
         Feature '{0}' is not supported by target runtime.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         可用的多載:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         Known types of arguments: {0}
         已知的引數類型: {0}
@@ -42,6 +52,11 @@
         已知的型別參數: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         位於索引 {0} 的引數不相符
@@ -52,6 +67,21 @@
         引數 '{0}' 不相符
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
@@ -112,6 +142,11 @@
         nullable optional interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open static classes
         open static classes
@@ -137,6 +172,11 @@
         wild card in for loop
         
       
+      
+        witness passing
+        witness passing
+        
+      
       
          - {0}
          - {0}
@@ -157,6 +197,11 @@
         從位移 {0} 開始的資源標頭格式錯誤。
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         顯示語言版本允許的值，指定 'latest' 或 'preview' 等語言版本
@@ -217,16 +262,31 @@
         屬性無法套用到類型延伸模組。
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         use! may not be combined with and!
         use! 不可與 and! 合併
         
       
+      
+        The /checknulls language feature is not enabled
+        The /checknulls language feature is not enabled
+        
+      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         只有在計算運算式產生器定義 '{0}' 方法或正確的 'MergeSource' 和 'Bind' 方法時，才可使用 'let! ... and! ...' 建構
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Interface member '{0}' does not have a most specific implementation.
         Interface member '{0}' does not have a most specific implementation.
diff --git a/src/fsharp/xlf/FSStrings.cs.xlf b/src/fsharp/xlf/FSStrings.cs.xlf
index fc719cd81a5..51b94dd5439 100644
--- a/src/fsharp/xlf/FSStrings.cs.xlf
+++ b/src/fsharp/xlf/FSStrings.cs.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         symbol ..^
diff --git a/src/fsharp/xlf/FSStrings.de.xlf b/src/fsharp/xlf/FSStrings.de.xlf
index c9bf6de009b..454bd7738d4 100644
--- a/src/fsharp/xlf/FSStrings.de.xlf
+++ b/src/fsharp/xlf/FSStrings.de.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         Symbol "..^"
diff --git a/src/fsharp/xlf/FSStrings.es.xlf b/src/fsharp/xlf/FSStrings.es.xlf
index 21f3c4ab7ad..3d298fd9496 100644
--- a/src/fsharp/xlf/FSStrings.es.xlf
+++ b/src/fsharp/xlf/FSStrings.es.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         símbolo "..^"
diff --git a/src/fsharp/xlf/FSStrings.fr.xlf b/src/fsharp/xlf/FSStrings.fr.xlf
index 0b3644d7313..068c43d9e38 100644
--- a/src/fsharp/xlf/FSStrings.fr.xlf
+++ b/src/fsharp/xlf/FSStrings.fr.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         symbole '..^'
diff --git a/src/fsharp/xlf/FSStrings.it.xlf b/src/fsharp/xlf/FSStrings.it.xlf
index 9715ec16824..0f27d9199a4 100644
--- a/src/fsharp/xlf/FSStrings.it.xlf
+++ b/src/fsharp/xlf/FSStrings.it.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         simbolo '..^'
diff --git a/src/fsharp/xlf/FSStrings.ja.xlf b/src/fsharp/xlf/FSStrings.ja.xlf
index e055cf262f6..4604c69675d 100644
--- a/src/fsharp/xlf/FSStrings.ja.xlf
+++ b/src/fsharp/xlf/FSStrings.ja.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         シンボル '..^'
diff --git a/src/fsharp/xlf/FSStrings.ko.xlf b/src/fsharp/xlf/FSStrings.ko.xlf
index 62147543f85..010b0483462 100644
--- a/src/fsharp/xlf/FSStrings.ko.xlf
+++ b/src/fsharp/xlf/FSStrings.ko.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         기호 '..^'
diff --git a/src/fsharp/xlf/FSStrings.pl.xlf b/src/fsharp/xlf/FSStrings.pl.xlf
index 0feea19067e..2f2777dcf52 100644
--- a/src/fsharp/xlf/FSStrings.pl.xlf
+++ b/src/fsharp/xlf/FSStrings.pl.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         symbol „..^”
diff --git a/src/fsharp/xlf/FSStrings.pt-BR.xlf b/src/fsharp/xlf/FSStrings.pt-BR.xlf
index dc96593ddff..e674e5c7089 100644
--- a/src/fsharp/xlf/FSStrings.pt-BR.xlf
+++ b/src/fsharp/xlf/FSStrings.pt-BR.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         símbolo '..^'
diff --git a/src/fsharp/xlf/FSStrings.ru.xlf b/src/fsharp/xlf/FSStrings.ru.xlf
index c55e25658ea..c8898bc8a4c 100644
--- a/src/fsharp/xlf/FSStrings.ru.xlf
+++ b/src/fsharp/xlf/FSStrings.ru.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         символ "..^"
diff --git a/src/fsharp/xlf/FSStrings.tr.xlf b/src/fsharp/xlf/FSStrings.tr.xlf
index 702a7a35169..58ef9d662d7 100644
--- a/src/fsharp/xlf/FSStrings.tr.xlf
+++ b/src/fsharp/xlf/FSStrings.tr.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         '..^' sembolü
diff --git a/src/fsharp/xlf/FSStrings.zh-Hans.xlf b/src/fsharp/xlf/FSStrings.zh-Hans.xlf
index 80f7968de17..62820de64c8 100644
--- a/src/fsharp/xlf/FSStrings.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSStrings.zh-Hans.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         符号 "..^"
diff --git a/src/fsharp/xlf/FSStrings.zh-Hant.xlf b/src/fsharp/xlf/FSStrings.zh-Hant.xlf
index 215554d12ea..fca861b2fa9 100644
--- a/src/fsharp/xlf/FSStrings.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSStrings.zh-Hant.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         symbol '..^'
         符號 '..^'
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
index 566abd9da1b..659c4f2f9b7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -33,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000028D
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
@@ -46,26 +41,12 @@
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.exe
 // MVID: {5E172EEA-1475-D984-A745-0383EA2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x0000027A
-}
-.mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000280 Length: 0x000000BA
-}
-.module DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.exe
-// MVID: {5EAD3E33-1475-D984-A745-0383333EAD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x05130000
-=======
 // Image base: 0x00B10000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -85,13 +66,8 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
-      IL_0000:  ldarg.2
-=======
       .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0001:  stloc.0
       .line 6,6 : 80,82 ''
       IL_0002:  ret
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
index cb7208f2c2b..de311f0a4f8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -33,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000273
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface_NoExtMeth
@@ -46,26 +41,12 @@
 }
 .module DoNotBoxStruct_Array_FSInterface_NoExtMeth.exe
 // MVID: {5E172EEA-8127-3EE3-A745-0383EA2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000261
-}
-.mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000268 Length: 0x000000AC
-}
-.module DoNotBoxStruct_Array_FSInterface_NoExtMeth.exe
-// MVID: {5EAD3E33-8127-3EE3-A745-0383333EAD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x06E20000
-=======
 // Image base: 0x00AF0000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -74,44 +55,19 @@
        extends [mscorlib]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 ) 
-<<<<<<< HEAD
-  .class auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
-         extends [mscorlib]System.Object
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
-    .method public specialname rtspecialname 
-            instance void  .ctor() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ret
-    } // end of method F@6::.ctor
-
-    .method assembly hidebysig instance void 
-            Invoke(object x,
-                   int32 _arg1) cil managed
-=======
   .class abstract auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
          extends [mscorlib]System.Object
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
     .method assembly static void  Invoke(object x,
                                          int32 _arg1) cil managed
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
     {
       // Code size       3 (0x3)
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
-      IL_0000:  ldarg.2
-=======
       .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0001:  stloc.0
       .line 6,6 : 74,76 ''
       IL_0002:  ret
@@ -128,17 +84,10 @@
     IL_0001:  ldc.i4.0
     IL_0002:  readonly.
     IL_0004:  ldelema    !!T
-<<<<<<< HEAD
-    IL_0009:  newobj     instance void DoNotBoxStruct_Array_FSInterface_NoExtMeth/F@6::.ctor()
-    IL_000e:  ldftn      instance void DoNotBoxStruct_Array_FSInterface_NoExtMeth/F@6::Invoke(object,
-                                                                                              int32)
-    IL_0014:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
-=======
     IL_0009:  ldnull
     IL_000a:  ldftn      void DoNotBoxStruct_Array_FSInterface_NoExtMeth/F@6::Invoke(object,
                                                                                      int32)
     IL_0010:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
                                                                                                                  native int)
     IL_0015:  constrained. !!T
     IL_001b:  callvirt   instance void class [FSharp.Core]Microsoft.FSharp.Control.IDelegateEvent`1>::AddHandler(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
index 212296333fd..a6ae718815d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -33,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000027A
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
@@ -46,26 +41,12 @@
 }
 .module DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.exe
 // MVID: {5E172EEA-A67D-867A-A745-0383EA2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000268
-}
-.mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000270 Length: 0x000000B0
-}
-.module DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.exe
-// MVID: {5EAD3E33-A67D-867A-A745-0383333EAD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x070E0000
-=======
 // Image base: 0x06A00000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -74,44 +55,19 @@
        extends [mscorlib]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 ) 
-<<<<<<< HEAD
-  .class auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
-         extends [mscorlib]System.Object
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
-    .method public specialname rtspecialname 
-            instance void  .ctor() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ret
-    } // end of method F@6::.ctor
-
-    .method assembly hidebysig instance void 
-            Invoke(object x,
-                   int32 _arg1) cil managed
-=======
   .class abstract auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
          extends [mscorlib]System.Object
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
     .method assembly static void  Invoke(object x,
                                          int32 _arg1) cil managed
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
     {
       // Code size       3 (0x3)
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
-      IL_0000:  ldarg.2
-=======
       .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0001:  stloc.0
       .line 6,6 : 77,79 ''
       IL_0002:  ret
@@ -130,17 +86,10 @@
     IL_0003:  readonly.
     IL_0005:  call       instance !!T& !!T[0...,0...]::Address(int32,
                                                                int32)
-<<<<<<< HEAD
-    IL_000a:  newobj     instance void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/F@6::.ctor()
-    IL_000f:  ldftn      instance void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/F@6::Invoke(object,
-                                                                                                int32)
-    IL_0015:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
-=======
     IL_000a:  ldnull
     IL_000b:  ldftn      void DoNotBoxStruct_MDArray_FSInterface_NoExtMeth/F@6::Invoke(object,
                                                                                        int32)
     IL_0011:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
                                                                                                                  native int)
     IL_0016:  constrained. !!T
     IL_001c:  callvirt   instance void class [FSharp.Core]Microsoft.FSharp.Control.IDelegateEvent`1>::AddHandler(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
index 16c86eb5fbb..1d97f47b55a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -33,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000026A
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
@@ -46,16 +41,6 @@
 }
 .module DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.exe
 // MVID: {5E172EEA-CD0A-F713-A745-0383EA2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000258
-}
-.mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000260 Length: 0x000000B0
-}
-.module DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.exe
-// MVID: {5EAD3E33-CD0A-F713-A745-0383333EAD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
@@ -70,44 +55,19 @@
        extends [mscorlib]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 ) 
-<<<<<<< HEAD
-  .class auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
-         extends [mscorlib]System.Object
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
-    .method public specialname rtspecialname 
-            instance void  .ctor() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ret
-    } // end of method F@6::.ctor
-
-    .method assembly hidebysig instance void 
-            Invoke(object x,
-                   int32 _arg1) cil managed
-=======
   .class abstract auto autochar serializable sealed nested assembly beforefieldinit specialname F@6
          extends [mscorlib]System.Object
   {
     .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 ) 
     .method assembly static void  Invoke(object x,
                                          int32 _arg1) cil managed
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
     {
       // Code size       3 (0x3)
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
-      IL_0000:  ldarg.2
-=======
       .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0001:  stloc.0
       .line 6,6 : 68,70 ''
       IL_0002:  ret
@@ -124,17 +84,10 @@
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloca.s   V_0
-<<<<<<< HEAD
-    IL_0004:  newobj     instance void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/F@6::.ctor()
-    IL_0009:  ldftn      instance void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/F@6::Invoke(object,
-                                                                                                int32)
-    IL_000f:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
-=======
     IL_0004:  ldnull
     IL_0005:  ldftn      void DoNotBoxStruct_NoArray_FSInterface_NoExtMeth/F@6::Invoke(object,
                                                                                        int32)
     IL_000b:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Control.FSharpHandler`1::.ctor(object,
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
                                                                                                                  native int)
     IL_0010:  constrained. !!T
     IL_0016:  callvirt   instance void class [FSharp.Core]Microsoft.FSharp.Control.IDelegateEvent`1>::AddHandler(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
index b8cf1b83b5d..1d9453a58f3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -42,7 +38,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Aggregates01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000608
 }
 .mresource public FSharpSignatureDataB.Linq101Aggregates01
@@ -55,26 +50,12 @@
 }
 .module Linq101Aggregates01.exe
 // MVID: {5E172EEB-D281-4783-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x000005F6
-}
-.mresource public FSharpOptimizationData.Linq101Aggregates01
-{
-  // Offset: 0x00000600 Length: 0x00000211
-}
-.module Linq101Aggregates01.exe
-// MVID: {5EAD3E37-D281-4783-A745-0383373EAD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x00B90000
-=======
 // Image base: 0x04D10000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -128,11 +109,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Aggregates01.fs'
-=======
       .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Aggregates01.fs'
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Aggregates01/uniqueFactors@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
index 53cfbdfded5..53dffdbd1fb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -42,7 +38,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Quantifiers01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000393
 }
 .mresource public FSharpSignatureDataB.Linq101Quantifiers01
@@ -55,26 +50,12 @@
 }
 .module Linq101Quantifiers01.exe
 // MVID: {5E172EEB-76DD-E373-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000381
-}
-.mresource public FSharpOptimizationData.Linq101Quantifiers01
-{
-  // Offset: 0x00000388 Length: 0x000000FF
-}
-.module Linq101Quantifiers01.exe
-// MVID: {5EAD3E37-76DD-E373-A745-0383373EAD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x070E0000
-=======
 // Image base: 0x05120000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -128,11 +109,7 @@
       .locals init ([0] string V_0,
                [1] string w)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Quantifiers01.fs'
-=======
       .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Quantifiers01.fs'
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Quantifiers01/iAfterE@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
index d2241cfd383..82cce827113 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -37,7 +33,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Select01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000657
 }
 .mresource public FSharpSignatureDataB.Linq101Select01
@@ -50,26 +45,12 @@
 }
 .module Linq101Select01.exe
 // MVID: {5E172EEB-6057-8F80-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000655
-}
-.mresource public FSharpOptimizationData.Linq101Select01
-{
-  // Offset: 0x00000660 Length: 0x00000204
-}
-.module Linq101Select01.exe
-// MVID: {5ECD8279-6057-8F80-A745-03837982CD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x069B0000
-=======
 // Image base: 0x058D0000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -100,11 +81,7 @@
       .maxstack  5
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 12,12 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Select01.fs'
-=======
       .line 12,12 : 9,28 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Select01.fs'
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 13,13 : 9,23 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
index 51d3f5da82d..c2685de719e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -33,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.StaticInit_Struct01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000007A1
 }
 .mresource public FSharpSignatureDataB.StaticInit_Struct01
@@ -50,26 +45,12 @@
 }
 .module StaticInit_Struct01.dll
 // MVID: {5E172EE8-05F6-D6CB-A745-0383E82E175E}
-=======
-  // Offset: 0x00000000 Length: 0x0000079F
-}
-.mresource public FSharpOptimizationData.StaticInit_Struct01
-{
-  // Offset: 0x000007A8 Length: 0x0000021F
-}
-.module StaticInit_Struct01.dll
-// MVID: {5ECD86B3-05F6-D6CB-A745-0383B386CD5E}
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x07070000
-=======
 // Image base: 0x06E50000
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -99,11 +80,7 @@
       .locals init ([0] valuetype StaticInit_Struct01/C& V_0,
                [1] class [mscorlib]System.Collections.IComparer V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 4,4 : 6,7 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Struct01.fs'
-=======
       .line 4,4 : 6,7 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Struct01.fs'
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
       IL_0000:  ldarga.s   obj
       IL_0002:  stloc.0
       IL_0003:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
index a6fcfa66e66..238ed136ba6 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-Usage: fsiAnyCpu.exe  [script.fsx []]
-=======
 Usage: fsiAnyCpu  [script.fsx []]
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 		- INPUT FILES -
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
index 6be9b1e2cbe..68587992d4a 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
@@ -1,11 +1,7 @@
 Microsoft (R) F# Interactive version 10.2.3 for F# 4.5
 Copyright (c) Microsoft Corporation. All Rights Reserved.
 
-<<<<<<< HEAD
-Usage: fsiAnyCpu.exe  [script.fsx []]
-=======
 Usage: fsiAnyCpu  [script.fsx []]
->>>>>>> d0c19d865e2a91dcbf26a8832f38611b9655e052
 
 
 		- INPUT FILES -

From ee0499cae72e7f79adac171e4bec710a760e8848 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 3 Jun 2020 17:48:59 +0100
Subject: [PATCH 012/112] fix build

---
 src/fsharp/fsi/fsi.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index c4bcf124f82..141417bcb48 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -993,7 +993,7 @@ let rec internal convertReflectionTypeToILType (reflectionTy: Type) =
         if FSharp.Reflection.FSharpType.IsFunction reflectionTy then
             let ctors = reflectionTy.GetConstructors(BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance)
             if ctors.Length = 1 && 
-               ctors.[0].GetCustomAttribute() <> null && 
+               not (isNull (box (ctors.[0].GetCustomAttribute()))) && 
                not ctors.[0].IsPublic && 
                PrettyNaming.IsCompilerGeneratedName reflectionTy.Name then
                 let rec get (typ: Type) = if FSharp.Reflection.FSharpType.IsFunction typ.BaseType then get typ.BaseType else typ

From 3e151ce392b269e2808c83b652ecffa5653c0fa3 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 3 Jun 2020 18:16:00 +0100
Subject: [PATCH 013/112] fix build

---
 .../src/FSharp.Editor/Completion/CompletionProvider.fs       | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
index 978c1b4469d..f7c7aae1583 100644
--- a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
@@ -144,7 +144,7 @@ type internal FSharpCompletionProvider
             declarationItems |> Array.iteri (fun number declarationItem ->
                 let namespaceName =
                     match declarationItem.NamespaceToOpen with
-                    | Some namespaceToOpen -> namespaceToOpen
+                    | Some namespaceToOpen -> withNull namespaceToOpen
                     | _ -> null // Icky, but this is how roslyn handles it
                     
                 let filterText =
@@ -159,8 +159,9 @@ type internal FSharpCompletionProvider
                     let glyph = Tokenizer.FSharpGlyphToRoslynGlyph (declarationItem.Glyph, declarationItem.Accessibility)
                     FSharpCommonCompletionItem.Create(
                         declarationItem.Name,
-                        glyph = Nullable glyph,
+                        null,
                         rules = getRules intellisenseOptions.ShowAfterCharIsTyped,
+                        glyph = Nullable glyph,
                         filterText = filterText,
                         inlineDescription = namespaceName)
                         .AddProperty(FullNamePropName, declarationItem.FullName)

From 2d802937cf3d2cca0cda3c69c6be00e5431c5213 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 17 Jun 2020 14:57:24 +0100
Subject: [PATCH 014/112] fix build

---
 src/fsharp/ConstraintSolver.fs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 989057f78ca..df7d444ed29 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -1029,11 +1029,11 @@ and SolveTyparEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalT
 and SolveTyparsEqualTypes (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTrace) tptys tys = trackErrors {
     do! (tptys, tys) ||> Iterate2D (fun tpty ty -> 
             match tpty with 
-            | TType_var r | TType_measure (Measure.Var r) -> SolveTyparEqualsTypePart1 csenv m2 trace tpty r ty 
+            | TType_var (r, _) | TType_measure (Measure.Var r) -> SolveTyparEqualsTypePart1 csenv m2 trace tpty r ty 
             | _ -> failwith "SolveTyparsEqualTypes")
     do! (tptys, tys) ||> Iterate2D (fun tpty ty -> 
             match tpty with 
-            | TType_var r | TType_measure (Measure.Var r) -> SolveTyparEqualsTypePart2 csenv ndeep m2 trace r ty 
+            | TType_var (r, _) | TType_measure (Measure.Var r) -> SolveTyparEqualsTypePart2 csenv ndeep m2 trace r ty 
             | _ -> failwith "SolveTyparsEqualTypes")
  }
 

From b0982cf57fcb92d00164ee1b49bbde70698fc6a2 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 17 Jun 2020 17:03:52 +0100
Subject: [PATCH 015/112] fix build

---
 src/fsharp/ExtensionTyping.fs | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 9522331157e..a6ff67aed33 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -260,7 +260,10 @@ module internal ExtensionTyping =
     // to preserve object identity when presenting the types to the F# compiler.
 
     type ProvidedTypeComparer() = 
-        let key (ty: ProvidedType) = (ty.Assembly.FullName, ty.FullName)
+        let key (ty: ProvidedType) =
+            match ty.Assembly with
+            | null -> ("", ty.FullName)
+            | NonNull a -> (a.FullName, ty.FullName)
         static member val Instance = ProvidedTypeComparer()
         interface IEqualityComparer with
             member __.GetHashCode(ty: ProvidedType) = hash (key ty)
@@ -348,7 +351,11 @@ module internal ExtensionTyping =
 #endif
         member __.FullName = x.FullName
         member __.IsArray = x.IsArray
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
         member __.Assembly: ProvidedAssembly = x.Assembly |> ProvidedAssembly.Create
+#else
+        member __.Assembly: ProvidedAssembly? = x.Assembly |> ProvidedAssembly.Create
+#endif
         member __.GetInterfaces() = x.GetInterfaces() |> ProvidedType.CreateArray ctxt
         member __.GetMethods() = x.GetMethods bindingFlags |> ProvidedMethodInfo.CreateArray ctxt
         member __.GetEvents() = x.GetEvents bindingFlags |> ProvidedEventInfo.CreateArray ctxt

From 7e288762d650aeacea239b7b5fb9cce1acd02300 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 13:25:27 +0100
Subject: [PATCH 016/112] additional merge

---
 src/fsharp/CheckFormatStrings.fs              | 31 ------------------
 src/fsharp/FSComp.txt                         |  8 +----
 src/fsharp/xlf/FSComp.txt.tr.xlf              | 10 +++---
 src/utils/sformat.fs                          |  4 +--
 .../CodeGen/EmittedIL/Misc/Lock01.il.bsl      | 24 --------------
 .../EmittedIL/Misc/MethodImplNoInline.il.bsl  | 23 -------------
 .../Misc/MethodImplNoInline02.il.bsl          | 23 -------------
 .../Operators/comparison_decimal01.il.bsl     | 24 --------------
 .../Linq101Aggregates01.il.bsl                | 11 -------
 .../Linq101ElementOperators01.il.bsl          | 27 ----------------
 .../Linq101Grouping01.il.bsl                  | 27 ----------------
 .../Linq101Partitioning01.il.bsl              | 27 ----------------
 .../Linq101Select01.il.bsl                    |  4 ---
 .../Linq101SetOperators01.il.bsl              | 27 ----------------
 .../Linq101Where01.il.bsl                     | 27 ----------------
 .../StaticInit/StaticInit_Struct01.il.bsl     |  4 ---
 .../TestFunctions/TestFunction3c.il.bsl       | 32 -------------------
 .../TestFunctions/Testfunction22f.il.bsl      | 29 -----------------
 .../EmittedIL/Tuples/TupleElimination.il.bsl  | 29 -----------------
 .../ForLoop/ForEachOnList01.il.bsl            | 32 -------------------
 .../ForLoop/ForEachOnString01.il.bsl          | 29 -----------------
 .../ForLoop/NoIEnumerable01.il.bsl            | 32 -------------------
 .../ForLoop/NoIEnumerable02.il.bsl            | 32 -------------------
 .../ForLoop/NoIEnumerable03.il.bsl            | 32 -------------------
 .../GenericComparison/Compare03.il.bsl        | 29 -----------------
 .../GenericComparison/Compare04.il.bsl        | 29 -----------------
 .../GenericComparison/Equals02.il.bsl         | 29 -----------------
 .../GenericComparison/Equals03.il.bsl         | 29 -----------------
 .../GenericComparison/Hash03.il.bsl           | 29 -----------------
 .../GenericComparison/Hash04.il.bsl           | 29 -----------------
 tests/scripts/compiler-perf.fsx               |  5 ---
 31 files changed, 7 insertions(+), 720 deletions(-)

diff --git a/src/fsharp/CheckFormatStrings.fs b/src/fsharp/CheckFormatStrings.fs
index 91e5a7c3fdc..8ef9d1a68c8 100644
--- a/src/fsharp/CheckFormatStrings.fs
+++ b/src/fsharp/CheckFormatStrings.fs
@@ -423,10 +423,6 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
 
               | 'O' ->
                   checkOtherFlags ch
-<<<<<<< HEAD
-                  collectSpecifierLocation relLine relCol 1
-                  parseLoop ((posi, NewInferenceType g) :: acc) (i+1, relLine, relCol+1)
-=======
                   collectSpecifierLocation fragLine fragCol 1
                   let i = skipPossibleInterpolationHole (i+1)
                   parseLoop ((posi, NewInferenceType ()) :: acc) (i, fragLine, fragCol+1) fragments
@@ -437,29 +433,11 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   let i = requireAndSkipInterpolationHoleFormat (i+1)
                   // Note, the fragCol doesn't advance at all as these are magically inserted.  
                   parseLoop ((posi, NewInferenceType ()) :: acc) (i, fragLine, startFragCol) fragments
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
               | 'A' ->
                   match info.numPrefixIfPos with
                   | None     // %A has BindingFlags=Public, %+A has BindingFlags=Public | NonPublic
                   | Some '+' -> 
-<<<<<<< HEAD
-                      collectSpecifierLocation relLine relCol 1
-                      parseLoop ((posi, NewInferenceType g) :: acc)  (i+1, relLine, relCol+1)
-                  | Some _   -> failwithf "%s" <| FSComp.SR.forDoesNotSupportPrefixFlag(ch.ToString(), (Option.get info.numPrefixIfPos).ToString())
-
-              | 'a' ->
-                  checkOtherFlags ch
-                  let xty = NewInferenceType g 
-                  let fty = mkFunTy g bty (mkFunTy g xty cty)
-                  collectSpecifierLocation relLine relCol 2
-                  parseLoop ((Option.map ((+)1) posi, xty) ::  (posi, fty) :: acc) (i+1, relLine, relCol+1)
-
-              | 't' ->
-                  checkOtherFlags ch
-                  collectSpecifierLocation relLine relCol 1
-                  parseLoop ((posi, mkFunTy g bty cty) :: acc)  (i+1, relLine, relCol+1)
-=======
                       collectSpecifierLocation fragLine fragCol 1
                       let i = skipPossibleInterpolationHole (i+1)
                       let xty = NewInferenceType ()
@@ -480,7 +458,6 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   collectSpecifierLocation fragLine fragCol 1
                   let i = skipPossibleInterpolationHole (i+1)
                   parseLoop ((posi, printerArgTy --> printerResidueTy) :: acc)  (i, fragLine, fragCol+1) fragments
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
               | c -> failwithf "%s" <| FSComp.SR.forBadFormatSpecifierGeneral(String.make 1 c)
           
@@ -494,19 +471,11 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
     let results = parseLoop [] (0, 0, m.StartColumn) fragments
     results, Seq.toList specifierLocations, dotnetFormatString.ToString(), percentATys.ToArray()
 
-<<<<<<< HEAD
-let ParseFormatString m g formatStringCheckContext fmt bty cty dty = 
-    let argtys, specifierLocations = parseFormatStringInternal m g formatStringCheckContext fmt bty cty
-    let aty = List.foldBack (mkFunTy g) argtys dty
-    let ety = mkRefTupledTy g argtys
-    (aty, ety), specifierLocations 
-=======
 let ParseFormatString m ms g isInterpolated isFormattableString formatStringCheckContext fmt printerArgTy printerResidueTy printerResultTy = 
     let argTys, specifierLocations, dotnetFormatString, percentATys = parseFormatStringInternal m ms g isInterpolated isFormattableString formatStringCheckContext fmt printerArgTy printerResidueTy
     let printerTy = List.foldBack (-->) argTys printerResultTy
     let printerTupleTy = mkRefTupledTy g argTys
     argTys, printerTy, printerTupleTy, percentATys, specifierLocations, dotnetFormatString
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 let TryCountFormatStringArguments m g isInterpolated fmt printerArgTy printerResidueTy =
     try
diff --git a/src/fsharp/FSComp.txt b/src/fsharp/FSComp.txt
index bac926f5081..4aaca606cb6 100644
--- a/src/fsharp/FSComp.txt
+++ b/src/fsharp/FSComp.txt
@@ -1485,7 +1485,7 @@ notAFunctionButMaybeDeclaration,"This value is not a function and cannot be appl
 3247,couldNotLoadDependencyManagerExtension,"The dependency manager extension %s could not be loaded. Message: %s"
 3250,expressionHasNoName,"Expression does not have a name."
 3251,chkNoFirstClassNameOf,"Using the 'nameof' operator as a first-class function value is not permitted."
-<<<<<<< HEAD
+3252,tcIllegalByrefsInOpenTypeDeclaration,"Byref types are not allowed in an open type declaration."
 3260,tcTypeDoesNotHaveAnyNull,"The type '%s' does not support a nullness qualitification."
 #3261 reserved for ConstraintSolverNullnessWarningEquivWithTypes
 #3262 reserved for ConstraintSolverNullnessWarningWithTypes
@@ -1499,9 +1499,6 @@ notAFunctionButMaybeDeclaration,"This value is not a function and cannot be appl
 3271,tcNullnessCheckingNotEnabled,"The /checknulls language feature is not enabled"
 csTypeHasNullAsTrueValue,"The type '%s' has 'null' as a true representation value but a constraint does not permit this"
 csTypeHasNullAsExtraValue,"The type '%s' has 'null' as an extra value but a constraint does not permit this"
-=======
-3252,tcIllegalByrefsInOpenTypeDeclaration,"Byref types are not allowed in an open type declaration."
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 3300,chkInvalidFunctionParameterType,"The parameter '%s' has an invalid type '%s'. This is not permitted by the rules of Common IL."
 3301,chkInvalidFunctionReturnType,"The function or method has an invalid return type '%s'. This is not permitted by the rules of Common IL."
 3302,packageManagementRequiresVFive,"The package management feature requires language version 5.0 use /langversion:preview"
@@ -1516,11 +1513,8 @@ csTypeHasNullAsExtraValue,"The type '%s' has 'null' as an extra value but a cons
 3353,chkFeatureNotSupportedInLibrary,"Feature '%s' requires the F# library for language version %s or greater."
 3360,parsEqualsMissingInTypeDefinition,"Unexpected token in type definition. Expected '=' after the type '%s'."
 useSdkRefs,"Use reference assemblies for .NET framework references when available (Enabled by default)."
-<<<<<<< HEAD
 optsCheckNulls,"Enable nullness declarations and checks"
 fSharpBannerVersion,"%s for F# %s"
-=======
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 optsLangVersion,"Display the allowed values for language version, specify language version such as 'latest' or 'preview'"
 optsSupportedLangVersions,"Supported language versions:"
 nativeResourceFormatError,"Stream does not begin with a null resource and is not in '.RES' format."
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index b7891d30964..d7fae6e3d0d 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -407,11 +407,11 @@
         use!, and! ile birleştirilemez
         
       
-<<<<<<< HEAD
       
         The /checknulls language feature is not enabled
         The /checknulls language feature is not enabled
-=======
+        
+      
       
         Cannot assign a value to another value marked literal
         Cannot assign a value to another value marked literal
@@ -420,7 +420,6 @@
       
         Cannot assign '{0}' to a value marked literal
         Cannot assign '{0}' to a value marked literal
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
         
       
       
@@ -428,15 +427,14 @@
         'let! ... and! ...' yapısı, yalnızca hesaplama ifadesi oluşturucu bir '{0}' metodunu ya da uygun 'MergeSource' ve 'Bind' metotlarını tanımlarsa kullanılabilir
         
       
-<<<<<<< HEAD
       
         The type '{0}' does not support a nullness qualitification.
         The type '{0}' does not support a nullness qualitification.
-=======
+        
+      
       
         Invalid interpolated string. {0}
         Invalid interpolated string. {0}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
         
       
       
diff --git a/src/utils/sformat.fs b/src/utils/sformat.fs
index 56a8ba2d664..d0499a7993f 100644
--- a/src/utils/sformat.fs
+++ b/src/utils/sformat.fs
@@ -1316,8 +1316,8 @@ module Display =
         let formatter = ObjectGraphFormatter(opts, BindingFlags.Public) 
         formatter.Format (ShowTopLevelBinding, x, xty)
 #else
-    let internal anyToStringForPrintf options (bindingFlags:BindingFlags) (x, xty) = 
+    let internal anyToStringForPrintf options (bindingFlags:BindingFlags) (value, xty) = 
         let formatter = ObjectGraphFormatter(options, bindingFlags) 
-        formatter.Format (ShowAll, x, xty) |> layout_to_string options
+        formatter.Format (ShowAll, value, xty) |> layout_to_string options
 #endif
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
index 1fa1d00efaa..d37e2f889b7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
-  .ver 4:7:0:0
-=======
   .ver 5:0:0:0
 }
 .assembly extern netstandard
 {
   .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
   .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Lock01
 {
@@ -42,36 +34,24 @@
 }
 .mresource public FSharpSignatureData.Lock01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000180
 }
 .mresource public FSharpSignatureDataB.Lock01
 {
   // Offset: 0x00000188 Length: 0x00000001
-=======
-  // Offset: 0x00000000 Length: 0x0000017E
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Lock01
 {
   // Offset: 0x00000190 Length: 0x00000064
 }
 .module Lock01.exe
-<<<<<<< HEAD
-// MVID: {5E172EE9-2BCA-B308-A745-0383E92E175E}
-=======
 // MVID: {5F1F9A50-2BCA-B308-A745-0383509A1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x059A0000
-=======
 // Image base: 0x06970000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -101,11 +81,7 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 20,20 : 19,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Lock01.fs'
-=======
       .line 20,20 : 19,21 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Lock01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldnull
       IL_0001:  ret
     } // end of method clo@20::Invoke
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
index 4567b3c4a3b..6a989e4de59 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
-  .ver 4:7:0:0
-=======
   .ver 5:0:0:0
 }
 .assembly extern netstandard
 {
   .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
   .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly MethodImplNoInline
 {
@@ -38,7 +30,6 @@
 }
 .mresource public FSharpSignatureData.MethodImplNoInline
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000002FB
 }
 .mresource public FSharpSignatureDataB.MethodImplNoInline
@@ -55,26 +46,12 @@
 }
 .module MethodImplNoInline.exe
 // MVID: {5E172EE9-4480-09E2-A745-0383E92E175E}
-=======
-  // Offset: 0x00000000 Length: 0x000002F9
-}
-.mresource public FSharpOptimizationData.MethodImplNoInline
-{
-  // Offset: 0x00000300 Length: 0x000000F5
-}
-.module MethodImplNoInline.exe
-// MVID: {5F1F9A50-4480-09E2-A745-0383509A1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x056D0000
-=======
-// Image base: 0x054F0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
index 66ba7935311..698485454f0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
-  .ver 4:7:0:0
-=======
   .ver 5:0:0:0
 }
 .assembly extern netstandard
 {
   .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
   .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly MethodImplNoInline02
 {
@@ -38,7 +30,6 @@
 }
 .mresource public FSharpSignatureData.MethodImplNoInline02
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000301
 }
 .mresource public FSharpSignatureDataB.MethodImplNoInline02
@@ -55,26 +46,12 @@
 }
 .module MethodImplNoInline02.exe
 // MVID: {5E172EE9-084F-1A8E-A745-0383E92E175E}
-=======
-  // Offset: 0x00000000 Length: 0x000002FF
-}
-.mresource public FSharpOptimizationData.MethodImplNoInline02
-{
-  // Offset: 0x00000308 Length: 0x000000F9
-}
-.module MethodImplNoInline02.exe
-// MVID: {5F1F9A50-084F-1A8E-A745-0383509A1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x06510000
-=======
 // Image base: 0x04E70000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
index 0a99399af93..fefd5e583ba 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
-  .ver 4:7:0:0
-=======
   .ver 5:0:0:0
 }
 .assembly extern netstandard
 {
   .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
   .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly comparison_decimal01
 {
@@ -42,32 +34,20 @@
 }
 .mresource public FSharpSignatureData.comparison_decimal01
 {
-<<<<<<< HEAD
-  // Offset: 0x00000000 Length: 0x00000172
-=======
   // Offset: 0x00000000 Length: 0x00000170
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.comparison_decimal01
 {
   // Offset: 0x00000178 Length: 0x0000005B
 }
 .module comparison_decimal01.exe
-<<<<<<< HEAD
-// MVID: {5E172EE9-76D8-7EE3-A745-0383E92E175E}
-=======
 // MVID: {5F1FA087-76D8-7EE3-A745-038387A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x058B0000
-=======
 // Image base: 0x06BE0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +71,7 @@
     // Code size       228 (0xe4)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-    .line 4,4 : 9,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
-=======
     .line 4,4 : 9,20 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldc.i4.s   10
     IL_0002:  ldc.i4.0
     IL_0003:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
index b92c0f694b5..aa54f9ff122 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
@@ -43,7 +43,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Aggregates01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000608
 }
 .mresource public FSharpSignatureDataB.Linq101Aggregates01
@@ -56,16 +55,6 @@
 }
 .module Linq101Aggregates01.exe
 // MVID: {5E172EEB-D281-4783-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000606
-}
-.mresource public FSharpOptimizationData.Linq101Aggregates01
-{
-  // Offset: 0x00000610 Length: 0x00000211
-}
-.module Linq101Aggregates01.exe
-// MVID: {5F1FA088-D281-4783-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
index fd892122481..b3b3eb96df4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,11 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
-  .ver 4:7:0:0
-=======
   .ver 5:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly extern Utils
 {
@@ -46,7 +38,6 @@
 }
 .mresource public FSharpSignatureData.Linq101ElementOperators01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000037E
 }
 .mresource public FSharpSignatureDataB.Linq101ElementOperators01
@@ -59,26 +50,12 @@
 }
 .module Linq101ElementOperators01.exe
 // MVID: {5E172EEB-19D7-C20D-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x0000037C
-}
-.mresource public FSharpOptimizationData.Linq101ElementOperators01
-{
-  // Offset: 0x00000380 Length: 0x00000127
-}
-.module Linq101ElementOperators01.exe
-// MVID: {5F1FA088-19D7-C20D-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
-// Image base: 0x05170000
-=======
 // Image base: 0x05260000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -132,11 +109,7 @@
       .locals init ([0] class [Utils]Utils/Product V_0,
                [1] class [Utils]Utils/Product p)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101ElementOperators01.fs'
-=======
       .line 100001,100001 : 0,0 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101ElementOperators01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101ElementOperators01/products12@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
index 5423f6e665a..e2903d37c9e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,11 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
-  .ver 4:7:0:0
-=======
   .ver 5:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly extern System.Core
 {
@@ -51,7 +43,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Grouping01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000403
 }
 .mresource public FSharpSignatureDataB.Linq101Grouping01
@@ -64,26 +55,12 @@
 }
 .module Linq101Grouping01.exe
 // MVID: {5E172EEB-FB79-E5BF-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x00000401
-}
-.mresource public FSharpOptimizationData.Linq101Grouping01
-{
-  // Offset: 0x00000408 Length: 0x00000129
-}
-.module Linq101Grouping01.exe
-// MVID: {5F1FA088-FB79-E5BF-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x06EC0000
-=======
-// Image base: 0x06480000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -121,11 +98,7 @@
       .maxstack  6
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 14,14 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Grouping01.fs'
-=======
-      .line 14,14 : 9,28 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Grouping01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 15,15 : 9,29 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
index 3c932e184ba..119375510ec 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,11 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly extern Utils
 {
@@ -46,7 +38,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Partitioning01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000003D2
 }
 .mresource public FSharpSignatureDataB.Linq101Partitioning01
@@ -59,26 +50,12 @@
 }
 .module Linq101Partitioning01.exe
 // MVID: {5E172EEB-B280-A6A2-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x000003D0
-}
-.mresource public FSharpOptimizationData.Linq101Partitioning01
-{
-  // Offset: 0x000003D8 Length: 0x00000138
-}
-.module Linq101Partitioning01.exe
-// MVID: {5F1FA088-B280-A6A2-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x05A80000
-=======
-// Image base: 0x04B00000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -132,11 +109,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Partitioning01.fs'
-=======
-      .line 100001,100001 : 0,0 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Partitioning01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Partitioning01/first3Numbers@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
index f87342d59e2..5f5a627602b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
@@ -49,11 +49,7 @@
   // Offset: 0x000006A0 Length: 0x00000204
 }
 .module Linq101Select01.exe
-<<<<<<< HEAD
 // MVID: {5E172EEB-6057-8F80-A745-0383EB2E175E}
-=======
-// MVID: {5F1FA088-6057-8F80-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
index a19da94ea5b..c300ca6037f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,11 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly extern Utils
 {
@@ -46,7 +38,6 @@
 }
 .mresource public FSharpSignatureData.Linq101SetOperators01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000038C
 }
 .mresource public FSharpSignatureDataB.Linq101SetOperators01
@@ -59,26 +50,12 @@
 }
 .module Linq101SetOperators01.exe
 // MVID: {5E172EEB-4EE5-349F-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x0000038A
-}
-.mresource public FSharpOptimizationData.Linq101SetOperators01
-{
-  // Offset: 0x00000390 Length: 0x0000011E
-}
-.module Linq101SetOperators01.exe
-// MVID: {5F1FA088-4EE5-349F-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x00BA0000
-=======
-// Image base: 0x053D0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -132,11 +109,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101SetOperators01.fs'
-=======
-      .line 100001,100001 : 0,0 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101SetOperators01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101SetOperators01/uniqueFactors@13::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
index 87c3803b65c..0ac2b348ad2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,11 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly extern Utils
 {
@@ -46,7 +38,6 @@
 }
 .mresource public FSharpSignatureData.Linq101Where01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000003CA
 }
 .mresource public FSharpSignatureDataB.Linq101Where01
@@ -59,26 +50,12 @@
 }
 .module Linq101Where01.exe
 // MVID: {5E172EEB-FF23-CD21-A745-0383EB2E175E}
-=======
-  // Offset: 0x00000000 Length: 0x000003C8
-}
-.mresource public FSharpOptimizationData.Linq101Where01
-{
-  // Offset: 0x000003D0 Length: 0x0000012E
-}
-.module Linq101Where01.exe
-// MVID: {5F1FA088-FF23-CD21-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x06990000
-=======
-// Image base: 0x04BD0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -116,11 +93,7 @@
       .maxstack  6
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 14,14 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Where01.fs'
-=======
-      .line 14,14 : 9,28 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Where01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 15,15 : 9,22 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
index 5a306e84b04..e3a7b35c405 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
@@ -49,11 +49,7 @@
   // Offset: 0x00000A70 Length: 0x00000035
 }
 .module StaticInit_Struct01.dll
-<<<<<<< HEAD
 // MVID: {5E172EE8-05F6-D6CB-A745-0383E82E175E}
-=======
-// MVID: {5F1FA087-05F6-D6CB-A745-038387A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
index c0bdc9557db..95a5c812391 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly TestFunction3c
 {
@@ -42,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.TestFunction3c
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000001FC
 }
 .mresource public FSharpSignatureDataB.TestFunction3c
@@ -55,26 +41,12 @@
 }
 .module TestFunction3c.exe
 // MVID: {5E172EE9-A662-4FAC-A745-0383E92E175E}
-=======
-  // Offset: 0x00000000 Length: 0x000001FA
-}
-.mresource public FSharpOptimizationData.TestFunction3c
-{
-  // Offset: 0x00000200 Length: 0x0000008A
-}
-.module TestFunction3c.exe
-// MVID: {5F1FA088-A662-4FAC-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x00BA0000
-=======
-// Image base: 0x06AD0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -88,11 +60,7 @@
     // Code size       36 (0x24)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
     .line 5,5 : 5,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3c.fs'
-=======
-    .line 5,5 : 5,20 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\TestFunction3c.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldstr      "Hello"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
     IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
index e1069f872c6..6891fe7e21c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Testfunction22f
 {
@@ -42,32 +29,20 @@
 }
 .mresource public FSharpSignatureData.Testfunction22f
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000159
-=======
-  // Offset: 0x00000000 Length: 0x00000157
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Testfunction22f
 {
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22f.exe
-<<<<<<< HEAD
 // MVID: {5E172EE9-C040-2523-A745-0383E92E175E}
-=======
-// MVID: {5F1FA088-C040-2523-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x05030000
-=======
-// Image base: 0x067F0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -92,11 +67,7 @@
     .maxstack  4
     .locals init ([0] string V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
     .line 3,3 : 1,15 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22f.fs'
-=======
-    .line 3,3 : 1,15 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\TestFunctions\\Testfunction22f.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldstr      "A"
     IL_0005:  stloc.0
     IL_0006:  ldloc.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
index c2cd39a70ba..565dee2afe7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly TupleElimination
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.TupleElimination
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000022A
 }
 .mresource public FSharpSignatureDataB.TupleElimination
 {
   // Offset: 0x00000230 Length: 0x00000007
-=======
-  // Offset: 0x00000000 Length: 0x00000228
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.TupleElimination
 {
   // Offset: 0x00000230 Length: 0x0000007B
 }
 .module TupleElimination.exe
-<<<<<<< HEAD
 // MVID: {5E172EE9-DFDD-92DF-A745-0383E92E175E}
-=======
-// MVID: {5F1FA088-DFDD-92DF-A745-038388A01F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x057F0000
-=======
-// Image base: 0x07100000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -86,11 +61,7 @@
     .maxstack  4
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
     .line 5,5 : 15,27 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\TupleElimination.fs'
-=======
-    .line 5,5 : 15,27 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Tuples\\TupleElimination.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldstr      "%A"
     IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [mscorlib]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,!!a>::.ctor(string)
     IL_000a:  stloc.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
index b0bb9cbcd2c..55e96939e3f 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly ForEachOnList01
 {
@@ -42,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.ForEachOnList01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000002E9
 }
 .mresource public FSharpSignatureDataB.ForEachOnList01
@@ -55,26 +41,12 @@
 }
 .module ForEachOnList01.dll
 // MVID: {5E1730A7-56DF-F74F-A745-0383A730175E}
-=======
-  // Offset: 0x00000000 Length: 0x000002E7
-}
-.mresource public FSharpOptimizationData.ForEachOnList01
-{
-  // Offset: 0x000002F0 Length: 0x000000DB
-}
-.module ForEachOnList01.dll
-// MVID: {5F1FBE49-56DF-F74F-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x054B0000
-=======
-// Image base: 0x04F10000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -104,11 +76,7 @@
       // Code size       4 (0x4)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 39,39 : 21,26 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnList01.fs'
-=======
-      .line 39,39 : 21,26 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnList01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.1
       IL_0001:  ldc.i4.1
       IL_0002:  add
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
index 02fc8401e20..8b002e59be2 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly ForEachOnString01
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.ForEachOnString01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000350
 }
 .mresource public FSharpSignatureDataB.ForEachOnString01
 {
   // Offset: 0x00000358 Length: 0x0000001B
-=======
-  // Offset: 0x00000000 Length: 0x0000034E
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.ForEachOnString01
 {
   // Offset: 0x00000378 Length: 0x000000FF
 }
 .module ForEachOnString01.dll
-<<<<<<< HEAD
 // MVID: {5E1730A7-105C-852B-A745-0383A730175E}
-=======
-// MVID: {5F1FBE49-105C-852B-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x05680000
-=======
-// Image base: 0x06CB0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -101,11 +76,7 @@
       // Code size       6 (0x6)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 55,55 : 21,39 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnString01.fs'
-=======
-      .line 55,55 : 21,39 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnString01.fs'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldarg.1
       IL_0001:  conv.i4
       IL_0002:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
index 1e8d38bab38..7ff446e21e5 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly NoIEnumerable01
 {
@@ -42,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable01
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000001CD
 }
 .mresource public FSharpSignatureDataB.NoIEnumerable01
@@ -55,26 +41,12 @@
 }
 .module NoIEnumerable01.dll
 // MVID: {5E1730A7-31A1-8DCB-A745-0383A730175E}
-=======
-  // Offset: 0x00000000 Length: 0x000001CB
-}
-.mresource public FSharpOptimizationData.NoIEnumerable01
-{
-  // Offset: 0x000001D0 Length: 0x0000006C
-}
-.module NoIEnumerable01.dll
-// MVID: {5F1FBE49-31A1-8DCB-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x05070000
-=======
-// Image base: 0x07010000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +63,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
     .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable01.fsx'
-=======
-    .line 7,7 : 4,22 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable01.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldc.i4.1
     IL_0001:  stloc.1
     IL_0002:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
index ff93011d2b5..f77566c6427 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly NoIEnumerable02
 {
@@ -42,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable02
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000001CD
 }
 .mresource public FSharpSignatureDataB.NoIEnumerable02
@@ -55,26 +41,12 @@
 }
 .module NoIEnumerable02.dll
 // MVID: {5E1730A7-5066-4012-A745-0383A730175E}
-=======
-  // Offset: 0x00000000 Length: 0x000001CB
-}
-.mresource public FSharpOptimizationData.NoIEnumerable02
-{
-  // Offset: 0x000001D0 Length: 0x0000006C
-}
-.module NoIEnumerable02.dll
-// MVID: {5F1FBE49-5066-4012-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x06710000
-=======
-// Image base: 0x07280000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +63,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
     .line 7,7 : 4,24 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable02.fsx'
-=======
-    .line 7,7 : 4,24 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable02.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldc.i4.s   100
     IL_0002:  stloc.1
     IL_0003:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
index d4901d5c5db..7ae5b76beb5 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly NoIEnumerable03
 {
@@ -42,7 +29,6 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable03
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x000001DB
 }
 .mresource public FSharpSignatureDataB.NoIEnumerable03
@@ -55,26 +41,12 @@
 }
 .module NoIEnumerable03.dll
 // MVID: {5E1730A7-7903-6020-A745-0383A730175E}
-=======
-  // Offset: 0x00000000 Length: 0x000001D9
-}
-.mresource public FSharpOptimizationData.NoIEnumerable03
-{
-  // Offset: 0x000001E0 Length: 0x0000006C
-}
-.module NoIEnumerable03.dll
-// MVID: {5F1FBE49-7903-6020-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x06DC0000
-=======
-// Image base: 0x070D0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -93,11 +65,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
     .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable03.fsx'
-=======
-    .line 7,7 : 4,22 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable03.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
     IL_0000:  ldarg.0
     IL_0001:  stloc.1
     IL_0002:  ldarg.1
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
index cc46c55c617..e17a131504d 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Compare03
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare03
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000233
 }
 .mresource public FSharpSignatureDataB.Compare03
 {
   // Offset: 0x00000238 Length: 0x00000003
-=======
-  // Offset: 0x00000000 Length: 0x00000231
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Compare03
 {
   // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare03.dll
-<<<<<<< HEAD
 // MVID: {5E1730AF-0562-F88E-A745-0383AF30175E}
-=======
-// MVID: {5F1FBE49-0562-F88E-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x057B0000
-=======
-// Image base: 0x06C20000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -94,11 +69,7 @@
                [3] int32 V_3,
                [4] int32 V_4)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare03.fsx'
-=======
-      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare03.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
index 5d8741cb2eb..9291690e5cf 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Compare04
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.Compare04
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000233
 }
 .mresource public FSharpSignatureDataB.Compare04
 {
   // Offset: 0x00000238 Length: 0x00000003
-=======
-  // Offset: 0x00000000 Length: 0x00000231
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Compare04
 {
   // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare04.dll
-<<<<<<< HEAD
 // MVID: {5E1730AF-053B-F88E-A745-0383AF30175E}
-=======
-// MVID: {5F1FBE49-053B-F88E-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x06B40000
-=======
-// Image base: 0x06750000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -95,11 +70,7 @@
                [4] int32 V_4,
                [5] int32 V_5)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare04.fsx'
-=======
-      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare04.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
index e3e61d4f2b0..e12cd3aff5c 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Equals02
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals02
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000230
 }
 .mresource public FSharpSignatureDataB.Equals02
 {
   // Offset: 0x00000238 Length: 0x00000003
-=======
-  // Offset: 0x00000000 Length: 0x0000022E
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Equals02
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals02.dll
-<<<<<<< HEAD
 // MVID: {5E1730AF-0759-B6D8-A745-0383AF30175E}
-=======
-// MVID: {5F1FBE49-0759-B6D8-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x05A30000
-=======
-// Image base: 0x054B0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +66,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals02.fsx'
-=======
-      .line 5,5 : 8,29 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals02.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
index e0727b6933d..68011af959a 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Equals03
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.Equals03
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x00000230
 }
 .mresource public FSharpSignatureDataB.Equals03
 {
   // Offset: 0x00000238 Length: 0x00000003
-=======
-  // Offset: 0x00000000 Length: 0x0000022E
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Equals03
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals03.dll
-<<<<<<< HEAD
 // MVID: {5E1730AF-0759-3313-A745-0383AF30175E}
-=======
-// MVID: {5F1FBE49-0759-3313-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x057B0000
-=======
-// Image base: 0x071F0000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +66,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals03.fsx'
-=======
-      .line 5,5 : 8,29 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals03.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
index e5e94690ba2..a461beef699 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Hash03
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash03
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000021C
 }
 .mresource public FSharpSignatureDataB.Hash03
 {
   // Offset: 0x00000220 Length: 0x00000003
-=======
-  // Offset: 0x00000000 Length: 0x0000021A
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Hash03
 {
   // Offset: 0x00000220 Length: 0x000000B0
 }
 .module Hash03.dll
-<<<<<<< HEAD
 // MVID: {5E1730AF-9642-788D-A745-0383AF30175E}
-=======
-// MVID: {5F1FBE49-9642-788D-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x04DA0000
-=======
-// Image base: 0x05560000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +66,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash03.fsx'
-=======
-      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash03.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 7,7 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
index c3ece0a59cf..1e845677fc7 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
@@ -1,9 +1,5 @@
 
-<<<<<<< HEAD
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
-=======
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -17,16 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-<<<<<<< HEAD
   .ver 4:7:0:0
-=======
-  .ver 5:0:0:0
-}
-.assembly extern netstandard
-{
-  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
-  .ver 2:0:0:0
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .assembly Hash04
 {
@@ -42,36 +29,24 @@
 }
 .mresource public FSharpSignatureData.Hash04
 {
-<<<<<<< HEAD
   // Offset: 0x00000000 Length: 0x0000021C
 }
 .mresource public FSharpSignatureDataB.Hash04
 {
   // Offset: 0x00000220 Length: 0x00000003
-=======
-  // Offset: 0x00000000 Length: 0x0000021A
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 }
 .mresource public FSharpOptimizationData.Hash04
 {
   // Offset: 0x00000220 Length: 0x000000B0
 }
 .module Hash04.dll
-<<<<<<< HEAD
 // MVID: {5E1730AF-9642-7838-A745-0383AF30175E}
-=======
-// MVID: {5F1FBE49-9642-7838-A745-038349BE1F5F}
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-<<<<<<< HEAD
 // Image base: 0x070E0000
-=======
-// Image base: 0x06790000
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -91,11 +66,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-<<<<<<< HEAD
       .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash04.fsx'
-=======
-      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash04.fsx'
->>>>>>> 2702b33d4204d7142f34f7acfebf6234d9a43a5c
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 7,7 : 8,32 ''
diff --git a/tests/scripts/compiler-perf.fsx b/tests/scripts/compiler-perf.fsx
index 87ca7ddf1aa..0c6f742be20 100644
--- a/tests/scripts/compiler-perf.fsx
+++ b/tests/scripts/compiler-perf.fsx
@@ -84,13 +84,8 @@ let build(cloneUrl, baseSha, ref, prNumber) =
        exec "git" ("clone " + repo + " " + dirBuild) dirBase  |> ignore
     let result = exec "git"  "reset --merge" dir
     let result = exec "git" "checkout main" dir
-<<<<<<< HEAD
     let result = exec "git" "clean -xfd artifacts src vsintegration tests" dir
     let result = exec "git" ("checkout -B " + branch + " " + baseSha) dir
-=======
-    let result = exec "git" "clean -f -x artifacts src" dir
-    let result = exec "git" ("checkout -B " + branch + " main") dir
->>>>>>> 83c6440d759a2097618d46d1aabb374fe4140afd
     let result = exec "git" ("pull  " + cloneUrl + " " + ref) dir
     let result, buildTime = time (fun () -> exec "cmd" "/C build.cmd -c Release" dir )
     let result, ngenTime = time (fun () -> exec "ngen" @"install artifacts\bin\fsc\Release\net472\fsc.exe" dir )

From 13fb248ad56a8261e9ce79a7ffcd8d06705f5a98 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 13:41:30 +0100
Subject: [PATCH 017/112] fix build

---
 src/fsharp/CheckFormatStrings.fs | 12 ++++++------
 src/fsharp/ConstraintSolver.fs   |  4 ++--
 src/fsharp/NameResolution.fs     |  4 ++--
 src/fsharp/TypeChecker.fs        |  4 +---
 src/fsharp/TypedTreeOps.fs       | 14 +++++---------
 5 files changed, 16 insertions(+), 22 deletions(-)

diff --git a/src/fsharp/CheckFormatStrings.fs b/src/fsharp/CheckFormatStrings.fs
index 8ef9d1a68c8..64d061d46ad 100644
--- a/src/fsharp/CheckFormatStrings.fs
+++ b/src/fsharp/CheckFormatStrings.fs
@@ -425,14 +425,14 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   checkOtherFlags ch
                   collectSpecifierLocation fragLine fragCol 1
                   let i = skipPossibleInterpolationHole (i+1)
-                  parseLoop ((posi, NewInferenceType ()) :: acc) (i, fragLine, fragCol+1) fragments
+                  parseLoop ((posi, NewInferenceType g) :: acc) (i, fragLine, fragCol+1) fragments
 
               // residue of hole "...{n}..." in interpolated strings become %P(...) 
               | 'P' when isInterpolated ->
                   checkOtherFlags ch
                   let i = requireAndSkipInterpolationHoleFormat (i+1)
                   // Note, the fragCol doesn't advance at all as these are magically inserted.  
-                  parseLoop ((posi, NewInferenceType ()) :: acc) (i, fragLine, startFragCol) fragments
+                  parseLoop ((posi, NewInferenceType g) :: acc) (i, fragLine, startFragCol) fragments
 
               | 'A' ->
                   match info.numPrefixIfPos with
@@ -440,14 +440,14 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   | Some '+' -> 
                       collectSpecifierLocation fragLine fragCol 1
                       let i = skipPossibleInterpolationHole (i+1)
-                      let xty = NewInferenceType ()
+                      let xty = NewInferenceType g
                       percentATys.Add(xty)
                       parseLoop ((posi, xty) :: acc)  (i, fragLine, fragCol+1) fragments
                   | Some n -> failwithf "%s" <| FSComp.SR.forDoesNotSupportPrefixFlag(ch.ToString(), n.ToString())
 
               | 'a' ->
                   checkOtherFlags ch
-                  let xty = NewInferenceType () 
+                  let xty = NewInferenceType g 
                   let fty = printerArgTy --> (xty --> printerResidueTy)
                   collectSpecifierLocation fragLine fragCol 2
                   let i = skipPossibleInterpolationHole (i+1)
@@ -457,7 +457,7 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   checkOtherFlags ch
                   collectSpecifierLocation fragLine fragCol 1
                   let i = skipPossibleInterpolationHole (i+1)
-                  parseLoop ((posi, printerArgTy --> printerResidueTy) :: acc)  (i, fragLine, fragCol+1) fragments
+                  parseLoop ((posi, mkFunTy g printerArgTy printerResidueTy) :: acc)  (i, fragLine, fragCol+1) fragments
 
               | c -> failwithf "%s" <| FSComp.SR.forBadFormatSpecifierGeneral(String.make 1 c)
           
@@ -473,7 +473,7 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
 
 let ParseFormatString m ms g isInterpolated isFormattableString formatStringCheckContext fmt printerArgTy printerResidueTy printerResultTy = 
     let argTys, specifierLocations, dotnetFormatString, percentATys = parseFormatStringInternal m ms g isInterpolated isFormattableString formatStringCheckContext fmt printerArgTy printerResidueTy
-    let printerTy = List.foldBack (-->) argTys printerResultTy
+    let printerTy = List.foldBack (mkFunTy g) argTys printerResultTy
     let printerTupleTy = mkRefTupledTy g argTys
     argTys, printerTy, printerTupleTy, percentATys, specifierLocations, dotnetFormatString
 
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 9444e699788..8ecbd1a95b2 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -2531,14 +2531,14 @@ and SolveTypeRequiresDefaultValue (csenv: ConstraintSolverEnv) ndeep m2 trace or
         if isNonNullableStructTyparTy g ty then
             SolveTypeRequiresDefaultConstructor csenv ndeep m2 trace ty 
         elif isReferenceTyparTy g ty then
-            SolveTypeSupportsNull csenv ndeep m2 trace ty
+            SolveTypeUseSupportsNull csenv ndeep m2 trace ty
         else
             ErrorD (ConstraintSolverError(FSComp.SR.csGenericConstructRequiresStructOrReferenceConstraint(), m, m2))
     else
         if isStructTy g ty then
              SolveTypeRequiresDefaultConstructor csenv ndeep m2 trace ty 
         else
-             SolveTypeSupportsNull csenv ndeep m2 trace ty
+             SolveTypeUseSupportsNull csenv ndeep m2 trace ty
 
 // Parameterized compatibility relation between member signatures.  The real work
 // is done by "equateTypes" and "subsumeTypes" and "subsumeArg"
diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs
index dcf986b01c2..37ed4474109 100644
--- a/src/fsharp/NameResolution.fs
+++ b/src/fsharp/NameResolution.fs
@@ -1257,7 +1257,7 @@ and private AddPartsOfTyconRefToNameEnv bulkAddMode ownDefinition (g: TcGlobals)
     let nenv = AddStaticPartsOfTyconRefToNameEnv bulkAddMode ownDefinition g amap m nenv None tcref
     let nenv = 
         if CanAutoOpenTyconRef g m tcref then
-            let ty = generalizedTyconRef tcref
+            let ty = generalizedTyconRef g tcref
             AddStaticContentOfTypeToNameEnv g amap ad m nenv ty
         else
             nenv
@@ -1438,7 +1438,7 @@ let FreshenTycon (ncenv: NameResolver) m (tcref: TyconRef) =
 let FreshenTyconWithEnclosingTypeInst (ncenv: NameResolver) m (tinstEnclosing: TypeInst) (tcref: TyconRef) =
     let tps = ncenv.InstantiationGenerator m (tcref.Typars m)
     let tinst = List.skip tinstEnclosing.Length tps
-    let improvedTy = ncenv.g.decompileType tcref (tinstEnclosing @ tinst)
+    let improvedTy = ncenv.g.decompileType tcref (tinstEnclosing @ tinst) ncenv.g.knownWithoutNull
     improvedTy
 
 /// Convert a reference to a union case into a UnionCaseInfo that includes
diff --git a/src/fsharp/TypeChecker.fs b/src/fsharp/TypeChecker.fs
index b0bca634dd2..b58586a7bdf 100755
--- a/src/fsharp/TypeChecker.fs
+++ b/src/fsharp/TypeChecker.fs
@@ -9664,7 +9664,7 @@ and TcNameOfExpr cenv env tpenv (synArg: SynExpr) =
                           | Item.CtorGroup _
                           | Item.FakeInterfaceCtor _ -> false
                           | _ -> true) -> 
-                    let overallTy = match overallTyOpt with None -> NewInferenceType() | Some t -> t 
+                    let overallTy = match overallTyOpt with None -> NewInferenceType cenv.g | Some t -> t 
                     let _, _ = TcItemThen cenv overallTy env tpenv res delayed
                     true
                 | _ ->
@@ -16524,13 +16524,11 @@ module EstablishTypeDefinitionCores =
             let noAllowNullLiteralAttributeCheck() = 
                 if hasAllowNullLiteralAttr then errorR (Error(FSComp.SR.tcRecordsUnionsAbbreviationsStructsMayNotHaveAllowNullLiteralAttribute(), m))
                 
-                
             let allowNullLiteralAttributeCheck() = 
                 if hasAllowNullLiteralAttr then 
                     tycon.TypeContents.tcaug_super |> Option.iter (fun ty -> if not (TypeNullIsExtraValueOld g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m)))
                     tycon.ImmediateInterfaceTypesOfFSharpTycon |> List.iter (fun ty -> if not (TypeNullIsExtraValueOld g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m)))
                 
-                
             let structLayoutAttributeCheck allowed = 
                 let explicitKind = int32 System.Runtime.InteropServices.LayoutKind.Explicit
                 match structLayoutAttr with
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 1658dc71394..4b8c80c214c 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -894,9 +894,9 @@ let convertToTypeWithMetadataIfPossible g ty =
 
 let stripMeasuresFromTType g tt = 
     match tt with
-    | TType_app(a,b) ->
+    | TType_app(a,b,nullness) ->
         let b' = b |> List.filter (isMeasureTy g >> not)
-        TType_app(a, b')
+        TType_app(a, b',nullness)
     | _ -> tt
 
 //---------------------------------------------------------------------------
@@ -2975,14 +2975,14 @@ let tyconRefToFullName (tc:TyconRef) =
 
 let rec qualifiedInterfaceImplementationNameAux g (x:TType) : string =
     match stripMeasuresFromTType g (stripTyEqnsAndErase true g x) with
-    | TType_app (a,[]) -> tyconRefToFullName a
+    | TType_app (a,[],_) -> tyconRefToFullName a
     | TType_anon (a,b) ->
         let genericParameters = b |> Seq.map (qualifiedInterfaceImplementationNameAux g) |> String.concat ", "
         sprintf "%s<%s>" (a.ILTypeRef.FullName) genericParameters
-    | TType_app (a,b) ->
+    | TType_app (a,b,_) ->
         let genericParameters = b |> Seq.map (qualifiedInterfaceImplementationNameAux g) |> String.concat ", "
         sprintf "%s<%s>" (tyconRefToFullName a) genericParameters
-    | TType_var (v) -> "'" + v.Name
+    | TType_var (v,_) -> "'" + v.Name
     | _ -> failwithf "unexpected: expected TType_app but got %O" (x.GetType())
 
 /// for types in the global namespace, `global is prepended (note the backtick)
@@ -8302,10 +8302,6 @@ let TypeNullNotLiked g m ty =
     && not (TypeNullIsTrueValue g ty) 
     && not (TypeNullNever g ty) 
 
-// The non-inferring counter-part to SolveTypeSupportsNull
-let TypeSatisfiesNullConstraint g m ty = 
-    TypeNullIsExtraValue g m ty  
-
 let rec TypeHasDefaultValue isNew g m ty = 
     let ty = stripTyEqnsAndMeasureEqns g ty
     (if isNew then TypeNullIsExtraValueNew g m ty else TypeNullIsExtraValueOld g m ty)

From 785de4e28e69db7dc94ee0accfe17ef29f4e73bb Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 14:27:15 +0100
Subject: [PATCH 018/112] fix build

---
 src/fsharp/CheckFormatStrings.fs  |    2 +-
 src/fsharp/CompileOps.fs          | 5996 -----------------------------
 src/fsharp/CompileOps.fsi         |  856 ----
 src/fsharp/CompilerConfig.fs      |   29 +-
 src/fsharp/CompilerConfig.fsi     |   10 +-
 src/fsharp/CompilerDiagnostics.fs |   52 +-
 src/fsharp/CompilerImports.fs     |  132 +-
 src/fsharp/CompilerImports.fsi    |   12 +-
 src/fsharp/QuotationTranslator.fs |    1 -
 src/fsharp/ScriptClosure.fs       |    2 +-
 src/fsharp/fsi/fsi.fs             |   40 +-
 src/fsharp/xlf/FSComp.txt.cs.xlf  |   10 +-
 src/fsharp/xlf/FSComp.txt.de.xlf  |   10 +-
 src/fsharp/xlf/FSComp.txt.es.xlf  |   10 +-
 src/fsharp/xlf/FSComp.txt.fr.xlf  |   10 +-
 src/fsharp/xlf/FSComp.txt.it.xlf  |    2 +
 16 files changed, 230 insertions(+), 6944 deletions(-)
 delete mode 100644 src/fsharp/CompileOps.fs
 delete mode 100644 src/fsharp/CompileOps.fsi

diff --git a/src/fsharp/CheckFormatStrings.fs b/src/fsharp/CheckFormatStrings.fs
index 64d061d46ad..52b63fd448f 100644
--- a/src/fsharp/CheckFormatStrings.fs
+++ b/src/fsharp/CheckFormatStrings.fs
@@ -448,7 +448,7 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
               | 'a' ->
                   checkOtherFlags ch
                   let xty = NewInferenceType g 
-                  let fty = printerArgTy --> (xty --> printerResidueTy)
+                  let fty = mkFunTy g printerArgTy (mkFunTy g xty printerResidueTy)
                   collectSpecifierLocation fragLine fragCol 2
                   let i = skipPossibleInterpolationHole (i+1)
                   parseLoop ((Option.map ((+)1) posi, xty) ::  (posi, fty) :: acc) (i, fragLine, fragCol+1) fragments
diff --git a/src/fsharp/CompileOps.fs b/src/fsharp/CompileOps.fs
deleted file mode 100644
index 5a009ec8853..00000000000
--- a/src/fsharp/CompileOps.fs
+++ /dev/null
@@ -1,5996 +0,0 @@
-// Copyright (c) Microsoft Corporation. All Rights Reserved. See License.txt in the project root for license information.
-
-/// Coordinating compiler operations - configuration, loading initial context, reporting errors etc.
-module internal FSharp.Compiler.CompileOps
-
-open System
-open System.Collections.Concurrent
-open System.Collections.Generic
-open System.Diagnostics
-open System.IO
-open System.Text
-
-open Internal.Utilities
-open Internal.Utilities.Collections
-open Internal.Utilities.Filename
-open Internal.Utilities.Text
-
-open FSharp.Compiler
-open FSharp.Compiler.AbstractIL
-open FSharp.Compiler.AbstractIL.IL
-open FSharp.Compiler.AbstractIL.ILBinaryReader
-open FSharp.Compiler.AbstractIL.ILPdbWriter
-open FSharp.Compiler.AbstractIL.Internal
-open FSharp.Compiler.AbstractIL.Internal.Library
-open FSharp.Compiler.AbstractIL.Internal.Utils
-open FSharp.Compiler.AbstractIL.Extensions.ILX
-open FSharp.Compiler.AbstractIL.Diagnostics
-open FSharp.Compiler.AttributeChecking
-open FSharp.Compiler.CompilerGlobalState
-open FSharp.Compiler.ConstraintSolver
-open FSharp.Compiler.DiagnosticMessage
-open FSharp.Compiler.DotNetFrameworkDependencies
-open FSharp.Compiler.ErrorLogger
-open FSharp.Compiler.Features
-open FSharp.Compiler.Import
-open FSharp.Compiler.Infos
-open FSharp.Compiler.Lexhelp
-open FSharp.Compiler.Lib
-open FSharp.Compiler.MethodCalls
-open FSharp.Compiler.MethodOverrides
-open FSharp.Compiler.NameResolution
-open FSharp.Compiler.ParseHelpers
-open FSharp.Compiler.PrettyNaming
-open FSharp.Compiler.SyntaxTree
-open FSharp.Compiler.SyntaxTreeOps
-open FSharp.Compiler.Range
-open FSharp.Compiler.ReferenceResolver
-open FSharp.Compiler.SignatureConformance
-open FSharp.Compiler.TypedTreePickle
-open FSharp.Compiler.TypeChecker
-open FSharp.Compiler.TypedTree
-open FSharp.Compiler.TypedTreeBasics
-open FSharp.Compiler.TypedTreeOps
-open FSharp.Compiler.TcGlobals
-open FSharp.Compiler.Text
-open FSharp.Compiler.XmlDoc
-
-open Microsoft.DotNet.DependencyManager
-
-#if !NO_EXTENSIONTYPING
-open FSharp.Compiler.ExtensionTyping
-open Microsoft.FSharp.Core.CompilerServices
-#endif
-
-#if DEBUG
-[]
-module internal CompilerService =
-    let showAssertForUnexpectedException = ref true
-#endif // DEBUG
-
-//----------------------------------------------------------------------------
-// Some Globals
-//--------------------------------------------------------------------------
-
-let FSharpSigFileSuffixes = [".mli";".fsi"]
-let mlCompatSuffixes = [".mli";".ml"]
-let FSharpImplFileSuffixes = [".ml";".fs";".fsscript";".fsx"]
-let resSuffixes = [".resx"]
-let FSharpScriptFileSuffixes = [".fsscript";".fsx"]
-let doNotRequireNamespaceOrModuleSuffixes = [".mli";".ml"] @ FSharpScriptFileSuffixes
-let FSharpLightSyntaxFileSuffixes: string list = [ ".fs";".fsscript";".fsx";".fsi" ]
-
-//----------------------------------------------------------------------------
-// ERROR REPORTING
-//--------------------------------------------------------------------------
-
-exception HashIncludeNotAllowedInNonScript of range
-exception HashReferenceNotAllowedInNonScript of range
-exception HashDirectiveNotAllowedInNonScript of range
-exception FileNameNotResolved of (*filename*) string * (*description of searched locations*) string * range
-exception AssemblyNotResolved of (*originalName*) string * range
-exception LoadedSourceNotFoundIgnoring of (*filename*) string * range
-exception MSBuildReferenceResolutionWarning of (*MSBuild warning code*)string * (*Message*)string * range
-exception MSBuildReferenceResolutionError of (*MSBuild warning code*)string * (*Message*)string * range
-exception DeprecatedCommandLineOptionFull of string * range
-exception DeprecatedCommandLineOptionForHtmlDoc of string * range
-exception DeprecatedCommandLineOptionSuggestAlternative of string * string * range
-exception DeprecatedCommandLineOptionNoDescription of string * range
-exception InternalCommandLineOption of string * range
-exception HashLoadedSourceHasIssues of (*warnings*) exn list * (*errors*) exn list * range
-exception HashLoadedScriptConsideredSource of range
-
-
-let GetRangeOfDiagnostic(err: PhasedDiagnostic) = 
-  let rec RangeFromException = function
-      | ErrorFromAddingConstraint(_, err2, _) -> RangeFromException err2 
-#if !NO_EXTENSIONTYPING
-      | ExtensionTyping.ProvidedTypeResolutionNoRange e -> RangeFromException e
-      | ExtensionTyping.ProvidedTypeResolution(m, _)
-#endif
-      | ReservedKeyword(_, m)
-      | IndentationProblem(_, m)
-      | ErrorFromAddingTypeEquation(_, _, _, _, _, m) 
-      | ErrorFromApplyingDefault(_, _, _, _, _, m) 
-      | ErrorsFromAddingSubsumptionConstraint(_, _, _, _, _, _, m)
-      | FunctionExpected(_, _, m)
-      | BakedInMemberConstraintName(_, m)
-      | StandardOperatorRedefinitionWarning(_, m)
-      | BadEventTransformation m
-      | ParameterlessStructCtor m
-      | FieldNotMutable (_, _, m) 
-      | Recursion (_, _, _, _, m) 
-      | InvalidRuntimeCoercion(_, _, _, m) 
-      | IndeterminateRuntimeCoercion(_, _, _, m)
-      | IndeterminateStaticCoercion (_, _, _, m)
-      | StaticCoercionShouldUseBox (_, _, _, m)
-      | CoercionTargetSealed(_, _, m)
-      | UpcastUnnecessary m
-      | QuotationTranslator.IgnoringPartOfQuotedTermWarning (_, m) 
-      
-      | TypeTestUnnecessary m
-      | RuntimeCoercionSourceSealed(_, _, m)
-      | OverrideDoesntOverride(_, _, _, _, _, m)
-      | UnionPatternsBindDifferentNames m 
-      | UnionCaseWrongArguments (_, _, _, m) 
-      | TypeIsImplicitlyAbstract m 
-      | RequiredButNotSpecified (_, _, _, _, m) 
-      | FunctionValueUnexpected (_, _, m)
-      | UnitTypeExpected (_, _, m)
-      | UnitTypeExpectedWithEquality (_, _, m)
-      | UnitTypeExpectedWithPossiblePropertySetter (_, _, _, _, m)
-      | UnitTypeExpectedWithPossibleAssignment (_, _, _, _, m)
-      | UseOfAddressOfOperator m 
-      | DeprecatedThreadStaticBindingWarning m 
-      | NonUniqueInferredAbstractSlot (_, _, _, _, _, m) 
-      | DefensiveCopyWarning (_, m)
-      | LetRecCheckedAtRuntime m 
-      | UpperCaseIdentifierInPattern m
-      | NotUpperCaseConstructor m
-      | RecursiveUseCheckedAtRuntime (_, _, m) 
-      | LetRecEvaluatedOutOfOrder (_, _, _, m) 
-      | Error (_, m)
-      | ErrorWithSuggestions (_, m, _, _)
-      | NumberedError (_, m)
-      | SyntaxError (_, m) 
-      | InternalError (_, m)
-      | InterfaceNotRevealed(_, _, m) 
-      | WrappedError (_, m)
-      | PatternMatchCompilation.MatchIncomplete (_, _, m)
-      | PatternMatchCompilation.EnumMatchIncomplete (_, _, m)
-      | PatternMatchCompilation.RuleNeverMatched m 
-      | ValNotMutable(_, _, m)
-      | ValNotLocal(_, _, m) 
-      | MissingFields(_, m) 
-      | OverrideInIntrinsicAugmentation m
-      | IntfImplInIntrinsicAugmentation m 
-      | OverrideInExtrinsicAugmentation m
-      | IntfImplInExtrinsicAugmentation m 
-      | ValueRestriction(_, _, _, _, m) 
-      | LetRecUnsound (_, _, m) 
-      | ObsoleteError (_, m) 
-      | ObsoleteWarning (_, m) 
-      | Experimental (_, m) 
-      | PossibleUnverifiableCode m
-      | UserCompilerMessage (_, _, m) 
-      | Deprecated(_, m) 
-      | LibraryUseOnly m 
-      | FieldsFromDifferentTypes (_, _, _, m) 
-      | IndeterminateType m
-      | TyconBadArgs(_, _, _, m) -> 
-          Some m
-
-      | FieldNotContained(_, arf, _, _) -> Some arf.Range
-      | ValueNotContained(_, _, aval, _, _) -> Some aval.Range
-      | ConstrNotContained(_, aval, _, _) -> Some aval.Id.idRange
-      | ExnconstrNotContained(_, aexnc, _, _) -> Some aexnc.Range
-
-      | VarBoundTwice id 
-      | UndefinedName(_, _, id, _) -> 
-          Some id.idRange 
-
-      | Duplicate(_, _, m) 
-      | NameClash(_, _, _, m, _, _, _) 
-      | UnresolvedOverloading(_, _, _, m) 
-      | UnresolvedConversionOperator (_, _, _, m)
-      | VirtualAugmentationOnNullValuedType m
-      | NonVirtualAugmentationOnNullValuedType m
-      | NonRigidTypar(_, _, _, _, _, m)
-      | ConstraintSolverTupleDiffLengths(_, _, _, m, _) 
-      | ConstraintSolverInfiniteTypes(_, _, _, _, m, _) 
-      | ConstraintSolverMissingConstraint(_, _, _, m, _)
-      | ConstraintSolverNullnessWarningEquivWithTypes(_, _, _, _, _, m, _)
-      | ConstraintSolverNullnessWarningWithTypes(_, _, _, _, _, m, _)
-      | ConstraintSolverNullnessWarningWithType(_, _, _, m, _)
-      | ConstraintSolverNonNullnessWarningWithType(_, _, _, m, _)
-      | ConstraintSolverTypesNotInEqualityRelation(_, _, _, m, _, _)
-      | ConstraintSolverError(_, m, _) 
-      | ConstraintSolverTypesNotInSubsumptionRelation(_, _, _, m, _) 
-      | ConstraintSolverRelatedInformation(_, m, _) 
-      | SelfRefObjCtor(_, m) -> 
-          Some m
-
-      | NotAFunction(_, _, mfun, _) -> 
-          Some mfun
-          
-      | NotAFunctionButIndexer(_, _, _, mfun, _) -> 
-          Some mfun
-
-      | IllegalFileNameChar(_) -> Some rangeCmdArgs
-
-      | UnresolvedReferenceError(_, m) 
-      | UnresolvedPathReference(_, _, m) 
-      | DeprecatedCommandLineOptionFull(_, m) 
-      | DeprecatedCommandLineOptionForHtmlDoc(_, m) 
-      | DeprecatedCommandLineOptionSuggestAlternative(_, _, m) 
-      | DeprecatedCommandLineOptionNoDescription(_, m) 
-      | InternalCommandLineOption(_, m)
-      | HashIncludeNotAllowedInNonScript m
-      | HashReferenceNotAllowedInNonScript m 
-      | HashDirectiveNotAllowedInNonScript m  
-      | FileNameNotResolved(_, _, m) 
-      | LoadedSourceNotFoundIgnoring(_, m) 
-      | MSBuildReferenceResolutionWarning(_, _, m) 
-      | MSBuildReferenceResolutionError(_, _, m) 
-      | AssemblyNotResolved(_, m) 
-      | HashLoadedSourceHasIssues(_, _, m) 
-      | HashLoadedScriptConsideredSource m -> 
-          Some m
-      // Strip TargetInvocationException wrappers
-      | :? System.Reflection.TargetInvocationException as e -> 
-          RangeFromException e.InnerException
-#if !NO_EXTENSIONTYPING
-      | :? TypeProviderError as e -> e.Range |> Some
-#endif
-      
-      | _ -> None
-  
-  RangeFromException err.Exception
-
-let GetDiagnosticNumber(err: PhasedDiagnostic) = 
-    let rec GetFromException(e: exn) = 
-      match e with
-      (* DO NOT CHANGE THESE NUMBERS *)
-      | ErrorFromAddingTypeEquation _ -> 1
-      | FunctionExpected _ -> 2
-      | NotAFunctionButIndexer _ -> 3217
-      | NotAFunction _ -> 3
-      | FieldNotMutable _ -> 5
-      | Recursion _ -> 6
-      | InvalidRuntimeCoercion _ -> 7
-      | IndeterminateRuntimeCoercion _ -> 8
-      | PossibleUnverifiableCode _ -> 9
-      | SyntaxError _ -> 10
-      // 11 cannot be reused
-      // 12 cannot be reused
-      | IndeterminateStaticCoercion _ -> 13
-      | StaticCoercionShouldUseBox _ -> 14
-      // 15 cannot be reused
-      | RuntimeCoercionSourceSealed _ -> 16 
-      | OverrideDoesntOverride _ -> 17
-      | UnionPatternsBindDifferentNames _ -> 18
-      | UnionCaseWrongArguments _ -> 19
-      | UnitTypeExpected _ -> 20
-      | UnitTypeExpectedWithEquality _ -> 20
-      | UnitTypeExpectedWithPossiblePropertySetter _ -> 20
-      | UnitTypeExpectedWithPossibleAssignment _ -> 20
-      | RecursiveUseCheckedAtRuntime _ -> 21
-      | LetRecEvaluatedOutOfOrder _ -> 22
-      | NameClash _ -> 23
-      // 24 cannot be reused
-      | PatternMatchCompilation.MatchIncomplete _ -> 25
-      | PatternMatchCompilation.RuleNeverMatched _ -> 26
-      | ValNotMutable _ -> 27
-      | ValNotLocal _ -> 28
-      | MissingFields _ -> 29
-      | ValueRestriction _ -> 30
-      | LetRecUnsound _ -> 31
-      | FieldsFromDifferentTypes _ -> 32
-      | TyconBadArgs _ -> 33
-      | ValueNotContained _ -> 34
-      | Deprecated _ -> 35
-      | ConstrNotContained _ -> 36
-      | Duplicate _ -> 37
-      | VarBoundTwice _ -> 38
-      | UndefinedName _ -> 39
-      | LetRecCheckedAtRuntime _ -> 40
-      | UnresolvedOverloading _ -> 41
-      | LibraryUseOnly _ -> 42
-      | ErrorFromAddingConstraint _ -> 43
-      | ObsoleteWarning _ -> 44
-      | ReservedKeyword _ -> 46
-      | SelfRefObjCtor _ -> 47
-      | VirtualAugmentationOnNullValuedType _ -> 48
-      | UpperCaseIdentifierInPattern _ -> 49
-      | InterfaceNotRevealed _ -> 50
-      | UseOfAddressOfOperator _ -> 51
-      | DefensiveCopyWarning _ -> 52
-      | NotUpperCaseConstructor _ -> 53
-      | TypeIsImplicitlyAbstract _ -> 54
-      // 55 cannot be reused
-      | DeprecatedThreadStaticBindingWarning _ -> 56
-      | Experimental _ -> 57
-      | IndentationProblem _ -> 58
-      | CoercionTargetSealed _ -> 59 
-      | OverrideInIntrinsicAugmentation _ -> 60
-      | NonVirtualAugmentationOnNullValuedType _ -> 61
-      | UserCompilerMessage (_, n, _) -> n
-      | ExnconstrNotContained _ -> 63
-      | NonRigidTypar _ -> 64
-      // 65 cannot be reused
-      | UpcastUnnecessary _ -> 66
-      | TypeTestUnnecessary _ -> 67
-      | QuotationTranslator.IgnoringPartOfQuotedTermWarning _ -> 68
-      | IntfImplInIntrinsicAugmentation _ -> 69
-      | NonUniqueInferredAbstractSlot _ -> 70
-      | ErrorFromApplyingDefault _ -> 71
-      | IndeterminateType _ -> 72
-      | InternalError _ -> 73
-      | UnresolvedReferenceNoRange _
-      | UnresolvedReferenceError _ 
-      | UnresolvedPathReferenceNoRange _ 
-      | UnresolvedPathReference _ -> 74
-      | DeprecatedCommandLineOptionFull _
-      | DeprecatedCommandLineOptionForHtmlDoc _
-      | DeprecatedCommandLineOptionSuggestAlternative _
-      | DeprecatedCommandLineOptionNoDescription _ 
-      | InternalCommandLineOption _ -> 75
-      | HashIncludeNotAllowedInNonScript _ 
-      | HashReferenceNotAllowedInNonScript _ 
-      | HashDirectiveNotAllowedInNonScript _ -> 76
-      | BakedInMemberConstraintName _ -> 77
-      | FileNameNotResolved _ -> 78  
-      | LoadedSourceNotFoundIgnoring _ -> 79
-      // 80 cannot be reused
-      | ParameterlessStructCtor _ -> 81
-      | MSBuildReferenceResolutionWarning _ -> 82
-      | MSBuildReferenceResolutionError _ -> 83
-      | AssemblyNotResolved _ -> 84
-      | HashLoadedSourceHasIssues _ -> 85
-      | StandardOperatorRedefinitionWarning _ -> 86
-      | InvalidInternalsVisibleToAssemblyName _ -> 87
-      // 88 cannot be reused
-      | OverrideInExtrinsicAugmentation _ -> 89
-      | IntfImplInExtrinsicAugmentation _ -> 90
-      | BadEventTransformation _ -> 91
-      | HashLoadedScriptConsideredSource _ -> 92
-      | UnresolvedConversionOperator _ -> 93
-      // avoid 94-100 for safety
-      | ObsoleteError _ -> 101
-#if !NO_EXTENSIONTYPING
-      | ExtensionTyping.ProvidedTypeResolutionNoRange _
-      | ExtensionTyping.ProvidedTypeResolution _ -> 103
-#endif
-      | PatternMatchCompilation.EnumMatchIncomplete _ -> 104
-       (* DO NOT CHANGE THE NUMBERS *)
-
-      // Strip TargetInvocationException wrappers
-      | :? System.Reflection.TargetInvocationException as e -> 
-          GetFromException e.InnerException
-      
-      | WrappedError(e, _) -> GetFromException e   
-
-      | Error ((n, _), _) -> n
-      | ErrorWithSuggestions ((n, _), _, _, _) -> n
-      | Failure _ -> 192
-      | NumberedError((n, _), _) -> n
-      | IllegalFileNameChar(fileName, invalidChar) -> fst (FSComp.SR.buildUnexpectedFileNameCharacter(fileName, string invalidChar))
-#if !NO_EXTENSIONTYPING
-      | :? TypeProviderError as e -> e.Number
-#endif
-      | ErrorsFromAddingSubsumptionConstraint (_, _, _, _, _, ContextInfo.DowncastUsedInsteadOfUpcast _, _) -> fst (FSComp.SR.considerUpcast("", ""))
-      | ConstraintSolverNullnessWarningEquivWithTypes _ -> 3261
-      | ConstraintSolverNullnessWarningWithTypes _ -> 3262
-      | ConstraintSolverNullnessWarningWithType _ -> 3263
-      | ConstraintSolverNonNullnessWarningWithType _ -> 3264
-      | _ -> 193
-    GetFromException err.Exception
-   
-let GetWarningLevel err = 
-    match err.Exception with 
-    // Level 5 warnings
-    | RecursiveUseCheckedAtRuntime _
-    | LetRecEvaluatedOutOfOrder _
-    | DefensiveCopyWarning _  -> 5
-
-    | NumberedError((n, _), _)
-    | ErrorWithSuggestions((n, _), _, _, _) 
-    | Error((n, _), _) -> 
-        // 1178, tcNoComparisonNeeded1, "The struct, record or union type '%s' is not structurally comparable because the type parameter %s does not satisfy the 'comparison' constraint..."
-        // 1178, tcNoComparisonNeeded2, "The struct, record or union type '%s' is not structurally comparable because the type '%s' does not satisfy the 'comparison' constraint...."
-        // 1178, tcNoEqualityNeeded1, "The struct, record or union type '%s' does not support structural equality because the type parameter %s does not satisfy the 'equality' constraint..."
-        // 1178, tcNoEqualityNeeded2, "The struct, record or union type '%s' does not support structural equality because the type '%s' does not satisfy the 'equality' constraint...."
-        if (n = 1178) then 5 else 2
-    // Level 2 
-    | _ -> 2
-
-let warningOn err level specificWarnOn = 
-    let n = GetDiagnosticNumber err
-    List.contains n specificWarnOn ||
-    // Some specific warnings are never on by default, i.e. unused variable warnings
-    match n with 
-    | 1182 -> false // chkUnusedValue - off by default
-    | 3218 -> false // ArgumentsInSigAndImplMismatch - off by default
-    | 3180 -> false // abImplicitHeapAllocation - off by default
-    | _ -> level >= GetWarningLevel err 
-
-let SplitRelatedDiagnostics(err: PhasedDiagnostic) : PhasedDiagnostic * PhasedDiagnostic list = 
-    let ToPhased e = {Exception=e; Phase = err.Phase}
-    let rec SplitRelatedException = function
-      | ConstraintSolverRelatedInformation(fopt, m2, e) -> 
-          let e, related = SplitRelatedException e
-          ConstraintSolverRelatedInformation(fopt, m2, e.Exception)|>ToPhased, related
-      | ErrorFromAddingTypeEquation(g, denv, t1, t2, e, m) ->
-          let e, related = SplitRelatedException e
-          ErrorFromAddingTypeEquation(g, denv, t1, t2, e.Exception, m)|>ToPhased, related
-      | ErrorFromApplyingDefault(g, denv, tp, defaultType, e, m) ->  
-          let e, related = SplitRelatedException e
-          ErrorFromApplyingDefault(g, denv, tp, defaultType, e.Exception, m)|>ToPhased, related
-      | ErrorsFromAddingSubsumptionConstraint(g, denv, t1, t2, e, contextInfo, m) ->  
-          let e, related = SplitRelatedException e
-          ErrorsFromAddingSubsumptionConstraint(g, denv, t1, t2, e.Exception, contextInfo, m)|>ToPhased, related
-      | ErrorFromAddingConstraint(x, e, m) ->  
-          let e, related = SplitRelatedException e
-          ErrorFromAddingConstraint(x, e.Exception, m)|>ToPhased, related
-      | WrappedError (e, m) -> 
-          let e, related = SplitRelatedException e
-          WrappedError(e.Exception, m)|>ToPhased, related
-      // Strip TargetInvocationException wrappers
-      | :? System.Reflection.TargetInvocationException as e -> 
-          SplitRelatedException e.InnerException
-      | e -> 
-           ToPhased e, []
-    SplitRelatedException err.Exception
-
-
-let DeclareMessage = FSharp.Compiler.DiagnosticMessage.DeclareResourceString
-
-do FSComp.SR.RunStartupValidation()
-let SeeAlsoE() = DeclareResourceString("SeeAlso", "%s")
-let ConstraintSolverTupleDiffLengthsE() = DeclareResourceString("ConstraintSolverTupleDiffLengths", "%d%d")
-let ConstraintSolverInfiniteTypesE() = DeclareResourceString("ConstraintSolverInfiniteTypes", "%s%s")
-let ConstraintSolverMissingConstraintE() = DeclareResourceString("ConstraintSolverMissingConstraint", "%s")
-let ConstraintSolverTypesNotInEqualityRelation1E() = DeclareResourceString("ConstraintSolverTypesNotInEqualityRelation1", "%s%s")
-let ConstraintSolverNullnessWarningEquivWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningEquivWithTypes", "%s%s%s%s")
-let ConstraintSolverNullnessWarningWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningWithTypes", "%s%s%s%s")
-let ConstraintSolverNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNullnessWarningWithType", "%s")
-let ConstraintSolverNonNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNonNullnessWarningWithType", "%s")
-let ConstraintSolverTypesNotInEqualityRelation2E() = DeclareResourceString("ConstraintSolverTypesNotInEqualityRelation2", "%s%s")
-let ConstraintSolverTypesNotInSubsumptionRelationE() = DeclareResourceString("ConstraintSolverTypesNotInSubsumptionRelation", "%s%s%s")
-let ErrorFromAddingTypeEquation1E() = DeclareResourceString("ErrorFromAddingTypeEquation1", "%s%s%s")
-let ErrorFromAddingTypeEquation2E() = DeclareResourceString("ErrorFromAddingTypeEquation2", "%s%s%s")
-let ErrorFromApplyingDefault1E() = DeclareResourceString("ErrorFromApplyingDefault1", "%s")
-let ErrorFromApplyingDefault2E() = DeclareResourceString("ErrorFromApplyingDefault2", "")
-let ErrorsFromAddingSubsumptionConstraintE() = DeclareResourceString("ErrorsFromAddingSubsumptionConstraint", "%s%s%s")
-let UpperCaseIdentifierInPatternE() = DeclareResourceString("UpperCaseIdentifierInPattern", "")
-let NotUpperCaseConstructorE() = DeclareResourceString("NotUpperCaseConstructor", "")
-let FunctionExpectedE() = DeclareResourceString("FunctionExpected", "")
-let BakedInMemberConstraintNameE() = DeclareResourceString("BakedInMemberConstraintName", "%s")
-let BadEventTransformationE() = DeclareResourceString("BadEventTransformation", "")
-let ParameterlessStructCtorE() = DeclareResourceString("ParameterlessStructCtor", "")
-let InterfaceNotRevealedE() = DeclareResourceString("InterfaceNotRevealed", "%s")
-let TyconBadArgsE() = DeclareResourceString("TyconBadArgs", "%s%d%d")
-let IndeterminateTypeE() = DeclareResourceString("IndeterminateType", "")
-let NameClash1E() = DeclareResourceString("NameClash1", "%s%s")
-let NameClash2E() = DeclareResourceString("NameClash2", "%s%s%s%s%s")
-let Duplicate1E() = DeclareResourceString("Duplicate1", "%s")
-let Duplicate2E() = DeclareResourceString("Duplicate2", "%s%s")
-let UndefinedName2E() = DeclareResourceString("UndefinedName2", "")
-let FieldNotMutableE() = DeclareResourceString("FieldNotMutable", "")
-let FieldsFromDifferentTypesE() = DeclareResourceString("FieldsFromDifferentTypes", "%s%s")
-let VarBoundTwiceE() = DeclareResourceString("VarBoundTwice", "%s")
-let RecursionE() = DeclareResourceString("Recursion", "%s%s%s%s")
-let InvalidRuntimeCoercionE() = DeclareResourceString("InvalidRuntimeCoercion", "%s%s%s")
-let IndeterminateRuntimeCoercionE() = DeclareResourceString("IndeterminateRuntimeCoercion", "%s%s")
-let IndeterminateStaticCoercionE() = DeclareResourceString("IndeterminateStaticCoercion", "%s%s")
-let StaticCoercionShouldUseBoxE() = DeclareResourceString("StaticCoercionShouldUseBox", "%s%s")
-let TypeIsImplicitlyAbstractE() = DeclareResourceString("TypeIsImplicitlyAbstract", "")
-let NonRigidTypar1E() = DeclareResourceString("NonRigidTypar1", "%s%s")
-let NonRigidTypar2E() = DeclareResourceString("NonRigidTypar2", "%s%s")
-let NonRigidTypar3E() = DeclareResourceString("NonRigidTypar3", "%s%s")
-let OBlockEndSentenceE() = DeclareResourceString("BlockEndSentence", "")
-let UnexpectedEndOfInputE() = DeclareResourceString("UnexpectedEndOfInput", "")
-let UnexpectedE() = DeclareResourceString("Unexpected", "%s")
-let NONTERM_interactionE() = DeclareResourceString("NONTERM.interaction", "")
-let NONTERM_hashDirectiveE() = DeclareResourceString("NONTERM.hashDirective", "")
-let NONTERM_fieldDeclE() = DeclareResourceString("NONTERM.fieldDecl", "")
-let NONTERM_unionCaseReprE() = DeclareResourceString("NONTERM.unionCaseRepr", "")
-let NONTERM_localBindingE() = DeclareResourceString("NONTERM.localBinding", "")
-let NONTERM_hardwhiteLetBindingsE() = DeclareResourceString("NONTERM.hardwhiteLetBindings", "")
-let NONTERM_classDefnMemberE() = DeclareResourceString("NONTERM.classDefnMember", "")
-let NONTERM_defnBindingsE() = DeclareResourceString("NONTERM.defnBindings", "")
-let NONTERM_classMemberSpfnE() = DeclareResourceString("NONTERM.classMemberSpfn", "")
-let NONTERM_valSpfnE() = DeclareResourceString("NONTERM.valSpfn", "")
-let NONTERM_tyconSpfnE() = DeclareResourceString("NONTERM.tyconSpfn", "")
-let NONTERM_anonLambdaExprE() = DeclareResourceString("NONTERM.anonLambdaExpr", "")
-let NONTERM_attrUnionCaseDeclE() = DeclareResourceString("NONTERM.attrUnionCaseDecl", "")
-let NONTERM_cPrototypeE() = DeclareResourceString("NONTERM.cPrototype", "")
-let NONTERM_objectImplementationMembersE() = DeclareResourceString("NONTERM.objectImplementationMembers", "")
-let NONTERM_ifExprCasesE() = DeclareResourceString("NONTERM.ifExprCases", "")
-let NONTERM_openDeclE() = DeclareResourceString("NONTERM.openDecl", "")
-let NONTERM_fileModuleSpecE() = DeclareResourceString("NONTERM.fileModuleSpec", "")
-let NONTERM_patternClausesE() = DeclareResourceString("NONTERM.patternClauses", "")
-let NONTERM_beginEndExprE() = DeclareResourceString("NONTERM.beginEndExpr", "")
-let NONTERM_recdExprE() = DeclareResourceString("NONTERM.recdExpr", "")
-let NONTERM_tyconDefnE() = DeclareResourceString("NONTERM.tyconDefn", "")
-let NONTERM_exconCoreE() = DeclareResourceString("NONTERM.exconCore", "")
-let NONTERM_typeNameInfoE() = DeclareResourceString("NONTERM.typeNameInfo", "")
-let NONTERM_attributeListE() = DeclareResourceString("NONTERM.attributeList", "")
-let NONTERM_quoteExprE() = DeclareResourceString("NONTERM.quoteExpr", "")
-let NONTERM_typeConstraintE() = DeclareResourceString("NONTERM.typeConstraint", "")
-let NONTERM_Category_ImplementationFileE() = DeclareResourceString("NONTERM.Category.ImplementationFile", "")
-let NONTERM_Category_DefinitionE() = DeclareResourceString("NONTERM.Category.Definition", "")
-let NONTERM_Category_SignatureFileE() = DeclareResourceString("NONTERM.Category.SignatureFile", "")
-let NONTERM_Category_PatternE() = DeclareResourceString("NONTERM.Category.Pattern", "")
-let NONTERM_Category_ExprE() = DeclareResourceString("NONTERM.Category.Expr", "")
-let NONTERM_Category_TypeE() = DeclareResourceString("NONTERM.Category.Type", "")
-let NONTERM_typeArgsActualE() = DeclareResourceString("NONTERM.typeArgsActual", "")
-let TokenName1E() = DeclareResourceString("TokenName1", "%s")
-let TokenName1TokenName2E() = DeclareResourceString("TokenName1TokenName2", "%s%s")
-let TokenName1TokenName2TokenName3E() = DeclareResourceString("TokenName1TokenName2TokenName3", "%s%s%s")
-let RuntimeCoercionSourceSealed1E() = DeclareResourceString("RuntimeCoercionSourceSealed1", "%s")
-let RuntimeCoercionSourceSealed2E() = DeclareResourceString("RuntimeCoercionSourceSealed2", "%s")
-let CoercionTargetSealedE() = DeclareResourceString("CoercionTargetSealed", "%s")
-let UpcastUnnecessaryE() = DeclareResourceString("UpcastUnnecessary", "")
-let TypeTestUnnecessaryE() = DeclareResourceString("TypeTestUnnecessary", "")
-let OverrideDoesntOverride1E() = DeclareResourceString("OverrideDoesntOverride1", "%s")
-let OverrideDoesntOverride2E() = DeclareResourceString("OverrideDoesntOverride2", "%s")
-let OverrideDoesntOverride3E() = DeclareResourceString("OverrideDoesntOverride3", "%s")
-let OverrideDoesntOverride4E() = DeclareResourceString("OverrideDoesntOverride4", "%s")
-let UnionCaseWrongArgumentsE() = DeclareResourceString("UnionCaseWrongArguments", "%d%d")
-let UnionPatternsBindDifferentNamesE() = DeclareResourceString("UnionPatternsBindDifferentNames", "")
-let RequiredButNotSpecifiedE() = DeclareResourceString("RequiredButNotSpecified", "%s%s%s")
-let UseOfAddressOfOperatorE() = DeclareResourceString("UseOfAddressOfOperator", "")
-let DefensiveCopyWarningE() = DeclareResourceString("DefensiveCopyWarning", "%s")
-let DeprecatedThreadStaticBindingWarningE() = DeclareResourceString("DeprecatedThreadStaticBindingWarning", "")
-let FunctionValueUnexpectedE() = DeclareResourceString("FunctionValueUnexpected", "%s")
-let UnitTypeExpectedE() = DeclareResourceString("UnitTypeExpected", "%s")
-let UnitTypeExpectedWithEqualityE() = DeclareResourceString("UnitTypeExpectedWithEquality", "%s")
-let UnitTypeExpectedWithPossiblePropertySetterE() = DeclareResourceString("UnitTypeExpectedWithPossiblePropertySetter", "%s%s%s")
-let UnitTypeExpectedWithPossibleAssignmentE() = DeclareResourceString("UnitTypeExpectedWithPossibleAssignment", "%s%s")
-let UnitTypeExpectedWithPossibleAssignmentToMutableE() = DeclareResourceString("UnitTypeExpectedWithPossibleAssignmentToMutable", "%s%s")
-let RecursiveUseCheckedAtRuntimeE() = DeclareResourceString("RecursiveUseCheckedAtRuntime", "")
-let LetRecUnsound1E() = DeclareResourceString("LetRecUnsound1", "%s")
-let LetRecUnsound2E() = DeclareResourceString("LetRecUnsound2", "%s%s")
-let LetRecUnsoundInnerE() = DeclareResourceString("LetRecUnsoundInner", "%s")
-let LetRecEvaluatedOutOfOrderE() = DeclareResourceString("LetRecEvaluatedOutOfOrder", "")
-let LetRecCheckedAtRuntimeE() = DeclareResourceString("LetRecCheckedAtRuntime", "")
-let SelfRefObjCtor1E() = DeclareResourceString("SelfRefObjCtor1", "")
-let SelfRefObjCtor2E() = DeclareResourceString("SelfRefObjCtor2", "")
-let VirtualAugmentationOnNullValuedTypeE() = DeclareResourceString("VirtualAugmentationOnNullValuedType", "")
-let NonVirtualAugmentationOnNullValuedTypeE() = DeclareResourceString("NonVirtualAugmentationOnNullValuedType", "")
-let NonUniqueInferredAbstractSlot1E() = DeclareResourceString("NonUniqueInferredAbstractSlot1", "%s")
-let NonUniqueInferredAbstractSlot2E() = DeclareResourceString("NonUniqueInferredAbstractSlot2", "")
-let NonUniqueInferredAbstractSlot3E() = DeclareResourceString("NonUniqueInferredAbstractSlot3", "%s%s")
-let NonUniqueInferredAbstractSlot4E() = DeclareResourceString("NonUniqueInferredAbstractSlot4", "")
-let Failure3E() = DeclareResourceString("Failure3", "%s")
-let Failure4E() = DeclareResourceString("Failure4", "%s")
-let MatchIncomplete1E() = DeclareResourceString("MatchIncomplete1", "")
-let MatchIncomplete2E() = DeclareResourceString("MatchIncomplete2", "%s")
-let MatchIncomplete3E() = DeclareResourceString("MatchIncomplete3", "%s")
-let MatchIncomplete4E() = DeclareResourceString("MatchIncomplete4", "")
-let RuleNeverMatchedE() = DeclareResourceString("RuleNeverMatched", "")
-let EnumMatchIncomplete1E() = DeclareResourceString("EnumMatchIncomplete1", "")
-let ValNotMutableE() = DeclareResourceString("ValNotMutable", "%s")
-let ValNotLocalE() = DeclareResourceString("ValNotLocal", "")
-let Obsolete1E() = DeclareResourceString("Obsolete1", "")
-let Obsolete2E() = DeclareResourceString("Obsolete2", "%s")
-let ExperimentalE() = DeclareResourceString("Experimental", "%s")
-let PossibleUnverifiableCodeE() = DeclareResourceString("PossibleUnverifiableCode", "")
-let DeprecatedE() = DeclareResourceString("Deprecated", "%s")
-let LibraryUseOnlyE() = DeclareResourceString("LibraryUseOnly", "")
-let MissingFieldsE() = DeclareResourceString("MissingFields", "%s")
-let ValueRestriction1E() = DeclareResourceString("ValueRestriction1", "%s%s%s")
-let ValueRestriction2E() = DeclareResourceString("ValueRestriction2", "%s%s%s")
-let ValueRestriction3E() = DeclareResourceString("ValueRestriction3", "%s")
-let ValueRestriction4E() = DeclareResourceString("ValueRestriction4", "%s%s%s")
-let ValueRestriction5E() = DeclareResourceString("ValueRestriction5", "%s%s%s")
-let RecoverableParseErrorE() = DeclareResourceString("RecoverableParseError", "")
-let ReservedKeywordE() = DeclareResourceString("ReservedKeyword", "%s")
-let IndentationProblemE() = DeclareResourceString("IndentationProblem", "%s")
-let OverrideInIntrinsicAugmentationE() = DeclareResourceString("OverrideInIntrinsicAugmentation", "")
-let OverrideInExtrinsicAugmentationE() = DeclareResourceString("OverrideInExtrinsicAugmentation", "")
-let IntfImplInIntrinsicAugmentationE() = DeclareResourceString("IntfImplInIntrinsicAugmentation", "")
-let IntfImplInExtrinsicAugmentationE() = DeclareResourceString("IntfImplInExtrinsicAugmentation", "")
-let UnresolvedReferenceNoRangeE() = DeclareResourceString("UnresolvedReferenceNoRange", "%s")
-let UnresolvedPathReferenceNoRangeE() = DeclareResourceString("UnresolvedPathReferenceNoRange", "%s%s")
-let HashIncludeNotAllowedInNonScriptE() = DeclareResourceString("HashIncludeNotAllowedInNonScript", "")
-let HashReferenceNotAllowedInNonScriptE() = DeclareResourceString("HashReferenceNotAllowedInNonScript", "")
-let HashDirectiveNotAllowedInNonScriptE() = DeclareResourceString("HashDirectiveNotAllowedInNonScript", "")
-let FileNameNotResolvedE() = DeclareResourceString("FileNameNotResolved", "%s%s")
-let AssemblyNotResolvedE() = DeclareResourceString("AssemblyNotResolved", "%s")
-let HashLoadedSourceHasIssues1E() = DeclareResourceString("HashLoadedSourceHasIssues1", "")
-let HashLoadedSourceHasIssues2E() = DeclareResourceString("HashLoadedSourceHasIssues2", "")
-let HashLoadedScriptConsideredSourceE() = DeclareResourceString("HashLoadedScriptConsideredSource", "")  
-let InvalidInternalsVisibleToAssemblyName1E() = DeclareResourceString("InvalidInternalsVisibleToAssemblyName1", "%s%s")
-let InvalidInternalsVisibleToAssemblyName2E() = DeclareResourceString("InvalidInternalsVisibleToAssemblyName2", "%s")
-let LoadedSourceNotFoundIgnoringE() = DeclareResourceString("LoadedSourceNotFoundIgnoring", "%s")
-let MSBuildReferenceResolutionErrorE() = DeclareResourceString("MSBuildReferenceResolutionError", "%s%s")
-let TargetInvocationExceptionWrapperE() = DeclareResourceString("TargetInvocationExceptionWrapper", "%s")
-
-let getErrorString key = SR.GetString key
-
-let (|InvalidArgument|_|) (exn: exn) = match exn with :? ArgumentException as e -> Some e.Message | _ -> None
-
-let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNames: bool) =
-
-    let suggestNames suggestionsF idText =
-        if canSuggestNames then
-            let buffer = ErrorResolutionHints.SuggestionBuffer idText
-            if not buffer.Disabled then
-              suggestionsF buffer.Add
-              if not buffer.IsEmpty then
-                  os.Append " " |> ignore
-                  os.Append(FSComp.SR.undefinedNameSuggestionsIntro()) |> ignore
-                  for value in buffer do
-                      os.AppendLine() |> ignore
-                      os.Append "   " |> ignore
-                      os.Append(DecompileOpName value) |> ignore
-
-    let rec OutputExceptionR (os: StringBuilder) error = 
-
-      match error with
-      | ConstraintSolverTupleDiffLengths(_, tl1, tl2, m, m2) -> 
-          os.Append(ConstraintSolverTupleDiffLengthsE().Format tl1.Length tl2.Length) |> ignore
-          if m.StartLine <> m2.StartLine then 
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverInfiniteTypes(denv, contextInfo, t1, t2, m, m2) ->
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-          os.Append(ConstraintSolverInfiniteTypesE().Format t1 t2) |> ignore
-
-          match contextInfo with
-          | ContextInfo.ReturnInComputationExpression ->
-            os.Append(" " + FSComp.SR.returnUsedInsteadOfReturnBang()) |> ignore
-          | ContextInfo.YieldInComputationExpression ->
-            os.Append(" " + FSComp.SR.yieldUsedInsteadOfYieldBang()) |> ignore
-          | _ -> ()
-
-          if m.StartLine <> m2.StartLine then 
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverMissingConstraint(denv, tpr, tpc, m, m2) -> 
-          os.Append(ConstraintSolverMissingConstraintE().Format (NicePrint.stringOfTyparConstraint denv (tpr, tpc))) |> ignore
-          if m.StartLine <> m2.StartLine then 
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverNullnessWarningEquivWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) ->
-          
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-
-          os.Append(ConstraintSolverNullnessWarningEquivWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore
-
-          if m.StartLine <> m2.StartLine then
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverNullnessWarningWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) ->
-          
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-
-          os.Append(ConstraintSolverNullnessWarningWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore
-
-          if m.StartLine <> m2.StartLine then
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverNullnessWarningWithType(denv, ty, _nullness, m, m2) ->
-          
-          let t = NicePrint.minimalStringOfType denv ty
-          os.Append(ConstraintSolverNullnessWarningWithTypeE().Format (t)) |> ignore
-
-          if m.StartLine <> m2.StartLine then
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverNonNullnessWarningWithType(denv, ty, _nullness, m, m2) ->
-          
-          let t = NicePrint.minimalStringOfType denv ty
-          os.Append(ConstraintSolverNonNullnessWarningWithTypeE().Format (t)) |> ignore
-
-          if m.StartLine <> m2.StartLine then
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverTypesNotInEqualityRelation(denv, (TType_measure _ as t1), (TType_measure _ as t2), m, m2, _) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-          
-          os.Append(ConstraintSolverTypesNotInEqualityRelation1E().Format t1 t2)  |> ignore
-          
-          if m.StartLine <> m2.StartLine then
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverTypesNotInEqualityRelation(denv, t1, t2, m, m2, contextInfo) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-          
-          match contextInfo with
-          | ContextInfo.IfExpression range when Range.equals range m -> os.Append(FSComp.SR.ifExpression(t1, t2)) |> ignore
-          | ContextInfo.CollectionElement (isArray, range) when Range.equals range m -> 
-            if isArray then
-                os.Append(FSComp.SR.arrayElementHasWrongType(t1, t2)) |> ignore
-            else
-                os.Append(FSComp.SR.listElementHasWrongType(t1, t2)) |> ignore
-          | ContextInfo.OmittedElseBranch range when Range.equals range m -> os.Append(FSComp.SR.missingElseBranch(t2)) |> ignore
-          | ContextInfo.ElseBranchResult range when Range.equals range m -> os.Append(FSComp.SR.elseBranchHasWrongType(t1, t2)) |> ignore
-          | ContextInfo.FollowingPatternMatchClause range when Range.equals range m -> os.Append(FSComp.SR.followingPatternMatchClauseHasWrongType(t1, t2)) |> ignore
-          | ContextInfo.PatternMatchGuard range when Range.equals range m -> os.Append(FSComp.SR.patternMatchGuardIsNotBool(t2)) |> ignore
-          | _ -> os.Append(ConstraintSolverTypesNotInEqualityRelation2E().Format t1 t2) |> ignore
-          if m.StartLine <> m2.StartLine then 
-             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
-
-      | ConstraintSolverTypesNotInSubsumptionRelation(denv, t1, t2, m, m2) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, cxs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-          os.Append(ConstraintSolverTypesNotInSubsumptionRelationE().Format t2 t1 cxs) |> ignore
-          if m.StartLine <> m2.StartLine then 
-             os.Append(SeeAlsoE().Format (stringOfRange m2)) |> ignore
-
-      | ConstraintSolverError(msg, m, m2) -> 
-         os.Append msg |> ignore
-         if m.StartLine <> m2.StartLine then 
-            os.Append(SeeAlsoE().Format (stringOfRange m2)) |> ignore
-
-      | ConstraintSolverRelatedInformation(fopt, _, e) -> 
-          match e with 
-          | ConstraintSolverError _ -> OutputExceptionR os e
-          | _ -> ()
-          fopt |> Option.iter (Printf.bprintf os " %s")
-
-      | ErrorFromAddingTypeEquation(g, denv, t1, t2, ConstraintSolverTypesNotInEqualityRelation(_, t1', t2', m, _, contextInfo), _) 
-         when typeEquiv g t1 t1'
-              && typeEquiv g t2 t2' ->
-          let t1, t2, tpcs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-          match contextInfo with
-          | ContextInfo.IfExpression range when Range.equals range m -> os.Append(FSComp.SR.ifExpression(t1, t2)) |> ignore
-          | ContextInfo.CollectionElement (isArray, range) when Range.equals range m -> 
-            if isArray then
-                os.Append(FSComp.SR.arrayElementHasWrongType(t1, t2)) |> ignore
-            else
-                os.Append(FSComp.SR.listElementHasWrongType(t1, t2)) |> ignore
-          | ContextInfo.OmittedElseBranch range when Range.equals range m -> os.Append(FSComp.SR.missingElseBranch(t2)) |> ignore
-          | ContextInfo.ElseBranchResult range when Range.equals range m -> os.Append(FSComp.SR.elseBranchHasWrongType(t1, t2)) |> ignore
-          | ContextInfo.FollowingPatternMatchClause range when Range.equals range m -> os.Append(FSComp.SR.followingPatternMatchClauseHasWrongType(t1, t2)) |> ignore
-          | ContextInfo.PatternMatchGuard range when Range.equals range m -> os.Append(FSComp.SR.patternMatchGuardIsNotBool(t2)) |> ignore
-          | ContextInfo.TupleInRecordFields ->
-                os.Append(ErrorFromAddingTypeEquation1E().Format t2 t1 tpcs) |> ignore
-                os.Append(System.Environment.NewLine + FSComp.SR.commaInsteadOfSemicolonInRecord()) |> ignore
-          | _ when t2 = "bool" && t1.EndsWithOrdinal(" ref") ->
-                os.Append(ErrorFromAddingTypeEquation1E().Format t2 t1 tpcs) |> ignore
-                os.Append(System.Environment.NewLine + FSComp.SR.derefInsteadOfNot()) |> ignore
-          | _ -> os.Append(ErrorFromAddingTypeEquation1E().Format t2 t1 tpcs) |> ignore
-
-      | ErrorFromAddingTypeEquation(_, _, _, _, ((ConstraintSolverTypesNotInEqualityRelation (_, _, _, _, _, contextInfo) ) as e), _)
-              when (match contextInfo with ContextInfo.NoContext -> false | _ -> true) ->  
-          OutputExceptionR os e
-
-      | ErrorFromAddingTypeEquation(_, _, _, _, ((ConstraintSolverTypesNotInSubsumptionRelation _ | ConstraintSolverError _ ) as e), _) ->  
-          OutputExceptionR os e
-
-      | ErrorFromAddingTypeEquation(g, denv, t1, t2, e, _) ->
-          if not (typeEquiv g t1 t2) then
-              let t1, t2, tpcs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-              if t1<>t2 + tpcs then os.Append(ErrorFromAddingTypeEquation2E().Format t1 t2 tpcs) |> ignore
-
-          OutputExceptionR os e
-
-      | ErrorFromApplyingDefault(_, denv, _, defaultType, e, _) ->  
-          let defaultType = NicePrint.minimalStringOfType denv defaultType
-          os.Append(ErrorFromApplyingDefault1E().Format defaultType) |> ignore
-          OutputExceptionR os e
-          os.Append(ErrorFromApplyingDefault2E().Format) |> ignore
-
-      | ErrorsFromAddingSubsumptionConstraint(g, denv, t1, t2, e, contextInfo, _) ->
-          match contextInfo with
-          | ContextInfo.DowncastUsedInsteadOfUpcast isOperator -> 
-              let t1, t2, _ = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-              if isOperator then
-                  os.Append(FSComp.SR.considerUpcastOperator(t1, t2) |> snd) |> ignore
-              else
-                  os.Append(FSComp.SR.considerUpcast(t1, t2) |> snd) |> ignore
-          | _ ->
-              if not (typeEquiv g t1 t2) then
-                  let t1, t2, tpcs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
-                  if t1 <> (t2 + tpcs) then 
-                      os.Append(ErrorsFromAddingSubsumptionConstraintE().Format t2 t1 tpcs) |> ignore
-                  else
-                      OutputExceptionR os e
-              else
-                  OutputExceptionR os e
-
-      | UpperCaseIdentifierInPattern(_) -> 
-          os.Append(UpperCaseIdentifierInPatternE().Format) |> ignore
-
-      | NotUpperCaseConstructor(_) -> 
-          os.Append(NotUpperCaseConstructorE().Format) |> ignore
-
-      | ErrorFromAddingConstraint(_, e, _) ->  
-          OutputExceptionR os e
-
-#if !NO_EXTENSIONTYPING
-      | ExtensionTyping.ProvidedTypeResolutionNoRange e
-
-      | ExtensionTyping.ProvidedTypeResolution(_, e) -> 
-          OutputExceptionR os e
-
-      | :? TypeProviderError as e ->
-          os.Append(e.ContextualErrorMessage) |> ignore
-#endif
-
-      | UnresolvedOverloading(denv, callerArgs, failure, m) ->
-          
-          // extract eventual information (return type and type parameters)
-          // from ConstraintTraitInfo
-          let knownReturnType, genericParameterTypes =
-              match failure with
-              | NoOverloadsFound (cx=Some cx)
-              | PossibleCandidates (cx=Some cx) -> cx.ReturnType, cx.ArgumentTypes
-              | _ -> None, []
-         
-          // prepare message parts (known arguments, known return type, known generic parameters)
-          let argsMessage, returnType, genericParametersMessage =
-              
-              let retTy =
-                  knownReturnType
-                  |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked(), KnownAmbivalentToNull))
-              
-              let argRepr = 
-                  callerArgs.ArgumentNamesAndTypes
-                  |> List.map (fun (name,tTy) -> tTy, {ArgReprInfo.Name = name |> Option.map (fun name -> Ident(name, range.Zero)); ArgReprInfo.Attribs = []})
-                  
-              let argsL,retTyL,genParamTysL = NicePrint.prettyLayoutsOfUnresolvedOverloading denv argRepr retTy genericParameterTypes
-              
-              match callerArgs.ArgumentNamesAndTypes with
-              | [] -> None, Layout.showL retTyL, Layout.showL genParamTysL
-              | items ->
-                  let args = Layout.showL argsL  
-                  let prefixMessage =
-                      match items with
-                      | [_] -> FSComp.SR.csNoOverloadsFoundArgumentsPrefixSingular
-                      | _ -> FSComp.SR.csNoOverloadsFoundArgumentsPrefixPlural
-                  Some (prefixMessage args)
-                  , Layout.showL retTyL
-                  , Layout.showL genParamTysL
-
-          let knownReturnType =
-              match knownReturnType with
-              | None -> None
-              | Some _ -> Some (FSComp.SR.csNoOverloadsFoundReturnType returnType)
-
-          let genericParametersMessage =
-              match genericParameterTypes with
-              | [] -> None
-              | [_] -> Some (FSComp.SR.csNoOverloadsFoundTypeParametersPrefixSingular genericParametersMessage)
-              | _ -> Some (FSComp.SR.csNoOverloadsFoundTypeParametersPrefixPlural genericParametersMessage)
-
-          let overloadMethodInfo displayEnv m (x: OverloadInformation) =
-              let paramInfo =
-                  match x.error with
-                  | :? ArgDoesNotMatchError as x ->
-                      let nameOrOneBasedIndexMessage =
-                          x.calledArg.NameOpt
-                          |> Option.map (fun n -> FSComp.SR.csOverloadCandidateNamedArgumentTypeMismatch n.idText)
-                          |> Option.defaultValue (FSComp.SR.csOverloadCandidateIndexedArgumentTypeMismatch ((Lib.vsnd x.calledArg.Position) + 1)) //snd
-                      sprintf " // %s" nameOrOneBasedIndexMessage
-                  | _ -> ""
-                  
-              (NicePrint.stringOfMethInfo x.amap m displayEnv x.methodSlot.Method) + paramInfo
-              
-          let nl = System.Environment.NewLine
-          let formatOverloads (overloads: OverloadInformation list) =
-              overloads
-              |> List.map (overloadMethodInfo denv m)
-              |> List.sort
-              |> List.map FSComp.SR.formatDashItem
-              |> String.concat nl
-         
-          // assemble final message composing the parts
-          let msg =
-              let optionalParts =
-                [knownReturnType; genericParametersMessage; argsMessage]
-                |> List.choose id
-                |> String.concat (nl + nl)
-                |> function | "" -> nl
-                            | result -> nl + nl + result + nl + nl
-              
-              match failure with
-              | NoOverloadsFound (methodName, overloads, _) ->
-                  FSComp.SR.csNoOverloadsFound methodName
-                      + optionalParts                      
-                      + (FSComp.SR.csAvailableOverloads (formatOverloads overloads))
-              | PossibleCandidates (methodName, [], _) ->
-                  FSComp.SR.csMethodIsOverloaded methodName
-              | PossibleCandidates (methodName, overloads, _) ->
-                  FSComp.SR.csMethodIsOverloaded methodName
-                      + optionalParts
-                      + FSComp.SR.csCandidates (formatOverloads overloads)
-          
-          os.Append msg |> ignore
-
-      | UnresolvedConversionOperator(denv, fromTy, toTy, _) -> 
-          let t1, t2, _tpcs = NicePrint.minimalStringsOfTwoTypes denv fromTy toTy
-          os.Append(FSComp.SR.csTypeDoesNotSupportConversion(t1, t2)) |> ignore
-
-      | FunctionExpected _ ->
-          os.Append(FunctionExpectedE().Format) |> ignore
-
-      | BakedInMemberConstraintName(nm, _) ->
-          os.Append(BakedInMemberConstraintNameE().Format nm) |> ignore
-
-      | StandardOperatorRedefinitionWarning(msg, _) -> 
-          os.Append msg |> ignore
-
-      | BadEventTransformation(_) ->
-         os.Append(BadEventTransformationE().Format) |> ignore
-
-      | ParameterlessStructCtor(_) ->
-         os.Append(ParameterlessStructCtorE().Format) |> ignore
-
-      | InterfaceNotRevealed(denv, ity, _) ->
-          os.Append(InterfaceNotRevealedE().Format (NicePrint.minimalStringOfType denv ity)) |> ignore
-
-      | NotAFunctionButIndexer(_, _, name, _, _) ->
-          match name with
-          | Some name -> os.Append(FSComp.SR.notAFunctionButMaybeIndexerWithName name) |> ignore
-          | _ -> os.Append(FSComp.SR.notAFunctionButMaybeIndexer()) |> ignore
-
-      | NotAFunction(_, _, _, marg) ->
-          if marg.StartColumn = 0 then
-              os.Append(FSComp.SR.notAFunctionButMaybeDeclaration()) |> ignore
-          else
-              os.Append(FSComp.SR.notAFunction()) |> ignore
-
-      | TyconBadArgs(_, tcref, d, _) -> 
-          let exp = tcref.TyparsNoRange.Length
-          if exp = 0 then
-              os.Append(FSComp.SR.buildUnexpectedTypeArgs(fullDisplayTextOfTyconRef tcref, d)) |> ignore
-          else
-              os.Append(TyconBadArgsE().Format (fullDisplayTextOfTyconRef tcref) exp d) |> ignore
-
-      | IndeterminateType(_) -> 
-          os.Append(IndeterminateTypeE().Format) |> ignore
-
-      | NameClash(nm, k1, nm1, _, k2, nm2, _) -> 
-          if nm = nm1 && nm1 = nm2 && k1 = k2 then 
-              os.Append(NameClash1E().Format k1 nm1) |> ignore
-          else
-              os.Append(NameClash2E().Format k1 nm1 nm k2 nm2) |> ignore
-
-      | Duplicate(k, s, _) -> 
-          if k = "member" then 
-              os.Append(Duplicate1E().Format (DecompileOpName s)) |> ignore
-          else 
-              os.Append(Duplicate2E().Format k (DecompileOpName s)) |> ignore
-
-      | UndefinedName(_, k, id, suggestionsF) ->
-          os.Append(k (DecompileOpName id.idText)) |> ignore
-          suggestNames suggestionsF id.idText
-
-      | InternalUndefinedItemRef(f, smr, ccuName, s) ->  
-          let _, errs = f(smr, ccuName, s)
-          os.Append errs |> ignore  
-
-      | FieldNotMutable _ -> 
-          os.Append(FieldNotMutableE().Format) |> ignore
-
-      | FieldsFromDifferentTypes (_, fref1, fref2, _) -> 
-          os.Append(FieldsFromDifferentTypesE().Format fref1.FieldName fref2.FieldName) |> ignore
-
-      | VarBoundTwice id ->  
-          os.Append(VarBoundTwiceE().Format (DecompileOpName id.idText)) |> ignore
-
-      | Recursion (denv, id, ty1, ty2, _) -> 
-          let t1, t2, tpcs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-          os.Append(RecursionE().Format (DecompileOpName id.idText) t1 t2 tpcs) |> ignore
-
-      | InvalidRuntimeCoercion(denv, ty1, ty2, _) -> 
-          let t1, t2, tpcs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-          os.Append(InvalidRuntimeCoercionE().Format t1 t2 tpcs) |> ignore
-
-      | IndeterminateRuntimeCoercion(denv, ty1, ty2, _) -> 
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-          os.Append(IndeterminateRuntimeCoercionE().Format t1 t2) |> ignore
-
-      | IndeterminateStaticCoercion(denv, ty1, ty2, _) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-          os.Append(IndeterminateStaticCoercionE().Format t1 t2) |> ignore
-
-      | StaticCoercionShouldUseBox(denv, ty1, ty2, _) ->
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-          os.Append(StaticCoercionShouldUseBoxE().Format t1 t2) |> ignore
-
-      | TypeIsImplicitlyAbstract(_) -> 
-          os.Append(TypeIsImplicitlyAbstractE().Format) |> ignore
-
-      | NonRigidTypar(denv, tpnmOpt, typarRange, ty1, ty, _) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let (ty1, ty), _cxs = PrettyTypes.PrettifyTypePair denv.g (ty1, ty)
-          match tpnmOpt with 
-          | None -> 
-              os.Append(NonRigidTypar1E().Format (stringOfRange typarRange) (NicePrint.stringOfTy denv ty)) |> ignore
-          | Some tpnm -> 
-              match ty1 with 
-              | TType_measure _ -> 
-                os.Append(NonRigidTypar2E().Format tpnm (NicePrint.stringOfTy denv ty)) |> ignore
-              | _ -> 
-                os.Append(NonRigidTypar3E().Format tpnm (NicePrint.stringOfTy denv ty)) |> ignore
-
-      | SyntaxError (ctxt, _) -> 
-          let ctxt = unbox>(ctxt)
-          
-          let (|EndOfStructuredConstructToken|_|) token = 
-              match token with
-              | Parser.TOKEN_ODECLEND 
-              | Parser.TOKEN_OBLOCKSEP 
-              | Parser.TOKEN_OEND 
-              | Parser.TOKEN_ORIGHT_BLOCK_END 
-              | Parser.TOKEN_OBLOCKEND | Parser.TOKEN_OBLOCKEND_COMING_SOON | Parser.TOKEN_OBLOCKEND_IS_HERE -> Some()
-              | _ -> None
-
-          let tokenIdToText tid = 
-              match tid with 
-              | Parser.TOKEN_IDENT -> getErrorString("Parser.TOKEN.IDENT")
-              | Parser.TOKEN_BIGNUM 
-              | Parser.TOKEN_INT8  
-              | Parser.TOKEN_UINT8 
-              | Parser.TOKEN_INT16  
-              | Parser.TOKEN_UINT16 
-              | Parser.TOKEN_INT32 
-              | Parser.TOKEN_UINT32 
-              | Parser.TOKEN_INT64 
-              | Parser.TOKEN_UINT64 
-              | Parser.TOKEN_UNATIVEINT 
-              | Parser.TOKEN_NATIVEINT -> getErrorString("Parser.TOKEN.INT")
-              | Parser.TOKEN_IEEE32 
-              | Parser.TOKEN_IEEE64 -> getErrorString("Parser.TOKEN.FLOAT")
-              | Parser.TOKEN_DECIMAL -> getErrorString("Parser.TOKEN.DECIMAL")
-              | Parser.TOKEN_CHAR -> getErrorString("Parser.TOKEN.CHAR")
-                
-              | Parser.TOKEN_BASE -> getErrorString("Parser.TOKEN.BASE")
-              | Parser.TOKEN_LPAREN_STAR_RPAREN -> getErrorString("Parser.TOKEN.LPAREN.STAR.RPAREN")
-              | Parser.TOKEN_DOLLAR -> getErrorString("Parser.TOKEN.DOLLAR")
-              | Parser.TOKEN_INFIX_STAR_STAR_OP -> getErrorString("Parser.TOKEN.INFIX.STAR.STAR.OP")
-              | Parser.TOKEN_INFIX_COMPARE_OP -> getErrorString("Parser.TOKEN.INFIX.COMPARE.OP")
-              | Parser.TOKEN_COLON_GREATER -> getErrorString("Parser.TOKEN.COLON.GREATER")  
-              | Parser.TOKEN_COLON_COLON ->getErrorString("Parser.TOKEN.COLON.COLON")
-              | Parser.TOKEN_PERCENT_OP -> getErrorString("Parser.TOKEN.PERCENT.OP")
-              | Parser.TOKEN_INFIX_AT_HAT_OP -> getErrorString("Parser.TOKEN.INFIX.AT.HAT.OP")
-              | Parser.TOKEN_INFIX_BAR_OP -> getErrorString("Parser.TOKEN.INFIX.BAR.OP")
-              | Parser.TOKEN_PLUS_MINUS_OP -> getErrorString("Parser.TOKEN.PLUS.MINUS.OP")
-              | Parser.TOKEN_PREFIX_OP -> getErrorString("Parser.TOKEN.PREFIX.OP")
-              | Parser.TOKEN_COLON_QMARK_GREATER -> getErrorString("Parser.TOKEN.COLON.QMARK.GREATER")
-              | Parser.TOKEN_INFIX_STAR_DIV_MOD_OP -> getErrorString("Parser.TOKEN.INFIX.STAR.DIV.MOD.OP")
-              | Parser.TOKEN_INFIX_AMP_OP -> getErrorString("Parser.TOKEN.INFIX.AMP.OP")
-              | Parser.TOKEN_AMP -> getErrorString("Parser.TOKEN.AMP")
-              | Parser.TOKEN_AMP_AMP -> getErrorString("Parser.TOKEN.AMP.AMP")
-              | Parser.TOKEN_BAR_BAR -> getErrorString("Parser.TOKEN.BAR.BAR")
-              | Parser.TOKEN_LESS -> getErrorString("Parser.TOKEN.LESS")
-              | Parser.TOKEN_GREATER -> getErrorString("Parser.TOKEN.GREATER")
-              | Parser.TOKEN_QMARK -> getErrorString("Parser.TOKEN.QMARK")
-              | Parser.TOKEN_QMARK_QMARK -> getErrorString("Parser.TOKEN.QMARK.QMARK")
-              | Parser.TOKEN_COLON_QMARK-> getErrorString("Parser.TOKEN.COLON.QMARK")
-              | Parser.TOKEN_INT32_DOT_DOT -> getErrorString("Parser.TOKEN.INT32.DOT.DOT")
-              | Parser.TOKEN_DOT_DOT -> getErrorString("Parser.TOKEN.DOT.DOT")
-              | Parser.TOKEN_DOT_DOT_HAT -> getErrorString("Parser.TOKEN.DOT.DOT")
-              | Parser.TOKEN_QUOTE -> getErrorString("Parser.TOKEN.QUOTE")
-              | Parser.TOKEN_STAR -> getErrorString("Parser.TOKEN.STAR")
-              | Parser.TOKEN_HIGH_PRECEDENCE_TYAPP -> getErrorString("Parser.TOKEN.HIGH.PRECEDENCE.TYAPP")
-              | Parser.TOKEN_COLON -> getErrorString("Parser.TOKEN.COLON")
-              | Parser.TOKEN_COLON_EQUALS -> getErrorString("Parser.TOKEN.COLON.EQUALS")
-              | Parser.TOKEN_LARROW -> getErrorString("Parser.TOKEN.LARROW")
-              | Parser.TOKEN_EQUALS -> getErrorString("Parser.TOKEN.EQUALS")
-              | Parser.TOKEN_GREATER_BAR_RBRACK -> getErrorString("Parser.TOKEN.GREATER.BAR.RBRACK")
-              | Parser.TOKEN_MINUS -> getErrorString("Parser.TOKEN.MINUS")
-              | Parser.TOKEN_ADJACENT_PREFIX_OP -> getErrorString("Parser.TOKEN.ADJACENT.PREFIX.OP")
-              | Parser.TOKEN_FUNKY_OPERATOR_NAME -> getErrorString("Parser.TOKEN.FUNKY.OPERATOR.NAME") 
-              | Parser.TOKEN_COMMA-> getErrorString("Parser.TOKEN.COMMA")
-              | Parser.TOKEN_DOT -> getErrorString("Parser.TOKEN.DOT")
-              | Parser.TOKEN_BAR-> getErrorString("Parser.TOKEN.BAR")
-              | Parser.TOKEN_HASH -> getErrorString("Parser.TOKEN.HASH")
-              | Parser.TOKEN_UNDERSCORE -> getErrorString("Parser.TOKEN.UNDERSCORE")
-              | Parser.TOKEN_SEMICOLON -> getErrorString("Parser.TOKEN.SEMICOLON")
-              | Parser.TOKEN_SEMICOLON_SEMICOLON-> getErrorString("Parser.TOKEN.SEMICOLON.SEMICOLON")
-              | Parser.TOKEN_LPAREN-> getErrorString("Parser.TOKEN.LPAREN")
-              | Parser.TOKEN_RPAREN | Parser.TOKEN_RPAREN_COMING_SOON | Parser.TOKEN_RPAREN_IS_HERE -> getErrorString("Parser.TOKEN.RPAREN")
-              | Parser.TOKEN_LQUOTE -> getErrorString("Parser.TOKEN.LQUOTE")
-              | Parser.TOKEN_LBRACK -> getErrorString("Parser.TOKEN.LBRACK")
-              | Parser.TOKEN_LBRACE_BAR -> getErrorString("Parser.TOKEN.LBRACE.BAR")
-              | Parser.TOKEN_LBRACK_BAR -> getErrorString("Parser.TOKEN.LBRACK.BAR")
-              | Parser.TOKEN_LBRACK_LESS -> getErrorString("Parser.TOKEN.LBRACK.LESS")
-              | Parser.TOKEN_LBRACE -> getErrorString("Parser.TOKEN.LBRACE")
-              | Parser.TOKEN_BAR_RBRACK -> getErrorString("Parser.TOKEN.BAR.RBRACK")
-              | Parser.TOKEN_BAR_RBRACE -> getErrorString("Parser.TOKEN.BAR.RBRACE")
-              | Parser.TOKEN_GREATER_RBRACK -> getErrorString("Parser.TOKEN.GREATER.RBRACK")
-              | Parser.TOKEN_RQUOTE_DOT _ 
-              | Parser.TOKEN_RQUOTE -> getErrorString("Parser.TOKEN.RQUOTE")
-              | Parser.TOKEN_RBRACK -> getErrorString("Parser.TOKEN.RBRACK")
-              | Parser.TOKEN_RBRACE | Parser.TOKEN_RBRACE_COMING_SOON | Parser.TOKEN_RBRACE_IS_HERE -> getErrorString("Parser.TOKEN.RBRACE")
-              | Parser.TOKEN_PUBLIC -> getErrorString("Parser.TOKEN.PUBLIC")
-              | Parser.TOKEN_PRIVATE -> getErrorString("Parser.TOKEN.PRIVATE")
-              | Parser.TOKEN_INTERNAL -> getErrorString("Parser.TOKEN.INTERNAL")
-              | Parser.TOKEN_CONSTRAINT -> getErrorString("Parser.TOKEN.CONSTRAINT")
-              | Parser.TOKEN_INSTANCE -> getErrorString("Parser.TOKEN.INSTANCE")
-              | Parser.TOKEN_DELEGATE -> getErrorString("Parser.TOKEN.DELEGATE")
-              | Parser.TOKEN_INHERIT -> getErrorString("Parser.TOKEN.INHERIT")
-              | Parser.TOKEN_CONSTRUCTOR-> getErrorString("Parser.TOKEN.CONSTRUCTOR")
-              | Parser.TOKEN_DEFAULT -> getErrorString("Parser.TOKEN.DEFAULT")
-              | Parser.TOKEN_OVERRIDE-> getErrorString("Parser.TOKEN.OVERRIDE")
-              | Parser.TOKEN_ABSTRACT-> getErrorString("Parser.TOKEN.ABSTRACT")
-              | Parser.TOKEN_CLASS-> getErrorString("Parser.TOKEN.CLASS")
-              | Parser.TOKEN_MEMBER -> getErrorString("Parser.TOKEN.MEMBER")
-              | Parser.TOKEN_STATIC -> getErrorString("Parser.TOKEN.STATIC")
-              | Parser.TOKEN_NAMESPACE-> getErrorString("Parser.TOKEN.NAMESPACE")
-              | Parser.TOKEN_OBLOCKBEGIN -> getErrorString("Parser.TOKEN.OBLOCKBEGIN") 
-              | EndOfStructuredConstructToken -> getErrorString("Parser.TOKEN.OBLOCKEND") 
-              | Parser.TOKEN_THEN  
-              | Parser.TOKEN_OTHEN -> getErrorString("Parser.TOKEN.OTHEN")
-              | Parser.TOKEN_ELSE
-              | Parser.TOKEN_OELSE -> getErrorString("Parser.TOKEN.OELSE")
-              | Parser.TOKEN_LET(_) 
-              | Parser.TOKEN_OLET(_) -> getErrorString("Parser.TOKEN.OLET")
-              | Parser.TOKEN_OBINDER 
-              | Parser.TOKEN_BINDER -> getErrorString("Parser.TOKEN.BINDER")
-              | Parser.TOKEN_OAND_BANG 
-              | Parser.TOKEN_AND_BANG -> getErrorString("Parser.TOKEN.AND.BANG")
-              | Parser.TOKEN_ODO -> getErrorString("Parser.TOKEN.ODO")
-              | Parser.TOKEN_OWITH -> getErrorString("Parser.TOKEN.OWITH")
-              | Parser.TOKEN_OFUNCTION -> getErrorString("Parser.TOKEN.OFUNCTION")
-              | Parser.TOKEN_OFUN -> getErrorString("Parser.TOKEN.OFUN")
-              | Parser.TOKEN_ORESET -> getErrorString("Parser.TOKEN.ORESET")
-              | Parser.TOKEN_ODUMMY -> getErrorString("Parser.TOKEN.ODUMMY")
-              | Parser.TOKEN_DO_BANG 
-              | Parser.TOKEN_ODO_BANG -> getErrorString("Parser.TOKEN.ODO.BANG")
-              | Parser.TOKEN_YIELD -> getErrorString("Parser.TOKEN.YIELD")
-              | Parser.TOKEN_YIELD_BANG -> getErrorString("Parser.TOKEN.YIELD.BANG")
-              | Parser.TOKEN_OINTERFACE_MEMBER-> getErrorString("Parser.TOKEN.OINTERFACE.MEMBER")
-              | Parser.TOKEN_ELIF -> getErrorString("Parser.TOKEN.ELIF")
-              | Parser.TOKEN_RARROW -> getErrorString("Parser.TOKEN.RARROW")
-              | Parser.TOKEN_SIG -> getErrorString("Parser.TOKEN.SIG")
-              | Parser.TOKEN_STRUCT -> getErrorString("Parser.TOKEN.STRUCT")
-              | Parser.TOKEN_UPCAST -> getErrorString("Parser.TOKEN.UPCAST")
-              | Parser.TOKEN_DOWNCAST -> getErrorString("Parser.TOKEN.DOWNCAST")
-              | Parser.TOKEN_NULL -> getErrorString("Parser.TOKEN.NULL")
-              | Parser.TOKEN_RESERVED -> getErrorString("Parser.TOKEN.RESERVED")
-              | Parser.TOKEN_MODULE | Parser.TOKEN_MODULE_COMING_SOON | Parser.TOKEN_MODULE_IS_HERE -> getErrorString("Parser.TOKEN.MODULE")
-              | Parser.TOKEN_AND -> getErrorString("Parser.TOKEN.AND")
-              | Parser.TOKEN_AS -> getErrorString("Parser.TOKEN.AS")
-              | Parser.TOKEN_ASSERT -> getErrorString("Parser.TOKEN.ASSERT")
-              | Parser.TOKEN_OASSERT -> getErrorString("Parser.TOKEN.ASSERT")
-              | Parser.TOKEN_ASR-> getErrorString("Parser.TOKEN.ASR")
-              | Parser.TOKEN_DOWNTO -> getErrorString("Parser.TOKEN.DOWNTO")
-              | Parser.TOKEN_EXCEPTION -> getErrorString("Parser.TOKEN.EXCEPTION")
-              | Parser.TOKEN_FALSE -> getErrorString("Parser.TOKEN.FALSE")
-              | Parser.TOKEN_FOR -> getErrorString("Parser.TOKEN.FOR")
-              | Parser.TOKEN_FUN -> getErrorString("Parser.TOKEN.FUN")
-              | Parser.TOKEN_FUNCTION-> getErrorString("Parser.TOKEN.FUNCTION")
-              | Parser.TOKEN_FINALLY -> getErrorString("Parser.TOKEN.FINALLY")
-              | Parser.TOKEN_LAZY -> getErrorString("Parser.TOKEN.LAZY")
-              | Parser.TOKEN_OLAZY -> getErrorString("Parser.TOKEN.LAZY")
-              | Parser.TOKEN_MATCH -> getErrorString("Parser.TOKEN.MATCH")
-              | Parser.TOKEN_MATCH_BANG -> getErrorString("Parser.TOKEN.MATCH.BANG")
-              | Parser.TOKEN_MUTABLE -> getErrorString("Parser.TOKEN.MUTABLE")
-              | Parser.TOKEN_NEW -> getErrorString("Parser.TOKEN.NEW")
-              | Parser.TOKEN_OF -> getErrorString("Parser.TOKEN.OF")
-              | Parser.TOKEN_OPEN -> getErrorString("Parser.TOKEN.OPEN")
-              | Parser.TOKEN_OR -> getErrorString("Parser.TOKEN.OR")
-              | Parser.TOKEN_VOID -> getErrorString("Parser.TOKEN.VOID")
-              | Parser.TOKEN_EXTERN-> getErrorString("Parser.TOKEN.EXTERN")
-              | Parser.TOKEN_INTERFACE -> getErrorString("Parser.TOKEN.INTERFACE")
-              | Parser.TOKEN_REC -> getErrorString("Parser.TOKEN.REC")
-              | Parser.TOKEN_TO -> getErrorString("Parser.TOKEN.TO")
-              | Parser.TOKEN_TRUE -> getErrorString("Parser.TOKEN.TRUE")
-              | Parser.TOKEN_TRY -> getErrorString("Parser.TOKEN.TRY")
-              | Parser.TOKEN_TYPE | Parser.TOKEN_TYPE_COMING_SOON | Parser.TOKEN_TYPE_IS_HERE -> getErrorString("Parser.TOKEN.TYPE")
-              | Parser.TOKEN_VAL -> getErrorString("Parser.TOKEN.VAL")
-              | Parser.TOKEN_INLINE -> getErrorString("Parser.TOKEN.INLINE")
-              | Parser.TOKEN_WHEN -> getErrorString("Parser.TOKEN.WHEN")
-              | Parser.TOKEN_WHILE -> getErrorString("Parser.TOKEN.WHILE")
-              | Parser.TOKEN_WITH-> getErrorString("Parser.TOKEN.WITH")
-              | Parser.TOKEN_IF -> getErrorString("Parser.TOKEN.IF")
-              | Parser.TOKEN_DO -> getErrorString("Parser.TOKEN.DO")
-              | Parser.TOKEN_GLOBAL -> getErrorString("Parser.TOKEN.GLOBAL")
-              | Parser.TOKEN_DONE -> getErrorString("Parser.TOKEN.DONE")
-              | Parser.TOKEN_IN | Parser.TOKEN_JOIN_IN -> getErrorString("Parser.TOKEN.IN")
-              | Parser.TOKEN_HIGH_PRECEDENCE_PAREN_APP-> getErrorString("Parser.TOKEN.HIGH.PRECEDENCE.PAREN.APP")
-              | Parser.TOKEN_HIGH_PRECEDENCE_BRACK_APP-> getErrorString("Parser.TOKEN.HIGH.PRECEDENCE.BRACK.APP")
-              | Parser.TOKEN_BEGIN -> getErrorString("Parser.TOKEN.BEGIN")
-              | Parser.TOKEN_END -> getErrorString("Parser.TOKEN.END")
-              | Parser.TOKEN_HASH_LIGHT
-              | Parser.TOKEN_HASH_LINE 
-              | Parser.TOKEN_HASH_IF 
-              | Parser.TOKEN_HASH_ELSE 
-              | Parser.TOKEN_HASH_ENDIF -> getErrorString("Parser.TOKEN.HASH.ENDIF")
-              | Parser.TOKEN_INACTIVECODE -> getErrorString("Parser.TOKEN.INACTIVECODE")
-              | Parser.TOKEN_LEX_FAILURE-> getErrorString("Parser.TOKEN.LEX.FAILURE")
-              | Parser.TOKEN_WHITESPACE -> getErrorString("Parser.TOKEN.WHITESPACE")
-              | Parser.TOKEN_COMMENT -> getErrorString("Parser.TOKEN.COMMENT")
-              | Parser.TOKEN_LINE_COMMENT -> getErrorString("Parser.TOKEN.LINE.COMMENT")
-              | Parser.TOKEN_STRING_TEXT -> getErrorString("Parser.TOKEN.STRING.TEXT")
-              | Parser.TOKEN_BYTEARRAY -> getErrorString("Parser.TOKEN.BYTEARRAY")
-              | Parser.TOKEN_STRING -> getErrorString("Parser.TOKEN.STRING")
-              | Parser.TOKEN_KEYWORD_STRING -> getErrorString("Parser.TOKEN.KEYWORD_STRING")
-              | Parser.TOKEN_EOF -> getErrorString("Parser.TOKEN.EOF")
-              | Parser.TOKEN_CONST -> getErrorString("Parser.TOKEN.CONST")
-              | Parser.TOKEN_FIXED -> getErrorString("Parser.TOKEN.FIXED")
-              | unknown ->           
-                  Debug.Assert(false, "unknown token tag")
-                  let result = sprintf "%+A" unknown
-                  Debug.Assert(false, result)
-                  result
-
-          match ctxt.CurrentToken with 
-          | None -> os.Append(UnexpectedEndOfInputE().Format) |> ignore
-          | Some token -> 
-              match (token |> Parser.tagOfToken |> Parser.tokenTagToTokenId), token with 
-              | EndOfStructuredConstructToken, _ -> os.Append(OBlockEndSentenceE().Format) |> ignore
-              | Parser.TOKEN_LEX_FAILURE, Parser.LEX_FAILURE str -> Printf.bprintf os "%s" str (* Fix bug://2431 *)
-              | token, _ -> os.Append(UnexpectedE().Format (token |> tokenIdToText)) |> ignore
-
-              (* Search for a state producing a single recognized non-terminal in the states on the stack *)
-              let foundInContext =
-              
-                  (* Merge a bunch of expression non terminals *)
-                  let (|NONTERM_Category_Expr|_|) = function
-                        | Parser.NONTERM_argExpr|Parser.NONTERM_minusExpr|Parser.NONTERM_parenExpr|Parser.NONTERM_atomicExpr
-                        | Parser.NONTERM_appExpr|Parser.NONTERM_tupleExpr|Parser.NONTERM_declExpr|Parser.NONTERM_braceExpr|Parser.NONTERM_braceBarExpr
-                        | Parser.NONTERM_typedSeqExprBlock
-                        | Parser.NONTERM_interactiveExpr -> Some()
-                        | _ -> None
-                        
-                  (* Merge a bunch of pattern non terminals *)
-                  let (|NONTERM_Category_Pattern|_|) = function 
-                        | Parser.NONTERM_constrPattern|Parser.NONTERM_parenPattern|Parser.NONTERM_atomicPattern -> Some() 
-                        | _ -> None
-                  
-                  (* Merge a bunch of if/then/else non terminals *)
-                  let (|NONTERM_Category_IfThenElse|_|) = function
-                        | Parser.NONTERM_ifExprThen|Parser.NONTERM_ifExprElifs|Parser.NONTERM_ifExprCases -> Some()
-                        | _ -> None
-                        
-                  (* Merge a bunch of non terminals *)
-                  let (|NONTERM_Category_SignatureFile|_|) = function
-                        | Parser.NONTERM_signatureFile|Parser.NONTERM_moduleSpfn|Parser.NONTERM_moduleSpfns -> Some()
-                        | _ -> None
-                  let (|NONTERM_Category_ImplementationFile|_|) = function
-                        | Parser.NONTERM_implementationFile|Parser.NONTERM_fileNamespaceImpl|Parser.NONTERM_fileNamespaceImpls -> Some()
-                        | _ -> None
-                  let (|NONTERM_Category_Definition|_|) = function
-                        | Parser.NONTERM_fileModuleImpl|Parser.NONTERM_moduleDefn|Parser.NONTERM_interactiveDefns
-                        |Parser.NONTERM_moduleDefns|Parser.NONTERM_moduleDefnsOrExpr -> Some()
-                        | _ -> None
-                  
-                  let (|NONTERM_Category_Type|_|) = function
-                        | Parser.NONTERM_typ|Parser.NONTERM_tupleType -> Some()
-                        | _ -> None
-
-                  let (|NONTERM_Category_Interaction|_|) = function
-                        | Parser.NONTERM_interactiveItemsTerminator|Parser.NONTERM_interaction|Parser.NONTERM__startinteraction -> Some()
-                        | _ -> None
-         
-                  
-                  // Canonicalize the categories and check for a unique category
-                  ctxt.ReducibleProductions |> List.exists (fun prods -> 
-                      match prods 
-                            |> List.map Parser.prodIdxToNonTerminal 
-                            |> List.map (function 
-                                         | NONTERM_Category_Type -> Parser.NONTERM_typ
-                                         | NONTERM_Category_Expr -> Parser.NONTERM_declExpr 
-                                         | NONTERM_Category_Pattern -> Parser.NONTERM_atomicPattern 
-                                         | NONTERM_Category_IfThenElse -> Parser.NONTERM_ifExprThen
-                                         | NONTERM_Category_SignatureFile -> Parser.NONTERM_signatureFile
-                                         | NONTERM_Category_ImplementationFile -> Parser.NONTERM_implementationFile
-                                         | NONTERM_Category_Definition -> Parser.NONTERM_moduleDefn
-                                         | NONTERM_Category_Interaction -> Parser.NONTERM_interaction
-                                         | nt -> nt)
-                            |> Set.ofList 
-                            |> Set.toList with 
-                      | [Parser.NONTERM_interaction] -> os.Append(NONTERM_interactionE().Format) |> ignore; true
-                      | [Parser.NONTERM_hashDirective] -> os.Append(NONTERM_hashDirectiveE().Format) |> ignore; true
-                      | [Parser.NONTERM_fieldDecl] -> os.Append(NONTERM_fieldDeclE().Format) |> ignore; true
-                      | [Parser.NONTERM_unionCaseRepr] -> os.Append(NONTERM_unionCaseReprE().Format) |> ignore; true
-                      | [Parser.NONTERM_localBinding] -> os.Append(NONTERM_localBindingE().Format) |> ignore; true
-                      | [Parser.NONTERM_hardwhiteLetBindings] -> os.Append(NONTERM_hardwhiteLetBindingsE().Format) |> ignore; true
-                      | [Parser.NONTERM_classDefnMember] -> os.Append(NONTERM_classDefnMemberE().Format) |> ignore; true
-                      | [Parser.NONTERM_defnBindings] -> os.Append(NONTERM_defnBindingsE().Format) |> ignore; true
-                      | [Parser.NONTERM_classMemberSpfn] -> os.Append(NONTERM_classMemberSpfnE().Format) |> ignore; true
-                      | [Parser.NONTERM_valSpfn] -> os.Append(NONTERM_valSpfnE().Format) |> ignore; true
-                      | [Parser.NONTERM_tyconSpfn] -> os.Append(NONTERM_tyconSpfnE().Format) |> ignore; true
-                      | [Parser.NONTERM_anonLambdaExpr] -> os.Append(NONTERM_anonLambdaExprE().Format) |> ignore; true
-                      | [Parser.NONTERM_attrUnionCaseDecl] -> os.Append(NONTERM_attrUnionCaseDeclE().Format) |> ignore; true
-                      | [Parser.NONTERM_cPrototype] -> os.Append(NONTERM_cPrototypeE().Format) |> ignore; true
-                      | [Parser.NONTERM_objExpr|Parser.NONTERM_objectImplementationMembers] -> os.Append(NONTERM_objectImplementationMembersE().Format) |> ignore; true
-                      | [Parser.NONTERM_ifExprThen|Parser.NONTERM_ifExprElifs|Parser.NONTERM_ifExprCases] -> os.Append(NONTERM_ifExprCasesE().Format) |> ignore; true
-                      | [Parser.NONTERM_openDecl] -> os.Append(NONTERM_openDeclE().Format) |> ignore; true
-                      | [Parser.NONTERM_fileModuleSpec] -> os.Append(NONTERM_fileModuleSpecE().Format) |> ignore; true
-                      | [Parser.NONTERM_patternClauses] -> os.Append(NONTERM_patternClausesE().Format) |> ignore; true
-                      | [Parser.NONTERM_beginEndExpr] -> os.Append(NONTERM_beginEndExprE().Format) |> ignore; true
-                      | [Parser.NONTERM_recdExpr] -> os.Append(NONTERM_recdExprE().Format) |> ignore; true
-                      | [Parser.NONTERM_tyconDefn] -> os.Append(NONTERM_tyconDefnE().Format) |> ignore; true
-                      | [Parser.NONTERM_exconCore] -> os.Append(NONTERM_exconCoreE().Format) |> ignore; true
-                      | [Parser.NONTERM_typeNameInfo] -> os.Append(NONTERM_typeNameInfoE().Format) |> ignore; true
-                      | [Parser.NONTERM_attributeList] -> os.Append(NONTERM_attributeListE().Format) |> ignore; true
-                      | [Parser.NONTERM_quoteExpr] -> os.Append(NONTERM_quoteExprE().Format) |> ignore; true
-                      | [Parser.NONTERM_typeConstraint] -> os.Append(NONTERM_typeConstraintE().Format) |> ignore; true
-                      | [NONTERM_Category_ImplementationFile] -> os.Append(NONTERM_Category_ImplementationFileE().Format) |> ignore; true
-                      | [NONTERM_Category_Definition] -> os.Append(NONTERM_Category_DefinitionE().Format) |> ignore; true
-                      | [NONTERM_Category_SignatureFile] -> os.Append(NONTERM_Category_SignatureFileE().Format) |> ignore; true
-                      | [NONTERM_Category_Pattern] -> os.Append(NONTERM_Category_PatternE().Format) |> ignore; true
-                      | [NONTERM_Category_Expr] -> os.Append(NONTERM_Category_ExprE().Format) |> ignore; true
-                      | [NONTERM_Category_Type] -> os.Append(NONTERM_Category_TypeE().Format) |> ignore; true
-                      | [Parser.NONTERM_typeArgsActual] -> os.Append(NONTERM_typeArgsActualE().Format) |> ignore; true
-                      | _ -> 
-                          false)
-                          
-#if DEBUG
-              if not foundInContext then
-                  Printf.bprintf os ". (no 'in' context found: %+A)" (List.map (List.map Parser.prodIdxToNonTerminal) ctxt.ReducibleProductions)
-#else
-              foundInContext |> ignore // suppress unused variable warning in RELEASE
-#endif
-              let fix (s: string) = s.Replace(SR.GetString("FixKeyword"), "").Replace(SR.GetString("FixSymbol"), "").Replace(SR.GetString("FixReplace"), "")
-              match (ctxt.ShiftTokens 
-                           |> List.map Parser.tokenTagToTokenId 
-                           |> List.filter (function Parser.TOKEN_error | Parser.TOKEN_EOF -> false | _ -> true) 
-                           |> List.map tokenIdToText 
-                           |> Set.ofList 
-                           |> Set.toList) with 
-              | [tokenName1] -> os.Append(TokenName1E().Format (fix tokenName1)) |> ignore
-              | [tokenName1;tokenName2] -> os.Append(TokenName1TokenName2E().Format (fix tokenName1) (fix tokenName2)) |> ignore
-              | [tokenName1;tokenName2;tokenName3] -> os.Append(TokenName1TokenName2TokenName3E().Format (fix tokenName1) (fix tokenName2) (fix tokenName3)) |> ignore
-              | _ -> ()
-        (*
-              Printf.bprintf os ".\n\n    state = %A\n    token = %A\n    expect (shift) %A\n    expect (reduce) %A\n   prods=%A\n     non terminals: %A" 
-                  ctxt.StateStack
-                  ctxt.CurrentToken
-                  (List.map Parser.tokenTagToTokenId ctxt.ShiftTokens)
-                  (List.map Parser.tokenTagToTokenId ctxt.ReduceTokens)
-                  ctxt.ReducibleProductions
-                  (List.mapSquared Parser.prodIdxToNonTerminal ctxt.ReducibleProductions)
-        *)
-
-      | RuntimeCoercionSourceSealed(denv, ty, _) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let ty, _cxs = PrettyTypes.PrettifyType denv.g ty
-          if isTyparTy denv.g ty 
-          then os.Append(RuntimeCoercionSourceSealed1E().Format (NicePrint.stringOfTy denv ty)) |> ignore
-          else os.Append(RuntimeCoercionSourceSealed2E().Format (NicePrint.stringOfTy denv ty)) |> ignore
-
-      | CoercionTargetSealed(denv, ty, _) -> 
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let ty, _cxs= PrettyTypes.PrettifyType denv.g ty
-          os.Append(CoercionTargetSealedE().Format (NicePrint.stringOfTy denv ty)) |> ignore
-
-      | UpcastUnnecessary(_) -> 
-          os.Append(UpcastUnnecessaryE().Format) |> ignore
-
-      | TypeTestUnnecessary(_) -> 
-          os.Append(TypeTestUnnecessaryE().Format) |> ignore
-
-      | QuotationTranslator.IgnoringPartOfQuotedTermWarning (msg, _) -> 
-          Printf.bprintf os "%s" msg
-
-      | OverrideDoesntOverride(denv, impl, minfoVirtOpt, g, amap, m) ->
-          let sig1 = DispatchSlotChecking.FormatOverride denv impl
-          match minfoVirtOpt with 
-          | None -> 
-              os.Append(OverrideDoesntOverride1E().Format sig1) |> ignore
-          | Some minfoVirt ->
-              // https://github.com/Microsoft/visualfsharp/issues/35 
-              // Improve error message when attempting to override generic return type with unit:
-              // we need to check if unit was used as a type argument
-              let rec hasUnitTType_app (types: TType list) =
-                  match types with
-                  | TType_app (maybeUnit, [], _) :: ts -> 
-                      match maybeUnit.TypeAbbrev with
-                      | Some ttype when isUnitTy g ttype -> true
-                      | _ -> hasUnitTType_app ts
-                  | _ :: ts -> hasUnitTType_app ts
-                  | [] -> false
-
-              match minfoVirt.ApparentEnclosingType with
-              | TType_app (t, types, _) when t.IsFSharpInterfaceTycon && hasUnitTType_app types ->
-                  // match abstract member with 'unit' passed as generic argument
-                  os.Append(OverrideDoesntOverride4E().Format sig1) |> ignore
-              | _ -> 
-                  os.Append(OverrideDoesntOverride2E().Format sig1) |> ignore
-                  let sig2 = DispatchSlotChecking.FormatMethInfoSig g amap m denv minfoVirt
-                  if sig1 <> sig2 then 
-                      os.Append(OverrideDoesntOverride3E().Format sig2) |> ignore
-
-      | UnionCaseWrongArguments (_, n1, n2, _) ->
-          os.Append(UnionCaseWrongArgumentsE().Format n2 n1) |> ignore
-
-      | UnionPatternsBindDifferentNames _ -> 
-          os.Append(UnionPatternsBindDifferentNamesE().Format) |> ignore
-
-      | ValueNotContained (denv, mref, implVal, sigVal, f) ->
-          let text1, text2 = NicePrint.minimalStringsOfTwoValues denv implVal sigVal
-          os.Append(f((fullDisplayTextOfModRef mref), text1, text2)) |> ignore
-
-      | ConstrNotContained (denv, v1, v2, f) ->
-          os.Append(f((NicePrint.stringOfUnionCase denv v1), (NicePrint.stringOfUnionCase denv v2))) |> ignore
-
-      | ExnconstrNotContained (denv, v1, v2, f) ->
-          os.Append(f((NicePrint.stringOfExnDef denv v1), (NicePrint.stringOfExnDef denv v2))) |> ignore
-
-      | FieldNotContained (denv, v1, v2, f) ->
-          os.Append(f((NicePrint.stringOfRecdField denv v1), (NicePrint.stringOfRecdField denv v2))) |> ignore
-
-      | RequiredButNotSpecified (_, mref, k, name, _) ->
-          let nsb = new System.Text.StringBuilder()
-          name nsb;
-          os.Append(RequiredButNotSpecifiedE().Format (fullDisplayTextOfModRef mref) k (nsb.ToString())) |> ignore
-
-      | UseOfAddressOfOperator _ -> 
-          os.Append(UseOfAddressOfOperatorE().Format) |> ignore
-
-      | DefensiveCopyWarning(s, _) -> os.Append(DefensiveCopyWarningE().Format s) |> ignore
-
-      | DeprecatedThreadStaticBindingWarning(_) -> 
-          os.Append(DeprecatedThreadStaticBindingWarningE().Format) |> ignore
-
-      | FunctionValueUnexpected (denv, ty, _) ->
-          let ty, _cxs = PrettyTypes.PrettifyType denv.g ty
-          let errorText = FunctionValueUnexpectedE().Format (NicePrint.stringOfTy denv ty)
-          os.Append errorText |> ignore
-
-      | UnitTypeExpected (denv, ty, _) ->
-          let ty, _cxs = PrettyTypes.PrettifyType denv.g ty
-          let warningText = UnitTypeExpectedE().Format (NicePrint.stringOfTy denv ty)
-          os.Append warningText |> ignore
-
-      | UnitTypeExpectedWithEquality (denv, ty, _) ->
-          let ty, _cxs = PrettyTypes.PrettifyType denv.g ty
-          let warningText = UnitTypeExpectedWithEqualityE().Format (NicePrint.stringOfTy denv ty)
-          os.Append warningText |> ignore
-
-      | UnitTypeExpectedWithPossiblePropertySetter (denv, ty, bindingName, propertyName, _) ->
-          let ty, _cxs = PrettyTypes.PrettifyType denv.g ty
-          let warningText = UnitTypeExpectedWithPossiblePropertySetterE().Format (NicePrint.stringOfTy denv ty) bindingName propertyName
-          os.Append warningText |> ignore
-
-      | UnitTypeExpectedWithPossibleAssignment (denv, ty, isAlreadyMutable, bindingName, _) ->
-          let ty, _cxs = PrettyTypes.PrettifyType denv.g ty
-          let warningText = 
-            if isAlreadyMutable then
-                UnitTypeExpectedWithPossibleAssignmentToMutableE().Format (NicePrint.stringOfTy denv ty) bindingName
-            else
-                UnitTypeExpectedWithPossibleAssignmentE().Format (NicePrint.stringOfTy denv ty) bindingName
-          os.Append warningText |> ignore
-
-      | RecursiveUseCheckedAtRuntime _ -> 
-          os.Append(RecursiveUseCheckedAtRuntimeE().Format) |> ignore
-
-      | LetRecUnsound (_, [v], _) ->  
-          os.Append(LetRecUnsound1E().Format v.DisplayName) |> ignore
-
-      | LetRecUnsound (_, path, _) -> 
-          let bos = new System.Text.StringBuilder()
-          (path.Tail @ [path.Head]) |> List.iter (fun (v: ValRef) -> bos.Append(LetRecUnsoundInnerE().Format v.DisplayName) |> ignore) 
-          os.Append(LetRecUnsound2E().Format (List.head path).DisplayName (bos.ToString())) |> ignore
-
-      | LetRecEvaluatedOutOfOrder (_, _, _, _) -> 
-          os.Append(LetRecEvaluatedOutOfOrderE().Format) |> ignore
-
-      | LetRecCheckedAtRuntime _ -> 
-          os.Append(LetRecCheckedAtRuntimeE().Format) |> ignore
-
-      | SelfRefObjCtor(false, _) -> 
-          os.Append(SelfRefObjCtor1E().Format) |> ignore
-
-      | SelfRefObjCtor(true, _) -> 
-          os.Append(SelfRefObjCtor2E().Format) |> ignore
-
-      | VirtualAugmentationOnNullValuedType(_) ->
-          os.Append(VirtualAugmentationOnNullValuedTypeE().Format) |> ignore
-
-      | NonVirtualAugmentationOnNullValuedType(_) ->
-          os.Append(NonVirtualAugmentationOnNullValuedTypeE().Format) |> ignore
-
-      | NonUniqueInferredAbstractSlot(_, denv, bindnm, bvirt1, bvirt2, _) ->
-          os.Append(NonUniqueInferredAbstractSlot1E().Format bindnm) |> ignore
-          let ty1 = bvirt1.ApparentEnclosingType
-          let ty2 = bvirt2.ApparentEnclosingType
-          // REVIEW: consider if we need to show _cxs (the type parameter constraints)
-          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
-          os.Append(NonUniqueInferredAbstractSlot2E().Format) |> ignore
-          if t1 <> t2 then 
-              os.Append(NonUniqueInferredAbstractSlot3E().Format t1 t2) |> ignore
-          os.Append(NonUniqueInferredAbstractSlot4E().Format) |> ignore
-
-      | Error ((_, s), _) -> os.Append s |> ignore
-
-      | ErrorWithSuggestions ((_, s), _, idText, suggestionF) -> 
-          os.Append(DecompileOpName s) |> ignore
-          suggestNames suggestionF idText
-
-      | NumberedError ((_, s), _) -> os.Append s |> ignore
-
-      | InternalError (s, _) 
-
-      | InvalidArgument s 
-
-      | Failure s as exn ->
-          ignore exn // use the argument, even in non DEBUG
-          let f1 = SR.GetString("Failure1")
-          let f2 = SR.GetString("Failure2") 
-          match s with 
-          | f when f = f1 -> os.Append(Failure3E().Format s) |> ignore
-          | f when f = f2 -> os.Append(Failure3E().Format s) |> ignore
-          | _ -> os.Append(Failure4E().Format s) |> ignore
-#if DEBUG
-          Printf.bprintf os "\nStack Trace\n%s\n" (exn.ToString())
-          if !showAssertForUnexpectedException then 
-              System.Diagnostics.Debug.Assert(false, sprintf "Unexpected exception seen in compiler: %s\n%s" s (exn.ToString()))
-#endif
-
-      | WrappedError (exn, _) -> OutputExceptionR os exn
-
-      | PatternMatchCompilation.MatchIncomplete (isComp, cexOpt, _) -> 
-          os.Append(MatchIncomplete1E().Format) |> ignore
-          match cexOpt with 
-          | None -> ()
-          | Some (cex, false) -> os.Append(MatchIncomplete2E().Format cex) |> ignore
-          | Some (cex, true) -> os.Append(MatchIncomplete3E().Format cex) |> ignore
-          if isComp then 
-              os.Append(MatchIncomplete4E().Format) |> ignore
-
-      | PatternMatchCompilation.EnumMatchIncomplete (isComp, cexOpt, _) ->
-          os.Append(EnumMatchIncomplete1E().Format) |> ignore
-          match cexOpt with
-          | None -> ()
-          | Some (cex, false) -> os.Append(MatchIncomplete2E().Format cex) |> ignore
-          | Some (cex, true) -> os.Append(MatchIncomplete3E().Format cex) |> ignore
-          if isComp then
-              os.Append(MatchIncomplete4E().Format) |> ignore
-
-      | PatternMatchCompilation.RuleNeverMatched _ -> os.Append(RuleNeverMatchedE().Format) |> ignore
-
-      | ValNotMutable(_, valRef, _) -> os.Append(ValNotMutableE().Format(valRef.DisplayName)) |> ignore
-
-      | ValNotLocal _ -> os.Append(ValNotLocalE().Format) |> ignore
-
-      | ObsoleteError (s, _) 
-
-      | ObsoleteWarning (s, _) -> 
-            os.Append(Obsolete1E().Format) |> ignore
-            if s <> "" then os.Append(Obsolete2E().Format s) |> ignore
-
-      | Experimental (s, _) -> os.Append(ExperimentalE().Format s) |> ignore
-
-      | PossibleUnverifiableCode _ -> os.Append(PossibleUnverifiableCodeE().Format) |> ignore
-
-      | UserCompilerMessage (msg, _, _) -> os.Append msg |> ignore
-
-      | Deprecated(s, _) -> os.Append(DeprecatedE().Format s) |> ignore
-
-      | LibraryUseOnly(_) -> os.Append(LibraryUseOnlyE().Format) |> ignore
-
-      | MissingFields(sl, _) -> os.Append(MissingFieldsE().Format (String.concat "," sl + ".")) |> ignore
-
-      | ValueRestriction(denv, hassig, v, _, _) -> 
-          let denv = { denv with showImperativeTyparAnnotations=true }
-          let tau = v.TauType
-          if hassig then 
-              if isFunTy denv.g tau && (arityOfVal v).HasNoArgs then 
-                os.Append(ValueRestriction1E().Format
-                  v.DisplayName 
-                  (NicePrint.stringOfQualifiedValOrMember denv v)
-                  v.DisplayName) |> ignore
-              else
-                os.Append(ValueRestriction2E().Format
-                  v.DisplayName 
-                  (NicePrint.stringOfQualifiedValOrMember denv v)
-                  v.DisplayName) |> ignore
-          else
-              match v.MemberInfo with 
-              | Some membInfo when 
-                  begin match membInfo.MemberFlags.MemberKind with 
-                  | MemberKind.PropertyGet 
-                  | MemberKind.PropertySet 
-                  | MemberKind.Constructor -> true (* can't infer extra polymorphism *)
-                  | _ -> false (* can infer extra polymorphism *)
-                  end -> 
-                      os.Append(ValueRestriction3E().Format (NicePrint.stringOfQualifiedValOrMember denv v)) |> ignore
-              | _ -> 
-                if isFunTy denv.g tau && (arityOfVal v).HasNoArgs then 
-                    os.Append(ValueRestriction4E().Format
-                      v.DisplayName
-                      (NicePrint.stringOfQualifiedValOrMember denv v)
-                      v.DisplayName) |> ignore
-                else
-                    os.Append(ValueRestriction5E().Format
-                      v.DisplayName
-                      (NicePrint.stringOfQualifiedValOrMember denv v)
-                      v.DisplayName) |> ignore
-                
-
-      | Parsing.RecoverableParseError -> os.Append(RecoverableParseErrorE().Format) |> ignore
-
-      | ReservedKeyword (s, _) -> os.Append(ReservedKeywordE().Format s) |> ignore
-
-      | IndentationProblem (s, _) -> os.Append(IndentationProblemE().Format s) |> ignore
-
-      | OverrideInIntrinsicAugmentation(_) -> os.Append(OverrideInIntrinsicAugmentationE().Format) |> ignore
-
-      | OverrideInExtrinsicAugmentation(_) -> os.Append(OverrideInExtrinsicAugmentationE().Format) |> ignore
-
-      | IntfImplInIntrinsicAugmentation(_) -> os.Append(IntfImplInIntrinsicAugmentationE().Format) |> ignore
-
-      | IntfImplInExtrinsicAugmentation(_) -> os.Append(IntfImplInExtrinsicAugmentationE().Format) |> ignore
-
-      | UnresolvedReferenceError(assemblyName, _)
-
-      | UnresolvedReferenceNoRange assemblyName ->
-          os.Append(UnresolvedReferenceNoRangeE().Format assemblyName) |> ignore
-
-      | UnresolvedPathReference(assemblyName, pathname, _) 
-
-      | UnresolvedPathReferenceNoRange(assemblyName, pathname) ->
-          os.Append(UnresolvedPathReferenceNoRangeE().Format pathname assemblyName) |> ignore
-
-      | DeprecatedCommandLineOptionFull(fullText, _) ->
-          os.Append fullText |> ignore
-
-      | DeprecatedCommandLineOptionForHtmlDoc(optionName, _) ->
-          os.Append(FSComp.SR.optsDCLOHtmlDoc optionName) |> ignore
-
-      | DeprecatedCommandLineOptionSuggestAlternative(optionName, altOption, _) ->
-          os.Append(FSComp.SR.optsDCLODeprecatedSuggestAlternative(optionName, altOption)) |> ignore
-
-      | InternalCommandLineOption(optionName, _) ->
-          os.Append(FSComp.SR.optsInternalNoDescription optionName) |> ignore
-
-      | DeprecatedCommandLineOptionNoDescription(optionName, _) ->
-          os.Append(FSComp.SR.optsDCLONoDescription optionName) |> ignore
-
-      | HashIncludeNotAllowedInNonScript(_) ->
-          os.Append(HashIncludeNotAllowedInNonScriptE().Format) |> ignore
-
-      | HashReferenceNotAllowedInNonScript(_) ->
-          os.Append(HashReferenceNotAllowedInNonScriptE().Format) |> ignore
-
-      | HashDirectiveNotAllowedInNonScript(_) ->
-          os.Append(HashDirectiveNotAllowedInNonScriptE().Format) |> ignore
-
-      | FileNameNotResolved(filename, locations, _) -> 
-          os.Append(FileNameNotResolvedE().Format filename locations) |> ignore
-
-      | AssemblyNotResolved(originalName, _) ->
-          os.Append(AssemblyNotResolvedE().Format originalName) |> ignore
-
-      | IllegalFileNameChar(fileName, invalidChar) ->
-          os.Append(FSComp.SR.buildUnexpectedFileNameCharacter(fileName, string invalidChar)|>snd) |> ignore
-
-      | HashLoadedSourceHasIssues(warnings, errors, _) -> 
-        let Emit(l: exn list) =
-            OutputExceptionR os (List.head l)
-        if errors=[] then 
-            os.Append(HashLoadedSourceHasIssues1E().Format) |> ignore
-            Emit warnings
-        else
-            os.Append(HashLoadedSourceHasIssues2E().Format) |> ignore
-            Emit errors
-
-      | HashLoadedScriptConsideredSource(_) ->
-          os.Append(HashLoadedScriptConsideredSourceE().Format) |> ignore
-
-      | InvalidInternalsVisibleToAssemblyName(badName, fileNameOption) ->      
-          match fileNameOption with      
-          | Some file -> os.Append(InvalidInternalsVisibleToAssemblyName1E().Format badName file) |> ignore
-          | None -> os.Append(InvalidInternalsVisibleToAssemblyName2E().Format badName) |> ignore
-
-      | LoadedSourceNotFoundIgnoring(filename, _) ->
-          os.Append(LoadedSourceNotFoundIgnoringE().Format filename) |> ignore
-
-      | MSBuildReferenceResolutionWarning(code, message, _) 
-
-      | MSBuildReferenceResolutionError(code, message, _) -> 
-          os.Append(MSBuildReferenceResolutionErrorE().Format message code) |> ignore
-
-      // Strip TargetInvocationException wrappers
-      | :? System.Reflection.TargetInvocationException as e -> 
-          OutputExceptionR os e.InnerException
-
-      | :? FileNotFoundException as e -> Printf.bprintf os "%s" e.Message
-
-      | :? DirectoryNotFoundException as e -> Printf.bprintf os "%s" e.Message
-
-      | :? System.ArgumentException as e -> Printf.bprintf os "%s" e.Message
-
-      | :? System.NotSupportedException as e -> Printf.bprintf os "%s" e.Message
-
-      | :? IOException as e -> Printf.bprintf os "%s" e.Message
-
-      | :? System.UnauthorizedAccessException as e -> Printf.bprintf os "%s" e.Message
-
-      | e -> 
-          os.Append(TargetInvocationExceptionWrapperE().Format e.Message) |> ignore
-#if DEBUG
-          Printf.bprintf os "\nStack Trace\n%s\n" (e.ToString())
-          if !showAssertForUnexpectedException then 
-              System.Diagnostics.Debug.Assert(false, sprintf "Unknown exception seen in compiler: %s" (e.ToString()))
-#endif
-
-    OutputExceptionR os err.Exception
-
-
-// remove any newlines and tabs
-let OutputPhasedDiagnostic (os: System.Text.StringBuilder) (err: PhasedDiagnostic) (flattenErrors: bool) (canSuggestNames: bool) =
-    let buf = new System.Text.StringBuilder()
-
-    OutputPhasedErrorR buf err canSuggestNames
-    let s = if flattenErrors then ErrorLogger.NormalizeErrorString (buf.ToString()) else buf.ToString()
-    
-    os.Append s |> ignore
-
-let SanitizeFileName fileName implicitIncludeDir =
-    // The assert below is almost ok, but it fires in two cases:
-    //  - fsi.exe sometimes passes "stdin" as a dummy filename
-    //  - if you have a #line directive, e.g. 
-    //        # 1000 "Line01.fs"
-    //    then it also asserts. But these are edge cases that can be fixed later, e.g. in bug 4651.
-    //System.Diagnostics.Debug.Assert(FileSystem.IsPathRootedShim fileName, sprintf "filename should be absolute: '%s'" fileName)
-    try
-        let fullPath = FileSystem.GetFullPathShim fileName
-        let currentDir = implicitIncludeDir
-        
-        // if the file name is not rooted in the current directory, return the full path
-        if not(fullPath.StartsWithOrdinal currentDir) then
-            fullPath
-        // if the file name is rooted in the current directory, return the relative path
-        else
-            fullPath.Replace(currentDir+"\\", "")
-    with _ ->
-        fileName
-
-[]
-type DiagnosticLocation =
-    { Range: range
-      File: string
-      TextRepresentation: string
-      IsEmpty: bool }
-
-[]
-type DiagnosticCanonicalInformation = 
-    { ErrorNumber: int
-      Subcategory: string
-      TextRepresentation: string }
-
-[]
-type DiagnosticDetailedInfo = 
-    { Location: DiagnosticLocation option
-      Canonical: DiagnosticCanonicalInformation
-      Message: string }
-
-[]
-type Diagnostic = 
-    | Short of bool * string
-    | Long of bool * DiagnosticDetailedInfo
-
-/// returns sequence that contains Diagnostic for the given error + Diagnostic for all related errors
-let CollectDiagnostic (implicitIncludeDir, showFullPaths, flattenErrors, errorStyle, isError, err: PhasedDiagnostic, canSuggestNames: bool) =
-    let outputWhere (showFullPaths, errorStyle) m: DiagnosticLocation =
-        if Range.equals m rangeStartup || Range.equals m rangeCmdArgs then
-            { Range = m; TextRepresentation = ""; IsEmpty = true; File = "" }
-        else
-            let file = m.FileName
-            let file = if showFullPaths then 
-                            Filename.fullpath implicitIncludeDir file
-                       else 
-                            SanitizeFileName file implicitIncludeDir
-            let text, m, file = 
-                match errorStyle with
-                  | ErrorStyle.EmacsErrors -> 
-                    let file = file.Replace("\\", "/")
-                    (sprintf "File \"%s\", line %d, characters %d-%d: " file m.StartLine m.StartColumn m.EndColumn), m, file
-
-                  // We're adjusting the columns here to be 1-based - both for parity with C# and for MSBuild, which assumes 1-based columns for error output
-                  | ErrorStyle.DefaultErrors -> 
-                    let file = file.Replace('/', System.IO.Path.DirectorySeparatorChar)
-                    let m = mkRange m.FileName (mkPos m.StartLine (m.StartColumn + 1)) m.End
-                    (sprintf "%s(%d,%d): " file m.StartLine m.StartColumn), m, file
-
-                  // We may also want to change TestErrors to be 1-based
-                  | ErrorStyle.TestErrors -> 
-                    let file = file.Replace("/", "\\")
-                    let m = mkRange m.FileName (mkPos m.StartLine (m.StartColumn + 1)) (mkPos m.EndLine (m.EndColumn + 1) )
-                    sprintf "%s(%d,%d-%d,%d): " file m.StartLine m.StartColumn m.EndLine m.EndColumn, m, file
-
-                  | ErrorStyle.GccErrors -> 
-                    let file = file.Replace('/', System.IO.Path.DirectorySeparatorChar)
-                    let m = mkRange m.FileName (mkPos m.StartLine (m.StartColumn + 1)) (mkPos m.EndLine (m.EndColumn + 1) )
-                    sprintf "%s:%d:%d: " file m.StartLine m.StartColumn, m, file
-
-                  // Here, we want the complete range information so Project Systems can generate proper squiggles
-                  | ErrorStyle.VSErrors -> 
-                        // Show prefix only for real files. Otherwise, we just want a truncated error like:
-                        //      parse error FS0031: blah blah
-                        if not (Range.equals m range0) && not (Range.equals m rangeStartup) && not (Range.equals m rangeCmdArgs) then
-                            let file = file.Replace("/", "\\")
-                            let m = mkRange m.FileName (mkPos m.StartLine (m.StartColumn + 1)) (mkPos m.EndLine (m.EndColumn + 1) )
-                            sprintf "%s(%d,%d,%d,%d): " file m.StartLine m.StartColumn m.EndLine m.EndColumn, m, file
-                        else
-                            "", m, file
-            { Range = m; TextRepresentation = text; IsEmpty = false; File = file }
-
-    match err.Exception with 
-    | ReportedError _ -> 
-        assert ("" = "Unexpected ReportedError") //  this should never happen 
-        Seq.empty
-    | StopProcessing -> 
-        assert ("" = "Unexpected StopProcessing") // this should never happen 
-        Seq.empty
-    | _ -> 
-        let errors = ResizeArray()
-        let report err =
-            let OutputWhere err = 
-                match GetRangeOfDiagnostic err with 
-                | Some m -> Some(outputWhere (showFullPaths, errorStyle) m)
-                | None -> None
-
-            let OutputCanonicalInformation(subcategory, errorNumber) : DiagnosticCanonicalInformation = 
-                let text = 
-                    match errorStyle with
-                    // Show the subcategory for --vserrors so that we can fish it out in Visual Studio and use it to determine error stickiness.
-                    | ErrorStyle.VSErrors -> sprintf "%s %s FS%04d: " subcategory (if isError then "error" else "warning") errorNumber
-                    | _ -> sprintf "%s FS%04d: " (if isError then "error" else "warning") errorNumber
-                { ErrorNumber = errorNumber; Subcategory = subcategory; TextRepresentation = text}
-        
-            let mainError, relatedErrors = SplitRelatedDiagnostics err
-            let where = OutputWhere mainError
-            let canonical = OutputCanonicalInformation(err.Subcategory(), GetDiagnosticNumber mainError)
-            let message = 
-                let os = System.Text.StringBuilder()
-                OutputPhasedDiagnostic os mainError flattenErrors canSuggestNames
-                os.ToString()
-            
-            let entry: DiagnosticDetailedInfo = { Location = where; Canonical = canonical; Message = message }
-            
-            errors.Add ( Diagnostic.Long(isError, entry ) )
-
-            let OutputRelatedError(err: PhasedDiagnostic) =
-                match errorStyle with
-                // Give a canonical string when --vserror.
-                | ErrorStyle.VSErrors -> 
-                    let relWhere = OutputWhere mainError // mainError?
-                    let relCanonical = OutputCanonicalInformation(err.Subcategory(), GetDiagnosticNumber mainError) // Use main error for code
-                    let relMessage = 
-                        let os = System.Text.StringBuilder()
-                        OutputPhasedDiagnostic os err flattenErrors canSuggestNames
-                        os.ToString()
-
-                    let entry: DiagnosticDetailedInfo = { Location = relWhere; Canonical = relCanonical; Message = relMessage}
-                    errors.Add( Diagnostic.Long (isError, entry) )
-
-                | _ -> 
-                    let os = System.Text.StringBuilder()
-                    OutputPhasedDiagnostic os err flattenErrors canSuggestNames
-                    errors.Add( Diagnostic.Short(isError, os.ToString()) )
-
-            relatedErrors |> List.iter OutputRelatedError
-
-        match err with
-#if !NO_EXTENSIONTYPING
-        | {Exception = (:? TypeProviderError as tpe)} ->
-            tpe.Iter (fun e ->
-                let newErr = {err with Exception = e}
-                report newErr
-            )
-#endif
-        | x -> report x
-
-        errors:> seq<_>
-
-/// used by fsc.exe and fsi.exe, but not by VS
-/// prints error and related errors to the specified StringBuilder
-let rec OutputDiagnostic (implicitIncludeDir, showFullPaths, flattenErrors, errorStyle, isError) os (err: PhasedDiagnostic) = 
-    
-    // 'true' for "canSuggestNames" is passed last here because we want to report suggestions in fsc.exe and fsi.exe, just not in regular IDE usage.
-    let errors = CollectDiagnostic (implicitIncludeDir, showFullPaths, flattenErrors, errorStyle, isError, err, true)
-    for e in errors do
-        Printf.bprintf os "\n"
-        match e with
-        | Diagnostic.Short(_, txt) -> 
-            os.Append txt |> ignore
-        | Diagnostic.Long(_, details) ->
-            match details.Location with
-            | Some l when not l.IsEmpty -> os.Append l.TextRepresentation |> ignore
-            | _ -> ()
-            os.Append( details.Canonical.TextRepresentation ) |> ignore
-            os.Append( details.Message ) |> ignore
-      
-let OutputDiagnosticContext prefix fileLineFn os err =
-    match GetRangeOfDiagnostic err with
-    | None -> ()      
-    | Some m -> 
-        let filename = m.FileName
-        let lineA = m.StartLine
-        let lineB = m.EndLine
-        let line = fileLineFn filename lineA
-        if line<>"" then 
-            let iA = m.StartColumn
-            let iB = m.EndColumn
-            let iLen = if lineA = lineB then max (iB - iA) 1 else 1
-            Printf.bprintf os "%s%s\n" prefix line
-            Printf.bprintf os "%s%s%s\n" prefix (String.make iA '-') (String.make iLen '^')
-
-let (++) x s = x @ [s]
-
-//--------------------------------------------------------------------------
-// General file name resolver
-//--------------------------------------------------------------------------
-
-/// Will return None if the filename is not found.
-let TryResolveFileUsingPaths(paths, m, name) =
-    let () = 
-        try FileSystem.IsPathRootedShim name |> ignore 
-        with :? System.ArgumentException as e -> error(Error(FSComp.SR.buildProblemWithFilename(name, e.Message), m))
-    if FileSystem.IsPathRootedShim name && FileSystem.SafeExists name 
-    then Some name 
-    else
-        let res = paths |> List.tryPick (fun path ->  
-                    let n = Path.Combine (path, name)
-                    if FileSystem.SafeExists n then Some n 
-                    else None)
-        res
-
-/// Will raise FileNameNotResolved if the filename was not found
-let ResolveFileUsingPaths(paths, m, name) =
-    match TryResolveFileUsingPaths(paths, m, name) with
-    | Some res -> res
-    | None ->
-        let searchMessage = String.concat "\n " paths
-        raise (FileNameNotResolved(name, searchMessage, m))            
-
-let GetWarningNumber(m, s: string) =
-    try
-        // Okay so ...
-        //      #pragma strips FS of the #pragma "FS0004" and validates the warning number
-        //      therefore if we have warning id that starts with a numeric digit we convert it to Some (int32)
-        //      anything else is ignored None
-        if Char.IsDigit(s.[0]) then Some (int32 s)
-        elif s.StartsWithOrdinal("FS") = true then raise (new ArgumentException())
-        else None
-    with err ->
-        warning(Error(FSComp.SR.buildInvalidWarningNumber s, m))
-        None
-
-let ComputeMakePathAbsolute implicitIncludeDir (path: string) = 
-    try  
-        // remove any quotation marks from the path first
-        let path = path.Replace("\"", "")
-        if not (FileSystem.IsPathRootedShim path) 
-        then Path.Combine (implicitIncludeDir, path)
-        else path 
-    with 
-        :? System.ArgumentException -> path  
-
-//----------------------------------------------------------------------------
-// Configuration
-//----------------------------------------------------------------------------
-
-[]
-type CompilerTarget = 
-    | WinExe 
-    | ConsoleExe 
-    | Dll 
-    | Module
-    member x.IsExe = (match x with ConsoleExe | WinExe -> true | _ -> false)
-
-[]
-type ResolveAssemblyReferenceMode = Speculative | ReportErrors
-
-[]
-type CopyFSharpCoreFlag = Yes | No
-
-/// Represents the file or string used for the --version flag
-type VersionFlag = 
-    | VersionString of string
-    | VersionFile of string
-    | VersionNone
-    member x.GetVersionInfo implicitIncludeDir =
-        let vstr = x.GetVersionString implicitIncludeDir
-        try 
-            IL.parseILVersion vstr
-        with _ -> errorR(Error(FSComp.SR.buildInvalidVersionString vstr, rangeStartup)); IL.parseILVersion "0.0.0.0"
-
-    member x.GetVersionString implicitIncludeDir = 
-         match x with 
-         | VersionString s -> s
-         | VersionFile s ->
-             let s = if FileSystem.IsPathRootedShim s then s else Path.Combine(implicitIncludeDir, s)
-             if not(FileSystem.SafeExists s) then 
-                 errorR(Error(FSComp.SR.buildInvalidVersionFile s, rangeStartup)); "0.0.0.0"
-             else
-                 use is = System.IO.File.OpenText s
-                 is.ReadLine()
-         | VersionNone -> "0.0.0.0"
-
-
-/// Represents a reference to an assembly. May be backed by a real assembly on disk, or a cross-project
-/// reference backed by information generated by the the compiler service.
-type IRawFSharpAssemblyData = 
-
-    ///  The raw list AutoOpenAttribute attributes in the assembly
-    abstract GetAutoOpenAttributes: ILGlobals -> string list
-
-    ///  The raw list InternalsVisibleToAttribute attributes in the assembly
-    abstract GetInternalsVisibleToAttributes: ILGlobals -> string list
-
-    ///  The raw IL module definition in the assembly, if any. This is not present for cross-project references
-    /// in the language service
-    abstract TryGetILModuleDef: unit -> ILModuleDef option
-
-    ///  The raw F# signature data in the assembly, if any
-    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
-
-    ///  The raw F# optimization data in the assembly, if any
-    abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
-
-    ///  The table of type forwarders in the assembly
-    abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders
-
-    /// The identity of the module
-    abstract ILScopeRef: ILScopeRef
-
-    abstract ILAssemblyRefs: ILAssemblyRef list
-
-    abstract ShortAssemblyName: string
-
-    abstract HasAnyFSharpSignatureDataAttribute: bool
-
-    abstract HasMatchingFSharpSignatureDataAttribute: ILGlobals -> bool
-
-/// Cache of time stamps as we traverse a project description
-type TimeStampCache(defaultTimeStamp: DateTime) = 
-    let files = Dictionary()
-    let projects = Dictionary(HashIdentity.Reference)
-    member cache.GetFileTimeStamp fileName = 
-        let ok, v = files.TryGetValue fileName
-        if ok then v else
-        let v = 
-            try 
-                FileSystem.GetLastWriteTimeShim fileName
-            with 
-            | :? FileNotFoundException ->
-                defaultTimeStamp   
-        files.[fileName] <- v
-        v
-
-    member cache.GetProjectReferenceTimeStamp (pr: IProjectReference, ctok) = 
-        let ok, v = projects.TryGetValue pr
-        if ok then v else 
-        let v = defaultArg (pr.TryGetLogicalTimeStamp (cache, ctok)) defaultTimeStamp
-        projects.[pr] <- v
-        v
-
-and IProjectReference = 
-    /// The name of the assembly file generated by the project
-    abstract FileName: string 
-
-    /// Evaluate raw contents of the assembly file generated by the project
-    abstract EvaluateRawContents: CompilationThreadToken -> Cancellable
-
-    /// Get the logical timestamp that would be the timestamp of the assembly file generated by the project
-    ///
-    /// For project references this is maximum of the timestamps of all dependent files.
-    /// The project is not actually built, nor are any assemblies read, but the timestamps for each dependent file 
-    /// are read via the FileSystem. If the files don't exist, then a default timestamp is used.
-    ///
-    /// The operation returns None only if it is not possible to create an IncrementalBuilder for the project at all, e.g. if there
-    /// are fatal errors in the options for the project.
-    abstract TryGetLogicalTimeStamp: TimeStampCache * CompilationThreadToken -> System.DateTime option
-
-type AssemblyReference = 
-    | AssemblyReference of range * string * IProjectReference option
-
-    member x.Range = (let (AssemblyReference(m, _, _)) = x in m)
-
-    member x.Text = (let (AssemblyReference(_, text, _)) = x in text)
-
-    member x.ProjectReference = (let (AssemblyReference(_, _, contents)) = x in contents)
-
-    member x.SimpleAssemblyNameIs name = 
-        (String.Compare(fileNameWithoutExtensionWithValidate false x.Text, name, StringComparison.OrdinalIgnoreCase) = 0) ||
-        (let text = x.Text.ToLowerInvariant()
-         not (text.Contains "/") && not (text.Contains "\\") && not (text.Contains ".dll") && not (text.Contains ".exe") &&
-           try let aname = System.Reflection.AssemblyName x.Text in aname.Name = name 
-           with _ -> false) 
-
-    override x.ToString() = sprintf "AssemblyReference(%s)" x.Text
-
-type UnresolvedAssemblyReference = UnresolvedAssemblyReference of string * AssemblyReference list
-#if !NO_EXTENSIONTYPING
-type ResolvedExtensionReference = ResolvedExtensionReference of string * AssemblyReference list * Tainted list
-#endif
-
-/// The thread in which compilation calls will be enqueued and done work on.
-/// Note: This is currently only used when disposing of type providers and will be extended to all the other type provider calls when compilations can be done in parallel.
-///       Right now all calls in FCS to type providers are single-threaded through use of the reactor thread. 
-type ICompilationThread =
-
-    /// Enqueue work to be done on a compilation thread.
-    abstract EnqueueWork: (CompilationThreadToken -> unit) -> unit
-
-type ImportedBinary =
-    { FileName: string
-      RawMetadata: IRawFSharpAssemblyData 
-#if !NO_EXTENSIONTYPING
-      ProviderGeneratedAssembly: System.Reflection.Assembly option
-      IsProviderGenerated: bool
-      ProviderGeneratedStaticLinkMap: ProvidedAssemblyStaticLinkingMap option
-#endif
-      ILAssemblyRefs: ILAssemblyRef list
-      ILScopeRef: ILScopeRef }
-
-type ImportedAssembly =
-    { ILScopeRef: ILScopeRef 
-      FSharpViewOfMetadata: CcuThunk
-      AssemblyAutoOpenAttributes: string list
-      AssemblyInternalsVisibleToAttributes: string list
-#if !NO_EXTENSIONTYPING
-      IsProviderGenerated: bool
-      mutable TypeProviders: Tainted list
-#endif
-      FSharpOptimizationData: Microsoft.FSharp.Control.Lazy> }
-
-type AvailableImportedAssembly =
-    | ResolvedImportedAssembly of ImportedAssembly
-    | UnresolvedImportedAssembly of string
-
-type CcuLoadFailureAction =
-    | RaiseError
-    | ReturnNone
-
-[]
-type TcConfigBuilder =
-    { mutable primaryAssembly: PrimaryAssembly
-      mutable noFeedback: bool
-      mutable stackReserveSize: int32 option
-      mutable implicitIncludeDir: string (* normally "." *)
-      mutable openDebugInformationForLaterStaticLinking: bool (* only for --standalone *)
-      defaultFSharpBinariesDir: string
-      mutable compilingFslib: bool
-      mutable useIncrementalBuilder: bool
-      mutable includes: string list
-      mutable implicitOpens: string list
-      mutable useFsiAuxLib: bool
-      mutable framework: bool
-      mutable resolutionEnvironment: ReferenceResolver.ResolutionEnvironment
-      mutable implicitlyResolveAssemblies: bool
-      mutable light: bool option
-      mutable conditionalCompilationDefines: string list
-      mutable loadedSources: (range * string * string) list
-      mutable compilerToolPaths: string list
-      mutable referencedDLLs: AssemblyReference list
-      mutable packageManagerLines: Map
-      mutable projectReferences: IProjectReference list
-      mutable knownUnresolvedReferences: UnresolvedAssemblyReference list
-      reduceMemoryUsage: ReduceMemoryFlag
-      mutable subsystemVersion: int * int
-      mutable useHighEntropyVA: bool
-      mutable inputCodePage: int option
-      mutable embedResources: string list
-      mutable errorSeverityOptions: FSharpErrorSeverityOptions
-      mutable mlCompatibility: bool
-      mutable assumeNullOnImport: bool
-      mutable checkNullness: bool
-      mutable checkOverflow: bool
-      mutable showReferenceResolutions: bool
-      mutable outputDir : string option
-      mutable outputFile: string option
-      mutable platform: ILPlatform option
-      mutable prefer32Bit: bool
-      mutable useSimpleResolution: bool
-      mutable target: CompilerTarget
-      mutable debuginfo: bool
-      mutable testFlagEmitFeeFeeAs100001: bool
-      mutable dumpDebugInfo: bool
-      mutable debugSymbolFile: string option
-      (* Backend configuration *)
-      mutable typeCheckOnly: bool
-      mutable parseOnly: bool
-      mutable importAllReferencesOnly: bool
-      mutable simulateException: string option
-      mutable printAst: bool
-      mutable tokenizeOnly: bool
-      mutable testInteractionParser: bool
-      mutable reportNumDecls: bool
-      mutable printSignature: bool
-      mutable printSignatureFile: string
-      mutable xmlDocOutputFile: string option
-      mutable stats: bool
-      mutable generateFilterBlocks: bool (* don't generate filter blocks due to bugs on Mono *)
-
-      mutable signer: string option
-      mutable container: string option
-
-      mutable delaysign: bool
-      mutable publicsign: bool
-      mutable version: VersionFlag 
-      mutable metadataVersion: string option
-      mutable standalone: bool
-      mutable extraStaticLinkRoots: string list 
-      mutable noSignatureData: bool
-      mutable onlyEssentialOptimizationData: bool
-      mutable useOptimizationDataFile: bool
-      mutable jitTracking: bool
-      mutable portablePDB: bool
-      mutable embeddedPDB: bool
-      mutable embedAllSource: bool
-      mutable embedSourceList: string list 
-      mutable sourceLink: string
-
-      mutable ignoreSymbolStoreSequencePoints: bool
-      mutable internConstantStrings: bool
-      mutable extraOptimizationIterations: int
-
-      mutable win32res: string 
-      mutable win32manifest: string
-      mutable includewin32manifest: bool
-      mutable linkResources: string list
-      mutable legacyReferenceResolver: ReferenceResolver.Resolver
-
-      mutable showFullPaths: bool
-      mutable errorStyle: ErrorStyle
-      mutable utf8output: bool
-      mutable flatErrors: bool
-
-      mutable maxErrors: int
-      mutable abortOnError: bool (* intended for fsi scripts that should exit on first error *)
-      mutable baseAddress: int32 option
-      mutable checksumAlgorithm: HashAlgorithm
-#if DEBUG
-      mutable showOptimizationData: bool
-#endif
-      mutable showTerms: bool (* show terms between passes? *)
-      mutable writeTermsToFiles: bool (* show terms to files? *)
-      mutable doDetuple: bool (* run detuple pass? *)
-      mutable doTLR: bool (* run TLR pass? *)
-      mutable doFinalSimplify: bool (* do final simplification pass *)
-      mutable optsOn: bool (* optimizations are turned on *)
-      mutable optSettings: Optimizer.OptimizationSettings 
-      mutable emitTailcalls: bool
-      mutable deterministic: bool
-      mutable preferredUiLang: string option
-      mutable lcid: int option
-      mutable productNameForBannerText: string
-      /// show the MS (c) notice, e.g. with help or fsi? 
-      mutable showBanner: bool
-
-      /// show times between passes? 
-      mutable showTimes: bool
-      mutable showLoadedAssemblies: bool
-      mutable continueAfterParseFailure: bool
-#if !NO_EXTENSIONTYPING
-      /// show messages about extension type resolution?
-      mutable showExtensionTypeMessages: bool
-#endif
-      mutable compilationThread: ICompilationThread
-
-      /// pause between passes? 
-      mutable pause: bool
-      /// whenever possible, emit callvirt instead of call
-      mutable alwaysCallVirt: bool
-
-      /// if true, strip away data that would not be of use to end users, but is useful to us for debugging
-      // REVIEW: "stripDebugData"?
-      mutable noDebugData: bool
-
-      /// if true, indicates all type checking and code generation is in the context of fsi.exe
-      isInteractive: bool
-      isInvalidationSupported: bool
-
-      /// used to log sqm data
-
-      /// if true - every expression in quotations will be augmented with full debug info (filename, location in file)
-      mutable emitDebugInfoInQuotations: bool
-
-      mutable exename: string option
-
-      // If true - the compiler will copy FSharp.Core.dll along the produced binaries
-      mutable copyFSharpCore: CopyFSharpCoreFlag
-
-      /// When false FSI will lock referenced assemblies requiring process restart, false = disable Shadow Copy false (*default*)
-      mutable shadowCopyReferences: bool
-      mutable useSdkRefs: bool
-
-      /// A function to call to try to get an object that acts as a snapshot of the metadata section of a .NET binary,
-      /// and from which we can read the metadata. Only used when metadataOnly=true.
-      mutable tryGetMetadataSnapshot: ILReaderTryGetMetadataSnapshot
-
-      mutable internalTestSpanStackReferring: bool
-
-      mutable noConditionalErasure: bool
-
-      mutable pathMap: PathMap
-
-      mutable langVersion: LanguageVersion
-
-      mutable dependencyProvider: DependencyProvider
-      }
-
-    static member Initial(legacyReferenceResolver) =
-        {
-          primaryAssembly = PrimaryAssembly.Mscorlib // default value, can be overridden using the command line switch
-          light = None
-          noFeedback = false
-          stackReserveSize = None
-          conditionalCompilationDefines = []
-          implicitIncludeDir = String.Empty
-          openDebugInformationForLaterStaticLinking = false
-          defaultFSharpBinariesDir = String.Empty
-          compilingFslib = false
-          useIncrementalBuilder = false
-          useFsiAuxLib = false
-          implicitOpens = []
-          includes = []
-          resolutionEnvironment = ResolutionEnvironment.EditingOrCompilation false
-          framework = true
-          implicitlyResolveAssemblies = true
-          compilerToolPaths = []
-          referencedDLLs = []
-          packageManagerLines = Map.empty
-          projectReferences = []
-          knownUnresolvedReferences = []
-          loadedSources = []
-          errorSeverityOptions = FSharpErrorSeverityOptions.Default
-          embedResources = []
-          inputCodePage = None
-          reduceMemoryUsage = ReduceMemoryFlag.Yes // always gets set explicitly 
-          subsystemVersion = 4, 0 // per spec for 357994
-          useHighEntropyVA = false
-          mlCompatibility = false
-          assumeNullOnImport = false
-          checkNullness = false
-          checkOverflow = false
-          showReferenceResolutions = false
-          outputDir = None
-          outputFile = None
-          platform = None
-          prefer32Bit = false
-          useSimpleResolution = runningOnMono
-          target = CompilerTarget.ConsoleExe
-          debuginfo = false
-          testFlagEmitFeeFeeAs100001 = false
-          dumpDebugInfo = false
-          debugSymbolFile = None
-
-          (* Backend configuration *)
-          typeCheckOnly = false
-          parseOnly = false
-          importAllReferencesOnly = false
-          simulateException = None
-          printAst = false
-          tokenizeOnly = false
-          testInteractionParser = false
-          reportNumDecls = false
-          printSignature = false
-          printSignatureFile = ""
-          xmlDocOutputFile = None
-          stats = false
-          generateFilterBlocks = false (* don't generate filter blocks *)
-
-          signer = None
-          container = None
-          maxErrors = 100
-          abortOnError = false
-          baseAddress = None
-          checksumAlgorithm = HashAlgorithm.Sha256
-
-          delaysign = false
-          publicsign = false
-          version = VersionNone
-          metadataVersion = None
-          standalone = false
-          extraStaticLinkRoots = []
-          noSignatureData = false
-          onlyEssentialOptimizationData = false
-          useOptimizationDataFile = false
-          jitTracking = true
-          portablePDB = true
-          embeddedPDB = false
-          embedAllSource = false
-          embedSourceList = []
-          sourceLink = ""
-          ignoreSymbolStoreSequencePoints = false
-          internConstantStrings = true
-          extraOptimizationIterations = 0
-
-          win32res = ""
-          win32manifest = ""
-          includewin32manifest = true
-          linkResources = []
-          legacyReferenceResolver = legacyReferenceResolver
-          showFullPaths = false
-          errorStyle = ErrorStyle.DefaultErrors
-
-          utf8output = false
-          flatErrors = false
-
- #if DEBUG
-          showOptimizationData = false
- #endif
-          showTerms = false
-          writeTermsToFiles = false
-
-          doDetuple = false
-          doTLR = false
-          doFinalSimplify = false
-          optsOn = false
-          optSettings = Optimizer.OptimizationSettings.Defaults
-          emitTailcalls = true
-          deterministic = false
-          preferredUiLang = None
-          lcid = None
-          // See bug 6071 for product banner spec
-          productNameForBannerText = FSComp.SR.buildProductName(FSharpEnvironment.FSharpBannerVersion)
-          showBanner = true
-          showTimes = false
-          showLoadedAssemblies = false
-          continueAfterParseFailure = false
-#if !NO_EXTENSIONTYPING
-          showExtensionTypeMessages = false
-#endif
-          compilationThread = 
-                let ctok = CompilationThreadToken ()
-                { new ICompilationThread with member __.EnqueueWork work = work ctok }
-          pause = false 
-          alwaysCallVirt = true
-          noDebugData = false
-          isInteractive = false
-          isInvalidationSupported = false
-          emitDebugInfoInQuotations = false
-          exename = None
-          copyFSharpCore = CopyFSharpCoreFlag.No
-          shadowCopyReferences = false
-          useSdkRefs = true
-          tryGetMetadataSnapshot = (fun _ -> None)
-          internalTestSpanStackReferring = false
-          noConditionalErasure = false
-          pathMap = PathMap.empty
-          langVersion = LanguageVersion("default")
-          dependencyProvider = Unchecked.defaultof
-        }
-
-    // Directories to start probing in
-    // Algorithm:
-    //  Search for native libraries using:
-    //  1. Include directories
-    //  2. compilerToolPath directories
-    //  3. reference dll's
-    //  4. The implicit include directory
-    member private tcConfigB.nativeProbingRoots () =
-        seq {
-            yield! tcConfigB.includes
-            yield! tcConfigB.compilerToolPaths
-            yield! (tcConfigB.referencedDLLs |> Seq.map(fun ref -> Path.GetDirectoryName(ref.Text)))
-            yield tcConfigB.implicitIncludeDir
-        } |> Seq.distinct
-
-    static member CreateNew(legacyReferenceResolver, defaultFSharpBinariesDir, reduceMemoryUsage, implicitIncludeDir,
-                            isInteractive, isInvalidationSupported, defaultCopyFSharpCore, tryGetMetadataSnapshot) =
-
-        Debug.Assert(FileSystem.IsPathRootedShim implicitIncludeDir, sprintf "implicitIncludeDir should be absolute: '%s'" implicitIncludeDir)
-
-        if (String.IsNullOrEmpty defaultFSharpBinariesDir) then
-            failwith "Expected a valid defaultFSharpBinariesDir"
-
-        let tcConfigBuilder =
-            { TcConfigBuilder.Initial(legacyReferenceResolver) with 
-                implicitIncludeDir = implicitIncludeDir
-                defaultFSharpBinariesDir = defaultFSharpBinariesDir
-                reduceMemoryUsage = reduceMemoryUsage
-                legacyReferenceResolver = legacyReferenceResolver
-                isInteractive = isInteractive
-                isInvalidationSupported = isInvalidationSupported
-                copyFSharpCore = defaultCopyFSharpCore
-                tryGetMetadataSnapshot = tryGetMetadataSnapshot
-                useFsiAuxLib = isInteractive
-            }
-        tcConfigBuilder.dependencyProvider <- new DependencyProvider(NativeResolutionProbe(tcConfigBuilder.nativeProbingRoots))
-        tcConfigBuilder
-
-    member tcConfigB.ResolveSourceFile(m, nm, pathLoadedFrom) = 
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        ResolveFileUsingPaths(tcConfigB.includes @ [pathLoadedFrom], m, nm)
-
-    /// Decide names of output file, pdb and assembly
-    member tcConfigB.DecideNames (sourceFiles) =
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        if sourceFiles = [] then errorR(Error(FSComp.SR.buildNoInputsSpecified(), rangeCmdArgs))
-        let ext() = match tcConfigB.target with CompilerTarget.Dll -> ".dll" | CompilerTarget.Module -> ".netmodule" | CompilerTarget.ConsoleExe | CompilerTarget.WinExe -> ".exe"
-        let implFiles = sourceFiles |> List.filter (fun lower -> List.exists (Filename.checkSuffix (String.lowercase lower)) FSharpImplFileSuffixes)
-        let outfile = 
-            match tcConfigB.outputFile, List.rev implFiles with 
-            | None, [] -> "out" + ext()
-            | None, h :: _ -> 
-                let basic = fileNameOfPath h
-                let modname = try Filename.chopExtension basic with _ -> basic
-                modname+(ext())
-            | Some f, _ -> f
-        let assemblyName = 
-            let baseName = fileNameOfPath outfile
-            (fileNameWithoutExtension baseName)
-
-        let pdbfile = 
-            if tcConfigB.debuginfo then
-              Some (match tcConfigB.debugSymbolFile with 
-                    | None -> FSharp.Compiler.AbstractIL.ILPdbWriter.getDebugFileName outfile tcConfigB.portablePDB
-#if ENABLE_MONO_SUPPORT
-                    | Some _ when runningOnMono ->
-                        // On Mono, the name of the debug file has to be ".mdb" so specifying it explicitly is an error
-                        warning(Error(FSComp.SR.ilwriteMDBFileNameCannotBeChangedWarning(), rangeCmdArgs))
-                        FSharp.Compiler.AbstractIL.ILPdbWriter.getDebugFileName outfile tcConfigB.portablePDB
-#endif
-                    | Some f -> f)   
-            elif (tcConfigB.debugSymbolFile <> None) && (not (tcConfigB.debuginfo)) then
-                error(Error(FSComp.SR.buildPdbRequiresDebug(), rangeStartup))  
-            else
-                None
-        tcConfigB.outputFile <- Some outfile
-        outfile, pdbfile, assemblyName
-
-    member tcConfigB.TurnWarningOff(m, s: string) =
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        match GetWarningNumber(m, s) with 
-        | None -> ()
-        | Some n -> 
-            // nowarn:62 turns on mlCompatibility, e.g. shows ML compat items in intellisense menus
-            if n = 62 then tcConfigB.mlCompatibility <- true
-            tcConfigB.errorSeverityOptions <-
-                { tcConfigB.errorSeverityOptions with WarnOff = ListSet.insert (=) n tcConfigB.errorSeverityOptions.WarnOff }
-
-    member tcConfigB.TurnWarningOn(m, s: string) =
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        match GetWarningNumber(m, s) with 
-        | None -> ()
-        | Some n -> 
-            // warnon 62 turns on mlCompatibility, e.g. shows ML compat items in intellisense menus
-            if n = 62 then tcConfigB.mlCompatibility <- false
-            tcConfigB.errorSeverityOptions <-
-                { tcConfigB.errorSeverityOptions with WarnOn = ListSet.insert (=) n tcConfigB.errorSeverityOptions.WarnOn }
-
-    member tcConfigB.AddIncludePath (m, path, pathIncludedFrom) = 
-        let absolutePath = ComputeMakePathAbsolute pathIncludedFrom path
-        let ok = 
-            let existsOpt = 
-                try Some(Directory.Exists absolutePath) 
-                with e -> warning(Error(FSComp.SR.buildInvalidSearchDirectory path, m)); None
-            match existsOpt with 
-            | Some exists -> 
-                if not exists then warning(Error(FSComp.SR.buildSearchDirectoryNotFound absolutePath, m))         
-                exists
-            | None -> false
-        if ok && not (List.contains absolutePath tcConfigB.includes) then 
-           tcConfigB.includes <- tcConfigB.includes ++ absolutePath
-
-    member tcConfigB.AddLoadedSource(m, originalPath, pathLoadedFrom) =
-        if FileSystem.IsInvalidPathShim originalPath then
-            warning(Error(FSComp.SR.buildInvalidFilename originalPath, m))
-        else 
-            let path = 
-                match TryResolveFileUsingPaths(tcConfigB.includes @ [pathLoadedFrom], m, originalPath) with
-                | Some path -> path
-                | None ->
-                        // File doesn't exist in the paths. Assume it will be in the load-ed from directory.
-                        ComputeMakePathAbsolute pathLoadedFrom originalPath
-            if not (List.contains path (List.map (fun (_, _, path) -> path) tcConfigB.loadedSources)) then
-                tcConfigB.loadedSources <- tcConfigB.loadedSources ++ (m, originalPath, path)
-
-    member tcConfigB.AddEmbeddedSourceFile (file) = 
-        tcConfigB.embedSourceList <- tcConfigB.embedSourceList ++ file
-
-    member tcConfigB.AddEmbeddedResource filename =
-        tcConfigB.embedResources <- tcConfigB.embedResources ++ filename
-
-    member tcConfigB.AddCompilerToolsByPath (path) = 
-        if not (tcConfigB.compilerToolPaths  |> List.exists (fun text -> path = text)) then // NOTE: We keep same paths if range is different.
-            let compilerToolPath = tcConfigB.compilerToolPaths |> List.tryPick (fun text -> if text = path then Some text else None)
-            if compilerToolPath.IsNone then
-                tcConfigB.compilerToolPaths <- tcConfigB.compilerToolPaths ++ path
-
-    member tcConfigB.AddReferencedAssemblyByPath (m, path) = 
-        if FileSystem.IsInvalidPathShim path then
-            warning(Error(FSComp.SR.buildInvalidAssemblyName(path), m))
-        elif not (tcConfigB.referencedDLLs |> List.exists (fun ar2 -> Range.equals m ar2.Range && path=ar2.Text)) then // NOTE: We keep same paths if range is different.
-             let projectReference = tcConfigB.projectReferences |> List.tryPick (fun pr -> if pr.FileName = path then Some pr else None)
-             tcConfigB.referencedDLLs <- tcConfigB.referencedDLLs ++ AssemblyReference(m, path, projectReference)
-             
-    member tcConfigB.AddDependencyManagerText (packageManager:IDependencyManagerProvider, m, path:string) = 
-        let path = tcConfigB.dependencyProvider.RemoveDependencyManagerKey(packageManager.Key, path)
-
-        match tcConfigB.packageManagerLines |> Map.tryFind packageManager.Key with
-        | Some lines -> tcConfigB.packageManagerLines <- Map.add packageManager.Key (lines ++ (false, path, m)) tcConfigB.packageManagerLines
-        | _ -> tcConfigB.packageManagerLines <- Map.add packageManager.Key [false, path, m] tcConfigB.packageManagerLines
-
-    member tcConfigB.RemoveReferencedAssemblyByPath (m, path) =
-        tcConfigB.referencedDLLs <- tcConfigB.referencedDLLs |> List.filter (fun ar -> not (Range.equals ar.Range m) || ar.Text <> path)
-
-    member tcConfigB.AddPathMapping (oldPrefix, newPrefix) =
-        tcConfigB.pathMap <- tcConfigB.pathMap |> PathMap.addMapping oldPrefix newPrefix
-    
-    static member SplitCommandLineResourceInfo (ri: string) =
-        let p = ri.IndexOf ','
-        if p <> -1 then
-            let file = String.sub ri 0 p 
-            let rest = String.sub ri (p+1) (String.length ri - p - 1) 
-            let p = rest.IndexOf ',' 
-            if p <> -1 then
-                let name = String.sub rest 0 p+".resources" 
-                let pubpri = String.sub rest (p+1) (rest.Length - p - 1) 
-                if pubpri = "public" then file, name, ILResourceAccess.Public 
-                elif pubpri = "private" then file, name, ILResourceAccess.Private
-                else error(Error(FSComp.SR.buildInvalidPrivacy pubpri, rangeStartup))
-            else 
-                file, rest, ILResourceAccess.Public
-        else 
-            ri, fileNameOfPath ri, ILResourceAccess.Public 
-
-
-let OpenILBinary(filename, reduceMemoryUsage, pdbDirPath, shadowCopyReferences, tryGetMetadataSnapshot) =
-      let opts: ILReaderOptions = 
-          { metadataOnly = MetadataOnlyFlag.Yes
-            reduceMemoryUsage = reduceMemoryUsage
-            pdbDirPath = pdbDirPath
-            tryGetMetadataSnapshot = tryGetMetadataSnapshot } 
-                      
-      let location =
-#if FX_NO_APP_DOMAINS
-          // In order to use memory mapped files on the shadow copied version of the Assembly, we `preload the assembly
-          // We swallow all exceptions so that we do not change the exception contract of this API
-          if shadowCopyReferences then 
-            try
-              System.Reflection.Assembly.ReflectionOnlyLoadFrom(filename).Location
-            with e -> filename
-          else
-#else
-            ignore shadowCopyReferences
-#endif
-            filename
-      AssemblyReader.GetILModuleReader(location, opts)
-
-#if DEBUG
-[]
-#endif
-type AssemblyResolution = 
-    { originalReference: AssemblyReference
-      resolvedPath: string    
-      prepareToolTip: unit -> string
-      sysdir: bool 
-      mutable ilAssemblyRef: ILAssemblyRef option
-    }
-    override this.ToString() = sprintf "%s%s" (if this.sysdir then "[sys]" else "") this.resolvedPath
-
-    member this.ProjectReference = this.originalReference.ProjectReference
-
-    /// Compute the ILAssemblyRef for a resolved assembly. This is done by reading the binary if necessary. The result
-    /// is cached.
-    /// 
-    /// For project references in the language service, this would result in a build of the project.
-    /// This is because ``EvaluateRawContents ctok`` is used. However this path is only currently used
-    /// in fsi.fs, which does not use project references.
-    //
-    member this.GetILAssemblyRef(ctok, reduceMemoryUsage, tryGetMetadataSnapshot) = 
-      cancellable {
-        match this.ilAssemblyRef with 
-        | Some assemblyRef -> return assemblyRef
-        | None ->
-            let! assemblyRefOpt = 
-              cancellable {
-                match this.ProjectReference with 
-                | Some r ->   
-                    let! contents = r.EvaluateRawContents ctok
-                    match contents with 
-                    | None -> return None
-                    | Some contents -> 
-                        match contents.ILScopeRef with 
-                        | ILScopeRef.Assembly aref -> return Some aref
-                        | _ -> return None
-                | None -> return None
-              }
-            let assemblyRef = 
-                match assemblyRefOpt with 
-                | Some aref -> aref
-                | None -> 
-                    let readerSettings: ILReaderOptions = 
-                        { pdbDirPath=None
-                          reduceMemoryUsage = reduceMemoryUsage
-                          metadataOnly = MetadataOnlyFlag.Yes
-                          tryGetMetadataSnapshot = tryGetMetadataSnapshot } 
-                    use reader = OpenILModuleReader this.resolvedPath readerSettings
-                    mkRefToILAssembly reader.ILModuleDef.ManifestOfAssembly
-            this.ilAssemblyRef <- Some assemblyRef
-            return assemblyRef
-      }
-
-//----------------------------------------------------------------------------
-// Names to match up refs and defs for assemblies and modules
-//--------------------------------------------------------------------------
-
-let GetNameOfILModule (m: ILModuleDef) = 
-    match m.Manifest with 
-    | Some manifest -> manifest.Name
-    | None -> m.Name
-
-
-let MakeScopeRefForILModule (ilModule: ILModuleDef) = 
-    match ilModule.Manifest with 
-    | Some m -> ILScopeRef.Assembly (mkRefToILAssembly m)
-    | None -> ILScopeRef.Module (mkRefToILModule ilModule)
-
-let GetCustomAttributesOfILModule (ilModule: ILModuleDef) = 
-    (match ilModule.Manifest with Some m -> m.CustomAttrs | None -> ilModule.CustomAttrs).AsList 
-
-let GetAutoOpenAttributes ilg ilModule = 
-    ilModule |> GetCustomAttributesOfILModule |> List.choose (TryFindAutoOpenAttr ilg)
-
-let GetInternalsVisibleToAttributes ilg ilModule = 
-    ilModule |> GetCustomAttributesOfILModule |> List.choose (TryFindInternalsVisibleToAttr ilg)
-    
-//----------------------------------------------------------------------------
-// TcConfig 
-//--------------------------------------------------------------------------
-
-[]
-/// This type is immutable and must be kept as such. Do not extract or mutate the underlying data except by cloning it.
-type TcConfig private (data: TcConfigBuilder, validate: bool) =
-
-    // Validate the inputs - this helps ensure errors in options are shown in visual studio rather than only when built
-    // However we only validate a minimal number of options at the moment
-    do if validate then try data.version.GetVersionInfo(data.implicitIncludeDir) |> ignore with e -> errorR e 
-
-    // clone the input builder to ensure nobody messes with it.
-    let data = { data with pause = data.pause }
-
-    let computeKnownDllReference libraryName = 
-        let defaultCoreLibraryReference = AssemblyReference(range0, libraryName+".dll", None)
-        let nameOfDll(r: AssemblyReference) = 
-            let filename = ComputeMakePathAbsolute data.implicitIncludeDir r.Text
-            if FileSystem.SafeExists filename then 
-                r, Some filename
-            else
-                // If the file doesn't exist, let reference resolution logic report the error later...
-                defaultCoreLibraryReference, if Range.equals r.Range rangeStartup then Some(filename) else None
-        match data.referencedDLLs |> List.filter (fun assemblyReference -> assemblyReference.SimpleAssemblyNameIs libraryName) with
-        | [] -> defaultCoreLibraryReference, None
-        | [r]
-        | r :: _ -> nameOfDll r
-
-    // Look for an explicit reference to mscorlib/netstandard.dll or System.Runtime.dll and use that to compute clrRoot and targetFrameworkVersion
-    let primaryAssemblyReference, primaryAssemblyExplicitFilenameOpt = computeKnownDllReference(data.primaryAssembly.Name)
-    let fslibReference =
-        // Look for explicit FSharp.Core reference otherwise use version that was referenced by compiler
-        let dllReference, fileNameOpt = computeKnownDllReference getFSharpCoreLibraryName
-        match fileNameOpt with
-        | Some _ -> dllReference
-        | None -> AssemblyReference(range0, getDefaultFSharpCoreLocation, None)
-
-    // clrRoot: the location of the primary assembly (mscorlib.dll or netstandard.dll or System.Runtime.dll)
-    //
-    // targetFrameworkVersionValue: Normally just HighestInstalledNetFrameworkVersion()
-    //
-    // Note, when mscorlib.dll has been given explicitly the actual value of
-    // targetFrameworkVersion shouldn't matter since resolution has already happened.
-    // In those cases where it does matter (e.g. --noframework is not being used or we are processing further
-    // resolutions for a script) then it is correct to just use HighestInstalledNetFrameworkVersion().
-    let clrRootValue, targetFrameworkVersionValue = 
-        match primaryAssemblyExplicitFilenameOpt with
-        | Some primaryAssemblyFilename ->
-            let filename = ComputeMakePathAbsolute data.implicitIncludeDir primaryAssemblyFilename
-            try 
-                let clrRoot = Some(Path.GetDirectoryName(FileSystem.GetFullPathShim filename))
-                clrRoot, data.legacyReferenceResolver.HighestInstalledNetFrameworkVersion()
-            with e ->
-                // We no longer expect the above to fail but leaving this just in case
-                error(Error(FSComp.SR.buildErrorOpeningBinaryFile(filename, e.Message), rangeStartup))
-        | None ->
-#if !ENABLE_MONO_SUPPORT
-            // TODO: we have to get msbuild out of this
-            if data.useSimpleResolution then
-                None, ""
-            else
-#endif
-                None, data.legacyReferenceResolver.HighestInstalledNetFrameworkVersion()
-
-    let systemAssemblies = systemAssemblies
-
-    member x.primaryAssembly = data.primaryAssembly
-    member x.noFeedback = data.noFeedback
-    member x.stackReserveSize = data.stackReserveSize   
-    member x.implicitIncludeDir = data.implicitIncludeDir
-    member x.openDebugInformationForLaterStaticLinking = data.openDebugInformationForLaterStaticLinking
-    member x.fsharpBinariesDir = data.defaultFSharpBinariesDir
-    member x.compilingFslib = data.compilingFslib
-    member x.useIncrementalBuilder = data.useIncrementalBuilder
-    member x.includes = data.includes
-    member x.implicitOpens = data.implicitOpens
-    member x.useFsiAuxLib = data.useFsiAuxLib
-    member x.framework = data.framework
-    member x.implicitlyResolveAssemblies = data.implicitlyResolveAssemblies
-    member x.resolutionEnvironment = data.resolutionEnvironment
-    member x.light = data.light
-    member x.conditionalCompilationDefines = data.conditionalCompilationDefines
-    member x.loadedSources = data.loadedSources
-    member x.compilerToolPaths = data.compilerToolPaths
-    member x.referencedDLLs = data.referencedDLLs
-    member x.knownUnresolvedReferences = data.knownUnresolvedReferences
-    member x.clrRoot = clrRootValue
-    member x.reduceMemoryUsage = data.reduceMemoryUsage
-    member x.subsystemVersion = data.subsystemVersion
-    member x.useHighEntropyVA = data.useHighEntropyVA
-    member x.inputCodePage = data.inputCodePage
-    member x.embedResources = data.embedResources
-    member x.errorSeverityOptions = data.errorSeverityOptions
-    member x.mlCompatibility = data.mlCompatibility
-    member x.assumeNullOnImport = data.assumeNullOnImport
-    member x.checkNullness = data.checkNullness
-    member x.checkOverflow = data.checkOverflow
-    member x.showReferenceResolutions = data.showReferenceResolutions
-    member x.outputDir = data.outputDir
-    member x.outputFile = data.outputFile
-    member x.platform = data.platform
-    member x.prefer32Bit = data.prefer32Bit
-    member x.useSimpleResolution = data.useSimpleResolution
-    member x.target = data.target
-    member x.debuginfo = data.debuginfo
-    member x.testFlagEmitFeeFeeAs100001 = data.testFlagEmitFeeFeeAs100001
-    member x.dumpDebugInfo = data.dumpDebugInfo
-    member x.debugSymbolFile = data.debugSymbolFile
-    member x.typeCheckOnly = data.typeCheckOnly
-    member x.parseOnly = data.parseOnly
-    member x.importAllReferencesOnly = data.importAllReferencesOnly
-    member x.simulateException = data.simulateException
-    member x.printAst = data.printAst
-    member x.targetFrameworkVersion = targetFrameworkVersionValue
-    member x.tokenizeOnly = data.tokenizeOnly
-    member x.testInteractionParser = data.testInteractionParser
-    member x.reportNumDecls = data.reportNumDecls
-    member x.printSignature = data.printSignature
-    member x.printSignatureFile = data.printSignatureFile
-    member x.xmlDocOutputFile = data.xmlDocOutputFile
-    member x.stats = data.stats
-    member x.generateFilterBlocks = data.generateFilterBlocks
-    member x.signer = data.signer
-    member x.container = data.container
-    member x.delaysign = data.delaysign
-    member x.publicsign = data.publicsign
-    member x.version = data.version
-    member x.metadataVersion = data.metadataVersion
-    member x.standalone = data.standalone
-    member x.extraStaticLinkRoots = data.extraStaticLinkRoots
-    member x.noSignatureData = data.noSignatureData
-    member x.onlyEssentialOptimizationData = data.onlyEssentialOptimizationData
-    member x.useOptimizationDataFile = data.useOptimizationDataFile
-    member x.jitTracking = data.jitTracking
-    member x.portablePDB = data.portablePDB
-    member x.embeddedPDB = data.embeddedPDB
-    member x.embedAllSource = data.embedAllSource
-    member x.embedSourceList = data.embedSourceList
-    member x.sourceLink = data.sourceLink
-    member x.packageManagerLines  = data.packageManagerLines
-    member x.ignoreSymbolStoreSequencePoints = data.ignoreSymbolStoreSequencePoints
-    member x.internConstantStrings = data.internConstantStrings
-    member x.extraOptimizationIterations = data.extraOptimizationIterations
-    member x.win32res = data.win32res
-    member x.win32manifest = data.win32manifest
-    member x.includewin32manifest = data.includewin32manifest
-    member x.linkResources = data.linkResources
-    member x.showFullPaths = data.showFullPaths
-    member x.errorStyle = data.errorStyle
-    member x.utf8output = data.utf8output
-    member x.flatErrors = data.flatErrors
-    member x.maxErrors = data.maxErrors
-    member x.baseAddress = data.baseAddress
-    member x.checksumAlgorithm = data.checksumAlgorithm
- #if DEBUG
-    member x.showOptimizationData = data.showOptimizationData
-#endif
-    member x.showTerms = data.showTerms
-    member x.writeTermsToFiles = data.writeTermsToFiles
-    member x.doDetuple = data.doDetuple
-    member x.doTLR = data.doTLR
-    member x.doFinalSimplify = data.doFinalSimplify
-    member x.optSettings = data.optSettings
-    member x.emitTailcalls = data.emitTailcalls
-    member x.deterministic = data.deterministic
-    member x.pathMap = data.pathMap
-    member x.langVersion = data.langVersion
-    member x.preferredUiLang = data.preferredUiLang
-    member x.lcid = data.lcid
-    member x.optsOn = data.optsOn
-    member x.productNameForBannerText = data.productNameForBannerText
-    member x.showBanner = data.showBanner
-    member x.showTimes = data.showTimes
-    member x.showLoadedAssemblies = data.showLoadedAssemblies
-    member x.continueAfterParseFailure = data.continueAfterParseFailure
-#if !NO_EXTENSIONTYPING
-    member x.showExtensionTypeMessages = data.showExtensionTypeMessages
-#endif
-    member x.compilationThread = data.compilationThread
-    member x.pause = data.pause
-    member x.alwaysCallVirt = data.alwaysCallVirt
-    member x.noDebugData = data.noDebugData
-    member x.isInteractive = data.isInteractive
-    member x.isInvalidationSupported = data.isInvalidationSupported
-    member x.emitDebugInfoInQuotations = data.emitDebugInfoInQuotations
-    member x.copyFSharpCore = data.copyFSharpCore
-    member x.shadowCopyReferences = data.shadowCopyReferences
-    member x.useSdkRefs = data.useSdkRefs
-    member x.tryGetMetadataSnapshot = data.tryGetMetadataSnapshot
-    member x.internalTestSpanStackReferring = data.internalTestSpanStackReferring
-    member x.noConditionalErasure = data.noConditionalErasure
-
-    static member Create(builder, validate) = 
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        TcConfig(builder, validate)
-
-    member x.legacyReferenceResolver = data.legacyReferenceResolver
-
-    member x.dependencyProvider = data.dependencyProvider
-
-    member tcConfig.CloneOfOriginalBuilder = 
-        { data with conditionalCompilationDefines=data.conditionalCompilationDefines }
-
-    member tcConfig.ComputeCanContainEntryPoint(sourceFiles: string list) = 
-        let n = sourceFiles.Length in 
-        (sourceFiles |> List.mapi (fun i _ -> (i = n-1)), tcConfig.target.IsExe)
-            
-    // This call can fail if no CLR is found (this is the path to mscorlib)
-    member tcConfig.GetTargetFrameworkDirectories() = 
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        try 
-          [ 
-            // Check if we are given an explicit framework root - if so, use that
-            match tcConfig.clrRoot with 
-            | Some x ->
-                let clrRoot = tcConfig.MakePathAbsolute x
-                yield clrRoot
-                let clrFacades = Path.Combine(clrRoot, "Facades")
-                if Directory.Exists(clrFacades) then yield clrFacades
-
-            | None -> 
-// "there is no really good notion of runtime directory on .NETCore"
-#if NETSTANDARD
-                let runtimeRoot = Path.GetDirectoryName(typeof.Assembly.Location)
-#else
-                let runtimeRoot = System.Runtime.InteropServices.RuntimeEnvironment.GetRuntimeDirectory()
-#endif
-                let runtimeRootWithoutSlash = runtimeRoot.TrimEnd('/', '\\')
-                let runtimeRootFacades = Path.Combine(runtimeRootWithoutSlash, "Facades")
-                let runtimeRootWPF = Path.Combine(runtimeRootWithoutSlash, "WPF")
-
-                match tcConfig.resolutionEnvironment with
-                | ResolutionEnvironment.CompilationAndEvaluation ->
-                    // Default compilation-and-execution-time references on .NET Framework and Mono, e.g. for F# Interactive
-                    //
-                    // In the current way of doing things, F# Interactive refers to implementation assemblies.
-                    yield runtimeRoot
-                    if Directory.Exists runtimeRootFacades then
-                        yield runtimeRootFacades // System.Runtime.dll is in /usr/lib/mono/4.5/Facades
-                    if Directory.Exists runtimeRootWPF then
-                        yield runtimeRootWPF // PresentationCore.dll is in C:\Windows\Microsoft.NET\Framework\v4.0.30319\WPF
-
-                    match frameworkRefsPackDirectory with
-                    | Some path when Directory.Exists(path) ->
-                        yield path
-                    | _ -> ()
-
-                | ResolutionEnvironment.EditingOrCompilation _ ->
-#if ENABLE_MONO_SUPPORT
-                    if runningOnMono then 
-                        // Default compilation-time references on Mono
-                        //
-                        // On Mono, the default references come from the implementation assemblies.
-                        // This is because we have had trouble reliably using MSBuild APIs to compute DotNetFrameworkReferenceAssembliesRootDirectory on Mono.
-                        yield runtimeRoot
-                        if Directory.Exists runtimeRootFacades then
-                            yield runtimeRootFacades // System.Runtime.dll is in /usr/lib/mono/4.5/Facades
-                        if Directory.Exists runtimeRootWPF then
-                            yield runtimeRootWPF // PresentationCore.dll is in C:\Windows\Microsoft.NET\Framework\v4.0.30319\WPF
-                        // On Mono we also add a default reference to the 4.5-api and 4.5-api/Facades directories.  
-                        let runtimeRootApi = runtimeRootWithoutSlash + "-api"
-                        let runtimeRootApiFacades = Path.Combine(runtimeRootApi, "Facades")
-                        if Directory.Exists runtimeRootApi then
-                            yield runtimeRootApi
-                        if Directory.Exists runtimeRootApiFacades then
-                             yield runtimeRootApiFacades
-                    else                                
-#endif
-                        // Default compilation-time references on .NET Framework
-                        //
-                        // This is the normal case for "fsc.exe a.fs". We refer to the reference assemblies folder.
-                        let frameworkRoot = tcConfig.legacyReferenceResolver.DotNetFrameworkReferenceAssembliesRootDirectory
-                        let frameworkRootVersion = Path.Combine(frameworkRoot, tcConfig.targetFrameworkVersion)
-                        yield frameworkRootVersion
-                        let facades = Path.Combine(frameworkRootVersion, "Facades")
-                        if Directory.Exists facades then
-                            yield facades
-                        match frameworkRefsPackDirectory with
-                        | Some path when Directory.Exists(path) ->
-                            yield path
-                        | _ -> ()
-                  ]
-        with e -> 
-            errorRecovery e range0; [] 
-
-    member tcConfig.ComputeLightSyntaxInitialStatus filename = 
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        let lower = String.lowercase filename
-        let lightOnByDefault = List.exists (Filename.checkSuffix lower) FSharpLightSyntaxFileSuffixes
-        if lightOnByDefault then (tcConfig.light <> Some false) else (tcConfig.light = Some true )
-
-    member tcConfig.GetAvailableLoadedSources() =
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        let resolveLoadedSource (m, originalPath, path) =
-            try
-                if not(FileSystem.SafeExists(path)) then 
-                    let secondTrial = 
-                        tcConfig.includes
-                        |> List.tryPick (fun root ->
-                            let path = ComputeMakePathAbsolute root originalPath
-                            if FileSystem.SafeExists(path) then Some path else None)
-
-                    match secondTrial with
-                    | Some path -> Some(m,path)
-                    | None ->
-                        error(LoadedSourceNotFoundIgnoring(path,m))
-                        None
-                else Some(m,path)
-            with e -> errorRecovery e m; None
-
-        tcConfig.loadedSources 
-        |> List.choose resolveLoadedSource 
-        |> List.distinct     
-
-    /// A closed set of assemblies where, for any subset S:
-    ///    - the TcImports object built for S (and thus the F# Compiler CCUs for the assemblies in S) 
-    ///       is a resource that can be shared between any two IncrementalBuild objects that reference
-    ///       precisely S
-    ///
-    /// Determined by looking at the set of assemblies referenced by f# .
-    ///
-    /// Returning true may mean that the file is locked and/or placed into the
-    /// 'framework' reference set that is potentially shared across multiple compilations.
-    member tcConfig.IsSystemAssembly (filename: string) =
-        try
-            FileSystem.SafeExists filename &&
-            ((tcConfig.GetTargetFrameworkDirectories() |> List.exists (fun clrRoot -> clrRoot = Path.GetDirectoryName filename)) ||
-             (systemAssemblies.Contains (fileNameWithoutExtension filename)) ||
-             isInReferenceAssemblyPackDirectory filename)
-        with _ ->
-            false
-
-    // This is not the complete set of search paths, it is just the set 
-    // that is special to F# (as compared to MSBuild resolution)
-    member tcConfig.GetSearchPathsForLibraryFiles() = 
-        [ yield! tcConfig.GetTargetFrameworkDirectories()
-          yield! List.map (tcConfig.MakePathAbsolute) tcConfig.includes
-          yield tcConfig.implicitIncludeDir 
-          yield tcConfig.fsharpBinariesDir ]
-
-    member tcConfig.MakePathAbsolute path = 
-        let result = ComputeMakePathAbsolute tcConfig.implicitIncludeDir path
-        result
-
-    member tcConfig.TryResolveLibWithDirectories (r: AssemblyReference) = 
-        let m, nm = r.Range, r.Text
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        // Only want to resolve certain extensions (otherwise, 'System.Xml' is ambiguous).
-        // MSBuild resolution is limited to .exe and .dll so do the same here.
-        let ext = System.IO.Path.GetExtension nm
-        let isNetModule = String.Compare(ext, ".netmodule", StringComparison.OrdinalIgnoreCase)=0 
-        
-        // See if the language service has already produced the contents of the assembly for us, virtually
-        match r.ProjectReference with 
-        | Some _ -> 
-            let resolved = r.Text
-            let sysdir = tcConfig.IsSystemAssembly resolved
-            Some
-                { originalReference = r
-                  resolvedPath = resolved
-                  prepareToolTip = (fun () -> resolved)
-                  sysdir = sysdir
-                  ilAssemblyRef = None }
-        | None -> 
-
-        if String.Compare(ext, ".dll", StringComparison.OrdinalIgnoreCase)=0 
-           || String.Compare(ext, ".exe", StringComparison.OrdinalIgnoreCase)=0 
-           || isNetModule then
-
-            let searchPaths =
-                // if this is a #r reference (not from dummy range), make sure the directory of the declaring
-                // file is included in the search path. This should ideally already be one of the search paths, but
-                // during some global checks it won't be. We append to the end of the search list so that this is the last
-                // place that is checked.
-                let isPoundRReference (r: range) =
-                    not (Range.equals r range0) &&
-                    not (Range.equals r rangeStartup) &&
-                    not (Range.equals r rangeCmdArgs) &&
-                    FileSystem.IsPathRootedShim r.FileName
-
-                if isPoundRReference m then
-                    tcConfig.GetSearchPathsForLibraryFiles() @ [Path.GetDirectoryName(m.FileName)]
-                else    
-                    tcConfig.GetSearchPathsForLibraryFiles()
-
-            let resolved = TryResolveFileUsingPaths(searchPaths, m, nm)
-            match resolved with 
-            | Some resolved -> 
-                let sysdir = tcConfig.IsSystemAssembly resolved
-                Some
-                    { originalReference = r
-                      resolvedPath = resolved
-                      prepareToolTip = (fun () -> 
-                            let fusionName = System.Reflection.AssemblyName.GetAssemblyName(resolved).ToString()
-                            let line(append: string) = append.Trim([|' '|])+"\n"
-                            line resolved + line fusionName)
-                      sysdir = sysdir
-                      ilAssemblyRef = None }
-            | None -> None
-        else None
-
-    member tcConfig.ResolveLibWithDirectories (ccuLoadFailureAction, r: AssemblyReference) =
-        let m, nm = r.Range, r.Text
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        // test for both libraries and executables
-        let ext = System.IO.Path.GetExtension nm
-        let isExe = (String.Compare(ext, ".exe", StringComparison.OrdinalIgnoreCase) = 0)
-        let isDLL = (String.Compare(ext, ".dll", StringComparison.OrdinalIgnoreCase) = 0)
-        let isNetModule = (String.Compare(ext, ".netmodule", StringComparison.OrdinalIgnoreCase) = 0)
-
-        let rs = 
-            if isExe || isDLL || isNetModule then
-                [r]
-            else
-                [AssemblyReference(m, nm+".dll", None);AssemblyReference(m, nm+".exe", None);AssemblyReference(m, nm+".netmodule", None)]
-
-        match rs |> List.tryPick (fun r -> tcConfig.TryResolveLibWithDirectories r) with
-        | Some res -> Some res
-        | None ->
-            match ccuLoadFailureAction with
-            | CcuLoadFailureAction.RaiseError ->
-                let searchMessage = String.concat "\n " (tcConfig.GetSearchPathsForLibraryFiles())
-                raise (FileNameNotResolved(nm, searchMessage, m))
-            | CcuLoadFailureAction.ReturnNone -> None
-
-    member tcConfig.ResolveSourceFile(m, nm, pathLoadedFrom) = 
-        data.ResolveSourceFile(m, nm, pathLoadedFrom)
-
-    // NOTE!! if mode=Speculative then this method must not report ANY warnings or errors through 'warning' or 'error'. Instead
-    // it must return warnings and errors as data
-    //
-    // NOTE!! if mode=ReportErrors then this method must not raise exceptions. It must just report the errors and recover
-    static member TryResolveLibsUsingMSBuildRules (tcConfig: TcConfig, 
-            originalReferences: AssemblyReference list,
-            errorAndWarningRange: range,
-            mode: ResolveAssemblyReferenceMode) : AssemblyResolution list * UnresolvedAssemblyReference list =
-
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-        if tcConfig.useSimpleResolution then
-            failwith "MSBuild resolution is not supported."
-        if originalReferences=[] then [], []
-        else            
-            // Group references by name with range values in the grouped value list.
-            // In the grouped reference, store the index of the last use of the reference.
-            let groupedReferences = 
-                originalReferences
-                |> List.indexed
-                |> Seq.groupBy(fun (_, reference) -> reference.Text)
-                |> Seq.map(fun (assemblyName, assemblyAndIndexGroup)->
-                    let assemblyAndIndexGroup = assemblyAndIndexGroup |> List.ofSeq
-                    let highestPosition = assemblyAndIndexGroup |> List.maxBy fst |> fst
-                    let assemblyGroup = assemblyAndIndexGroup |> List.map snd
-                    assemblyName, highestPosition, assemblyGroup)
-                |> Array.ofSeq
-
-            let logMessage showMessages = 
-                if showMessages && tcConfig.showReferenceResolutions then (fun (message: string)->dprintf "%s\n" message)
-                else ignore
-
-            let logDiagnostic showMessages = 
-                (fun isError code message->
-                    if showMessages && mode = ResolveAssemblyReferenceMode.ReportErrors then 
-                      if isError then
-                        errorR(MSBuildReferenceResolutionError(code, message, errorAndWarningRange))
-                      else
-                        match code with 
-                        // These are warnings that mean 'not resolved' for some assembly.
-                        // Note that we don't get to know the name of the assembly that couldn't be resolved.
-                        // Ignore these and rely on the logic below to emit an error for each unresolved reference.
-                        | "MSB3246" // Resolved file has a bad image, no metadata, or is otherwise inaccessible.
-                        | "MSB3106"  
-                            -> ()
-                        | _ -> 
-                            if code = "MSB3245" then 
-                                errorR(MSBuildReferenceResolutionWarning(code, message, errorAndWarningRange))
-                            else
-                                warning(MSBuildReferenceResolutionWarning(code, message, errorAndWarningRange)))
-
-            let targetProcessorArchitecture = 
-                    match tcConfig.platform with
-                    | None -> "MSIL"
-                    | Some X86 -> "x86"
-                    | Some AMD64 -> "amd64"
-                    | Some IA64 -> "ia64"
-
-            // First, try to resolve everything as a file using simple resolution
-            let resolvedAsFile = 
-                groupedReferences 
-                |> Array.map(fun (_filename, maxIndexOfReference, references)->
-                                let assemblyResolution = references |> List.choose (fun r -> tcConfig.TryResolveLibWithDirectories r)
-                                (maxIndexOfReference, assemblyResolution))  
-                |> Array.filter(fun (_, refs)->refs |> isNil |> not)
-                
-                                       
-            // Whatever is left, pass to MSBuild.
-            let Resolve(references, showMessages) =
-                try 
-                    tcConfig.legacyReferenceResolver.Resolve
-                       (tcConfig.resolutionEnvironment, 
-                        references, 
-                        tcConfig.targetFrameworkVersion, 
-                        tcConfig.GetTargetFrameworkDirectories(), 
-                        targetProcessorArchitecture, 
-                        tcConfig.fsharpBinariesDir, // FSharp binaries directory
-                        tcConfig.includes, // Explicit include directories
-                        tcConfig.implicitIncludeDir, // Implicit include directory (likely the project directory)
-                        logMessage showMessages, logDiagnostic showMessages)
-                with 
-                    ReferenceResolver.ResolutionFailure -> error(Error(FSComp.SR.buildAssemblyResolutionFailed(), errorAndWarningRange))
-            
-            let toMsBuild = [|0..groupedReferences.Length-1|] 
-                             |> Array.map(fun i->(p13 groupedReferences.[i]), (p23 groupedReferences.[i]), i) 
-                             |> Array.filter (fun (_, i0, _)->resolvedAsFile|>Array.exists(fun (i1, _) -> i0=i1)|>not)
-                             |> Array.map(fun (ref, _, i)->ref, string i)
-
-            let resolutions = Resolve(toMsBuild, (*showMessages*)true)  
-
-            // Map back to original assembly resolutions.
-            let resolvedByMsbuild = 
-                resolutions
-                    |> Array.map(fun resolvedFile -> 
-                                    let i = int resolvedFile.baggage
-                                    let _, maxIndexOfReference, ms = groupedReferences.[i]
-                                    let assemblyResolutions =
-                                        ms|>List.map(fun originalReference ->
-                                                    System.Diagnostics.Debug.Assert(FileSystem.IsPathRootedShim(resolvedFile.itemSpec), sprintf "msbuild-resolved path is not absolute: '%s'" resolvedFile.itemSpec)
-                                                    let canonicalItemSpec = FileSystem.GetFullPathShim(resolvedFile.itemSpec)
-                                                    { originalReference=originalReference 
-                                                      resolvedPath=canonicalItemSpec 
-                                                      prepareToolTip = (fun () -> resolvedFile.prepareToolTip (originalReference.Text, canonicalItemSpec))
-                                                      sysdir= tcConfig.IsSystemAssembly canonicalItemSpec
-                                                      ilAssemblyRef = None })
-                                    (maxIndexOfReference, assemblyResolutions))
-
-            // When calculating the resulting resolutions, we're going to use the index of the reference
-            // in the original specification and resort it to match the ordering that we had.
-            let resultingResolutions =
-                    [resolvedByMsbuild;resolvedAsFile]
-                    |> Array.concat                                  
-                    |> Array.sortBy fst
-                    |> Array.map snd
-                    |> List.ofArray
-                    |> List.concat                                                 
-                    
-            // O(N^2) here over a small set of referenced assemblies.
-            let IsResolved(originalName: string) =
-                if resultingResolutions |> List.exists(fun resolution -> resolution.originalReference.Text = originalName) then true
-                else 
-                    // MSBuild resolution may have unified the result of two duplicate references. Try to re-resolve now.
-                    // If re-resolution worked then this was a removed duplicate.
-                    Resolve([|originalName, ""|], (*showMessages*)false).Length<>0 
-                    
-            let unresolvedReferences =                     
-                    groupedReferences 
-                    //|> Array.filter(p13 >> IsNotFileOrIsAssembly)
-                    |> Array.filter(p13 >> IsResolved >> not)   
-                    |> List.ofArray                 
-
-            // If mode=Speculative, then we haven't reported any errors.
-            // We report the error condition by returning an empty list of resolutions
-            if mode = ResolveAssemblyReferenceMode.Speculative && (List.length unresolvedReferences) > 0 then 
-                [], (List.ofArray groupedReferences) |> List.map (fun (name, _, r) -> (name, r)) |> List.map UnresolvedAssemblyReference
-            else 
-                resultingResolutions, unresolvedReferences |> List.map (fun (name, _, r) -> (name, r)) |> List.map UnresolvedAssemblyReference    
-
-    member tcConfig.PrimaryAssemblyDllReference() = primaryAssemblyReference
-
-    member tcConfig.CoreLibraryDllReference() = fslibReference
-
-
-let ReportWarning options err = 
-    warningOn err (options.WarnLevel) (options.WarnOn) && not (List.contains (GetDiagnosticNumber err) (options.WarnOff))
-
-let ReportWarningAsError options err =
-    warningOn err (options.WarnLevel) (options.WarnOn) &&
-    not (List.contains (GetDiagnosticNumber err) (options.WarnAsWarn)) &&
-    ((options.GlobalWarnAsError && not (List.contains (GetDiagnosticNumber err) options.WarnOff)) ||
-     List.contains (GetDiagnosticNumber err) (options.WarnAsError))
-
-//----------------------------------------------------------------------------
-// Scoped #nowarn pragmas
-
-
-let GetScopedPragmasForHashDirective hd = 
-    [ match hd with 
-      | ParsedHashDirective("nowarn", numbers, m) ->
-          for s in numbers do
-          match GetWarningNumber(m, s) with 
-            | None -> ()
-            | Some n -> yield ScopedPragma.WarningOff(m, n) 
-      | _ -> () ]
-
-
-let GetScopedPragmasForInput input = 
-
-    match input with 
-    | ParsedInput.SigFile (ParsedSigFileInput (scopedPragmas=pragmas)) -> pragmas
-    | ParsedInput.ImplFile (ParsedImplFileInput (scopedPragmas=pragmas)) -> pragmas
-
-
-
-/// Build an ErrorLogger that delegates to another ErrorLogger but filters warnings turned off by the given pragma declarations
-//
-// NOTE: we allow a flag to turn of strict file checking. This is because file names sometimes don't match due to use of 
-// #line directives, e.g. for pars.fs/pars.fsy. In this case we just test by line number - in most cases this is sufficient
-// because we install a filtering error handler on a file-by-file basis for parsing and type-checking.
-// However this is indicative of a more systematic problem where source-line 
-// sensitive operations (lexfilter and warning filtering) do not always
-// interact well with #line directives.
-type ErrorLoggerFilteringByScopedPragmas (checkFile, scopedPragmas, errorLogger: ErrorLogger) =
-    inherit ErrorLogger("ErrorLoggerFilteringByScopedPragmas")
-
-    override x.DiagnosticSink (phasedError, isError) = 
-        if isError then 
-            errorLogger.DiagnosticSink (phasedError, isError)
-        else 
-          let report = 
-            let warningNum = GetDiagnosticNumber phasedError
-            match GetRangeOfDiagnostic phasedError with 
-            | Some m -> 
-                not (scopedPragmas |> List.exists (fun pragma ->
-                    match pragma with 
-                    | ScopedPragma.WarningOff(pragmaRange, warningNumFromPragma) -> 
-                        warningNum = warningNumFromPragma && 
-                        (not checkFile || m.FileIndex = pragmaRange.FileIndex) &&
-                        Range.posGeq m.Start pragmaRange.Start))  
-            | None -> true
-          if report then errorLogger.DiagnosticSink(phasedError, false)
-
-    override x.ErrorCount = errorLogger.ErrorCount
-
-let GetErrorLoggerFilteringByScopedPragmas(checkFile, scopedPragmas, errorLogger) = 
-    (ErrorLoggerFilteringByScopedPragmas(checkFile, scopedPragmas, errorLogger) :> ErrorLogger)
-
-
-//----------------------------------------------------------------------------
-// Parsing
-//--------------------------------------------------------------------------
-
-
-let CanonicalizeFilename filename = 
-    let basic = fileNameOfPath filename
-    String.capitalize (try Filename.chopExtension basic with _ -> basic)
-
-let IsScript filename = 
-    let lower = String.lowercase filename 
-    FSharpScriptFileSuffixes |> List.exists (Filename.checkSuffix lower)
-    
-// Give a unique name to the different kinds of inputs. Used to correlate signature and implementation files
-//   QualFileNameOfModuleName - files with a single module declaration or an anonymous module
-let QualFileNameOfModuleName m filename modname = QualifiedNameOfFile(mkSynId m (textOfLid modname + (if IsScript filename then "$fsx" else "")))
-let QualFileNameOfFilename m filename = QualifiedNameOfFile(mkSynId m (CanonicalizeFilename filename + (if IsScript filename then "$fsx" else "")))
-
-// Interactive fragments
-let ComputeQualifiedNameOfFileFromUniquePath (m, p: string list) = QualifiedNameOfFile(mkSynId m (String.concat "_" p))
-
-let QualFileNameOfSpecs filename specs = 
-    match specs with 
-    | [SynModuleOrNamespaceSig(modname, _, kind, _, _, _, _, m)] when kind.IsModule -> QualFileNameOfModuleName m filename modname
-    | [SynModuleOrNamespaceSig(_, _, kind, _, _, _, _, m)] when not kind.IsModule -> QualFileNameOfFilename m filename
-    | _ -> QualFileNameOfFilename (mkRange filename pos0 pos0) filename
-
-let QualFileNameOfImpls filename specs = 
-    match specs with 
-    | [SynModuleOrNamespace(modname, _, kind, _, _, _, _, m)] when kind.IsModule -> QualFileNameOfModuleName m filename modname
-    | [SynModuleOrNamespace(_, _, kind, _, _, _, _, m)] when not kind.IsModule -> QualFileNameOfFilename m filename
-    | _ -> QualFileNameOfFilename (mkRange filename pos0 pos0) filename
-
-let PrependPathToQualFileName x (QualifiedNameOfFile q) = ComputeQualifiedNameOfFileFromUniquePath (q.idRange, pathOfLid x@[q.idText])
-let PrependPathToImpl x (SynModuleOrNamespace(p, b, c, d, e, f, g, h)) = SynModuleOrNamespace(x@p, b, c, d, e, f, g, h)
-let PrependPathToSpec x (SynModuleOrNamespaceSig(p, b, c, d, e, f, g, h)) = SynModuleOrNamespaceSig(x@p, b, c, d, e, f, g, h)
-
-let PrependPathToInput x inp = 
-    match inp with 
-    | ParsedInput.ImplFile (ParsedImplFileInput (b, c, q, d, hd, impls, e)) ->
-        ParsedInput.ImplFile (ParsedImplFileInput (b, c, PrependPathToQualFileName x q, d, hd, List.map (PrependPathToImpl x) impls, e))
-
-    | ParsedInput.SigFile (ParsedSigFileInput (b, q, d, hd, specs)) ->
-        ParsedInput.SigFile (ParsedSigFileInput (b, PrependPathToQualFileName x q, d, hd, List.map (PrependPathToSpec x) specs))
-
-let ComputeAnonModuleName check defaultNamespace filename (m: range) = 
-    let modname = CanonicalizeFilename filename
-    if check && not (modname |> String.forall (fun c -> System.Char.IsLetterOrDigit c || c = '_')) then
-          if not (filename.EndsWith("fsx", StringComparison.OrdinalIgnoreCase) || filename.EndsWith("fsscript", StringComparison.OrdinalIgnoreCase)) then
-              warning(Error(FSComp.SR.buildImplicitModuleIsNotLegalIdentifier(modname, (fileNameOfPath filename)), m))
-    let combined = 
-      match defaultNamespace with 
-      | None -> modname
-      | Some ns -> textOfPath [ns;modname]
-
-    let anonymousModuleNameRange =
-        let filename = m.FileName
-        mkRange filename pos0 pos0
-    pathToSynLid anonymousModuleNameRange (splitNamespace combined)
-
-let PostParseModuleImpl (_i, defaultNamespace, isLastCompiland, filename, impl) = 
-    match impl with 
-    | ParsedImplFileFragment.NamedModule(SynModuleOrNamespace(lid, isRec, kind, decls, xmlDoc, attribs, access, m)) -> 
-        let lid = 
-            match lid with 
-            | [id] when kind.IsModule && id.idText = MangledGlobalName ->
-                error(Error(FSComp.SR.buildInvalidModuleOrNamespaceName(), id.idRange))
-            | id :: rest when id.idText = MangledGlobalName -> rest
-            | _ -> lid
-        SynModuleOrNamespace(lid, isRec, kind, decls, xmlDoc, attribs, access, m)
-
-    | ParsedImplFileFragment.AnonModule (defs, m)-> 
-        let isLast, isExe = isLastCompiland 
-        let lower = String.lowercase filename
-        if not (isLast && isExe) && not (doNotRequireNamespaceOrModuleSuffixes |> List.exists (Filename.checkSuffix lower)) then
-            match defs with
-            | SynModuleDecl.NestedModule(_) :: _ -> errorR(Error(FSComp.SR.noEqualSignAfterModule(), trimRangeToLine m))
-            | _ -> errorR(Error(FSComp.SR.buildMultiFileRequiresNamespaceOrModule(), trimRangeToLine m))
-
-        let modname = ComputeAnonModuleName (not (isNil defs)) defaultNamespace filename (trimRangeToLine m)
-        SynModuleOrNamespace(modname, false, AnonModule, defs, PreXmlDoc.Empty, [], None, m)
-
-    | ParsedImplFileFragment.NamespaceFragment (lid, a, kind, c, d, e, m)-> 
-        let lid, kind = 
-            match lid with 
-            | id :: rest when id.idText = MangledGlobalName ->
-                rest, if List.isEmpty rest then GlobalNamespace else kind
-            | _ -> lid, kind
-        SynModuleOrNamespace(lid, a, kind, c, d, e, None, m)
-
-let PostParseModuleSpec (_i, defaultNamespace, isLastCompiland, filename, intf) = 
-    match intf with 
-    | ParsedSigFileFragment.NamedModule(SynModuleOrNamespaceSig(lid, isRec, kind, decls, xmlDoc, attribs, access, m)) -> 
-        let lid = 
-            match lid with 
-            | [id] when kind.IsModule && id.idText = MangledGlobalName ->
-                error(Error(FSComp.SR.buildInvalidModuleOrNamespaceName(), id.idRange))
-            | id :: rest when id.idText = MangledGlobalName -> rest
-            | _ -> lid
-        SynModuleOrNamespaceSig(lid, isRec, NamedModule, decls, xmlDoc, attribs, access, m)
-
-    | ParsedSigFileFragment.AnonModule (defs, m) -> 
-        let isLast, isExe = isLastCompiland
-        let lower = String.lowercase filename
-        if not (isLast && isExe) && not (doNotRequireNamespaceOrModuleSuffixes |> List.exists (Filename.checkSuffix lower)) then 
-            match defs with
-            | SynModuleSigDecl.NestedModule(_) :: _ -> errorR(Error(FSComp.SR.noEqualSignAfterModule(), m))
-            | _ -> errorR(Error(FSComp.SR.buildMultiFileRequiresNamespaceOrModule(), m))
-
-        let modname = ComputeAnonModuleName (not (isNil defs)) defaultNamespace filename (trimRangeToLine m)
-        SynModuleOrNamespaceSig(modname, false, AnonModule, defs, PreXmlDoc.Empty, [], None, m)
-
-    | ParsedSigFileFragment.NamespaceFragment (lid, a, kind, c, d, e, m)-> 
-        let lid, kind = 
-            match lid with 
-            | id :: rest when id.idText = MangledGlobalName ->
-                rest, if List.isEmpty rest then GlobalNamespace else kind
-            | _ -> lid, kind
-        SynModuleOrNamespaceSig(lid, a, kind, c, d, e, None, m)
-
-
-
-let PostParseModuleImpls (defaultNamespace, filename, isLastCompiland, ParsedImplFile (hashDirectives, impls)) = 
-    match impls |> List.rev |> List.tryPick (function ParsedImplFileFragment.NamedModule(SynModuleOrNamespace(lid, _, _, _, _, _, _, _)) -> Some lid | _ -> None) with
-    | Some lid when impls.Length > 1 -> 
-        errorR(Error(FSComp.SR.buildMultipleToplevelModules(), rangeOfLid lid))
-    | _ -> 
-        ()
-    let impls = impls |> List.mapi (fun i x -> PostParseModuleImpl (i, defaultNamespace, isLastCompiland, filename, x)) 
-    let qualName = QualFileNameOfImpls filename impls
-    let isScript = IsScript filename
-
-    let scopedPragmas = 
-        [ for (SynModuleOrNamespace(_, _, _, decls, _, _, _, _)) in impls do 
-            for d in decls do
-                match d with 
-                | SynModuleDecl.HashDirective (hd, _) -> yield! GetScopedPragmasForHashDirective hd
-                | _ -> () 
-          for hd in hashDirectives do 
-              yield! GetScopedPragmasForHashDirective hd ]
-    ParsedInput.ImplFile (ParsedImplFileInput (filename, isScript, qualName, scopedPragmas, hashDirectives, impls, isLastCompiland))
-  
-let PostParseModuleSpecs (defaultNamespace, filename, isLastCompiland, ParsedSigFile (hashDirectives, specs)) = 
-    match specs |> List.rev |> List.tryPick (function ParsedSigFileFragment.NamedModule(SynModuleOrNamespaceSig(lid, _, _, _, _, _, _, _)) -> Some lid | _ -> None) with
-    | Some lid when specs.Length > 1 -> 
-        errorR(Error(FSComp.SR.buildMultipleToplevelModules(), rangeOfLid lid))
-    | _ -> 
-        ()
-        
-    let specs = specs |> List.mapi (fun i x -> PostParseModuleSpec(i, defaultNamespace, isLastCompiland, filename, x)) 
-    let qualName = QualFileNameOfSpecs filename specs
-    let scopedPragmas = 
-        [ for (SynModuleOrNamespaceSig(_, _, _, decls, _, _, _, _)) in specs do 
-            for d in decls do
-                match d with 
-                | SynModuleSigDecl.HashDirective(hd, _) -> yield! GetScopedPragmasForHashDirective hd
-                | _ -> () 
-          for hd in hashDirectives do 
-              yield! GetScopedPragmasForHashDirective hd ]
-
-    ParsedInput.SigFile (ParsedSigFileInput (filename, qualName, scopedPragmas, hashDirectives, specs))
-
-type ModuleNamesDict = Map>
-
-/// Checks if a module name is already given and deduplicates the name if needed.
-let DeduplicateModuleName (moduleNamesDict: ModuleNamesDict) fileName (qualNameOfFile: QualifiedNameOfFile) =
-    let path = Path.GetDirectoryName fileName
-    let path = if FileSystem.IsPathRootedShim path then try FileSystem.GetFullPathShim path with _ -> path else path
-    match moduleNamesDict.TryGetValue qualNameOfFile.Text with
-    | true, paths ->
-        if paths.ContainsKey path then 
-            paths.[path], moduleNamesDict
-        else
-            let count = paths.Count + 1
-            let id = qualNameOfFile.Id
-            let qualNameOfFileT = if count = 1 then qualNameOfFile else QualifiedNameOfFile(Ident(id.idText + "___" + count.ToString(), id.idRange))
-            let moduleNamesDictT = moduleNamesDict.Add(qualNameOfFile.Text, paths.Add(path, qualNameOfFileT))
-            qualNameOfFileT, moduleNamesDictT
-    | _ ->
-        let moduleNamesDictT = moduleNamesDict.Add(qualNameOfFile.Text, Map.empty.Add(path, qualNameOfFile))
-        qualNameOfFile, moduleNamesDictT
-
-/// Checks if a ParsedInput is using a module name that was already given and deduplicates the name if needed.
-let DeduplicateParsedInputModuleName (moduleNamesDict: ModuleNamesDict) input =
-    match input with
-    | ParsedInput.ImplFile (ParsedImplFileInput.ParsedImplFileInput (fileName, isScript, qualNameOfFile, scopedPragmas, hashDirectives, modules, (isLastCompiland, isExe))) ->
-        let qualNameOfFileT, moduleNamesDictT = DeduplicateModuleName moduleNamesDict fileName qualNameOfFile
-        let inputT = ParsedInput.ImplFile (ParsedImplFileInput.ParsedImplFileInput (fileName, isScript, qualNameOfFileT, scopedPragmas, hashDirectives, modules, (isLastCompiland, isExe)))
-        inputT, moduleNamesDictT
-    | ParsedInput.SigFile (ParsedSigFileInput.ParsedSigFileInput (fileName, qualNameOfFile, scopedPragmas, hashDirectives, modules)) ->
-        let qualNameOfFileT, moduleNamesDictT = DeduplicateModuleName moduleNamesDict fileName qualNameOfFile
-        let inputT = ParsedInput.SigFile (ParsedSigFileInput.ParsedSigFileInput (fileName, qualNameOfFileT, scopedPragmas, hashDirectives, modules))
-        inputT, moduleNamesDictT
-
-let ParseInput (lexer, errorLogger: ErrorLogger, lexbuf: UnicodeLexing.Lexbuf, defaultNamespace, filename, isLastCompiland) = 
-    // The assert below is almost ok, but it fires in two cases:
-    //  - fsi.exe sometimes passes "stdin" as a dummy filename
-    //  - if you have a #line directive, e.g. 
-    //        # 1000 "Line01.fs"
-    //    then it also asserts. But these are edge cases that can be fixed later, e.g. in bug 4651.
-    //System.Diagnostics.Debug.Assert(System.IO.Path.IsPathRooted filename, sprintf "should be absolute: '%s'" filename)
-    let lower = String.lowercase filename 
-    // Delay sending errors and warnings until after the file is parsed. This gives us a chance to scrape the
-    // #nowarn declarations for the file
-    let delayLogger = CapturingErrorLogger("Parsing")
-    use unwindEL = PushErrorLoggerPhaseUntilUnwind (fun _ -> delayLogger)
-    use unwindBP = PushThreadBuildPhaseUntilUnwind BuildPhase.Parse
-    let mutable scopedPragmas = []
-    try     
-        let input = 
-            if mlCompatSuffixes |> List.exists (Filename.checkSuffix lower) then  
-                mlCompatWarning (FSComp.SR.buildCompilingExtensionIsForML()) rangeStartup 
-
-            if FSharpImplFileSuffixes |> List.exists (Filename.checkSuffix lower) then  
-                let impl = Parser.implementationFile lexer lexbuf 
-                PostParseModuleImpls (defaultNamespace, filename, isLastCompiland, impl)
-            elif FSharpSigFileSuffixes |> List.exists (Filename.checkSuffix lower) then  
-                let intfs = Parser.signatureFile lexer lexbuf 
-                PostParseModuleSpecs (defaultNamespace, filename, isLastCompiland, intfs)
-            else 
-                delayLogger.Error(Error(FSComp.SR.buildInvalidSourceFileExtension filename, Range.rangeStartup))
-        scopedPragmas <- GetScopedPragmasForInput input
-        input
-    finally
-        // OK, now commit the errors, since the ScopedPragmas will (hopefully) have been scraped
-        let filteringErrorLogger = ErrorLoggerFilteringByScopedPragmas(false, scopedPragmas, errorLogger)
-        delayLogger.CommitDelayedDiagnostics filteringErrorLogger
-
-//----------------------------------------------------------------------------
-// parsing - ParseOneInputFile
-// Filename is (ml/mli/fs/fsi source). Parse it to AST. 
-//----------------------------------------------------------------------------
-let ParseOneInputLexbuf (tcConfig: TcConfig, lexResourceManager, conditionalCompilationDefines, lexbuf, filename, isLastCompiland, errorLogger) =
-    use unwindbuildphase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parse
-    try 
-        let skip = true in (* don't report whitespace from lexer *)
-        let lightSyntaxStatus = LightSyntaxStatus (tcConfig.ComputeLightSyntaxInitialStatus filename, true) 
-        let lexargs = mkLexargs (filename, conditionalCompilationDefines@tcConfig.conditionalCompilationDefines, lightSyntaxStatus, lexResourceManager, [], errorLogger, tcConfig.pathMap)
-        let shortFilename = SanitizeFileName filename tcConfig.implicitIncludeDir 
-        let input = 
-            Lexhelp.usingLexbufForParsing (lexbuf, filename) (fun lexbuf ->
-                if verbose then dprintn ("Parsing... "+shortFilename)
-                let tokenizer = LexFilter.LexFilter(lightSyntaxStatus, tcConfig.compilingFslib, Lexer.token lexargs skip, lexbuf)
-
-                if tcConfig.tokenizeOnly then 
-                    while true do 
-                        printf "tokenize - getting one token from %s\n" shortFilename
-                        let t = tokenizer.Lexer lexbuf
-                        printf "tokenize - got %s @ %a\n" (Parser.token_to_string t) outputRange lexbuf.LexemeRange
-                        (match t with Parser.EOF _ -> exit 0 | _ -> ())
-                        if lexbuf.IsPastEndOfStream then printf "!!! at end of stream\n"
-
-                if tcConfig.testInteractionParser then 
-                    while true do 
-                        match (Parser.interaction tokenizer.Lexer lexbuf) with
-                        | IDefns(l, m) -> dprintf "Parsed OK, got %d defs @ %a\n" l.Length outputRange m
-                        | IHash (_, m) -> dprintf "Parsed OK, got hash @ %a\n" outputRange m
-                    exit 0
-
-                let res = ParseInput(tokenizer.Lexer, errorLogger, lexbuf, None, filename, isLastCompiland)
-
-                if tcConfig.reportNumDecls then 
-                    let rec flattenSpecs specs = 
-                          specs |> List.collect (function (SynModuleSigDecl.NestedModule (_, _, subDecls, _)) -> flattenSpecs subDecls | spec -> [spec])
-                    let rec flattenDefns specs = 
-                          specs |> List.collect (function (SynModuleDecl.NestedModule (_, _, subDecls, _, _)) -> flattenDefns subDecls | defn -> [defn])
-
-                    let flattenModSpec (SynModuleOrNamespaceSig(_, _, _, decls, _, _, _, _)) = flattenSpecs decls
-                    let flattenModImpl (SynModuleOrNamespace(_, _, _, decls, _, _, _, _)) = flattenDefns decls
-                    match res with 
-                    | ParsedInput.SigFile (ParsedSigFileInput (_, _, _, _, specs)) -> 
-                        dprintf "parsing yielded %d specs" (List.collect flattenModSpec specs).Length
-                    | ParsedInput.ImplFile (ParsedImplFileInput (modules = impls)) -> 
-                        dprintf "parsing yielded %d definitions" (List.collect flattenModImpl impls).Length
-                res
-            )
-        if verbose then dprintn ("Parsed "+shortFilename)
-        Some input 
-    with e -> (* errorR(Failure("parse failed")); *) errorRecovery e rangeStartup; None 
-
-            
-let ParseOneInputFile (tcConfig: TcConfig, lexResourceManager, conditionalCompilationDefines, filename, isLastCompiland, errorLogger, retryLocked) =
-    try 
-       let lower = String.lowercase filename
-       if List.exists (Filename.checkSuffix lower) (FSharpSigFileSuffixes@FSharpImplFileSuffixes) then  
-            if not(FileSystem.SafeExists filename) then
-                error(Error(FSComp.SR.buildCouldNotFindSourceFile filename, rangeStartup))
-            let isFeatureSupported featureId = tcConfig.langVersion.SupportsFeature featureId
-            use reader = File.OpenReaderAndRetry (filename, tcConfig.inputCodePage, retryLocked)
-            let lexbuf = UnicodeLexing.StreamReaderAsLexbuf(isFeatureSupported, reader)
-            ParseOneInputLexbuf(tcConfig, lexResourceManager, conditionalCompilationDefines, lexbuf, filename, isLastCompiland, errorLogger)
-       else error(Error(FSComp.SR.buildInvalidSourceFileExtension(SanitizeFileName filename tcConfig.implicitIncludeDir), rangeStartup))
-    with e -> (* errorR(Failure("parse failed")); *) errorRecovery e rangeStartup; None 
-     
-
-[] 
-type TcAssemblyResolutions(tcConfig: TcConfig, results: AssemblyResolution list, unresolved: UnresolvedAssemblyReference list) = 
-
-    let originalReferenceToResolution = results |> List.map (fun r -> r.originalReference.Text, r) |> Map.ofList
-    let resolvedPathToResolution = results |> List.map (fun r -> r.resolvedPath, r) |> Map.ofList
-
-    /// Add some resolutions to the map of resolution results.                
-    member tcResolutions.AddResolutionResults newResults = TcAssemblyResolutions(tcConfig, results @ newResults, unresolved)
-
-    /// Add some unresolved results.
-    member tcResolutions.AddUnresolvedReferences newUnresolved = TcAssemblyResolutions(tcConfig, results, unresolved @ newUnresolved)
-
-    /// Get information about referenced DLLs
-    member tcResolutions.GetAssemblyResolutions() = results
-    member tcResolutions.GetUnresolvedReferences() = unresolved
-    member tcResolutions.TryFindByOriginalReference(assemblyReference: AssemblyReference) = originalReferenceToResolution.TryFind assemblyReference.Text
-
-    /// This doesn't need to be cancellable, it is only used by F# Interactive
-    member tcResolution.TryFindByExactILAssemblyRef (ctok, assemblyRef) = 
-        results |> List.tryFind (fun ar->
-            let r = ar.GetILAssemblyRef(ctok, tcConfig.reduceMemoryUsage, tcConfig.tryGetMetadataSnapshot) |> Cancellable.runWithoutCancellation 
-            r = assemblyRef)
-
-    /// This doesn't need to be cancellable, it is only used by F# Interactive
-    member tcResolution.TryFindBySimpleAssemblyName (ctok, simpleAssemName) = 
-        results |> List.tryFind (fun ar->
-            let r = ar.GetILAssemblyRef(ctok, tcConfig.reduceMemoryUsage, tcConfig.tryGetMetadataSnapshot) |> Cancellable.runWithoutCancellation 
-            r.Name = simpleAssemName)
-
-    member tcResolutions.TryFindByResolvedPath nm = resolvedPathToResolution.TryFind nm
-    member tcResolutions.TryFindByOriginalReferenceText nm = originalReferenceToResolution.TryFind nm
-        
-    static member ResolveAssemblyReferences (ctok, tcConfig: TcConfig, assemblyList: AssemblyReference list, knownUnresolved: UnresolvedAssemblyReference list) : TcAssemblyResolutions =
-        let resolved, unresolved = 
-            if tcConfig.useSimpleResolution then 
-                let resolutions = 
-                    assemblyList 
-                    |> List.map (fun assemblyReference -> 
-                           try 
-                               Choice1Of2 (tcConfig.ResolveLibWithDirectories (CcuLoadFailureAction.RaiseError, assemblyReference) |> Option.get)
-                           with e -> 
-                               errorRecovery e assemblyReference.Range
-                               Choice2Of2 assemblyReference)
-                let successes = resolutions |> List.choose (function Choice1Of2 x -> Some x | _ -> None)
-                let failures = resolutions |> List.choose (function Choice2Of2 x -> Some (UnresolvedAssemblyReference(x.Text, [x])) | _ -> None)
-                successes, failures
-            else
-                RequireCompilationThread ctok // we don't want to do assembly resolution concurrently, we assume MSBuild doesn't handle this
-                TcConfig.TryResolveLibsUsingMSBuildRules (tcConfig, assemblyList, rangeStartup, ResolveAssemblyReferenceMode.ReportErrors)
-        TcAssemblyResolutions(tcConfig, resolved, unresolved @ knownUnresolved)                    
-
-    static member GetAllDllReferences (tcConfig: TcConfig) = [
-            let primaryReference = tcConfig.PrimaryAssemblyDllReference()
-            //yield primaryReference
-
-            if not tcConfig.compilingFslib then 
-                yield tcConfig.CoreLibraryDllReference()
-
-            let assumeDotNetFramework = primaryReference.SimpleAssemblyNameIs("mscorlib")
-            if tcConfig.framework then
-                for s in defaultReferencesForScriptsAndOutOfProjectSources tcConfig.useFsiAuxLib assumeDotNetFramework tcConfig.useSdkRefs do
-                    yield AssemblyReference(rangeStartup, (if s.EndsWith(".dll", StringComparison.OrdinalIgnoreCase) then s else s+".dll"), None)
-
-            yield! tcConfig.referencedDLLs
-        ]
-
-    static member SplitNonFoundationalResolutions (ctok, tcConfig: TcConfig) =
-        let assemblyList = TcAssemblyResolutions.GetAllDllReferences tcConfig
-        let resolutions = TcAssemblyResolutions.ResolveAssemblyReferences (ctok, tcConfig, assemblyList, tcConfig.knownUnresolvedReferences)
-        let frameworkDLLs, nonFrameworkReferences = resolutions.GetAssemblyResolutions() |> List.partition (fun r -> r.sysdir) 
-        let unresolved = resolutions.GetUnresolvedReferences()
-#if DEBUG
-        let mutable itFailed = false
-        let addedText = "\nIf you want to debug this right now, attach a debugger, and put a breakpoint in 'CompileOps.fs' near the text '!itFailed', and you can re-step through the assembly resolution logic."
-        unresolved 
-        |> List.iter (fun (UnresolvedAssemblyReference(referenceText, _ranges)) ->
-            if referenceText.Contains("mscorlib") then
-                System.Diagnostics.Debug.Assert(false, sprintf "whoops, did not resolve mscorlib: '%s'%s" referenceText addedText)
-                itFailed <- true)
-        frameworkDLLs 
-        |> List.iter (fun x ->
-            if not(FileSystem.IsPathRootedShim(x.resolvedPath)) then
-                System.Diagnostics.Debug.Assert(false, sprintf "frameworkDLL should be absolute path: '%s'%s" x.resolvedPath addedText)
-                itFailed <- true)
-        nonFrameworkReferences 
-        |> List.iter (fun x -> 
-            if not(FileSystem.IsPathRootedShim(x.resolvedPath)) then
-                System.Diagnostics.Debug.Assert(false, sprintf "nonFrameworkReference should be absolute path: '%s'%s" x.resolvedPath addedText) 
-                itFailed <- true)
-        if itFailed then
-            // idea is, put a breakpoint here and then step through
-            let assemblyList = TcAssemblyResolutions.GetAllDllReferences tcConfig
-            let resolutions = TcAssemblyResolutions.ResolveAssemblyReferences (ctok, tcConfig, assemblyList, [])
-            let _frameworkDLLs, _nonFrameworkReferences = resolutions.GetAssemblyResolutions() |> List.partition (fun r -> r.sysdir) 
-            ()
-#endif
-        frameworkDLLs, nonFrameworkReferences, unresolved
-
-    static member BuildFromPriorResolutions (ctok, tcConfig: TcConfig, resolutions, knownUnresolved) =
-        let references = resolutions |> List.map (fun r -> r.originalReference)
-        TcAssemblyResolutions.ResolveAssemblyReferences (ctok, tcConfig, references, knownUnresolved)
-            
-
-//----------------------------------------------------------------------------
-// Typecheck and optimization environments on disk
-//--------------------------------------------------------------------------
-
-let IsSignatureDataResource (r: ILResource) = 
-    r.Name.StartsWithOrdinal FSharpSignatureDataResourceName ||
-    r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2
-
-let IsSignatureDataResourceB (r: ILResource) = 
-    r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB
-
-let IsOptimizationDataResource (r: ILResource) = 
-    r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName || 
-    r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2
-
-let IsOptimizationDataResourceB (r: ILResource) = 
-    r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB
-
-let GetSignatureDataResourceName (r: ILResource) = 
-    if r.Name.StartsWithOrdinal FSharpSignatureDataResourceName then 
-        String.dropPrefix r.Name FSharpSignatureDataResourceName
-    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB then 
-        String.dropPrefix r.Name FSharpSignatureDataResourceNameB
-    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 then 
-        String.dropPrefix r.Name FSharpSignatureDataResourceName2
-    else failwith "GetSignatureDataResourceName"
-
-let GetOptimizationDataResourceName (r: ILResource) = 
-    if r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName then 
-        String.dropPrefix r.Name FSharpOptimizationDataResourceName
-    elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB then 
-        String.dropPrefix r.Name FSharpOptimizationDataResourceNameB
-    elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2 then 
-        String.dropPrefix r.Name FSharpOptimizationDataResourceName2
-    else failwith "GetOptimizationDataResourceName"
-
-let IsReflectedDefinitionsResource (r: ILResource) =
-    r.Name.StartsWithOrdinal QuotationPickler.SerializedReflectedDefinitionsResourceNameBase
-
-let MakeILResource rName bytes = 
-    { Name = rName
-      Location = ILResourceLocation.Local(ByteMemory.FromArray(bytes).AsReadOnly())
-      Access = ILResourceAccess.Public
-      CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
-      MetadataIndex = NoMetadataIdx }
-
-let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x = 
-    let file = PathMap.apply g.pathMap file
-    let bytes, bytesB = pickleObjWithDanglingCcus inMem file g scope p x 
-    { Name = rName
-      Location = ILResourceLocation.Local(ByteMemory.FromArray(bytes).AsReadOnly())
-      Access = ILResourceAccess.Public
-      CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
-      MetadataIndex = NoMetadataIdx },
-    if bytesB.Length > 0 then 
-        Some 
-          { Name = rNameB
-            Location = ILResourceLocation.Local(ByteMemory.FromArray(bytesB).AsReadOnly())
-            Access = ILResourceAccess.Public
-            CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
-            MetadataIndex = NoMetadataIdx 
-          }
-    else
-        None
-
-let GetSignatureData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) : PickledDataWithReferences = 
-    let memA = byteReaderA()
-    let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br())
-    unpickleObjWithDanglingCcus file ilScopeRef ilModule unpickleCcuInfo memA memB
-
-let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: CcuThunk, file, inMem) = 
-    let mspec = ccu.Contents
-    let mspec = ApplyExportRemappingToEntity tcGlobals exportRemapping mspec
-    // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers 
-    // don't complain when they see the resource.
-    let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpSignatureDataResourceName2 else FSharpSignatureDataResourceName 
-    let rNameB = FSharpSignatureDataResourceNameB
-
-    let includeDir =
-        if String.IsNullOrEmpty tcConfig.implicitIncludeDir then ""
-        else
-            tcConfig.implicitIncludeDir
-            |> System.IO.Path.GetFullPath
-            |> PathMap.applyDir tcGlobals.pathMap
- 
-    PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName)  (rNameB+ccu.AssemblyName) pickleCcuInfo 
-        { mspec=mspec 
-          compileTimeWorkingDir=includeDir
-          usesQuotations = ccu.UsesFSharp20PlusQuotations }
-
-let GetOptimizationData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) = 
-    let memA = byteReaderA()
-    let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br())
-    unpickleObjWithDanglingCcus file ilScopeRef ilModule Optimizer.u_CcuOptimizationInfo memA memB
-
-let WriteOptimizationData (tcGlobals, file, inMem, ccu: CcuThunk, modulInfo) = 
-    // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers 
-    // don't complain when they see the resource.
-    let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpOptimizationDataResourceName2 else FSharpOptimizationDataResourceName 
-    let rNameB = FSharpOptimizationDataResourceNameB 
-    PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) (rNameB+ccu.AssemblyName) Optimizer.p_CcuOptimizationInfo modulInfo
-
-//----------------------------------------------------------------------------
-// Abstraction for project reference
-
-type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyRefs) = 
-    let externalSigAndOptData = ["FSharp.Core"]
-    interface IRawFSharpAssemblyData with 
-
-         member __.GetAutoOpenAttributes ilg = GetAutoOpenAttributes ilg ilModule 
-
-         member __.GetInternalsVisibleToAttributes ilg = GetInternalsVisibleToAttributes ilg ilModule 
-
-         member __.TryGetILModuleDef() = Some ilModule 
-
-         member __.GetRawFSharpSignatureData(m, ilShortAssemName, filename) = 
-            let resources = ilModule.Resources.AsList
-
-            let sigDataReaders = 
-                [ for iresource in resources do
-                    if IsSignatureDataResource iresource then 
-                        let ccuName = GetSignatureDataResourceName iresource
-                        let readerA = fun () -> iresource.GetBytes()
-                        let readerB = 
-                            resources |> List.tryPick (fun iresourceB -> 
-                                if IsSignatureDataResourceB iresourceB then 
-                                    let ccuNameB = GetSignatureDataResourceName iresourceB
-                                    if ccuName = ccuNameB then
-                                        Some (fun () -> iresourceB.GetBytes() )
-                                    else None
-                                else None)
-                        yield (ccuName, (readerA, readerB)) ]
-
-            let sigDataReaders = 
-                if sigDataReaders.IsEmpty && List.contains ilShortAssemName externalSigAndOptData then 
-                    let sigFileName = Path.ChangeExtension(filename, "sigdata")
-                    if not (FileSystem.SafeExists sigFileName) then 
-                        error(Error(FSComp.SR.buildExpectedSigdataFile (FileSystem.GetFullPathShim sigFileName), m))
-                    let readerA () = ByteMemory.FromFile(sigFileName, FileAccess.Read, canShadowCopy=true).AsReadOnly()
-                    [ (ilShortAssemName, (readerA, None)) ]
-                else
-                    sigDataReaders
-            sigDataReaders
-
-         member __.GetRawFSharpOptimizationData(m, ilShortAssemName, filename) =             
-            let resources = ilModule.Resources.AsList
-            let optDataReaders = 
-                resources
-                |> List.choose (fun r -> 
-                    if IsOptimizationDataResource r then 
-                        let ccuName = GetOptimizationDataResourceName r
-                        let readerA = (fun () -> r.GetBytes())
-                        let readerB = 
-                            resources |> List.tryPick (fun iresourceB -> 
-                                if IsOptimizationDataResourceB iresourceB then 
-                                    let ccuNameB = GetOptimizationDataResourceName iresourceB
-                                    if ccuName = ccuNameB then
-                                        Some (fun () -> iresourceB.GetBytes() )
-                                    else None
-                                else None)
-                        Some(ccuName, (readerA, readerB)) 
-                    else 
-                        None)
-
-            // Look for optimization data in a file 
-            let optDataReaders = 
-                if optDataReaders.IsEmpty && List.contains ilShortAssemName externalSigAndOptData then 
-                    let optDataFile = Path.ChangeExtension(filename, "optdata")
-                    if not (FileSystem.SafeExists optDataFile) then 
-                        error(Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore(optDataFile, FileSystem.GetFullPathShim optDataFile), m))
-                    let readerA () = ByteMemory.FromFile(optDataFile, FileAccess.Read, canShadowCopy=true).AsReadOnly()
-                    [ (ilShortAssemName, (readerA, None))]
-                else
-                    optDataReaders
-            optDataReaders
-
-         member __.GetRawTypeForwarders() =
-            match ilModule.Manifest with 
-            | Some manifest -> manifest.ExportedTypes
-            | None -> mkILExportedTypes []
-
-         member __.ShortAssemblyName = GetNameOfILModule ilModule 
-         member __.ILScopeRef = MakeScopeRefForILModule ilModule
-         member __.ILAssemblyRefs = ilAssemblyRefs
-         member __.HasAnyFSharpSignatureDataAttribute = 
-            let attrs = GetCustomAttributesOfILModule ilModule
-            List.exists IsSignatureDataVersionAttr attrs
-         member __.HasMatchingFSharpSignatureDataAttribute ilg = 
-            let attrs = GetCustomAttributesOfILModule ilModule
-            List.exists (IsMatchingSignatureDataVersionAttr ilg (IL.parseILVersion Internal.Utilities.FSharpEnvironment.FSharpBinaryMetadataFormatRevision)) attrs
-
-
-//----------------------------------------------------------------------------
-// Relink blobs of saved data by fixing up ccus.
-//--------------------------------------------------------------------------
-
-let availableToOptionalCcu = function
-    | ResolvedCcu ccu -> Some ccu
-    | UnresolvedCcu _ -> None
-
-
-//----------------------------------------------------------------------------
-// TcConfigProvider
-//--------------------------------------------------------------------------
-
-/// Represents a computation to return a TcConfig. Normally this is just a constant immutable TcConfig, 
-/// but for F# Interactive it may be based on an underlying mutable TcConfigBuilder.
-type TcConfigProvider = 
-    | TcConfigProvider of (CompilationThreadToken -> TcConfig)
-    member x.Get ctok = (let (TcConfigProvider f) = x in f ctok)
-
-    /// Get a TcConfigProvider which will return only the exact TcConfig.
-    static member Constant tcConfig = TcConfigProvider(fun _ctok -> tcConfig)
-
-    /// Get a TcConfigProvider which will continue to respect changes in the underlying
-    /// TcConfigBuilder rather than delivering snapshots.
-    static member BasedOnMutableBuilder tcConfigB = TcConfigProvider(fun _ctok -> TcConfig.Create(tcConfigB, validate=false))
-    
-    
-//----------------------------------------------------------------------------
-// TcImports
-//--------------------------------------------------------------------------
-
-[]
-type TcImportsSafeDisposal
-    (disposeActions: ResizeArray unit>,
-#if !NO_EXTENSIONTYPING
-     disposeTypeProviderActions: ResizeArray unit>,
-#endif
-     compilationThread: ICompilationThread) =
-
-    let mutable isDisposed = false
-
-    let dispose () =
-        // disposing deliberately only closes this tcImports, not the ones up the chain 
-        isDisposed <- true        
-        if verbose then 
-            dprintf "disposing of TcImports, %d binaries\n" disposeActions.Count
-#if !NO_EXTENSIONTYPING
-        let actions = disposeTypeProviderActions
-        if actions.Count > 0 then
-            compilationThread.EnqueueWork (fun _ -> for action in actions do action())
-#endif
-        for action in disposeActions do action()
-
-    override _.Finalize() =
-        dispose ()
-
-    interface IDisposable with
-
-        member this.Dispose()  =
-            if not isDisposed then
-                GC.SuppressFinalize this
-                dispose ()
-
-#if !NO_EXTENSIONTYPING
-// These are hacks in order to allow TcImports to be held as a weak reference inside a type provider.
-// The reason is due to older type providers compiled using an older TypeProviderSDK, that SDK used reflection on fields and properties to determine the contract.
-// The reflection code has now since been removed, see here: https://github.com/fsprojects/FSharp.TypeProviders.SDK/pull/305. But we still need to work on older type providers.
-// One day we can remove these hacks when we deemed most if not all type providers were re-compiled using the newer TypeProviderSDK.
-// Yuck.
-type TcImportsDllInfoHack =
-    {
-        FileName: string
-    }
-
-and TcImportsWeakHack (tcImports: WeakReference) =
-    let mutable dllInfos: TcImportsDllInfoHack list = []
-
-    member __.SetDllInfos (value: ImportedBinary list) =
-        dllInfos <- value |> List.map (fun x -> { FileName = x.FileName })
-
-    member __.Base: TcImportsWeakHack option =
-        match tcImports.TryGetTarget() with
-        | true, strong ->
-            match strong.Base with
-            | Some (baseTcImports: TcImports) ->
-                Some baseTcImports.Weak
-            | _ ->
-                None
-        | _ -> 
-            None
-
-    member __.SystemRuntimeContainsType typeName =
-        match tcImports.TryGetTarget () with
-        | true, strong -> strong.SystemRuntimeContainsType typeName
-        | _ -> false
-#endif          
-/// Represents a table of imported assemblies with their resolutions.
-/// Is a disposable object, but it is recommended not to explicitly call Dispose unless you absolutely know nothing will be using its contents after the disposal.
-/// Otherwise, simply allow the GC to collect this and it will properly call Dispose from the finalizer.
-and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAssemblyResolutions, importsBase: TcImports option, ilGlobalsOpt, compilationThread: ICompilationThread) as this = 
-
-    let mutable resolutions = initialResolutions
-    let mutable importsBase: TcImports option = importsBase
-    let mutable dllInfos: ImportedBinary list = []
-    let mutable dllTable: NameMap = NameMap.empty
-    let mutable ccuInfos: ImportedAssembly list = []
-    let mutable ccuTable: NameMap = NameMap.empty
-
-    /// ccuThunks is a ConcurrentDictionary thus threadsafe
-    /// the key is a ccuThunk object, the value is a (unit->unit) func that when executed
-    /// the func is used to fix up the func and operates on data captured at the time the func is created.
-    /// func() is captured during phase2() of RegisterAndPrepareToImportReferencedDll(..) and PrepareToImportReferencedFSharpAssembly ( .. )
-    let mutable ccuThunks = new ConcurrentDictionary unit)>()
-
-    let disposeActions = ResizeArray()
-    let mutable disposed = false
-    let mutable ilGlobalsOpt = ilGlobalsOpt
-    let mutable tcGlobals = None
-#if !NO_EXTENSIONTYPING
-    let disposeTypeProviderActions = ResizeArray()
-    let mutable generatedTypeRoots = new System.Collections.Generic.Dictionary()
-    let mutable tcImportsWeak = TcImportsWeakHack (WeakReference<_> this)
-#endif
-
-    let disposal = new TcImportsSafeDisposal(disposeActions, disposeTypeProviderActions, compilationThread)
-
-    let CheckDisposed() =
-        if disposed then assert false
-
-    let dispose () =
-        CheckDisposed()
-        (disposal :> IDisposable).Dispose()
-
-    // This is used to fixe up unresolved ccuThunks that were created during assembly import.
-    // the ccuThunks dictionary is a ConcurrentDictionary and thus threadsafe.
-    // Algorithm:
-    //   Get a snapshot of the current unFixedUp ccuThunks.
-    //   for each of those thunks, remove them from the dictionary, so any parallel threads can't do this work
-    //      If it successfully removed it from the dictionary then do the fixup
-    //          If the thunk remains unresolved add it back to the ccuThunks dictionary for further processing
-    //      If not then move on to the next thunk
-    let fixupOrphanCcus () =
-        let keys = ccuThunks.Keys
-        for ccuThunk in keys do
-            match ccuThunks.TryRemove(ccuThunk) with
-            | true, func ->
-                if ccuThunk.IsUnresolvedReference then
-                    func()
-                if ccuThunk.IsUnresolvedReference then
-                    ccuThunks.TryAdd(ccuThunk, func) |> ignore
-            | _ -> ()
-
-    static let ccuHasType (ccu: CcuThunk) (nsname: string list) (tname: string) =
-        let matchNameSpace (entityOpt: Entity option) n =
-            match entityOpt with
-            | None -> None
-            | Some entity ->
-                entity.ModuleOrNamespaceType.AllEntitiesByCompiledAndLogicalMangledNames.TryFind n
-
-        match (Some ccu.Contents, nsname) ||> List.fold matchNameSpace with
-        | Some ns ->
-                match Map.tryFind tname ns.ModuleOrNamespaceType.TypesByMangledName with
-                | Some _ -> true
-                | None -> false
-        | None -> false
-
-    member internal tcImports.Base = 
-            CheckDisposed()
-            importsBase
-
-    member tcImports.CcuTable =
-            CheckDisposed()
-            ccuTable
-        
-    member tcImports.DllTable =
-            CheckDisposed()
-            dllTable
-            
-#if !NO_EXTENSIONTYPING
-    member tcImports.Weak = 
-            CheckDisposed()
-            tcImportsWeak
-#endif
-
-    member tcImports.RegisterCcu ccuInfo =
-        CheckDisposed()
-        ccuInfos <- ccuInfos ++ ccuInfo
-        // Assembly Ref Resolution: remove this use of ccu.AssemblyName
-        ccuTable <- NameMap.add (ccuInfo.FSharpViewOfMetadata.AssemblyName) ccuInfo ccuTable
-
-    member tcImports.RegisterDll dllInfo =
-        CheckDisposed()
-        dllInfos <- dllInfos ++ dllInfo
-#if !NO_EXTENSIONTYPING
-        tcImportsWeak.SetDllInfos dllInfos
-#endif
-        dllTable <- NameMap.add (getNameOfScopeRef dllInfo.ILScopeRef) dllInfo dllTable
-
-    member tcImports.GetDllInfos() : ImportedBinary list = 
-        CheckDisposed()
-        match importsBase with 
-        | Some importsBase-> importsBase.GetDllInfos() @ dllInfos
-        | None -> dllInfos
-        
-    member tcImports.AllAssemblyResolutions() = 
-        CheckDisposed()
-        let ars = resolutions.GetAssemblyResolutions()
-        match importsBase with 
-        | Some importsBase-> importsBase.AllAssemblyResolutions() @ ars
-        | None -> ars
-        
-    member tcImports.TryFindDllInfo (ctok: CompilationThreadToken, m, assemblyName, lookupOnly) =
-        CheckDisposed()
-        let rec look (t: TcImports) =       
-            match NameMap.tryFind assemblyName t.DllTable with
-            | Some res -> Some res
-            | None -> 
-                match t.Base with 
-                | Some t2 -> look t2
-                | None -> None
-        match look tcImports with
-        | Some res -> Some res
-        | None ->
-            tcImports.ImplicitLoadIfAllowed(ctok, m, assemblyName, lookupOnly)
-            look tcImports
-    
-
-    member tcImports.FindDllInfo (ctok, m, assemblyName) =
-        match tcImports.TryFindDllInfo (ctok, m, assemblyName, lookupOnly=false) with 
-        | Some res -> res
-        | None -> error(Error(FSComp.SR.buildCouldNotResolveAssembly assemblyName, m))
-
-    member tcImports.GetImportedAssemblies() =
-        CheckDisposed()
-        match importsBase with
-        | Some importsBase-> List.append (importsBase.GetImportedAssemblies()) ccuInfos
-        | None -> ccuInfos
-
-    member tcImports.GetCcusExcludingBase() =
-        CheckDisposed()
-        ccuInfos |> List.map (fun x -> x.FSharpViewOfMetadata)
-
-    member tcImports.GetCcusInDeclOrder() =
-        CheckDisposed()
-        List.map (fun x -> x.FSharpViewOfMetadata) (tcImports.GetImportedAssemblies())  
-
-    // This is the main "assembly reference --> assembly" resolution routine. 
-    member tcImports.FindCcuInfo (ctok, m, assemblyName, lookupOnly) =
-        CheckDisposed()
-        let rec look (t: TcImports) =
-            match NameMap.tryFind assemblyName t.CcuTable with
-            | Some res -> Some res
-            | None -> 
-                 match t.Base with 
-                 | Some t2 -> look t2 
-                 | None -> None
-
-        match look tcImports with
-        | Some res -> ResolvedImportedAssembly res
-        | None ->
-            tcImports.ImplicitLoadIfAllowed(ctok, m, assemblyName, lookupOnly)
-            match look tcImports with 
-            | Some res -> ResolvedImportedAssembly res
-            | None -> UnresolvedImportedAssembly assemblyName
-
-    member tcImports.FindCcu (ctok, m, assemblyName, lookupOnly) =
-        CheckDisposed()
-        match tcImports.FindCcuInfo(ctok, m, assemblyName, lookupOnly) with
-        | ResolvedImportedAssembly importedAssembly -> ResolvedCcu(importedAssembly.FSharpViewOfMetadata)
-        | UnresolvedImportedAssembly assemblyName -> UnresolvedCcu assemblyName
-
-    member tcImports.FindCcuFromAssemblyRef(ctok, m, assemblyRef: ILAssemblyRef) = 
-        CheckDisposed()
-        match tcImports.FindCcuInfo(ctok, m, assemblyRef.Name, lookupOnly=false) with
-        | ResolvedImportedAssembly importedAssembly -> ResolvedCcu(importedAssembly.FSharpViewOfMetadata)
-        | UnresolvedImportedAssembly _ -> UnresolvedCcu(assemblyRef.QualifiedName)
-
-
-#if !NO_EXTENSIONTYPING
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) = 
-#else
-    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) = 
-#endif
-        match assembly with 
-        | Tainted.Null -> false,None
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-        | assembly -> 
-#else
-        | Tainted.NonNull assembly -> 
-#endif
-        let aname = assembly.PUntaint((fun a -> a.GetName()), m)
-        let ilShortAssemName = aname.Name
-        match tcImports.FindCcu (ctok, m, ilShortAssemName, lookupOnly=true) with 
-        | ResolvedCcu ccu -> 
-            if ccu.IsProviderGenerated then 
-                let dllinfo = tcImports.FindDllInfo(ctok, m, ilShortAssemName)
-                true, dllinfo.ProviderGeneratedStaticLinkMap
-            else
-                false, None
-
-        | UnresolvedCcu _ -> 
-            let g = tcImports.GetTcGlobals()
-            let ilScopeRef = ILScopeRef.Assembly (ILAssemblyRef.FromAssemblyName aname)
-            let fileName = aname.Name + ".dll"
-            let bytes = assembly.PApplyWithProvider((fun (assembly, provider) -> assembly.GetManifestModuleContents provider), m).PUntaint(id, m)
-            let tcConfig = tcConfigP.Get ctok
-            let ilModule, ilAssemblyRefs = 
-                let opts: ILReaderOptions = 
-                    { reduceMemoryUsage = tcConfig.reduceMemoryUsage
-                      pdbDirPath = None 
-                      metadataOnly = MetadataOnlyFlag.Yes
-                      tryGetMetadataSnapshot = tcConfig.tryGetMetadataSnapshot }
-                let reader = OpenILModuleReaderFromBytes fileName bytes opts
-                reader.ILModuleDef, reader.ILAssemblyRefs
-
-            let theActualAssembly = assembly.PUntaint((fun x -> x.Handle), m)
-            let dllinfo = 
-                { RawMetadata= RawFSharpAssemblyDataBackedByFileOnDisk (ilModule, ilAssemblyRefs) 
-                  FileName=fileName
-                  ProviderGeneratedAssembly=Some theActualAssembly
-                  IsProviderGenerated=true
-                  ProviderGeneratedStaticLinkMap= if g.isInteractive then None else Some (ProvidedAssemblyStaticLinkingMap.CreateNew())
-                  ILScopeRef = ilScopeRef
-                  ILAssemblyRefs = ilAssemblyRefs }
-            tcImports.RegisterDll dllinfo
-
-            let ccuContents = Construct.NewCcuContents ilScopeRef m ilShortAssemName (Construct.NewEmptyModuleOrNamespaceType Namespace) 
-
-            let ccuData: CcuData = 
-              { IsFSharp=false
-                UsesFSharp20PlusQuotations=false
-                InvalidateEvent=(new Event<_>()).Publish
-                IsProviderGenerated = true
-                QualifiedName= Some (assembly.PUntaint((fun a -> a.FullName), m))
-                Contents = ccuContents
-                ILScopeRef = ilScopeRef
-                Stamp = newStamp()
-                SourceCodeDirectory = ""  
-                FileName = Some fileName
-                MemberSignatureEquality = (fun ty1 ty2 -> typeEquivAux EraseAll g ty1 ty2)
-                ImportProvidedType = (fun ty -> Import.ImportProvidedType (tcImports.GetImportMap()) m ty)
-                TryGetILModuleDef = (fun () -> Some ilModule)
-                TypeForwarders = Map.empty }
-                    
-            let ccu = CcuThunk.Create(ilShortAssemName, ccuData)
-            let ccuinfo = 
-                { FSharpViewOfMetadata=ccu 
-                  ILScopeRef = ilScopeRef 
-                  AssemblyAutoOpenAttributes = []
-                  AssemblyInternalsVisibleToAttributes = []
-                  IsProviderGenerated = true
-                  TypeProviders=[]
-                  FSharpOptimizationData = notlazy None }
-            tcImports.RegisterCcu ccuinfo
-            // Yes, it is generative
-            true, dllinfo.ProviderGeneratedStaticLinkMap
-
-    member tcImports.RecordGeneratedTypeRoot root = 
-        // checking if given ProviderGeneratedType was already recorded before (probably for another set of static parameters) 
-        let (ProviderGeneratedType(_, ilTyRef, _)) = root
-        let index = 
-            match generatedTypeRoots.TryGetValue ilTyRef with
-            | true, (index, _) -> index
-            | false, _ -> generatedTypeRoots.Count
-        generatedTypeRoots.[ilTyRef] <- (index, root)
-
-    member tcImports.ProviderGeneratedTypeRoots = 
-        generatedTypeRoots.Values
-        |> Seq.sortBy fst
-        |> Seq.map snd
-        |> Seq.toList
-#endif
-
-    member private tcImports.AttachDisposeAction action =
-        CheckDisposed()
-        disposeActions.Add action
-
-#if !NO_EXTENSIONTYPING
-    member private tcImports.AttachDisposeTypeProviderAction action =
-        CheckDisposed()
-        disposeTypeProviderActions.Add action
-#endif
-  
-    // Note: the returned binary reader is associated with the tcImports, i.e. when the tcImports are closed 
-    // then the reader is closed. 
-    member tcImports.OpenILBinaryModule(ctok, filename, m) = 
-      try
-        CheckDisposed()
-        let tcConfig = tcConfigP.Get ctok
-        let pdbDirPath =
-            // We open the pdb file if one exists parallel to the binary we 
-            // are reading, so that --standalone will preserve debug information. 
-            if tcConfig.openDebugInformationForLaterStaticLinking then 
-                let pdbDir = try Filename.directoryName filename with _ -> "."
-                let pdbFile = (try Filename.chopExtension filename with _ -> filename) + ".pdb" 
-
-                if FileSystem.SafeExists pdbFile then 
-                    if verbose then dprintf "reading PDB file %s from directory %s\n" pdbFile pdbDir
-                    Some pdbDir
-                else
-                    None
-            else
-                None
-
-        let ilILBinaryReader =
-            OpenILBinary (filename, tcConfig.reduceMemoryUsage, pdbDirPath, tcConfig.shadowCopyReferences, tcConfig.tryGetMetadataSnapshot)
-
-        tcImports.AttachDisposeAction(fun _ -> (ilILBinaryReader :> IDisposable).Dispose())
-        ilILBinaryReader.ILModuleDef, ilILBinaryReader.ILAssemblyRefs
-      with e ->
-        error(Error(FSComp.SR.buildErrorOpeningBinaryFile(filename, e.Message), m))
-
-    (* auxModTable is used for multi-module assemblies *)
-    member tcImports.MkLoaderForMultiModuleILAssemblies ctok m =
-        CheckDisposed()
-        let auxModTable = HashMultiMap(10, HashIdentity.Structural)
-        fun viewedScopeRef ->
-        
-            let tcConfig = tcConfigP.Get ctok
-            match viewedScopeRef with
-            | ILScopeRef.Module modref -> 
-                let key = modref.Name
-                if not (auxModTable.ContainsKey key) then
-                    let resolution = tcConfig.ResolveLibWithDirectories (CcuLoadFailureAction.RaiseError, AssemblyReference(m, key, None)) |> Option.get
-                    let ilModule, _ = tcImports.OpenILBinaryModule(ctok, resolution.resolvedPath, m)
-                    auxModTable.[key] <- ilModule
-                auxModTable.[key] 
-
-            | _ -> 
-                error(InternalError("Unexpected ILScopeRef.Local or ILScopeRef.Assembly in exported type table", m))
-
-    member tcImports.IsAlreadyRegistered nm =
-        CheckDisposed()
-        tcImports.GetDllInfos() |> List.exists (fun dll -> 
-            match dll.ILScopeRef with 
-            | ILScopeRef.Assembly a -> a.Name = nm 
-            | _ -> false)
-
-    member tcImports.GetImportMap() = 
-        CheckDisposed()
-        let loaderInterface = 
-            { new Import.AssemblyLoader with 
-                 member x.FindCcuFromAssemblyRef (ctok, m, ilAssemblyRef) = 
-                     tcImports.FindCcuFromAssemblyRef (ctok, m, ilAssemblyRef)
-#if !NO_EXTENSIONTYPING
-                 member x.GetProvidedAssemblyInfo (ctok, m, assembly) = tcImports.GetProvidedAssemblyInfo (ctok, m, assembly)
-                 member x.RecordGeneratedTypeRoot root = tcImports.RecordGeneratedTypeRoot root
-#endif
-             }
-        new Import.ImportMap (tcImports.GetTcGlobals(), loaderInterface)
-
-    // Note the tcGlobals are only available once mscorlib and fslib have been established. For TcImports, 
-    // they are logically only needed when converting AbsIL data structures into F# data structures, and
-    // when converting AbsIL types in particular, since these types are normalized through the tables
-    // in the tcGlobals (E.g. normalizing 'System.Int32' to 'int'). On the whole ImportILAssembly doesn't
-    // actually convert AbsIL types - it only converts the outer shell of type definitions - the vast majority of
-    // types such as those in method signatures are currently converted on-demand. However ImportILAssembly does have to
-    // convert the types that are constraints in generic parameters, which was the original motivation for making sure that
-    // ImportILAssembly had a tcGlobals available when it really needs it.
-    member tcImports.GetTcGlobals() : TcGlobals =
-        CheckDisposed()
-        match tcGlobals with 
-        | Some g -> g 
-        | None -> 
-            match importsBase with 
-            | Some b -> b.GetTcGlobals() 
-            | None -> failwith "unreachable: GetGlobals - are the references to mscorlib.dll and FSharp.Core.dll valid?"
-
-    member private tcImports.SetILGlobals ilg =
-        CheckDisposed()
-        ilGlobalsOpt <- Some ilg
-
-    member private tcImports.SetTcGlobals g =
-        CheckDisposed()
-        tcGlobals <- Some g
-
-#if !NO_EXTENSIONTYPING
-    member private tcImports.InjectProvidedNamespaceOrTypeIntoEntity 
-            (typeProviderEnvironment, 
-             tcConfig: TcConfig, 
-             m, entity: Entity, 
-             injectedNamespace, remainingNamespace, 
-             provider, 
-             st: Tainted option) = 
-        match remainingNamespace with
-        | next :: rest ->
-            // Inject the namespace entity 
-            match entity.ModuleOrNamespaceType.ModulesAndNamespacesByDemangledName.TryFind next with
-            | Some childEntity ->
-                tcImports.InjectProvidedNamespaceOrTypeIntoEntity (typeProviderEnvironment, tcConfig, m, childEntity, next :: injectedNamespace, rest, provider, st)
-            | None -> 
-                // Build up the artificial namespace if there is not a real one.
-                let cpath = CompPath(ILScopeRef.Local, injectedNamespace |> List.rev |> List.map (fun n -> (n, ModuleOrNamespaceKind.Namespace)) )
-                let mid = ident (next, rangeStartup)
-                let mty = Construct.NewEmptyModuleOrNamespaceType Namespace
-                let newNamespace = Construct.NewModuleOrNamespace (Some cpath) taccessPublic mid XmlDoc.Empty [] (MaybeLazy.Strict mty) 
-                entity.ModuleOrNamespaceType.AddModuleOrNamespaceByMutation newNamespace
-                tcImports.InjectProvidedNamespaceOrTypeIntoEntity (typeProviderEnvironment, tcConfig, m, newNamespace, next :: injectedNamespace, rest, provider, st)
-        | [] -> 
-            match st with
-            | Some st ->
-                // Inject the wrapper type into the provider assembly.
-                //
-                // Generated types get properly injected into the provided (i.e. generated) assembly CCU in tc.fs
-
-                let importProvidedType t = Import.ImportProvidedType (tcImports.GetImportMap()) m t
-                let isSuppressRelocate = tcConfig.isInteractive || st.PUntaint((fun st -> st.IsSuppressRelocate), m) 
-                let newEntity = Construct.NewProvidedTycon(typeProviderEnvironment, st, importProvidedType, isSuppressRelocate, m) 
-                entity.ModuleOrNamespaceType.AddProvidedTypeEntity newEntity
-            | None -> ()
-
-            entity.entity_tycon_repr <-
-                match entity.TypeReprInfo with 
-                // This is the first extension 
-                | TNoRepr -> 
-                    TProvidedNamespaceExtensionPoint(typeProviderEnvironment, [provider])
-                                
-                // Add to the existing list of extensions
-                | TProvidedNamespaceExtensionPoint(resolutionFolder, prior) as repr -> 
-                    if not(prior |> List.exists(fun r->Tainted.EqTainted r provider)) then 
-                        TProvidedNamespaceExtensionPoint(resolutionFolder, provider :: prior)
-                    else 
-                        repr
-
-                | _ -> failwith "Unexpected representation in namespace entity referred to by a type provider"
-
-    member tcImportsStrong.ImportTypeProviderExtensions 
-               (ctok, tcConfig: TcConfig, 
-                fileNameOfRuntimeAssembly: string, 
-                ilScopeRefOfRuntimeAssembly, 
-                runtimeAssemblyAttributes: ILAttribute list, 
-                entityToInjectInto, invalidateCcu: Event<_>, m) = 
-
-        let startingErrorCount = CompileThreadStatic.ErrorLogger.ErrorCount
-
-        // Find assembly level TypeProviderAssemblyAttributes. These will point to the assemblies that 
-        // have class which implement ITypeProvider and which have TypeProviderAttribute on them.
-        let designTimeAssemblyNames = 
-            runtimeAssemblyAttributes 
-            |> List.choose (TryDecodeTypeProviderAssemblyAttr (defaultArg ilGlobalsOpt EcmaMscorlibILGlobals))
-            // If no design-time assembly is specified, use the runtime assembly
-            |> List.map (function null -> fileNameOfRuntimeAssembly | NonNull s -> s)
-            // For each simple name of a design-time assembly, we take the first matching one in the order they are 
-            // specified in the attributes
-            |> List.distinctBy (fun s -> try Path.GetFileNameWithoutExtension s with _ -> s)
-
-        if not (List.isEmpty designTimeAssemblyNames) then
-
-            // Find the SystemRuntimeAssemblyVersion value to report in the TypeProviderConfig.
-            let primaryAssemblyVersion = 
-                let primaryAssemblyRef = tcConfig.PrimaryAssemblyDllReference()
-                let resolution = tcConfig.ResolveLibWithDirectories (CcuLoadFailureAction.RaiseError, primaryAssemblyRef) |> Option.get
-                 // MSDN: this method causes the file to be opened and closed, but the assembly is not added to this domain
-                let name = System.Reflection.AssemblyName.GetAssemblyName(resolution.resolvedPath)
-                name.Version
-
-            let typeProviderEnvironment = 
-                 { resolutionFolder = tcConfig.implicitIncludeDir
-                   outputFile = tcConfig.outputFile
-                   showResolutionMessages = tcConfig.showExtensionTypeMessages 
-                   referencedAssemblies = Array.distinct [| for r in tcImportsStrong.AllAssemblyResolutions() -> r.resolvedPath |]
-                   temporaryFolder = FileSystem.GetTempPathShim() }
-
-            // The type provider should not hold strong references to disposed
-            // TcImport objects. So the callbacks provided in the type provider config
-            // dispatch via a thunk which gets set to a non-resource-capturing 
-            // failing function when the object is disposed. 
-            let systemRuntimeContainsType =  
-                // NOTE: do not touch this, edit: but we did, we had no choice - TPs cannot hold a strong reference on TcImports "ever".
-                let tcImports = tcImportsWeak
-                let mutable systemRuntimeContainsTypeRef = fun typeName -> tcImports.SystemRuntimeContainsType typeName
-                tcImportsStrong.AttachDisposeTypeProviderAction(fun () -> systemRuntimeContainsTypeRef <- fun _ -> raise (System.ObjectDisposedException("The type provider has been disposed")))
-                fun arg -> systemRuntimeContainsTypeRef arg  
-
-            let providers = [
-                for designTimeAssemblyName in designTimeAssemblyNames do
-                    yield! ExtensionTyping.GetTypeProvidersOfAssembly(fileNameOfRuntimeAssembly,
-                                                                      ilScopeRefOfRuntimeAssembly,
-                                                                      designTimeAssemblyName,
-                                                                      typeProviderEnvironment,
-                                                                      tcConfig.isInvalidationSupported,
-                                                                      tcConfig.isInteractive,
-                                                                      systemRuntimeContainsType,
-                                                                      primaryAssemblyVersion,
-                                                                      tcConfig.compilerToolPaths,
-                                                                      m) ]
-            // Note, type providers are disposable objects. The TcImports owns the provider objects - when/if it is disposed, the providers are disposed.
-            // We ignore all exceptions from provider disposal.
-            for provider in providers do 
-                tcImportsStrong.AttachDisposeTypeProviderAction(fun () -> 
-                    try 
-                        provider.PUntaintNoFailure(fun x -> x).Dispose() 
-                    with e -> 
-                        ())
-            
-            // Add the invalidation signal handlers to each provider
-            for provider in providers do 
-                provider.PUntaint((fun tp -> 
-
-                    // Register the type provider invalidation handler.
-                    //
-                    // We are explicit about what the handler closure captures to help reason about the
-                    // lifetime of captured objects, especially in case the type provider instance gets leaked
-                    // or keeps itself alive mistakenly, e.g. via some global state in the type provider instance.
-                    //
-                    // The closure captures 
-                    //   1. an Event value, ultimately this is made available in all CCus as ccu.InvalidateEvent
-                    //   2. any handlers registered to ccu.InvalidateEvent 
-                    //   3. a message string
-                    //
-                    // Note that the invalidation handler does not explicitly capture the TcImports. 
-                    // The only place where handlers are registered is to ccu.InvalidateEvent is in IncrementalBuilder.fs.
-
-                    let capturedInvalidateCcu = invalidateCcu
-                    let capturedMessage = "The provider '" + fileNameOfRuntimeAssembly + "' reported a change"
-                    let handler = tp.Invalidate.Subscribe(fun _ -> capturedInvalidateCcu.Trigger (capturedMessage))  
-
-                    // When the TcImports is disposed we detach the invalidation callback
-                    tcImportsStrong.AttachDisposeTypeProviderAction(fun () -> try handler.Dispose() with _ -> ())), m)  
-                
-            match providers with
-            | [] -> 
-                warning(Error(FSComp.SR.etHostingAssemblyFoundWithoutHosts(fileNameOfRuntimeAssembly, typeof.FullName), m)) 
-            | _ -> 
-
-#if DEBUG
-                if typeProviderEnvironment.showResolutionMessages then
-                    dprintfn "Found extension type hosting hosting assembly '%s' with the following extensions:" fileNameOfRuntimeAssembly
-                    providers |> List.iter(fun provider ->dprintfn " %s" (ExtensionTyping.DisplayNameOfTypeProvider(provider.TypeProvider, m)))
-#endif
-                    
-                for provider in providers do 
-                    try
-                        // Inject an entity for the namespace, or if one already exists, then record this as a provider
-                        // for that namespace.
-                        let rec loop (providedNamespace: Tainted) =
-                            let path = ExtensionTyping.GetProvidedNamespaceAsPath(m, provider, providedNamespace.PUntaint((fun r -> r.NamespaceName), m))
-                            tcImportsStrong.InjectProvidedNamespaceOrTypeIntoEntity (typeProviderEnvironment, tcConfig, m, entityToInjectInto, [], path, provider, None)
-
-                            // Inject entities for the types returned by provider.GetTypes(). 
-                            //
-                            // NOTE: The types provided by GetTypes() are available for name resolution
-                            // when the namespace is "opened". This is part of the specification of the language
-                            // feature.
-                            let tys = providedNamespace.PApplyArray((fun provider -> provider.GetTypes()), "GetTypes", m)
-                            let ptys = [| for ty in tys -> ty.PApply((fun ty -> ty |> ProvidedType.CreateNoContext), m) |]
-                            for st in ptys do 
-                                tcImportsStrong.InjectProvidedNamespaceOrTypeIntoEntity (typeProviderEnvironment, tcConfig, m, entityToInjectInto, [], path, provider, Some st)
-
-                            for providedNestedNamespace in providedNamespace.PApplyArray((fun provider -> provider.GetNestedNamespaces()), "GetNestedNamespaces", m) do 
-                                loop providedNestedNamespace
-
-                        RequireCompilationThread ctok // IProvidedType.GetNamespaces is an example of a type provider call
-                        let providedNamespaces = provider.PApplyArray((fun r -> r.GetNamespaces()), "GetNamespaces", m)
-
-                        for providedNamespace in providedNamespaces do
-                            loop providedNamespace
-                    with e -> 
-                        errorRecovery e m
-
-                if startingErrorCount Option.isSome
-
-    // Add a referenced assembly
-    //
-    // Retargetable assembly refs are required for binaries that must run 
-    // against DLLs supported by multiple publishers. For example
-    // Compact Framework binaries must use this. However it is not
-    // clear when else it is required, e.g. for Mono.
-    
-    member tcImports.PrepareToImportReferencedILAssembly (ctok, m, filename, dllinfo: ImportedBinary) =
-        CheckDisposed()
-        let tcConfig = tcConfigP.Get ctok
-        assert dllinfo.RawMetadata.TryGetILModuleDef().IsSome
-        let ilModule = dllinfo.RawMetadata.TryGetILModuleDef().Value
-        let ilScopeRef = dllinfo.ILScopeRef
-        let aref =   
-            match ilScopeRef with 
-            | ILScopeRef.Assembly aref -> aref 
-            | _ -> error(InternalError("PrepareToImportReferencedILAssembly: cannot reference .NET netmodules directly, reference the containing assembly instead", m))
-
-        let nm = aref.Name
-        if verbose then dprintn ("Converting IL assembly to F# data structures "+nm)
-        let auxModuleLoader = tcImports.MkLoaderForMultiModuleILAssemblies ctok m
-        let invalidateCcu = new Event<_>()
-        let ccu = Import.ImportILAssembly(tcImports.GetImportMap, m, auxModuleLoader, ilScopeRef, tcConfig.implicitIncludeDir, Some filename, ilModule, invalidateCcu.Publish)
-        
-        let ilg = defaultArg ilGlobalsOpt EcmaMscorlibILGlobals
-
-        let ccuinfo = 
-            { FSharpViewOfMetadata=ccu 
-              ILScopeRef = ilScopeRef 
-              AssemblyAutoOpenAttributes = GetAutoOpenAttributes ilg ilModule
-              AssemblyInternalsVisibleToAttributes = GetInternalsVisibleToAttributes ilg ilModule
-#if !NO_EXTENSIONTYPING
-              IsProviderGenerated = false 
-              TypeProviders = []
-#endif
-              FSharpOptimizationData = notlazy None }
-        tcImports.RegisterCcu ccuinfo
-        let phase2 () =
-#if !NO_EXTENSIONTYPING
-            ccuinfo.TypeProviders <- tcImports.ImportTypeProviderExtensions (ctok, tcConfig, filename, ilScopeRef, ilModule.ManifestOfAssembly.CustomAttrs.AsList, ccu.Contents, invalidateCcu, m)
-#endif
-            [ResolvedImportedAssembly ccuinfo]
-        phase2
-
-    member tcImports.PrepareToImportReferencedFSharpAssembly (ctok, m, filename, dllinfo: ImportedBinary) =
-        CheckDisposed()
-#if !NO_EXTENSIONTYPING
-        let tcConfig = tcConfigP.Get ctok
-#endif
-        let ilModule = dllinfo.RawMetadata 
-        let ilScopeRef = dllinfo.ILScopeRef 
-        let ilShortAssemName = getNameOfScopeRef ilScopeRef 
-        if verbose then dprintn ("Converting F# assembly to F# data structures "+(getNameOfScopeRef ilScopeRef))
-        if verbose then dprintn ("Relinking interface info from F# assembly "+ilShortAssemName)
-        let optDataReaders = ilModule.GetRawFSharpOptimizationData(m, ilShortAssemName, filename)
-
-        let ccuRawDataAndInfos = 
-            ilModule.GetRawFSharpSignatureData(m, ilShortAssemName, filename)
-            |> List.map (fun (ccuName, (sigDataReader, sigDataReaderB)) -> 
-                let data = GetSignatureData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB)
-
-                let optDatas = Map.ofList optDataReaders
-
-                let minfo: PickledCcuInfo = data.RawData 
-                let mspec = minfo.mspec 
-
-#if !NO_EXTENSIONTYPING
-                let invalidateCcu = new Event<_>()
-#endif
-
-                let codeDir = minfo.compileTimeWorkingDir
-                let ccuData: CcuData = 
-                    { ILScopeRef=ilScopeRef
-                      Stamp = newStamp()
-                      FileName = Some filename 
-                      QualifiedName= Some(ilScopeRef.QualifiedName)
-                      SourceCodeDirectory = codeDir (* note: in some cases we fix up this information later *)
-                      IsFSharp=true
-                      Contents = mspec 
-#if !NO_EXTENSIONTYPING
-                      InvalidateEvent=invalidateCcu.Publish
-                      IsProviderGenerated = false
-                      ImportProvidedType = (fun ty -> Import.ImportProvidedType (tcImports.GetImportMap()) m ty)
-#endif
-                      TryGetILModuleDef = ilModule.TryGetILModuleDef
-                      UsesFSharp20PlusQuotations = minfo.usesQuotations
-                      MemberSignatureEquality= (fun ty1 ty2 -> typeEquivAux EraseAll (tcImports.GetTcGlobals()) ty1 ty2)
-                      TypeForwarders = ImportILAssemblyTypeForwarders(tcImports.GetImportMap, m, ilModule.GetRawTypeForwarders()) }
-
-                let ccu = CcuThunk.Create(ccuName, ccuData)
-
-                let optdata = 
-                    lazy 
-                        (match Map.tryFind ccuName optDatas with 
-                         | None -> 
-                            if verbose then dprintf "*** no optimization data for CCU %s, was DLL compiled with --no-optimization-data??\n" ccuName 
-                            None
-                         | Some (readerA, readerB) -> 
-                            let data = GetOptimizationData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), readerA, readerB)
-                            let fixupThunk () = data.OptionalFixup(fun nm -> availableToOptionalCcu(tcImports.FindCcu(ctok, m, nm, lookupOnly=false)))
-
-                            // Make a note of all ccuThunks that may still need to be fixed up when other dlls are loaded
-                            for ccuThunk in data.FixupThunks do
-                                if ccuThunk.IsUnresolvedReference then
-                                    ccuThunks.TryAdd(ccuThunk, fun () -> fixupThunk () |> ignore) |> ignore
-
-                            if verbose then dprintf "found optimization data for CCU %s\n" ccuName
-                            Some (fixupThunk ()))
-
-                let ilg = defaultArg ilGlobalsOpt EcmaMscorlibILGlobals
-
-                let ccuinfo = 
-                    { FSharpViewOfMetadata=ccu 
-                      AssemblyAutoOpenAttributes = ilModule.GetAutoOpenAttributes ilg
-                      AssemblyInternalsVisibleToAttributes = ilModule.GetInternalsVisibleToAttributes ilg
-                      FSharpOptimizationData=optdata 
-#if !NO_EXTENSIONTYPING
-                      IsProviderGenerated = false
-                      TypeProviders = []
-#endif
-                      ILScopeRef = ilScopeRef }  
-
-                let phase2() = 
-#if !NO_EXTENSIONTYPING
-                     match ilModule.TryGetILModuleDef() with 
-                     | None -> () // no type providers can be used without a real IL Module present
-                     | Some ilModule ->
-                         let tps = tcImports.ImportTypeProviderExtensions (ctok, tcConfig, filename, ilScopeRef, ilModule.ManifestOfAssembly.CustomAttrs.AsList, ccu.Contents, invalidateCcu, m)
-                         ccuinfo.TypeProviders <- tps
-#else
-                     ()
-#endif
-                data, ccuinfo, phase2)
-
-        // Register all before relinking to cope with mutually-referential ccus 
-        ccuRawDataAndInfos |> List.iter (p23 >> tcImports.RegisterCcu)
-        let phase2 () =
-            (* Relink *)
-            (* dprintf "Phase2: %s\n" filename; REMOVE DIAGNOSTICS *)
-            ccuRawDataAndInfos
-            |> List.iter (fun (data, _, _) ->
-                let fixupThunk () = data.OptionalFixup(fun nm -> availableToOptionalCcu(tcImports.FindCcu(ctok, m, nm, lookupOnly=false))) |> ignore
-                fixupThunk()
-                for ccuThunk in data.FixupThunks do
-                    if ccuThunk.IsUnresolvedReference then
-                        ccuThunks.TryAdd(ccuThunk, fixupThunk) |> ignore
-                )
-#if !NO_EXTENSIONTYPING
-            ccuRawDataAndInfos |> List.iter (fun (_, _, phase2) -> phase2())
-#endif
-            ccuRawDataAndInfos |> List.map p23 |> List.map ResolvedImportedAssembly
-        phase2
-
-    // NOTE: When used in the Language Service this can cause the transitive checking of projects. Hence it must be cancellable.
-    member tcImports.RegisterAndPrepareToImportReferencedDll (ctok, r: AssemblyResolution) : Cancellable<_ * (unit -> AvailableImportedAssembly list)> =
-      cancellable {
-        CheckDisposed()
-        let m = r.originalReference.Range
-        let filename = r.resolvedPath
-        let! contentsOpt = 
-          cancellable {
-            match r.ProjectReference with 
-            | Some ilb -> return! ilb.EvaluateRawContents ctok
-            | None -> return None
-          }
-
-        let assemblyData = 
-            match contentsOpt with 
-            | Some ilb -> ilb
-            | None -> 
-                let ilModule, ilAssemblyRefs = tcImports.OpenILBinaryModule(ctok, filename, m)
-                RawFSharpAssemblyDataBackedByFileOnDisk (ilModule, ilAssemblyRefs) :> IRawFSharpAssemblyData
-
-        let ilShortAssemName = assemblyData.ShortAssemblyName 
-        let ilScopeRef = assemblyData.ILScopeRef
-
-        if tcImports.IsAlreadyRegistered ilShortAssemName then 
-            let dllinfo = tcImports.FindDllInfo(ctok, m, ilShortAssemName)
-            let phase2() = [tcImports.FindCcuInfo(ctok, m, ilShortAssemName, lookupOnly=true)] 
-            return dllinfo, phase2
-        else 
-            let dllinfo = 
-                { RawMetadata=assemblyData 
-                  FileName=filename
-#if !NO_EXTENSIONTYPING
-                  ProviderGeneratedAssembly=None
-                  IsProviderGenerated=false
-                  ProviderGeneratedStaticLinkMap = None
-#endif
-                  ILScopeRef = ilScopeRef
-                  ILAssemblyRefs = assemblyData.ILAssemblyRefs }
-            tcImports.RegisterDll dllinfo
-            let ilg = defaultArg ilGlobalsOpt EcmaMscorlibILGlobals
-            let phase2 =
-                if assemblyData.HasAnyFSharpSignatureDataAttribute then 
-                    if not (assemblyData.HasMatchingFSharpSignatureDataAttribute ilg) then 
-                        errorR(Error(FSComp.SR.buildDifferentVersionMustRecompile filename, m))
-                        tcImports.PrepareToImportReferencedILAssembly (ctok, m, filename, dllinfo)
-                    else 
-                        try
-                        tcImports.PrepareToImportReferencedFSharpAssembly (ctok, m, filename, dllinfo)
-                        with e -> error(Error(FSComp.SR.buildErrorOpeningBinaryFile(filename, e.Message), m))
-                else
-                    tcImports.PrepareToImportReferencedILAssembly (ctok, m, filename, dllinfo)
-            return dllinfo, phase2
-         }
-
-    // NOTE: When used in the Language Service this can cause the transitive checking of projects. Hence it must be cancellable.
-    member tcImports.RegisterAndImportReferencedAssemblies (ctok, nms: AssemblyResolution list) =
-      cancellable {
-        CheckDisposed()
-        let! results = 
-           nms |> Cancellable.each (fun nm -> 
-               cancellable {
-                   try
-                            let! res = tcImports.RegisterAndPrepareToImportReferencedDll (ctok, nm)
-                            return Some res
-                   with e ->
-                            errorR(Error(FSComp.SR.buildProblemReadingAssembly(nm.resolvedPath, e.Message), nm.originalReference.Range))
-                            return None 
-               })
-
-        let dllinfos, phase2s = results |> List.choose id |> List.unzip
-        fixupOrphanCcus()
-        let ccuinfos = (List.collect (fun phase2 -> phase2()) phase2s) 
-        return dllinfos, ccuinfos
-      }
-      
-    /// Note that implicit loading is not used for compilations from MSBuild, which passes ``--noframework``
-    /// Implicit loading is done in non-cancellation mode. Implicit loading is never used in the language service, so 
-    /// no cancellation is needed.
-    member tcImports.ImplicitLoadIfAllowed (ctok, m, assemblyName, lookupOnly) = 
-        CheckDisposed()
-        // If the user is asking for the default framework then also try to resolve other implicit assemblies as they are discovered.
-        // Using this flag to mean 'allow implicit discover of assemblies'.
-        let tcConfig = tcConfigP.Get ctok
-        if not lookupOnly && tcConfig.implicitlyResolveAssemblies then 
-            let tryFile speculativeFileName = 
-                let foundFile = tcImports.TryResolveAssemblyReference (ctok, AssemblyReference (m, speculativeFileName, None), ResolveAssemblyReferenceMode.Speculative)
-                match foundFile with 
-                | OkResult (warns, res) ->
-                    ReportWarnings warns
-                    tcImports.RegisterAndImportReferencedAssemblies(ctok, res) |> Cancellable.runWithoutCancellation |> ignore
-                    true
-                | ErrorResult (_warns, _err) -> 
-                    // Throw away warnings and errors - this is speculative loading
-                    false
-
-            if tryFile (assemblyName + ".dll") then ()
-            else tryFile (assemblyName + ".exe") |> ignore
-
-#if !NO_EXTENSIONTYPING
-    member tcImports.TryFindProviderGeneratedAssemblyByName(ctok, assemblyName: string) : System.Reflection.Assembly option = 
-        // The assembly may not be in the resolutions, but may be in the load set including EST injected assemblies
-        match tcImports.TryFindDllInfo (ctok, range0, assemblyName, lookupOnly=true) with 
-        | Some res -> 
-            // Provider-generated assemblies don't necessarily have an on-disk representation we can load.
-            res.ProviderGeneratedAssembly 
-        | _ -> None
-#endif
-
-    /// This doesn't need to be cancellable, it is only used by F# Interactive
-    member tcImports.TryFindExistingFullyQualifiedPathBySimpleAssemblyName (ctok, simpleAssemName) : string option = 
-        resolutions.TryFindBySimpleAssemblyName (ctok, simpleAssemName) |> Option.map (fun r -> r.resolvedPath)
-
-    /// This doesn't need to be cancellable, it is only used by F# Interactive
-    member tcImports.TryFindExistingFullyQualifiedPathByExactAssemblyRef(ctok, assemblyRef: ILAssemblyRef) : string option = 
-        resolutions.TryFindByExactILAssemblyRef (ctok, assemblyRef) |> Option.map (fun r -> r.resolvedPath)
-
-    member tcImports.TryResolveAssemblyReference(ctok, assemblyReference: AssemblyReference, mode: ResolveAssemblyReferenceMode) : OperationResult = 
-        let tcConfig = tcConfigP.Get ctok
-        // First try to lookup via the original reference text.
-        match resolutions.TryFindByOriginalReference assemblyReference with
-        | Some assemblyResolution -> 
-            ResultD [assemblyResolution]
-        | None ->
-#if NO_MSBUILD_REFERENCE_RESOLUTION
-           try 
-               ResultD [tcConfig.ResolveLibWithDirectories assemblyReference]
-           with e -> 
-               ErrorD e
-#else                      
-            // Next try to lookup up by the exact full resolved path.
-            match resolutions.TryFindByResolvedPath assemblyReference.Text with 
-            | Some assemblyResolution -> 
-                ResultD [assemblyResolution]
-            | None ->      
-                if tcConfigP.Get(ctok).useSimpleResolution then
-                    let action = 
-                        match mode with 
-                        | ResolveAssemblyReferenceMode.ReportErrors -> CcuLoadFailureAction.RaiseError
-                        | ResolveAssemblyReferenceMode.Speculative -> CcuLoadFailureAction.ReturnNone
-                    match tcConfig.ResolveLibWithDirectories (action, assemblyReference) with 
-                    | Some resolved -> 
-                        resolutions <- resolutions.AddResolutionResults [resolved]
-                        ResultD [resolved]
-                    | None ->
-                        ErrorD(AssemblyNotResolved(assemblyReference.Text, assemblyReference.Range))
-                else 
-                    // This is a previously unencountered assembly. Resolve it and add it to the list.
-                    // But don't cache resolution failures because the assembly may appear on the disk later.
-                    let resolved, unresolved = TcConfig.TryResolveLibsUsingMSBuildRules(tcConfig, [ assemblyReference ], assemblyReference.Range, mode)
-                    match resolved, unresolved with
-                    | (assemblyResolution :: _, _) -> 
-                        resolutions <- resolutions.AddResolutionResults resolved
-                        ResultD [assemblyResolution]
-                    | (_, _ :: _) -> 
-                        resolutions <- resolutions.AddUnresolvedReferences unresolved
-                        ErrorD(AssemblyNotResolved(assemblyReference.Text, assemblyReference.Range))
-                    | [], [] -> 
-                        // Note, if mode=ResolveAssemblyReferenceMode.Speculative and the resolution failed then TryResolveLibsUsingMSBuildRules returns
-                        // the empty list and we convert the failure into an AssemblyNotResolved here.
-                        ErrorD(AssemblyNotResolved(assemblyReference.Text, assemblyReference.Range))
-
-#endif                        
-     
-
-    member tcImports.ResolveAssemblyReference(ctok, assemblyReference, mode) : AssemblyResolution list = 
-        CommitOperationResult(tcImports.TryResolveAssemblyReference(ctok, assemblyReference, mode))
-
-    // Note: This returns a TcImports object. However, framework TcImports are not currently disposed. The only reason
-    // we dispose TcImports is because we need to dispose type providers, and type providers are never included in the framework DLL set.
-    // If a framework set ever includes type providers, you will not have to worry about explicitly calling Dispose as the Finalizer will handle it.
-    static member BuildFrameworkTcImports (ctok, tcConfigP: TcConfigProvider, frameworkDLLs, nonFrameworkDLLs) =
-      cancellable {
-
-        let tcConfig = tcConfigP.Get ctok
-        let tcResolutions = TcAssemblyResolutions.BuildFromPriorResolutions(ctok, tcConfig, frameworkDLLs, [])
-        let tcAltResolutions = TcAssemblyResolutions.BuildFromPriorResolutions(ctok, tcConfig, nonFrameworkDLLs, [])
-
-        let frameworkTcImports = new TcImports(tcConfigP, tcResolutions, None, None, tcConfig.compilationThread) 
-
-        // Fetch the primaryAssembly from the referenced assemblies otherwise 
-        let primaryAssemblyReference =
-            let path = frameworkDLLs |> List.tryFind(fun dll -> String.Compare(Path.GetFileNameWithoutExtension(dll.resolvedPath), tcConfig.primaryAssembly.Name, StringComparison.OrdinalIgnoreCase) = 0)
-            match path with
-            | Some p -> AssemblyReference(range0, p.resolvedPath, None)
-            | None -> tcConfig.PrimaryAssemblyDllReference()
-
-        let primaryAssemblyResolution = frameworkTcImports.ResolveAssemblyReference(ctok, primaryAssemblyReference, ResolveAssemblyReferenceMode.ReportErrors)
-        let! primaryAssem = frameworkTcImports.RegisterAndImportReferencedAssemblies(ctok, primaryAssemblyResolution)
-        let primaryScopeRef = 
-            match primaryAssem with
-              | (_, [ResolvedImportedAssembly ccu]) -> ccu.FSharpViewOfMetadata.ILScopeRef
-              | _ -> failwith "unexpected"
-
-        let primaryAssemblyResolvedPath =
-            match primaryAssemblyResolution with
-            | [primaryAssemblyResolution] -> primaryAssemblyResolution.resolvedPath
-            | _ -> failwith "unexpected"
-
-        let resolvedAssemblies = tcResolutions.GetAssemblyResolutions()
-
-        let readerSettings: ILReaderOptions = 
-            { pdbDirPath=None
-              reduceMemoryUsage = tcConfig.reduceMemoryUsage
-              metadataOnly = MetadataOnlyFlag.Yes
-              tryGetMetadataSnapshot = tcConfig.tryGetMetadataSnapshot }
-
-        let tryFindAssemblyByExportedType manifest (exportedType: ILExportedTypeOrForwarder) =
-            match exportedType.ScopeRef, primaryScopeRef with
-            | ILScopeRef.Assembly aref1, ILScopeRef.Assembly aref2 when aref1.EqualsIgnoringVersion aref2 ->
-                mkRefToILAssembly manifest
-                |> Some
-            | _ -> 
-                None
-
-        let tryFindAssemblyThatForwardsToPrimaryAssembly manifest =
-            manifest.ExportedTypes.TryFindByName "System.Object"
-            |> Option.bind (tryFindAssemblyByExportedType manifest)
-
-        // Determine what other assemblies could have been the primary assembly
-        // by checking to see if "System.Object" is an exported type.
-        let assembliesThatForwardToPrimaryAssembly =
-            resolvedAssemblies
-            |> List.choose (fun resolvedAssembly ->
-                if primaryAssemblyResolvedPath <> resolvedAssembly.resolvedPath then
-                    let reader = OpenILModuleReader resolvedAssembly.resolvedPath readerSettings
-                    reader.ILModuleDef.Manifest
-                    |> Option.bind tryFindAssemblyThatForwardsToPrimaryAssembly
-                else
-                    None)
-
-        let ilGlobals = mkILGlobals (primaryScopeRef, assembliesThatForwardToPrimaryAssembly)
-        frameworkTcImports.SetILGlobals ilGlobals
-
-        // Load the rest of the framework DLLs all at once (they may be mutually recursive)
-        let! _assemblies = frameworkTcImports.RegisterAndImportReferencedAssemblies (ctok, resolvedAssemblies)
-
-        // These are the DLLs we can search for well-known types
-        let sysCcus =
-             [| for ccu in frameworkTcImports.GetCcusInDeclOrder() do
-                   //printfn "found sys ccu %s" ccu.AssemblyName
-                   yield ccu |]
-
-        //for ccu in nonFrameworkDLLs do
-        //    printfn "found non-sys ccu %s" ccu.resolvedPath
-
-        let tryFindSysTypeCcu path typeName =
-            sysCcus |> Array.tryFind (fun ccu -> ccuHasType ccu path typeName) 
-
-        let fslibCcu = 
-            if tcConfig.compilingFslib then 
-                // When compiling FSharp.Core.dll, the fslibCcu reference to FSharp.Core.dll is a delayed ccu thunk fixed up during type checking
-                CcuThunk.CreateDelayed getFSharpCoreLibraryName
-            else
-                let fslibCcuInfo =
-                    let coreLibraryReference = tcConfig.CoreLibraryDllReference()
-                    
-                    let resolvedAssemblyRef = 
-                        match tcResolutions.TryFindByOriginalReference coreLibraryReference with
-                        | Some resolution -> Some resolution
-                        | _ -> 
-                            // Are we using a "non-canonical" FSharp.Core?
-                            match tcAltResolutions.TryFindByOriginalReference coreLibraryReference with
-                            | Some resolution -> Some resolution
-                            | _ -> tcResolutions.TryFindByOriginalReferenceText (getFSharpCoreLibraryName)  // was the ".dll" elided?
-                    
-                    match resolvedAssemblyRef with 
-                    | Some coreLibraryResolution -> 
-                        match frameworkTcImports.RegisterAndImportReferencedAssemblies(ctok, [coreLibraryResolution]) |> Cancellable.runWithoutCancellation with
-                        | (_, [ResolvedImportedAssembly fslibCcuInfo ]) -> fslibCcuInfo
-                        | _ -> 
-                            error(InternalError("BuildFrameworkTcImports: no successful import of "+coreLibraryResolution.resolvedPath, coreLibraryResolution.originalReference.Range))
-                    | None -> 
-                        error(InternalError(sprintf "BuildFrameworkTcImports: no resolution of '%s'" coreLibraryReference.Text, rangeStartup))
-                IlxSettings.ilxFsharpCoreLibAssemRef <- 
-                    (let scoref = fslibCcuInfo.ILScopeRef
-                     match scoref with
-                     | ILScopeRef.Assembly aref -> Some aref
-                     | ILScopeRef.Local | ILScopeRef.Module _ | ILScopeRef.PrimaryAssembly -> 
-                        error(InternalError("not ILScopeRef.Assembly", rangeStartup)))
-                fslibCcuInfo.FSharpViewOfMetadata
-
-        // OK, now we have both mscorlib.dll and FSharp.Core.dll we can create TcGlobals
-        let tcGlobals = TcGlobals(tcConfig.compilingFslib, ilGlobals, fslibCcu,
-                                  tcConfig.implicitIncludeDir, tcConfig.mlCompatibility,
-                                  tcConfig.isInteractive, tcConfig.assumeNullOnImport, tcConfig.checkNullness, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations,
-                                  tcConfig.noDebugData, tcConfig.pathMap, tcConfig.langVersion)
-
-#if DEBUG
-        // the global_g reference cell is used only for debug printing
-        global_g <- Some tcGlobals
-#endif
-        frameworkTcImports.SetTcGlobals tcGlobals
-        return tcGlobals, frameworkTcImports
-      }
-
-    member tcImports.ReportUnresolvedAssemblyReferences knownUnresolved =
-        // Report that an assembly was not resolved.
-        let reportAssemblyNotResolved(file, originalReferences: AssemblyReference list) = 
-            originalReferences |> List.iter(fun originalReference -> errorR(AssemblyNotResolved(file, originalReference.Range)))
-        knownUnresolved
-        |> List.map (function UnresolvedAssemblyReference(file, originalReferences) -> file, originalReferences)
-        |> List.iter reportAssemblyNotResolved
-        
-    static member BuildNonFrameworkTcImports (ctok, tcConfigP: TcConfigProvider, tcGlobals: TcGlobals, baseTcImports, nonFrameworkReferences, knownUnresolved) = 
-      cancellable {
-        let tcConfig = tcConfigP.Get ctok
-        let tcResolutions = TcAssemblyResolutions.BuildFromPriorResolutions(ctok, tcConfig, nonFrameworkReferences, knownUnresolved)
-        let references = tcResolutions.GetAssemblyResolutions()
-        let tcImports = new TcImports(tcConfigP, tcResolutions, Some baseTcImports, Some tcGlobals.ilg, tcConfig.compilationThread)
-        let! _assemblies = tcImports.RegisterAndImportReferencedAssemblies(ctok, references)
-        tcImports.ReportUnresolvedAssemblyReferences knownUnresolved
-        return tcImports
-      }
-      
-    static member BuildTcImports(ctok, tcConfigP: TcConfigProvider) = 
-      cancellable {
-        let tcConfig = tcConfigP.Get ctok
-        //let foundationalTcImports, tcGlobals = TcImports.BuildFoundationalTcImports tcConfigP
-        let frameworkDLLs, nonFrameworkReferences, knownUnresolved = TcAssemblyResolutions.SplitNonFoundationalResolutions(ctok, tcConfig)
-        let! tcGlobals, frameworkTcImports = TcImports.BuildFrameworkTcImports (ctok, tcConfigP, frameworkDLLs, nonFrameworkReferences)
-        let! tcImports = TcImports.BuildNonFrameworkTcImports(ctok, tcConfigP, tcGlobals, frameworkTcImports, nonFrameworkReferences, knownUnresolved)
-        return tcGlobals, tcImports
-      }
-        
-    interface System.IDisposable with 
-        member tcImports.Dispose() = 
-            dispose ()
-
-    override tcImports.ToString() = "TcImports(...)"
-        
-/// Process #r in F# Interactive.
-/// Adds the reference to the tcImports and add the ccu to the type checking environment.
-let RequireDLL (ctok, tcImports: TcImports, tcEnv, thisAssemblyName, m, file) =
-    let resolutions = CommitOperationResult(tcImports.TryResolveAssemblyReference(ctok, AssemblyReference(m, file, None), ResolveAssemblyReferenceMode.ReportErrors))
-    let dllinfos, ccuinfos = tcImports.RegisterAndImportReferencedAssemblies(ctok, resolutions) |> Cancellable.runWithoutCancellation
-
-    let asms = 
-        ccuinfos |> List.map (function
-            | ResolvedImportedAssembly asm -> asm
-            | UnresolvedImportedAssembly assemblyName -> error(Error(FSComp.SR.buildCouldNotResolveAssemblyRequiredByFile(assemblyName, file), m)))
-
-    let g = tcImports.GetTcGlobals()
-    let amap = tcImports.GetImportMap()
-    let buildTcEnv tcEnv asm =
-        AddCcuToTcEnv(g, amap, m, tcEnv, thisAssemblyName, asm.FSharpViewOfMetadata, asm.AssemblyAutoOpenAttributes, asm.AssemblyInternalsVisibleToAttributes)
-    let tcEnv = (tcEnv, asms) ||> List.fold buildTcEnv
-    tcEnv, (dllinfos, asms)
-
-let ProcessMetaCommandsFromInput
-     (nowarnF: 'state -> range * string -> 'state,
-      dllRequireF: 'state -> range * string -> 'state,
-      packageRequireF: 'state -> IDependencyManagerProvider * range * string -> 'state,
-      loadSourceF: 'state -> range * string -> unit)
-     (tcConfig:TcConfigBuilder, inp, pathOfMetaCommandSource, state0) =
-
-    use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parse
-
-    let canHaveScriptMetaCommands = 
-        match inp with 
-        | ParsedInput.SigFile (_) -> false
-        | ParsedInput.ImplFile (ParsedImplFileInput (isScript = isScript)) -> isScript
-
-    let ProcessMetaCommand state hash =
-        let mutable matchedm = range0
-        try 
-            match hash with 
-            | ParsedHashDirective("I", args, m) ->
-               if not canHaveScriptMetaCommands then 
-                   errorR(HashIncludeNotAllowedInNonScript m)
-               match args with 
-               | [path] -> 
-                   matchedm <- m
-                   tcConfig.AddIncludePath(m, path, pathOfMetaCommandSource)
-                   state
-               | _ -> 
-                   errorR(Error(FSComp.SR.buildInvalidHashIDirective(), m))
-                   state
-            | ParsedHashDirective("nowarn",numbers,m) ->
-               List.fold (fun state d -> nowarnF state (m,d)) state numbers
-
-            | ParsedHashDirective(("reference" | "r"),args,m) -> 
-                if not canHaveScriptMetaCommands then
-                    errorR(HashReferenceNotAllowedInNonScript m)
-
-                let reportError =
-                    let report errorType err msg =
-                        let error = err, msg
-                        match errorType with
-                        | ErrorReportType.Warning -> warning(Error(error, m))
-                        | ErrorReportType.Error -> errorR(Error(error, m))
-                    ResolvingErrorReport (report)
-
-                match args with
-                | [path] ->
-                    matchedm <- m
-                    let output = tcConfig.outputDir |> Option.defaultValue ""
-                    let dm = tcConfig.dependencyProvider.TryFindDependencyManagerInPath(tcConfig.compilerToolPaths, output , reportError, path)
-                    match dm with
-                    | null, null ->
-                       errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
-                       state
-
-                    // #r "Assembly"
-                    | NonNull path, null ->
-                        let p =
-                            if String.IsNullOrWhiteSpace(path) then ""
-                            else path
-
-                        dllRequireF state (m, p)
-
-                    | _, NonNull dependencyManager ->
-                        if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
-                            packageRequireF state (dependencyManager, m, path)
-                        else
-                            errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
-                            state
-
-                | _ ->
-                   errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
-                   state
-
-            | ParsedHashDirective("load", args, m) -> 
-               if not canHaveScriptMetaCommands then 
-                   errorR(HashDirectiveNotAllowedInNonScript m)
-               match args with 
-               | _ :: _ -> 
-                  matchedm<-m
-                  args |> List.iter (fun path -> loadSourceF state (m, path))
-               | _ -> 
-                  errorR(Error(FSComp.SR.buildInvalidHashloadDirective(), m))
-               state
-            | ParsedHashDirective("time", args, m) -> 
-               if not canHaveScriptMetaCommands then 
-                   errorR(HashDirectiveNotAllowedInNonScript m)
-               match args with 
-               | [] -> 
-                   ()
-               | ["on" | "off"] -> 
-                   ()
-               | _ -> 
-                   errorR(Error(FSComp.SR.buildInvalidHashtimeDirective(), m))
-               state
-               
-            | _ -> 
-               
-            (* warning(Error("This meta-command has been ignored", m)) *) 
-               state
-        with e -> errorRecovery e matchedm; state
-
-    let rec WarnOnIgnoredSpecDecls decls = 
-        decls |> List.iter (fun d -> 
-            match d with 
-            | SynModuleSigDecl.HashDirective (_, m) -> warning(Error(FSComp.SR.buildDirectivesInModulesAreIgnored(), m)) 
-            | SynModuleSigDecl.NestedModule (_, _, subDecls, _) -> WarnOnIgnoredSpecDecls subDecls
-            | _ -> ())
-
-    let rec WarnOnIgnoredImplDecls decls = 
-        decls |> List.iter (fun d -> 
-            match d with 
-            | SynModuleDecl.HashDirective (_, m) -> warning(Error(FSComp.SR.buildDirectivesInModulesAreIgnored(), m)) 
-            | SynModuleDecl.NestedModule (_, _, subDecls, _, _) -> WarnOnIgnoredImplDecls subDecls
-            | _ -> ())
-
-    let ProcessMetaCommandsFromModuleSpec state (SynModuleOrNamespaceSig(_, _, _, decls, _, _, _, _)) =
-        List.fold (fun s d -> 
-            match d with 
-            | SynModuleSigDecl.HashDirective (h, _) -> ProcessMetaCommand s h
-            | SynModuleSigDecl.NestedModule (_, _, subDecls, _) -> WarnOnIgnoredSpecDecls subDecls; s
-            | _ -> s)
-         state
-         decls 
-
-    let ProcessMetaCommandsFromModuleImpl state (SynModuleOrNamespace(_, _, _, decls, _, _, _, _)) =
-        List.fold (fun s d -> 
-            match d with 
-            | SynModuleDecl.HashDirective (h, _) -> ProcessMetaCommand s h
-            | SynModuleDecl.NestedModule (_, _, subDecls, _, _) -> WarnOnIgnoredImplDecls subDecls; s
-            | _ -> s)
-         state
-         decls
-
-    match inp with 
-    | ParsedInput.SigFile (ParsedSigFileInput (_, _, _, hashDirectives, specs)) -> 
-        let state = List.fold ProcessMetaCommand state0 hashDirectives
-        let state = List.fold ProcessMetaCommandsFromModuleSpec state specs
-        state
-    | ParsedInput.ImplFile (ParsedImplFileInput (_, _, _, _, hashDirectives, impls, _)) -> 
-        let state = List.fold ProcessMetaCommand state0 hashDirectives
-        let state = List.fold ProcessMetaCommandsFromModuleImpl state impls
-        state
-
-let ApplyNoWarnsToTcConfig (tcConfig: TcConfig, inp: ParsedInput, pathOfMetaCommandSource) = 
-    // Clone
-    let tcConfigB = tcConfig.CloneOfOriginalBuilder 
-    let addNoWarn = fun () (m,s) -> tcConfigB.TurnWarningOff(m, s)
-    let addReferencedAssemblyByPath = fun () (_m,_s) -> ()
-    let addDependencyManagerText = fun () (_prefix,_m,_s) -> ()
-    let addLoadedSource = fun () (_m,_s) -> ()
-    ProcessMetaCommandsFromInput (addNoWarn, addReferencedAssemblyByPath, addDependencyManagerText, addLoadedSource) (tcConfigB, inp, pathOfMetaCommandSource, ())
-    TcConfig.Create(tcConfigB, validate=false)
-
-let ApplyMetaCommandsFromInputToTcConfig (tcConfig: TcConfig, inp: ParsedInput, pathOfMetaCommandSource) = 
-    // Clone
-    let tcConfigB = tcConfig.CloneOfOriginalBuilder 
-    let getWarningNumber = fun () _ -> () 
-    let addReferencedAssemblyByPath = fun () (m,s) -> tcConfigB.AddReferencedAssemblyByPath(m,s)
-    let addDependencyManagerText = fun () (packageManager, m,s) -> tcConfigB.AddDependencyManagerText(packageManager,m,s)
-    let addLoadedSource = fun () (m,s) -> tcConfigB.AddLoadedSource(m,s,pathOfMetaCommandSource)
-    ProcessMetaCommandsFromInput (getWarningNumber, addReferencedAssemblyByPath, addDependencyManagerText, addLoadedSource) (tcConfigB, inp, pathOfMetaCommandSource, ())
-    TcConfig.Create(tcConfigB, validate=false)
-
-//----------------------------------------------------------------------------
-// Compute the load closure of a set of script files
-//--------------------------------------------------------------------------
-
-let GetAssemblyResolutionInformation(ctok, tcConfig: TcConfig) =
-    use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parameter
-    let assemblyList = TcAssemblyResolutions.GetAllDllReferences tcConfig
-    let resolutions = TcAssemblyResolutions.ResolveAssemblyReferences (ctok, tcConfig, assemblyList, [])
-    resolutions.GetAssemblyResolutions(), resolutions.GetUnresolvedReferences()
-
-[]
-type LoadClosureInput = 
-    { FileName: string
-      SyntaxTree: ParsedInput option
-      ParseDiagnostics: (PhasedDiagnostic * bool) list 
-      MetaCommandDiagnostics: (PhasedDiagnostic * bool) list }
-
-[]
-type LoadClosure = 
-    { /// The source files along with the ranges of the #load positions in each file.
-      SourceFiles: (string * range list) list
-      /// The resolved references along with the ranges of the #r positions in each file.
-      References: (string * AssemblyResolution list) list
-      /// The list of references that were not resolved during load closure. These may still be extension references.
-      UnresolvedReferences: UnresolvedAssemblyReference list
-      /// The list of all sources in the closure with inputs when available
-      Inputs: LoadClosureInput list
-      /// The #load, including those that didn't resolve
-      OriginalLoadReferences: (range * string * string) list
-      /// The #nowarns
-      NoWarns: (string * range list) list
-      /// Diagnostics seen while processing resolutions
-      ResolutionDiagnostics: (PhasedDiagnostic * bool) list
-      /// Diagnostics seen while parsing root of closure
-      AllRootFileDiagnostics: (PhasedDiagnostic * bool) list
-      /// Diagnostics seen while processing the compiler options implied root of closure
-      LoadClosureRootFileDiagnostics: (PhasedDiagnostic * bool) list }   
-
-
-[]
-type CodeContext =
-    | CompilationAndEvaluation // in fsi.exe
-    | Compilation  // in fsc.exe
-    | Editing // in VS
-
-module ScriptPreprocessClosure = 
-    open Internal.Utilities.Text.Lexing
-    
-    /// Represents an input to the closure finding process
-    type ClosureSource = ClosureSource of filename: string * referenceRange: range * sourceText: ISourceText * parseRequired: bool 
-        
-    /// Represents an output of the closure finding process
-    type ClosureFile = ClosureFile of string * range * ParsedInput option * (PhasedDiagnostic * bool) list * (PhasedDiagnostic * bool) list * (string * range) list // filename, range, errors, warnings, nowarns
-
-    type Observed() =
-        let seen = System.Collections.Generic.Dictionary<_, bool>()
-        member ob.SetSeen check = 
-            if not(seen.ContainsKey check) then 
-                seen.Add(check, true)
-        
-        member ob.HaveSeen check =
-            seen.ContainsKey check
-    
-    /// Parse a script from source.
-    let ParseScriptText
-           (filename: string, sourceText: ISourceText, tcConfig: TcConfig, codeContext,
-            lexResourceManager: Lexhelp.LexResourceManager, errorLogger: ErrorLogger) =
-
-        // fsc.exe -- COMPILED\!INTERACTIVE
-        // fsi.exe -- !COMPILED\INTERACTIVE
-        // Language service
-        //     .fs -- EDITING + COMPILED\!INTERACTIVE
-        //     .fsx -- EDITING + !COMPILED\INTERACTIVE    
-        let defines =
-            match codeContext with 
-            | CodeContext.CompilationAndEvaluation -> ["INTERACTIVE"]
-            | CodeContext.Compilation -> ["COMPILED"]
-            | CodeContext.Editing -> "EDITING" :: (if IsScript filename then ["INTERACTIVE"] else ["COMPILED"])
-
-        let isFeatureSupported featureId = tcConfig.langVersion.SupportsFeature featureId
-        let lexbuf = UnicodeLexing.SourceTextAsLexbuf(isFeatureSupported, sourceText) 
-
-        let isLastCompiland = (IsScript filename), tcConfig.target.IsExe        // The root compiland is last in the list of compilands.
-        ParseOneInputLexbuf (tcConfig, lexResourceManager, defines, lexbuf, filename, isLastCompiland, errorLogger) 
-
-    /// Create a TcConfig for load closure starting from a single .fsx file
-    let CreateScriptTextTcConfig 
-           (legacyReferenceResolver, defaultFSharpBinariesDir, 
-            filename: string, codeContext, 
-            useSimpleResolution, useFsiAuxLib, 
-            basicReferences, applyCommandLineArgs, 
-            assumeDotNetFramework, useSdkRefs,
-            tryGetMetadataSnapshot, reduceMemoryUsage) =  
-
-        let projectDir = Path.GetDirectoryName filename
-        let isInteractive = (codeContext = CodeContext.CompilationAndEvaluation)
-        let isInvalidationSupported = (codeContext = CodeContext.Editing)
-
-        let tcConfigB = 
-            TcConfigBuilder.CreateNew
-                (legacyReferenceResolver, defaultFSharpBinariesDir, reduceMemoryUsage, projectDir, 
-                 isInteractive, isInvalidationSupported, defaultCopyFSharpCore=CopyFSharpCoreFlag.No, 
-                 tryGetMetadataSnapshot=tryGetMetadataSnapshot) 
-
-        applyCommandLineArgs tcConfigB
-
-        match basicReferences with 
-        | None -> (basicReferencesForScriptLoadClosure useFsiAuxLib useSdkRefs assumeDotNetFramework) |> List.iter(fun f->tcConfigB.AddReferencedAssemblyByPath(range0, f)) // Add script references
-        | Some rs -> for m, r in rs do tcConfigB.AddReferencedAssemblyByPath(m, r)
-
-        tcConfigB.resolutionEnvironment <-
-            match codeContext with 
-            | CodeContext.Editing -> ResolutionEnvironment.EditingOrCompilation true
-            | CodeContext.Compilation -> ResolutionEnvironment.EditingOrCompilation false
-            | CodeContext.CompilationAndEvaluation -> ResolutionEnvironment.CompilationAndEvaluation
-        tcConfigB.framework <- false 
-        tcConfigB.useSimpleResolution <- useSimpleResolution
-        // Indicates that there are some references not in basicReferencesForScriptLoadClosure which should
-        // be added conditionally once the relevant version of mscorlib.dll has been detected.
-        tcConfigB.implicitlyResolveAssemblies <- false
-        tcConfigB.useSdkRefs <- useSdkRefs
-
-        TcConfig.Create(tcConfigB, validate=true)
-
-    let ClosureSourceOfFilename(filename, m, inputCodePage, parseRequired) = 
-        try
-            let filename = FileSystem.GetFullPathShim filename
-            use stream = FileSystem.FileStreamReadShim filename
-            use reader = 
-                match inputCodePage with 
-                | None -> new StreamReader(stream, true)
-                | Some (n: int) -> new StreamReader(stream, Encoding.GetEncoding n) 
-            let source = reader.ReadToEnd()
-            [ClosureSource(filename, m, SourceText.ofString source, parseRequired)]
-        with e -> 
-            errorRecovery e m 
-            []
-            
-    let ApplyMetaCommandsFromInputToTcConfigAndGatherNoWarn
-           (tcConfig: TcConfig, inp: ParsedInput, pathOfMetaCommandSource) = 
-
-        let tcConfigB = tcConfig.CloneOfOriginalBuilder 
-        let mutable nowarns = [] 
-        let getWarningNumber = fun () (m, s) -> nowarns <- (s, m) :: nowarns
-        let addReferencedAssemblyByPath = fun () (m, s) -> tcConfigB.AddReferencedAssemblyByPath(m, s)
-        let addDependencyManagerText = fun () (packageManagerPrefix,m,s) -> tcConfigB.AddDependencyManagerText(packageManagerPrefix,m,s)
-        let addLoadedSource = fun () (m, s) -> tcConfigB.AddLoadedSource(m, s, pathOfMetaCommandSource)
-        try 
-            ProcessMetaCommandsFromInput (getWarningNumber, addReferencedAssemblyByPath, addDependencyManagerText, addLoadedSource) (tcConfigB, inp, pathOfMetaCommandSource, ())
-        with ReportedError _ ->
-            // Recover by using whatever did end up in the tcConfig
-            ()
-            
-        try
-            TcConfig.Create(tcConfigB, validate=false), nowarns
-        with ReportedError _ ->
-            // Recover by using a default TcConfig.
-            let tcConfigB = tcConfig.CloneOfOriginalBuilder 
-            TcConfig.Create(tcConfigB, validate=false), nowarns
-
-    let FindClosureFiles(mainFile, _m, closureSources, origTcConfig:TcConfig, codeContext, lexResourceManager: Lexhelp.LexResourceManager) =
-        let mutable tcConfig = origTcConfig
-
-        let observedSources = Observed()
-        let loadScripts = HashSet<_>()
-
-        // Resolve the packages
-        let rec resolveDependencyManagerSources scriptName =
-            if not (loadScripts.Contains scriptName) then
-                [ for kv in tcConfig.packageManagerLines do
-                    let packageManagerKey, packageManagerLines = kv.Key, kv.Value
-                    match packageManagerLines with
-                    | [] -> ()
-                    | (_, _, m)::_ ->
-                        let reportError =
-                            let report errorType err msg =
-                                let error = err, msg
-                                match errorType with
-                                | ErrorReportType.Warning -> warning(Error(error, m))
-                                | ErrorReportType.Error -> errorR(Error(error, m))
-                            ResolvingErrorReport (report)
-
-                        match origTcConfig.packageManagerLines |> Map.tryFind packageManagerKey with
-                        | Some oldDependencyManagerLines when oldDependencyManagerLines = packageManagerLines -> ()
-                        | _ ->
-                            let outputDir =  tcConfig.outputDir |> Option.defaultValue ""
-                            match tcConfig.dependencyProvider.TryFindDependencyManagerByKey(tcConfig.compilerToolPaths, outputDir, reportError, packageManagerKey) with
-                            | null ->
-                                errorR(Error(tcConfig.dependencyProvider.CreatePackageManagerUnknownError(tcConfig.compilerToolPaths, outputDir, packageManagerKey, reportError), m))
-
-                            | NonNull dependencyManager ->
-                                let inline snd3 (_, b, _) = b
-                                let packageManagerTextLines = packageManagerLines |> List.map snd3
-                                let result = tcConfig.dependencyProvider.Resolve(dependencyManager, ".fsx", packageManagerTextLines, reportError, executionTfm, executionRid, tcConfig.implicitIncludeDir, mainFile, scriptName)
-                                match result.Success with
-                                | true ->
-                                    // Resolution produced no errors
-                                    if not (Seq.isEmpty result.Roots) then
-                                        let tcConfigB = tcConfig.CloneOfOriginalBuilder
-                                        for folder in result.Roots do 
-                                            tcConfigB.AddIncludePath(m, folder, "")
-                                        tcConfigB.packageManagerLines <- tcConfigB.packageManagerLines |> Map.map(fun _ l -> l |> List.map(fun (_, p, m) -> true, p, m))
-                                        tcConfig <- TcConfig.Create(tcConfigB, validate=false)
-                                    for script in result.SourceFiles do
-                                        let scriptText = File.ReadAllText script
-                                        loadScripts.Add script |> ignore
-                                        let iSourceText = SourceText.ofString scriptText
-                                        yield! loop (ClosureSource(script, m, iSourceText, true))
-
-                                | false ->
-                                    // Resolution produced errors update packagerManagerLines entries to note these failure
-                                    // failed resolutions will no longer be considered
-                                    let tcConfigB = tcConfig.CloneOfOriginalBuilder
-                                    tcConfigB.packageManagerLines <- tcConfigB.packageManagerLines |> Map.map(fun _ l -> l |> List.filter(fun (tried, _, _) -> tried))
-                                    tcConfig <- TcConfig.Create(tcConfigB, validate=false)]
-            else []
-
-        and loop (ClosureSource(filename, m, sourceText, parseRequired)) = 
-            [   if not (observedSources.HaveSeen(filename)) then
-                    observedSources.SetSeen(filename)
-                    //printfn "visiting %s" filename
-                    if IsScript filename || parseRequired then 
-                        let parseResult, parseDiagnostics =
-                            let errorLogger = CapturingErrorLogger("FindClosureParse")
-                            use _unwindEL = PushErrorLoggerPhaseUntilUnwind (fun _ -> errorLogger)
-                            let result = ParseScriptText (filename, sourceText, tcConfig, codeContext, lexResourceManager, errorLogger) 
-                            result, errorLogger.Diagnostics
-
-                        match parseResult with 
-                        | Some parsedScriptAst ->
-                            let errorLogger = CapturingErrorLogger("FindClosureMetaCommands")
-                            use _unwindEL = PushErrorLoggerPhaseUntilUnwind (fun _ -> errorLogger)
-                            let pathOfMetaCommandSource = Path.GetDirectoryName filename
-                            let preSources = tcConfig.GetAvailableLoadedSources()
-
-                            let tcConfigResult, noWarns = ApplyMetaCommandsFromInputToTcConfigAndGatherNoWarn (tcConfig, parsedScriptAst, pathOfMetaCommandSource)
-                            tcConfig <- tcConfigResult // We accumulate the tcConfig in order to collect assembly references
-
-                            yield! resolveDependencyManagerSources filename
-
-                            let postSources = tcConfig.GetAvailableLoadedSources()
-                            let sources = if preSources.Length < postSources.Length then postSources.[preSources.Length..] else []
-
-                            yield! resolveDependencyManagerSources filename
-                            for (m, subFile) in sources do
-                                if IsScript subFile then 
-                                    for subSource in ClosureSourceOfFilename(subFile, m, tcConfigResult.inputCodePage, false) do
-                                        yield! loop subSource
-                                else
-                                    yield ClosureFile(subFile, m, None, [], [], []) 
-                            yield ClosureFile(filename, m, Some parsedScriptAst, parseDiagnostics, errorLogger.Diagnostics, noWarns)
-
-                        | None -> 
-                            printfn "yielding source %s (failed parse)" filename
-                            yield ClosureFile(filename, m, None, parseDiagnostics, [], [])
-                    else 
-                        // Don't traverse into .fs leafs.
-                        printfn "yielding non-script source %s" filename
-                        yield ClosureFile(filename, m, None, [], [], []) ]
-
-        closureSources |> List.collect loop, tcConfig
-        
-    /// Reduce the full directive closure into LoadClosure
-    let GetLoadClosure(ctok, rootFilename, closureFiles, tcConfig: TcConfig, codeContext) = 
-    
-        // Mark the last file as isLastCompiland. 
-        let closureFiles =
-            if isNil closureFiles then  
-                closureFiles 
-            else 
-                match List.frontAndBack closureFiles with
-                | rest, ClosureFile
-                           (filename, m, 
-                            Some(ParsedInput.ImplFile (ParsedImplFileInput (name, isScript, qualNameOfFile, scopedPragmas, hashDirectives, implFileFlags, _))), 
-                            parseDiagnostics, metaDiagnostics, nowarns) -> 
-
-                    let isLastCompiland = (true, tcConfig.target.IsExe)
-                    rest @ [ClosureFile
-                                (filename, m, 
-                                 Some(ParsedInput.ImplFile (ParsedImplFileInput (name, isScript, qualNameOfFile, scopedPragmas, hashDirectives, implFileFlags, isLastCompiland))), 
-                                 parseDiagnostics, metaDiagnostics, nowarns)]
-
-                | _ -> closureFiles
-
-        // Get all source files.
-        let sourceFiles = [ for (ClosureFile(filename, m, _, _, _, _)) in closureFiles -> (filename, m) ]
-
-        let sourceInputs = 
-            [  for (ClosureFile(filename, _, input, parseDiagnostics, metaDiagnostics, _nowarns)) in closureFiles ->
-                   ({ FileName=filename
-                      SyntaxTree=input
-                      ParseDiagnostics=parseDiagnostics
-                      MetaCommandDiagnostics=metaDiagnostics } : LoadClosureInput) ]
-
-        let globalNoWarns = closureFiles |> List.collect (fun (ClosureFile(_, _, _, _, _, noWarns)) -> noWarns)
-
-        // Resolve all references.
-        let references, unresolvedReferences, resolutionDiagnostics = 
-            let errorLogger = CapturingErrorLogger("GetLoadClosure") 
-        
-            use unwindEL = PushErrorLoggerPhaseUntilUnwind (fun _ -> errorLogger)
-            let references, unresolvedReferences = GetAssemblyResolutionInformation(ctok, tcConfig)
-            let references = references |> List.map (fun ar -> ar.resolvedPath, ar)
-            references, unresolvedReferences, errorLogger.Diagnostics
-
-        // Root errors and warnings - look at the last item in the closureFiles list
-        let loadClosureRootDiagnostics, allRootDiagnostics = 
-            match List.rev closureFiles with
-            | ClosureFile(_, _, _, parseDiagnostics, metaDiagnostics, _) :: _ -> 
-                (metaDiagnostics @ resolutionDiagnostics), 
-                (parseDiagnostics @ metaDiagnostics @ resolutionDiagnostics)
-            | _ -> [], [] // When no file existed.
-        
-        let isRootRange exn =
-            match GetRangeOfDiagnostic exn with
-            | Some m -> 
-                // Return true if the error was *not* from a #load-ed file.
-                let isArgParameterWhileNotEditing = (codeContext <> CodeContext.Editing) && (Range.equals m range0 || Range.equals m rangeStartup || Range.equals m rangeCmdArgs)
-                let isThisFileName = (0 = String.Compare(rootFilename, m.FileName, StringComparison.OrdinalIgnoreCase))
-                isArgParameterWhileNotEditing || isThisFileName
-            | None -> true
-
-        // Filter out non-root errors and warnings
-        let allRootDiagnostics = allRootDiagnostics |> List.filter (fst >> isRootRange)
-        
-        let result: LoadClosure =
-            { SourceFiles = List.groupBy fst sourceFiles |> List.map (map2Of2 (List.map snd))
-              References = List.groupBy fst references |> List.map (map2Of2 (List.map snd))
-              UnresolvedReferences = unresolvedReferences
-              Inputs = sourceInputs
-              NoWarns = List.groupBy fst globalNoWarns |> List.map (map2Of2 (List.map snd))
-              OriginalLoadReferences = tcConfig.loadedSources
-              ResolutionDiagnostics = resolutionDiagnostics
-              AllRootFileDiagnostics = allRootDiagnostics
-              LoadClosureRootFileDiagnostics = loadClosureRootDiagnostics }
-
-        result
-
-    /// Given source text, find the full load closure. Used from service.fs, when editing a script file
-    let GetFullClosureOfScriptText
-           (ctok, legacyReferenceResolver, defaultFSharpBinariesDir, 
-            filename, sourceText, codeContext, 
-            useSimpleResolution, useFsiAuxLib, useSdkRefs,
-            lexResourceManager: Lexhelp.LexResourceManager, 
-            applyCommandLineArgs, assumeDotNetFramework,
-            tryGetMetadataSnapshot, reduceMemoryUsage) =
-
-        // Resolve the basic references such as FSharp.Core.dll first, before processing any #I directives in the script
-        //
-        // This is tries to mimic the action of running the script in F# Interactive - the initial context for scripting is created
-        // first, then #I and other directives are processed.
-        let references0 = 
-            let tcConfig = 
-                CreateScriptTextTcConfig(legacyReferenceResolver, defaultFSharpBinariesDir, 
-                    filename, codeContext, useSimpleResolution, 
-                    useFsiAuxLib, None, applyCommandLineArgs, assumeDotNetFramework, 
-                    useSdkRefs, tryGetMetadataSnapshot, reduceMemoryUsage)
-
-            let resolutions0, _unresolvedReferences = GetAssemblyResolutionInformation(ctok, tcConfig)
-            let references0 = resolutions0 |> List.map (fun r->r.originalReference.Range, r.resolvedPath) |> Seq.distinct |> List.ofSeq
-            references0
-
-        let tcConfig = 
-            CreateScriptTextTcConfig(legacyReferenceResolver, defaultFSharpBinariesDir, filename, 
-                 codeContext, useSimpleResolution, useFsiAuxLib, Some references0, 
-                 applyCommandLineArgs, assumeDotNetFramework, useSdkRefs,
-                 tryGetMetadataSnapshot, reduceMemoryUsage)
-
-        let closureSources = [ClosureSource(filename, range0, sourceText, true)]
-        let closureFiles, tcConfig = FindClosureFiles(filename, range0, closureSources, tcConfig, codeContext, lexResourceManager)
-        GetLoadClosure(ctok, filename, closureFiles, tcConfig, codeContext)
-
-    /// Given source filename, find the full load closure
-    /// Used from fsi.fs and fsc.fs, for #load and command line
-    let GetFullClosureOfScriptFiles(ctok, tcConfig:TcConfig, files:(string*range) list,codeContext,lexResourceManager: Lexhelp.LexResourceManager) = 
-        let mainFile, mainFileRange = List.last files
-        let closureSources = files |> List.collect (fun (filename, m) -> ClosureSourceOfFilename(filename, m,tcConfig.inputCodePage,true))
-        let closureFiles,tcConfig = FindClosureFiles(mainFile, mainFileRange, closureSources, tcConfig, codeContext, lexResourceManager)
-        GetLoadClosure(ctok, mainFile, closureFiles, tcConfig, codeContext)        
-
-type LoadClosure with
-    /// Analyze a script text and find the closure of its references. 
-    /// Used from FCS, when editing a script file.  
-    //
-    /// A temporary TcConfig is created along the way, is why this routine takes so many arguments. We want to be sure to use exactly the
-    /// same arguments as the rest of the application.
-    static member ComputeClosureOfScriptText
-                     (ctok, legacyReferenceResolver, defaultFSharpBinariesDir, 
-                      filename: string, sourceText: ISourceText, codeContext, useSimpleResolution: bool, 
-                      useFsiAuxLib, useSdkRefs, lexResourceManager: Lexhelp.LexResourceManager, 
-                      applyCommandLineArgs, assumeDotNetFramework, tryGetMetadataSnapshot, reduceMemoryUsage) = 
-
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parse
-        ScriptPreprocessClosure.GetFullClosureOfScriptText
-            (ctok, legacyReferenceResolver, defaultFSharpBinariesDir, filename, sourceText, 
-             codeContext, useSimpleResolution, useFsiAuxLib, useSdkRefs, lexResourceManager, 
-             applyCommandLineArgs, assumeDotNetFramework, tryGetMetadataSnapshot, reduceMemoryUsage)
-
-    /// Analyze a set of script files and find the closure of their references.
-    static member ComputeClosureOfScriptFiles
-                     (ctok, tcConfig: TcConfig, files:(string*range) list, codeContext,
-                      lexResourceManager: Lexhelp.LexResourceManager) =
-        use unwindBuildPhase = PushThreadBuildPhaseUntilUnwind BuildPhase.Parse
-        ScriptPreprocessClosure.GetFullClosureOfScriptFiles (ctok, tcConfig, files, codeContext, lexResourceManager)
-
-//----------------------------------------------------------------------------
-// Initial type checking environment
-//--------------------------------------------------------------------------
-
-/// Build the initial type checking environment
-let GetInitialTcEnv (thisAssemblyName: string, initm: range, tcConfig: TcConfig, tcImports: TcImports, tcGlobals) =    
-    let initm = initm.StartRange
-
-    let ccus = 
-        tcImports.GetImportedAssemblies() 
-        |> List.map (fun asm -> asm.FSharpViewOfMetadata, asm.AssemblyAutoOpenAttributes, asm.AssemblyInternalsVisibleToAttributes)    
-
-    let amap = tcImports.GetImportMap()
-
-    let tcEnv = CreateInitialTcEnv(tcGlobals, amap, initm, thisAssemblyName, ccus)
-
-    if tcConfig.checkOverflow then
-        try TcOpenDecl TcResultsSink.NoSink tcGlobals amap initm initm tcEnv (pathToSynLid initm (splitNamespace FSharpLib.CoreOperatorsCheckedName))
-        with e -> errorRecovery e initm; tcEnv
-    else
-        tcEnv
-
-//----------------------------------------------------------------------------
-// Fault injection
-
-/// Inject faults into checking
-let CheckSimulateException(tcConfig: TcConfig) = 
-    match tcConfig.simulateException with
-    | Some("tc-oom") -> raise(System.OutOfMemoryException())
-    | Some("tc-an") -> raise(System.ArgumentNullException("simulated"))
-    | Some("tc-invop") -> raise(System.InvalidOperationException())
-    | Some("tc-av") -> raise(System.AccessViolationException())
-    | Some("tc-nfn") -> raise(System.NotFiniteNumberException())
-    | Some("tc-aor") -> raise(System.ArgumentOutOfRangeException())
-    | Some("tc-dv0") -> raise(System.DivideByZeroException())
-    | Some("tc-oe") -> raise(System.OverflowException())
-    | Some("tc-atmm") -> raise(System.ArrayTypeMismatchException())
-    | Some("tc-bif") -> raise(System.BadImageFormatException())
-    | Some("tc-knf") -> raise(System.Collections.Generic.KeyNotFoundException())
-    | Some("tc-ior") -> raise(System.IndexOutOfRangeException())
-    | Some("tc-ic") -> raise(System.InvalidCastException())
-    | Some("tc-ip") -> raise(System.InvalidProgramException())
-    | Some("tc-ma") -> raise(System.MemberAccessException())
-    | Some("tc-ni") -> raise(System.NotImplementedException())
-    | Some("tc-nr") -> raise(System.NullReferenceException())
-    | Some("tc-oc") -> raise(System.OperationCanceledException())
-    | Some("tc-fail") -> failwith "simulated"
-    | _ -> ()
-
-//----------------------------------------------------------------------------
-// Type-check sets of files
-//--------------------------------------------------------------------------
-
-type RootSigs = Zmap
-type RootImpls = Zset
-
-let qnameOrder = Order.orderBy (fun (q: QualifiedNameOfFile) -> q.Text)
-
-type TcState = 
-    {
-      tcsCcu: CcuThunk
-      tcsCcuType: ModuleOrNamespace
-      tcsNiceNameGen: NiceNameGenerator
-      tcsTcSigEnv: TcEnv
-      tcsTcImplEnv: TcEnv
-      tcsCreatesGeneratedProvidedTypes: bool
-      tcsRootSigs: RootSigs 
-      tcsRootImpls: RootImpls 
-      tcsCcuSig: ModuleOrNamespaceType
-    }
-
-    member x.NiceNameGenerator = x.tcsNiceNameGen
-
-    member x.TcEnvFromSignatures = x.tcsTcSigEnv
-
-    member x.TcEnvFromImpls = x.tcsTcImplEnv
-
-    member x.Ccu = x.tcsCcu
-
-    member x.CreatesGeneratedProvidedTypes = x.tcsCreatesGeneratedProvidedTypes
-
-    // Assem(a.fsi + b.fsi + c.fsi) (after checking implementation file )
-    member x.CcuType = x.tcsCcuType
- 
-    // a.fsi + b.fsi + c.fsi (after checking implementation file for c.fs)
-    member x.CcuSig = x.tcsCcuSig
- 
-    member x.NextStateAfterIncrementalFragment tcEnvAtEndOfLastInput = 
-        { x with tcsTcSigEnv = tcEnvAtEndOfLastInput
-                 tcsTcImplEnv = tcEnvAtEndOfLastInput } 
-
- 
-/// Create the initial type checking state for compiling an assembly
-let GetInitialTcState(m, ccuName, tcConfig: TcConfig, tcGlobals, tcImports: TcImports, niceNameGen, tcEnv0) =
-    ignore tcImports
-
-    // Create a ccu to hold all the results of compilation 
-    let ccuContents = Construct.NewCcuContents ILScopeRef.Local m ccuName (Construct.NewEmptyModuleOrNamespaceType Namespace)
-
-    let ccuData: CcuData = 
-        { IsFSharp=true
-          UsesFSharp20PlusQuotations=false
-#if !NO_EXTENSIONTYPING
-          InvalidateEvent=(new Event<_>()).Publish
-          IsProviderGenerated = false
-          ImportProvidedType = (fun ty -> Import.ImportProvidedType (tcImports.GetImportMap()) m ty)
-#endif
-          TryGetILModuleDef = (fun () -> None)
-          FileName=None 
-          Stamp = newStamp()
-          QualifiedName= None
-          SourceCodeDirectory = tcConfig.implicitIncludeDir 
-          ILScopeRef=ILScopeRef.Local
-          Contents=ccuContents
-          MemberSignatureEquality= typeEquivAux EraseAll tcGlobals
-          TypeForwarders=Map.empty }
-
-    let ccu = CcuThunk.Create(ccuName, ccuData)
-
-    // OK, is this is the FSharp.Core CCU then fix it up. 
-    if tcConfig.compilingFslib then 
-        tcGlobals.fslibCcu.Fixup ccu
-
-    { tcsCcu= ccu
-      tcsCcuType=ccuContents
-      tcsNiceNameGen=niceNameGen
-      tcsTcSigEnv=tcEnv0
-      tcsTcImplEnv=tcEnv0
-      tcsCreatesGeneratedProvidedTypes=false
-      tcsRootSigs = Zmap.empty qnameOrder
-      tcsRootImpls = Zset.empty qnameOrder
-      tcsCcuSig = Construct.NewEmptyModuleOrNamespaceType Namespace }
-
-/// Typecheck a single file (or interactive entry into F# Interactive)
-let TypeCheckOneInputEventually (checkForErrors, tcConfig: TcConfig, tcImports: TcImports, tcGlobals, prefixPathOpt, tcSink, tcState: TcState, inp: ParsedInput) =
-
-    eventually {
-        try 
-          let! ctok = Eventually.token
-          RequireCompilationThread ctok // Everything here requires the compilation thread since it works on the TAST
-
-          CheckSimulateException tcConfig
-
-          let m = inp.Range
-          let amap = tcImports.GetImportMap()
-          match inp with 
-          | ParsedInput.SigFile (ParsedSigFileInput (_, qualNameOfFile, _, _, _) as file) ->
-                
-              // Check if we've seen this top module signature before. 
-              if Zmap.mem qualNameOfFile tcState.tcsRootSigs then 
-                  errorR(Error(FSComp.SR.buildSignatureAlreadySpecified(qualNameOfFile.Text), m.StartRange))
-
-              // Check if the implementation came first in compilation order 
-              if Zset.contains qualNameOfFile tcState.tcsRootImpls then 
-                  errorR(Error(FSComp.SR.buildImplementationAlreadyGivenDetail(qualNameOfFile.Text), m))
-
-              let conditionalDefines =
-                  if tcConfig.noConditionalErasure then None else Some (tcConfig.conditionalCompilationDefines)
-
-              // Typecheck the signature file 
-              let! (tcEnv, sigFileType, createsGeneratedProvidedTypes) = 
-                  TypeCheckOneSigFile (tcGlobals, tcState.tcsNiceNameGen, amap, tcState.tcsCcu, checkForErrors, conditionalDefines, tcSink, tcConfig.internalTestSpanStackReferring) tcState.tcsTcSigEnv file
-
-              let rootSigs = Zmap.add qualNameOfFile sigFileType tcState.tcsRootSigs
-
-              // Add the signature to the signature env (unless it had an explicit signature)
-              let ccuSigForFile = CombineCcuContentFragments m [sigFileType; tcState.tcsCcuSig]
-                
-              // Open the prefixPath for fsi.exe 
-              let tcEnv = 
-                  match prefixPathOpt with 
-                  | None -> tcEnv 
-                  | Some prefixPath -> 
-                      let m = qualNameOfFile.Range
-                      TcOpenDecl tcSink tcGlobals amap m m tcEnv prefixPath
-
-              let tcState = 
-                   { tcState with 
-                        tcsTcSigEnv=tcEnv
-                        tcsTcImplEnv=tcState.tcsTcImplEnv
-                        tcsRootSigs=rootSigs
-                        tcsCreatesGeneratedProvidedTypes=tcState.tcsCreatesGeneratedProvidedTypes || createsGeneratedProvidedTypes}
-
-              return (tcEnv, EmptyTopAttrs, None, ccuSigForFile), tcState
-
-          | ParsedInput.ImplFile (ParsedImplFileInput (_, _, qualNameOfFile, _, _, _, _) as file) ->
-            
-              // Check if we've got an interface for this fragment 
-              let rootSigOpt = tcState.tcsRootSigs.TryFind qualNameOfFile
-
-              // Check if we've already seen an implementation for this fragment 
-              if Zset.contains qualNameOfFile tcState.tcsRootImpls then 
-                  errorR(Error(FSComp.SR.buildImplementationAlreadyGiven(qualNameOfFile.Text), m))
-
-              let tcImplEnv = tcState.tcsTcImplEnv
-
-              let conditionalDefines =
-                  if tcConfig.noConditionalErasure then None else Some (tcConfig.conditionalCompilationDefines)
-
-              // Typecheck the implementation file 
-              let! topAttrs, implFile, _implFileHiddenType, tcEnvAtEnd, createsGeneratedProvidedTypes = 
-                  TypeCheckOneImplFile (tcGlobals, tcState.tcsNiceNameGen, amap, tcState.tcsCcu, checkForErrors, conditionalDefines, tcSink, tcConfig.internalTestSpanStackReferring) tcImplEnv rootSigOpt file
-
-              let hadSig = rootSigOpt.IsSome
-              let implFileSigType = SigTypeOfImplFile implFile
-
-              let rootImpls = Zset.add qualNameOfFile tcState.tcsRootImpls
-        
-              // Only add it to the environment if it didn't have a signature 
-              let m = qualNameOfFile.Range
-
-              // Add the implementation as to the implementation env
-              let tcImplEnv = AddLocalRootModuleOrNamespace TcResultsSink.NoSink tcGlobals amap m tcImplEnv implFileSigType
-
-              // Add the implementation as to the signature env (unless it had an explicit signature)
-              let tcSigEnv = 
-                  if hadSig then tcState.tcsTcSigEnv 
-                  else AddLocalRootModuleOrNamespace TcResultsSink.NoSink tcGlobals amap m tcState.tcsTcSigEnv implFileSigType
-                
-              // Open the prefixPath for fsi.exe (tcImplEnv)
-              let tcImplEnv = 
-                  match prefixPathOpt with 
-                  | Some prefixPath -> TcOpenDecl tcSink tcGlobals amap m m tcImplEnv prefixPath
-                  | _ -> tcImplEnv 
-
-              // Open the prefixPath for fsi.exe (tcSigEnv)
-              let tcSigEnv = 
-                  match prefixPathOpt with 
-                  | Some prefixPath when not hadSig -> TcOpenDecl tcSink tcGlobals amap m m tcSigEnv prefixPath
-                  | _ -> tcSigEnv 
-
-              let ccuSig = CombineCcuContentFragments m [implFileSigType; tcState.tcsCcuSig ]
-
-              let ccuSigForFile = CombineCcuContentFragments m [implFileSigType; tcState.tcsCcuSig]
-
-              let tcState = 
-                   { tcState with 
-                        tcsTcSigEnv=tcSigEnv
-                        tcsTcImplEnv=tcImplEnv
-                        tcsRootImpls=rootImpls
-                        tcsCcuSig=ccuSig
-                        tcsCreatesGeneratedProvidedTypes=tcState.tcsCreatesGeneratedProvidedTypes || createsGeneratedProvidedTypes }
-              return (tcEnvAtEnd, topAttrs, Some implFile, ccuSigForFile), tcState
-     
-        with e -> 
-            errorRecovery e range0 
-            return (tcState.TcEnvFromSignatures, EmptyTopAttrs, None, tcState.tcsCcuSig), tcState
-    }
-
-/// Typecheck a single file (or interactive entry into F# Interactive)
-let TypeCheckOneInput (ctok, checkForErrors, tcConfig, tcImports, tcGlobals, prefixPathOpt) tcState inp =
-    // 'use' ensures that the warning handler is restored at the end
-    use unwindEL = PushErrorLoggerPhaseUntilUnwind(fun oldLogger -> GetErrorLoggerFilteringByScopedPragmas(false, GetScopedPragmasForInput inp, oldLogger) )
-    use unwindBP = PushThreadBuildPhaseUntilUnwind BuildPhase.TypeCheck
-    TypeCheckOneInputEventually (checkForErrors, tcConfig, tcImports, tcGlobals, prefixPathOpt, TcResultsSink.NoSink, tcState, inp) 
-        |> Eventually.force ctok
-
-/// Finish checking multiple files (or one interactive entry into F# Interactive)
-let TypeCheckMultipleInputsFinish(results, tcState: TcState) =
-    let tcEnvsAtEndFile, topAttrs, implFiles, ccuSigsForFiles = List.unzip4 results
-    let topAttrs = List.foldBack CombineTopAttrs topAttrs EmptyTopAttrs
-    let implFiles = List.choose id implFiles
-    // This is the environment required by fsi.exe when incrementally adding definitions 
-    let tcEnvAtEndOfLastFile = (match tcEnvsAtEndFile with h :: _ -> h | _ -> tcState.TcEnvFromSignatures)
-    (tcEnvAtEndOfLastFile, topAttrs, implFiles, ccuSigsForFiles), tcState
-
-let TypeCheckOneInputAndFinishEventually(checkForErrors, tcConfig: TcConfig, tcImports, tcGlobals, prefixPathOpt, tcSink, tcState, input) =
-    eventually {
-        Logger.LogBlockStart LogCompilerFunctionId.CompileOps_TypeCheckOneInputAndFinishEventually
-        let! results, tcState = TypeCheckOneInputEventually(checkForErrors, tcConfig, tcImports, tcGlobals, prefixPathOpt, tcSink, tcState, input)
-        let result = TypeCheckMultipleInputsFinish([results], tcState)
-        Logger.LogBlockStop LogCompilerFunctionId.CompileOps_TypeCheckOneInputAndFinishEventually
-        return result
-    }
-
-let TypeCheckClosedInputSetFinish (declaredImpls: TypedImplFile list, tcState) =
-    // Publish the latest contents to the CCU 
-    tcState.tcsCcu.Deref.Contents <- Construct.NewCcuContents ILScopeRef.Local range0 tcState.tcsCcu.AssemblyName tcState.tcsCcuSig
-
-    // Check all interfaces have implementations 
-    tcState.tcsRootSigs |> Zmap.iter (fun qualNameOfFile _ ->  
-      if not (Zset.contains qualNameOfFile tcState.tcsRootImpls) then 
-        errorR(Error(FSComp.SR.buildSignatureWithoutImplementation(qualNameOfFile.Text), qualNameOfFile.Range)))
-
-    tcState, declaredImpls
-    
-let TypeCheckClosedInputSet (ctok, checkForErrors, tcConfig, tcImports, tcGlobals, prefixPathOpt, tcState, inputs) =
-    // tcEnvAtEndOfLastFile is the environment required by fsi.exe when incrementally adding definitions 
-    let results, tcState = (tcState, inputs) ||> List.mapFold (TypeCheckOneInput (ctok, checkForErrors, tcConfig, tcImports, tcGlobals, prefixPathOpt)) 
-    let (tcEnvAtEndOfLastFile, topAttrs, implFiles, _), tcState = TypeCheckMultipleInputsFinish(results, tcState)
-    let tcState, declaredImpls = TypeCheckClosedInputSetFinish (implFiles, tcState)
-    tcState, topAttrs, declaredImpls, tcEnvAtEndOfLastFile
-
-// Existing public APIs delegate to newer implementations
-let GetFSharpCoreLibraryName () = getFSharpCoreLibraryName
-let DefaultReferencesForScriptsAndOutOfProjectSources assumeDotNetFramework = defaultReferencesForScriptsAndOutOfProjectSources (*useFsiAuxLib*)false assumeDotNetFramework (*useSdkRefs*)false
diff --git a/src/fsharp/CompileOps.fsi b/src/fsharp/CompileOps.fsi
deleted file mode 100644
index b4c9962df5d..00000000000
--- a/src/fsharp/CompileOps.fsi
+++ /dev/null
@@ -1,856 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-/// Coordinating compiler operations - configuration, loading initial context, reporting errors etc.
-module internal FSharp.Compiler.CompileOps
-
-open System
-open System.Text
-open System.Collections.Generic
-
-open Internal.Utilities
-
-open FSharp.Compiler
-open FSharp.Compiler.AbstractIL
-open FSharp.Compiler.AbstractIL.IL
-open FSharp.Compiler.AbstractIL.ILBinaryReader
-open FSharp.Compiler.AbstractIL.ILPdbWriter
-open FSharp.Compiler.AbstractIL.Internal
-open FSharp.Compiler.AbstractIL.Internal.Library
-open FSharp.Compiler.CompilerGlobalState
-open FSharp.Compiler.ErrorLogger
-open FSharp.Compiler.Features
-open FSharp.Compiler.Range
-open FSharp.Compiler.SyntaxTree
-open FSharp.Compiler.TypeChecker
-open FSharp.Compiler.TypedTree
-open FSharp.Compiler.TypedTreeOps
-open FSharp.Compiler.TcGlobals
-open FSharp.Compiler.Text
-open FSharp.Core.CompilerServices
-
-#if !NO_EXTENSIONTYPING
-open FSharp.Compiler.ExtensionTyping
-#endif
-
-open Microsoft.DotNet.DependencyManager
-
-#if DEBUG
-
-module internal CompilerService =
-    val showAssertForUnexpectedException: bool ref
-#endif
-
-//----------------------------------------------------------------------------
-// File names and known file suffixes
-//--------------------------------------------------------------------------
-
-/// Signature file suffixes
-val FSharpSigFileSuffixes: string list
-
-/// Implementation file suffixes
-val FSharpImplFileSuffixes: string list
-
-/// Script file suffixes
-val FSharpScriptFileSuffixes: string list
-
-val IsScript: string -> bool
-
-/// File suffixes where #light is the default
-val FSharpLightSyntaxFileSuffixes: string list
-
-
-/// Get the name used for FSharp.Core
-val GetFSharpCoreLibraryName: unit -> string
-
-//----------------------------------------------------------------------------
-// Parsing inputs
-//--------------------------------------------------------------------------
-  
-val ComputeQualifiedNameOfFileFromUniquePath: range * string list -> QualifiedNameOfFile
-
-val PrependPathToInput: Ident list -> ParsedInput -> ParsedInput
-
-/// State used to de-deduplicate module names along a list of file names
-type ModuleNamesDict = Map>
-
-/// Checks if a ParsedInput is using a module name that was already given and deduplicates the name if needed.
-val DeduplicateParsedInputModuleName: ModuleNamesDict -> ParsedInput -> ParsedInput * ModuleNamesDict
-
-/// Parse a single input (A signature file or implementation file)
-val ParseInput: (UnicodeLexing.Lexbuf -> Parser.token) * ErrorLogger * UnicodeLexing.Lexbuf * string option * string * isLastCompiland:(bool * bool) -> ParsedInput
-
-//----------------------------------------------------------------------------
-// Error and warnings
-//--------------------------------------------------------------------------
-
-/// Get the location associated with an error
-val GetRangeOfDiagnostic: PhasedDiagnostic -> range option
-
-/// Get the number associated with an error
-val GetDiagnosticNumber: PhasedDiagnostic -> int
-
-/// Split errors into a "main" error and a set of associated errors
-val SplitRelatedDiagnostics: PhasedDiagnostic -> PhasedDiagnostic * PhasedDiagnostic list
-
-/// Output an error to a buffer
-val OutputPhasedDiagnostic: StringBuilder -> PhasedDiagnostic -> flattenErrors: bool -> suggestNames: bool -> unit
-
-/// Output an error or warning to a buffer
-val OutputDiagnostic: implicitIncludeDir:string * showFullPaths: bool * flattenErrors: bool * errorStyle: ErrorStyle *  isError:bool -> StringBuilder -> PhasedDiagnostic -> unit
-
-/// Output extra context information for an error or warning to a buffer
-val OutputDiagnosticContext: prefix:string -> fileLineFunction:(string -> int -> string) -> StringBuilder -> PhasedDiagnostic -> unit
-
-/// Part of LegacyHostedCompilerForTesting
-[]
-type DiagnosticLocation =
-    { Range: range
-      File: string
-      TextRepresentation: string
-      IsEmpty: bool }
-
-/// Part of LegacyHostedCompilerForTesting
-[]
-type DiagnosticCanonicalInformation = 
-    { ErrorNumber: int
-      Subcategory: string
-      TextRepresentation: string }
-
-/// Part of LegacyHostedCompilerForTesting
-[]
-type DiagnosticDetailedInfo = 
-    { Location: DiagnosticLocation option
-      Canonical: DiagnosticCanonicalInformation
-      Message: string }
-
-/// Part of LegacyHostedCompilerForTesting
-[]
-type Diagnostic = 
-    | Short of bool * string
-    | Long of bool * DiagnosticDetailedInfo
-
-/// Part of LegacyHostedCompilerForTesting
-val CollectDiagnostic: implicitIncludeDir:string * showFullPaths: bool * flattenErrors: bool * errorStyle: ErrorStyle *  warning:bool * PhasedDiagnostic * suggestNames: bool -> seq
-
-//----------------------------------------------------------------------------
-// Resolve assembly references 
-//--------------------------------------------------------------------------
-
-exception AssemblyNotResolved of (*originalName*) string * range
-exception FileNameNotResolved of (*filename*) string * (*description of searched locations*) string * range
-exception DeprecatedCommandLineOptionFull of string * range
-exception DeprecatedCommandLineOptionForHtmlDoc of string * range
-exception DeprecatedCommandLineOptionSuggestAlternative of string * string * range
-exception DeprecatedCommandLineOptionNoDescription of string * range
-exception InternalCommandLineOption of string * range
-exception HashLoadedSourceHasIssues of (*warnings*) exn list * (*errors*) exn list * range
-exception HashLoadedScriptConsideredSource of range  
-
-//----------------------------------------------------------------------------
-
-/// Represents a reference to an F# assembly. May be backed by a real assembly on disk (read by Abstract IL), or a cross-project
-/// reference in FSharp.Compiler.Service.
-type IRawFSharpAssemblyData = 
-
-    ///  The raw list AutoOpenAttribute attributes in the assembly
-    abstract GetAutoOpenAttributes: ILGlobals -> string list
-
-    ///  The raw list InternalsVisibleToAttribute attributes in the assembly
-    abstract GetInternalsVisibleToAttributes: ILGlobals  -> string list
-
-    ///  The raw IL module definition in the assembly, if any. This is not present for cross-project references
-    /// in the language service
-    abstract TryGetILModuleDef: unit -> ILModuleDef option
-
-    abstract HasAnyFSharpSignatureDataAttribute: bool
-
-    abstract HasMatchingFSharpSignatureDataAttribute: ILGlobals -> bool
-
-    ///  The raw F# signature data in the assembly, if any
-    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
-
-    ///  The raw F# optimization data in the assembly, if any
-    abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
-
-    ///  The table of type forwarders in the assembly
-    abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders
-
-    /// The identity of the module
-    abstract ILScopeRef: ILScopeRef
-
-    abstract ILAssemblyRefs: ILAssemblyRef list
-
-    abstract ShortAssemblyName: string
-
-type TimeStampCache = 
-    new: defaultTimeStamp: DateTime -> TimeStampCache
-    member GetFileTimeStamp: string -> DateTime
-    member GetProjectReferenceTimeStamp: IProjectReference * CompilationThreadToken -> DateTime
-
-and IProjectReference = 
-
-    /// The name of the assembly file generated by the project
-    abstract FileName: string 
-
-    /// Evaluate raw contents of the assembly file generated by the project
-    abstract EvaluateRawContents: CompilationThreadToken -> Cancellable
-
-    /// Get the logical timestamp that would be the timestamp of the assembly file generated by the project.
-    ///
-    /// For project references this is maximum of the timestamps of all dependent files.
-    /// The project is not actually built, nor are any assemblies read, but the timestamps for each dependent file 
-    /// are read via the FileSystem.  If the files don't exist, then a default timestamp is used.
-    ///
-    /// The operation returns None only if it is not possible to create an IncrementalBuilder for the project at all, e.g. if there
-    /// are fatal errors in the options for the project.
-    abstract TryGetLogicalTimeStamp: TimeStampCache * CompilationThreadToken -> System.DateTime option
-
-type AssemblyReference = 
-    | AssemblyReference of range * string  * IProjectReference option
-    member Range: range
-    member Text: string
-    member ProjectReference: IProjectReference option
-
-type AssemblyResolution = 
-      {/// The original reference to the assembly.
-       originalReference: AssemblyReference
-       /// Path to the resolvedFile
-       resolvedPath: string    
-       /// Create the tooltip text for the assembly reference
-       prepareToolTip: unit -> string
-       /// Whether or not this is an installed system assembly (for example, System.dll)
-       sysdir: bool
-       // Lazily populated ilAssemblyRef for this reference. 
-       mutable ilAssemblyRef: ILAssemblyRef option }
-
-type UnresolvedAssemblyReference = UnresolvedAssemblyReference of string * AssemblyReference list
-
-#if !NO_EXTENSIONTYPING
-type ResolvedExtensionReference = ResolvedExtensionReference of string * AssemblyReference list * Tainted list
-#endif
-
-/// The thread in which compilation calls will be enqueued and done work on.
-/// Note: This is currently only used when disposing of type providers and will be extended to all the other type provider calls when compilations can be done in parallel.
-///       Right now all calls in FCS to type providers are single-threaded through use of the reactor thread. 
-type ICompilationThread =
-
-    /// Enqueue work to be done on a compilation thread.
-    abstract EnqueueWork: (CompilationThreadToken -> unit) -> unit
-
-[]
-type CompilerTarget = 
-    | WinExe 
-    | ConsoleExe 
-    | Dll 
-    | Module
-    member IsExe: bool
-    
-[]
-type ResolveAssemblyReferenceMode = 
-    | Speculative 
-    | ReportErrors
-
-[]
-type CopyFSharpCoreFlag = Yes | No
-
-//----------------------------------------------------------------------------
-// TcConfig
-//--------------------------------------------------------------------------
-
-/// Represents the file or string used for the --version flag
-type VersionFlag = 
-    | VersionString of string
-    | VersionFile of string
-    | VersionNone
-    member GetVersionInfo: implicitIncludeDir:string -> ILVersionInfo
-    member GetVersionString: implicitIncludeDir:string -> string
-
-[]
-type TcConfigBuilder =
-    { mutable primaryAssembly: PrimaryAssembly
-      mutable noFeedback: bool
-      mutable stackReserveSize: int32 option
-      mutable implicitIncludeDir: string
-      mutable openDebugInformationForLaterStaticLinking: bool
-      defaultFSharpBinariesDir: string
-      mutable compilingFslib: bool
-      mutable useIncrementalBuilder: bool
-      mutable includes: string list
-      mutable implicitOpens: string list
-      mutable useFsiAuxLib: bool
-      mutable framework: bool
-      mutable resolutionEnvironment: ReferenceResolver.ResolutionEnvironment
-      mutable implicitlyResolveAssemblies: bool
-      /// Set if the user has explicitly turned indentation-aware syntax on/off
-      mutable light: bool option
-      mutable conditionalCompilationDefines: string list
-      /// Sources added into the build with #load
-      mutable loadedSources: (range * string * string) list
-      mutable compilerToolPaths: string  list
-      mutable referencedDLLs: AssemblyReference  list
-      mutable packageManagerLines: Map
-
-      mutable projectReferences: IProjectReference list
-      mutable knownUnresolvedReferences: UnresolvedAssemblyReference list
-      reduceMemoryUsage: ReduceMemoryFlag
-      mutable subsystemVersion: int * int
-      mutable useHighEntropyVA: bool
-      mutable inputCodePage: int option
-      mutable embedResources: string list
-      mutable errorSeverityOptions: FSharpErrorSeverityOptions
-      mutable mlCompatibility:bool
-      mutable assumeNullOnImport: bool
-      mutable checkNullness: bool
-      mutable checkOverflow:bool
-      mutable showReferenceResolutions:bool
-      mutable outputDir: string option
-      mutable outputFile: string option
-      mutable platform: ILPlatform option
-      mutable prefer32Bit: bool
-      mutable useSimpleResolution: bool
-      mutable target: CompilerTarget
-      mutable debuginfo: bool
-      mutable testFlagEmitFeeFeeAs100001: bool
-      mutable dumpDebugInfo: bool
-      mutable debugSymbolFile: string option
-      mutable typeCheckOnly: bool
-      mutable parseOnly: bool
-      mutable importAllReferencesOnly: bool
-      mutable simulateException: string option
-      mutable printAst: bool
-      mutable tokenizeOnly: bool
-      mutable testInteractionParser: bool
-      mutable reportNumDecls: bool
-      mutable printSignature: bool
-      mutable printSignatureFile: string
-      mutable xmlDocOutputFile: string option
-      mutable stats: bool
-      mutable generateFilterBlocks: bool 
-      mutable signer: string option
-      mutable container: string option
-      mutable delaysign: bool
-      mutable publicsign: bool
-      mutable version: VersionFlag 
-      mutable metadataVersion: string option
-      mutable standalone: bool
-      mutable extraStaticLinkRoots: string list 
-      mutable noSignatureData: bool
-      mutable onlyEssentialOptimizationData: bool
-      mutable useOptimizationDataFile: bool
-      mutable jitTracking: bool
-      mutable portablePDB: bool
-      mutable embeddedPDB: bool
-      mutable embedAllSource: bool
-      mutable embedSourceList: string list
-      mutable sourceLink: string
-      mutable ignoreSymbolStoreSequencePoints: bool
-      mutable internConstantStrings: bool
-      mutable extraOptimizationIterations: int
-      mutable win32res: string 
-      mutable win32manifest: string
-      mutable includewin32manifest: bool
-      mutable linkResources: string list
-      mutable legacyReferenceResolver: ReferenceResolver.Resolver 
-      mutable showFullPaths: bool
-      mutable errorStyle: ErrorStyle
-      mutable utf8output: bool
-      mutable flatErrors: bool
-      mutable maxErrors: int
-      mutable abortOnError: bool
-      mutable baseAddress: int32 option
-      mutable checksumAlgorithm: HashAlgorithm
- #if DEBUG
-      mutable showOptimizationData: bool
-#endif
-      mutable showTerms    : bool 
-      mutable writeTermsToFiles: bool 
-      mutable doDetuple    : bool 
-      mutable doTLR        : bool 
-      mutable doFinalSimplify: bool
-      mutable optsOn       : bool 
-      mutable optSettings  : Optimizer.OptimizationSettings 
-      mutable emitTailcalls: bool
-      mutable deterministic: bool
-      mutable preferredUiLang: string option
-      mutable lcid        : int option
-      mutable productNameForBannerText: string
-      mutable showBanner : bool
-      mutable showTimes: bool
-      mutable showLoadedAssemblies: bool
-      mutable continueAfterParseFailure: bool
-#if !NO_EXTENSIONTYPING
-      mutable showExtensionTypeMessages: bool
-#endif
-      mutable compilationThread: ICompilationThread
-      mutable pause: bool 
-      mutable alwaysCallVirt: bool
-      mutable noDebugData: bool
-
-      /// If true, indicates all type checking and code generation is in the context of fsi.exe
-      isInteractive: bool 
-      isInvalidationSupported: bool 
-      mutable emitDebugInfoInQuotations: bool
-      mutable exename: string option 
-      mutable copyFSharpCore: CopyFSharpCoreFlag
-      mutable shadowCopyReferences: bool
-      mutable useSdkRefs: bool
-
-      /// A function to call to try to get an object that acts as a snapshot of the metadata section of a .NET binary,
-      /// and from which we can read the metadata. Only used when metadataOnly=true.
-      mutable tryGetMetadataSnapshot : ILReaderTryGetMetadataSnapshot
-
-      /// if true - 'let mutable x = Span.Empty', the value 'x' is a stack referring span. Used for internal testing purposes only until we get true stack spans.
-      mutable internalTestSpanStackReferring : bool
-
-      /// Prevent erasure of conditional attributes and methods so tooling is able analyse them.
-      mutable noConditionalErasure: bool
-
-      mutable pathMap : PathMap
-
-      mutable langVersion : LanguageVersion
-
-      mutable dependencyProvider : DependencyProvider
-
-    }
-
-    static member Initial: ReferenceResolver.Resolver -> TcConfigBuilder
-
-    static member CreateNew: 
-        legacyReferenceResolver: ReferenceResolver.Resolver *
-        defaultFSharpBinariesDir: string * 
-        reduceMemoryUsage: ReduceMemoryFlag * 
-        implicitIncludeDir: string * 
-        isInteractive: bool * 
-        isInvalidationSupported: bool *
-        defaultCopyFSharpCore: CopyFSharpCoreFlag *
-        tryGetMetadataSnapshot: ILReaderTryGetMetadataSnapshot
-          -> TcConfigBuilder
-
-    member DecideNames: string list -> outfile: string * pdbfile: string option * assemblyName: string 
-    member TurnWarningOff: range * string -> unit
-    member TurnWarningOn: range * string -> unit
-    member AddIncludePath: range * string * string -> unit
-    member AddCompilerToolsByPath: string -> unit
-    member AddReferencedAssemblyByPath: range * string -> unit
-    member RemoveReferencedAssemblyByPath: range * string -> unit
-    member AddEmbeddedSourceFile: string -> unit
-    member AddEmbeddedResource: string -> unit
-    member AddPathMapping: oldPrefix: string * newPrefix: string -> unit
-
-    static member SplitCommandLineResourceInfo: string -> string * string * ILResourceAccess
-
-[]
-// Immutable TcConfig
-type TcConfig =
-    member primaryAssembly: PrimaryAssembly
-    member noFeedback: bool
-    member stackReserveSize: int32 option
-    member implicitIncludeDir: string
-    member openDebugInformationForLaterStaticLinking: bool
-    member fsharpBinariesDir: string
-    member compilingFslib: bool
-    member useIncrementalBuilder: bool
-    member includes: string list
-    member implicitOpens: string list
-    member useFsiAuxLib: bool
-    member framework: bool
-    member implicitlyResolveAssemblies: bool
-    /// Set if the user has explicitly turned indentation-aware syntax on/off
-    member light: bool option
-    member conditionalCompilationDefines: string list
-    member subsystemVersion: int * int
-    member useHighEntropyVA: bool
-    member compilerToolPaths: string list
-    member referencedDLLs: AssemblyReference list
-    member reduceMemoryUsage: ReduceMemoryFlag
-    member inputCodePage: int option
-    member embedResources: string list
-    member errorSeverityOptions: FSharpErrorSeverityOptions
-    member mlCompatibility:bool
-    member assumeNullOnImport: bool
-    member checkNullness: bool
-    member checkOverflow:bool
-    member showReferenceResolutions:bool
-    member outputDir: string option
-    member outputFile: string option
-    member platform: ILPlatform option
-    member prefer32Bit: bool
-    member useSimpleResolution: bool
-    member target: CompilerTarget
-    member debuginfo: bool
-    member testFlagEmitFeeFeeAs100001: bool
-    member dumpDebugInfo: bool
-    member debugSymbolFile: string option
-    member typeCheckOnly: bool
-    member parseOnly: bool
-    member importAllReferencesOnly: bool
-    member simulateException: string option
-    member printAst: bool
-    member tokenizeOnly: bool
-    member testInteractionParser: bool
-    member reportNumDecls: bool
-    member printSignature: bool
-    member printSignatureFile: string
-    member xmlDocOutputFile: string option
-    member stats: bool
-    member generateFilterBlocks: bool 
-    member signer: string option
-    member container: string option
-    member delaysign: bool
-    member publicsign: bool
-    member version: VersionFlag 
-    member metadataVersion: string option
-    member standalone: bool
-    member extraStaticLinkRoots: string list 
-    member noSignatureData: bool
-    member onlyEssentialOptimizationData: bool
-    member useOptimizationDataFile: bool
-    member jitTracking: bool
-    member portablePDB: bool
-    member embeddedPDB: bool
-    member embedAllSource: bool
-    member embedSourceList: string list
-    member sourceLink: string
-    member ignoreSymbolStoreSequencePoints: bool
-    member internConstantStrings: bool
-    member extraOptimizationIterations: int
-    member win32res: string 
-    member win32manifest: string
-    member includewin32manifest: bool
-    member linkResources: string list
-    member showFullPaths: bool
-    member errorStyle: ErrorStyle
-    member utf8output: bool
-    member flatErrors: bool
-
-    member maxErrors: int
-    member baseAddress: int32 option
-    member checksumAlgorithm: HashAlgorithm
-#if DEBUG
-    member showOptimizationData: bool
-#endif
-    member showTerms    : bool 
-    member writeTermsToFiles: bool 
-    member doDetuple    : bool 
-    member doTLR        : bool 
-    member doFinalSimplify: bool
-    member optSettings  : Optimizer.OptimizationSettings 
-    member emitTailcalls: bool
-    member deterministic: bool
-    member pathMap: PathMap
-    member preferredUiLang: string option
-    member optsOn       : bool 
-    member productNameForBannerText: string
-    member showBanner : bool
-    member showTimes: bool
-    member showLoadedAssemblies: bool
-    member continueAfterParseFailure: bool
-#if !NO_EXTENSIONTYPING
-    member showExtensionTypeMessages: bool
-#endif
-    member compilationThread: ICompilationThread
-    member pause: bool 
-    member alwaysCallVirt: bool
-    member noDebugData: bool
-
-    /// If true, indicates all type checking and code generation is in the context of fsi.exe
-    member isInteractive: bool
-    member isInvalidationSupported: bool 
-
-
-    member ComputeLightSyntaxInitialStatus: string -> bool
-    member GetTargetFrameworkDirectories: unit -> string list
-    
-    /// Get the loaded sources that exist and issue a warning for the ones that don't
-    member GetAvailableLoadedSources: unit -> (range*string) list
-    
-    member ComputeCanContainEntryPoint: sourceFiles:string list -> bool list *bool 
-
-    /// File system query based on TcConfig settings
-    member ResolveSourceFile: range * filename: string * pathLoadedFrom: string -> string
-
-    /// File system query based on TcConfig settings
-    member MakePathAbsolute: string -> string
-
-    member copyFSharpCore: CopyFSharpCoreFlag
-    member shadowCopyReferences: bool
-    member useSdkRefs: bool
-    member langVersion: LanguageVersion
-
-    static member Create: TcConfigBuilder * validate: bool -> TcConfig
-
-/// Represents a computation to return a TcConfig. Normally this is just a constant immutable TcConfig,
-/// but for F# Interactive it may be based on an underlying mutable TcConfigBuilder.
-[]
-type TcConfigProvider = 
-
-    member Get: CompilationThreadToken -> TcConfig
-
-    /// Get a TcConfigProvider which will return only the exact TcConfig.
-    static member Constant: TcConfig -> TcConfigProvider
-
-    /// Get a TcConfigProvider which will continue to respect changes in the underlying
-    /// TcConfigBuilder rather than delivering snapshots.
-    static member BasedOnMutableBuilder: TcConfigBuilder -> TcConfigProvider
-
-//----------------------------------------------------------------------------
-// Tables of referenced DLLs 
-//--------------------------------------------------------------------------
-
-/// Represents a resolved imported binary
-[]
-type ImportedBinary = 
-    { FileName: string
-      RawMetadata: IRawFSharpAssemblyData
-#if !NO_EXTENSIONTYPING
-      ProviderGeneratedAssembly: System.Reflection.Assembly option
-      IsProviderGenerated: bool
-      ProviderGeneratedStaticLinkMap: ProvidedAssemblyStaticLinkingMap  option
-#endif
-      ILAssemblyRefs: ILAssemblyRef list
-      ILScopeRef: ILScopeRef}
-
-/// Represents a resolved imported assembly
-[]
-type ImportedAssembly = 
-    { ILScopeRef: ILScopeRef
-      FSharpViewOfMetadata: CcuThunk
-      AssemblyAutoOpenAttributes: string list
-      AssemblyInternalsVisibleToAttributes: string list
-#if !NO_EXTENSIONTYPING
-      IsProviderGenerated: bool
-      mutable TypeProviders: Tainted list
-#endif
-      FSharpOptimizationData: Lazy> }
-
-
-[] 
-type TcAssemblyResolutions = 
-    member GetAssemblyResolutions: unit -> AssemblyResolution list
-    static member SplitNonFoundationalResolutions : CompilationThreadToken * TcConfig -> AssemblyResolution list * AssemblyResolution list * UnresolvedAssemblyReference list
-    static member BuildFromPriorResolutions    : CompilationThreadToken * TcConfig * AssemblyResolution list * UnresolvedAssemblyReference list -> TcAssemblyResolutions 
-
-/// Represents a table of imported assemblies with their resolutions.
-/// Is a disposable object, but it is recommended not to explicitly call Dispose unless you absolutely know nothing will be using its contents after the disposal.
-/// Otherwise, simply allow the GC to collect this and it will properly call Dispose from the finalizer.
-[] 
-type TcImports =
-    interface System.IDisposable
-    //new: TcImports option -> TcImports
-    member DllTable: NameMap with get
-    member GetImportedAssemblies: unit -> ImportedAssembly list
-    member GetCcusInDeclOrder: unit -> CcuThunk list
-    /// This excludes any framework imports (which may be shared between multiple builds)
-    member GetCcusExcludingBase: unit -> CcuThunk list 
-    member FindDllInfo: CompilationThreadToken * range * string -> ImportedBinary
-    member TryFindDllInfo: CompilationThreadToken * range * string * lookupOnly: bool -> option
-    member FindCcuFromAssemblyRef: CompilationThreadToken * range * ILAssemblyRef -> CcuResolutionResult
-#if !NO_EXTENSIONTYPING
-    member ProviderGeneratedTypeRoots: ProviderGeneratedType list
-#endif
-    member GetImportMap: unit -> Import.ImportMap
-
-    /// Try to resolve a referenced assembly based on TcConfig settings.
-    member TryResolveAssemblyReference: CompilationThreadToken * AssemblyReference * ResolveAssemblyReferenceMode -> OperationResult
-
-    /// Resolve a referenced assembly and report an error if the resolution fails.
-    member ResolveAssemblyReference: CompilationThreadToken * AssemblyReference * ResolveAssemblyReferenceMode -> AssemblyResolution list
-
-    /// Try to find the given assembly reference by simple name.  Used in magic assembly resolution.  Effectively does implicit
-    /// unification of assemblies by simple assembly name.
-    member TryFindExistingFullyQualifiedPathBySimpleAssemblyName: CompilationThreadToken * string -> string option
-
-    /// Try to find the given assembly reference.
-    member TryFindExistingFullyQualifiedPathByExactAssemblyRef: CompilationThreadToken * ILAssemblyRef -> string option
-
-#if !NO_EXTENSIONTYPING
-    /// Try to find a provider-generated assembly
-    member TryFindProviderGeneratedAssemblyByName: CompilationThreadToken * assemblyName:string -> System.Reflection.Assembly option
-#endif
-    /// Report unresolved references that also weren't consumed by any type providers.
-    member ReportUnresolvedAssemblyReferences: UnresolvedAssemblyReference list -> unit
-    member SystemRuntimeContainsType: string -> bool
-
-    static member BuildFrameworkTcImports     : CompilationThreadToken * TcConfigProvider * AssemblyResolution list * AssemblyResolution list -> Cancellable
-    static member BuildNonFrameworkTcImports  : CompilationThreadToken * TcConfigProvider * TcGlobals * TcImports * AssemblyResolution list * UnresolvedAssemblyReference list -> Cancellable
-    static member BuildTcImports              : CompilationThreadToken * TcConfigProvider -> Cancellable
-
-//----------------------------------------------------------------------------
-// Special resources in DLLs
-//--------------------------------------------------------------------------
-
-/// Determine if an IL resource attached to an F# assembly is an F# signature data resource
-val IsSignatureDataResource: ILResource -> bool
-
-/// Determine if an IL resource attached to an F# assembly is an F# signature data resource (data stream B)
-val IsSignatureDataResourceB: ILResource -> bool
-
-/// Determine if an IL resource attached to an F# assembly is an F# optimization data resource
-val IsOptimizationDataResource: ILResource -> bool
-
-/// Determine if an IL resource attached to an F# assembly is an F# quotation data resource for reflected definitions
-val IsReflectedDefinitionsResource: ILResource -> bool
-
-val GetSignatureDataResourceName: ILResource -> string
-
-/// Write F# signature data as one or more IL resources
-val WriteSignatureData: TcConfig * TcGlobals * Remap * CcuThunk * filename: string * inMem: bool -> ILResource * ILResource option
-
-/// Write F# optimization data as an IL resource(s)
-val WriteOptimizationData: TcGlobals * filename: string * inMem: bool * CcuThunk * Optimizer.LazyModuleInfo -> ILResource * ILResource option
-
-//----------------------------------------------------------------------------
-// #r and other directives
-//--------------------------------------------------------------------------
-
-/// Process #r in F# Interactive.
-/// Adds the reference to the tcImports and add the ccu to the type checking environment.
-val RequireDLL: CompilationThreadToken * TcImports * TcEnv * thisAssemblyName: string * referenceRange: range * file: string -> TcEnv * (ImportedBinary list * ImportedAssembly list)
-
-/// Processing # commands
-val ProcessMetaCommandsFromInput : 
-    (('T -> range * string -> 'T) * ('T -> range * string -> 'T) * ('T -> IDependencyManagerProvider * range * string -> 'T) * ('T -> range * string -> unit)) 
-    -> TcConfigBuilder * ParsedInput * string * 'T 
-    -> 'T
-
-/// Process all the #r, #I etc. in an input
-val ApplyMetaCommandsFromInputToTcConfig: TcConfig * ParsedInput * string -> TcConfig
-
-/// Process the #nowarn in an input
-val ApplyNoWarnsToTcConfig: TcConfig * ParsedInput * string -> TcConfig
-
-//----------------------------------------------------------------------------
-// Scoped pragmas
-//--------------------------------------------------------------------------
-
-/// Find the scoped #nowarn pragmas with their range information
-val GetScopedPragmasForInput: ParsedInput -> ScopedPragma list
-
-/// Get an error logger that filters the reporting of warnings based on scoped pragma information
-val GetErrorLoggerFilteringByScopedPragmas: checkFile:bool * ScopedPragma list * ErrorLogger  -> ErrorLogger
-
-/// This list is the default set of references for "non-project" files. 
-val DefaultReferencesForScriptsAndOutOfProjectSources: bool -> string list
-
-//----------------------------------------------------------------------------
-// Parsing
-//--------------------------------------------------------------------------
-
-/// Parse one input file
-val ParseOneInputFile: TcConfig * Lexhelp.LexResourceManager * string list * string * isLastCompiland: (bool * bool) * ErrorLogger * (*retryLocked*) bool -> ParsedInput option
-
-//----------------------------------------------------------------------------
-// Type checking and querying the type checking state
-//--------------------------------------------------------------------------
-
-/// Get the initial type checking environment including the loading of mscorlib/System.Core, FSharp.Core
-/// applying the InternalsVisibleTo in referenced assemblies and opening 'Checked' if requested.
-val GetInitialTcEnv: assemblyName: string * range * TcConfig * TcImports * TcGlobals -> TcEnv
-                
-[]
-/// Represents the incremental type checking state for a set of inputs
-type TcState =
-    member NiceNameGenerator: NiceNameGenerator
-
-    /// The CcuThunk for the current assembly being checked
-    member Ccu: CcuThunk
-    
-    /// Get the typing environment implied by the set of signature files and/or inferred signatures of implementation files checked so far
-    member TcEnvFromSignatures: TcEnv
-
-    /// Get the typing environment implied by the set of implementation files checked so far
-    member TcEnvFromImpls: TcEnv
-
-    /// The inferred contents of the assembly, containing the signatures of all files.
-    // a.fsi + b.fsi + c.fsi (after checking implementation file for c.fs)
-    member CcuSig: ModuleOrNamespaceType
-
-    member NextStateAfterIncrementalFragment: TcEnv -> TcState
-
-    member CreatesGeneratedProvidedTypes: bool
-
-/// Get the initial type checking state for a set of inputs
-val GetInitialTcState: 
-    range * string * TcConfig * TcGlobals * TcImports * NiceNameGenerator * TcEnv -> TcState
-
-/// Check one input, returned as an Eventually computation
-val TypeCheckOneInputEventually :
-    checkForErrors:(unit -> bool) * TcConfig * TcImports * TcGlobals * LongIdent option * NameResolution.TcResultsSink * TcState * ParsedInput  
-           -> Eventually<(TcEnv * TopAttribs * TypedImplFile option * ModuleOrNamespaceType) * TcState>
-
-/// Finish the checking of multiple inputs 
-val TypeCheckMultipleInputsFinish: (TcEnv * TopAttribs * 'T option * 'U) list * TcState -> (TcEnv * TopAttribs * 'T list * 'U list) * TcState
-    
-/// Finish the checking of a closed set of inputs 
-val TypeCheckClosedInputSetFinish: TypedImplFile list * TcState -> TcState * TypedImplFile list
-
-/// Check a closed set of inputs 
-val TypeCheckClosedInputSet: CompilationThreadToken * checkForErrors: (unit -> bool) * TcConfig * TcImports * TcGlobals * LongIdent option * TcState * ParsedInput  list  -> TcState * TopAttribs * TypedImplFile list * TcEnv
-
-/// Check a single input and finish the checking
-val TypeCheckOneInputAndFinishEventually :
-    checkForErrors: (unit -> bool) * TcConfig * TcImports * TcGlobals * LongIdent option * NameResolution.TcResultsSink * TcState * ParsedInput 
-        -> Eventually<(TcEnv * TopAttribs * TypedImplFile list * ModuleOrNamespaceType list) * TcState>
-
-/// Indicates if we should report a warning
-val ReportWarning: FSharpErrorSeverityOptions -> PhasedDiagnostic -> bool
-
-/// Indicates if we should report a warning as an error
-val ReportWarningAsError: FSharpErrorSeverityOptions -> PhasedDiagnostic -> bool
-
-//----------------------------------------------------------------------------
-// #load closure
-//--------------------------------------------------------------------------
-
-[]
-type CodeContext =
-    | CompilationAndEvaluation
-    | Compilation
-    | Editing
-
-[]
-type LoadClosureInput = 
-    { FileName: string
-      SyntaxTree: ParsedInput option
-      ParseDiagnostics: (PhasedDiagnostic * bool) list 
-      MetaCommandDiagnostics: (PhasedDiagnostic * bool) list  }
-
-[]
-type LoadClosure = 
-    { /// The source files along with the ranges of the #load positions in each file.
-      SourceFiles: (string * range list) list
-
-      /// The resolved references along with the ranges of the #r positions in each file.
-      References: (string * AssemblyResolution list) list
-
-      /// The list of references that were not resolved during load closure.
-      UnresolvedReferences: UnresolvedAssemblyReference list
-
-      /// The list of all sources in the closure with inputs when available, with associated parse errors and warnings
-      Inputs: LoadClosureInput list
-
-      /// The original #load references, including those that didn't resolve
-      OriginalLoadReferences: (range * string * string) list
-
-      /// The #nowarns
-      NoWarns: (string * range list) list
-
-      /// Diagnostics seen while processing resolutions
-      ResolutionDiagnostics: (PhasedDiagnostic * bool)  list
-
-      /// Diagnostics to show for root of closure (used by fsc.fs)
-      AllRootFileDiagnostics: (PhasedDiagnostic * bool) list
-
-      /// Diagnostics seen while processing the compiler options implied root of closure
-      LoadClosureRootFileDiagnostics: (PhasedDiagnostic * bool) list }   
-
-    /// Analyze a script text and find the closure of its references. 
-    /// Used from FCS, when editing a script file.  
-    //
-    /// A temporary TcConfig is created along the way, is why this routine takes so many arguments. We want to be sure to use exactly the
-    /// same arguments as the rest of the application.
-    static member ComputeClosureOfScriptText: CompilationThreadToken * legacyReferenceResolver: ReferenceResolver.Resolver * defaultFSharpBinariesDir: string * filename: string * sourceText: ISourceText * implicitDefines:CodeContext * useSimpleResolution: bool * useFsiAuxLib: bool * useSdkRefs: bool * lexResourceManager: Lexhelp.LexResourceManager * applyCompilerOptions: (TcConfigBuilder -> unit) * assumeDotNetFramework: bool * tryGetMetadataSnapshot: ILReaderTryGetMetadataSnapshot * reduceMemoryUsage: ReduceMemoryFlag -> LoadClosure
-
-    /// Analyze a set of script files and find the closure of their references. The resulting references are then added to the given TcConfig.
-    /// Used from fsi.fs and fsc.fs, for #load and command line. 
-    static member ComputeClosureOfScriptFiles: CompilationThreadToken * tcConfig:TcConfig * (string * range) list * implicitDefines:CodeContext * lexResourceManager: Lexhelp.LexResourceManager -> LoadClosure
diff --git a/src/fsharp/CompilerConfig.fs b/src/fsharp/CompilerConfig.fs
index 060d3f864cc..dbed4de6d6f 100644
--- a/src/fsharp/CompilerConfig.fs
+++ b/src/fsharp/CompilerConfig.fs
@@ -156,10 +156,10 @@ type IRawFSharpAssemblyData =
     abstract TryGetILModuleDef: unit -> ILModuleDef option
 
     ///  The raw F# signature data in the assembly, if any
-    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list
+    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
     ///  The raw F# optimization data in the assembly, if any
-    abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list
+    abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
     ///  The table of type forwarders in the assembly
     abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders
@@ -351,6 +351,8 @@ type TcConfigBuilder =
       mutable embedResources: string list
       mutable errorSeverityOptions: FSharpErrorSeverityOptions
       mutable mlCompatibility: bool
+      mutable assumeNullOnImport: bool
+      mutable checkNullness: bool
       mutable checkOverflow: bool
       mutable showReferenceResolutions: bool
       mutable outputDir : string option
@@ -484,7 +486,7 @@ type TcConfigBuilder =
       mutable langVersion: LanguageVersion
       }
 
-    static member Initial =
+    static member Initial(legacyReferenceResolver) =
         {
           primaryAssembly = PrimaryAssembly.Mscorlib // default value, can be overridden using the command line switch
           light = None
@@ -515,6 +517,8 @@ type TcConfigBuilder =
           subsystemVersion = 4, 0 // per spec for 357994
           useHighEntropyVA = false
           mlCompatibility = false
+          assumeNullOnImport = false
+          checkNullness = false
           checkOverflow = false
           showReferenceResolutions = false
           outputDir = None
@@ -573,7 +577,7 @@ type TcConfigBuilder =
           win32manifest = ""
           includewin32manifest = true
           linkResources = []
-          legacyReferenceResolver = null
+          legacyReferenceResolver = legacyReferenceResolver
           showFullPaths = false
           errorStyle = ErrorStyle.DefaultErrors
 
@@ -651,7 +655,7 @@ type TcConfigBuilder =
             failwith "Expected a valid defaultFSharpBinariesDir"
 
         let tcConfigBuilder =
-            { TcConfigBuilder.Initial with 
+            { TcConfigBuilder.Initial(legacyReferenceResolver) with 
                 implicitIncludeDir = implicitIncludeDir
                 defaultFSharpBinariesDir = defaultFSharpBinariesDir
                 reduceMemoryUsage = reduceMemoryUsage
@@ -786,17 +790,20 @@ type TcConfigBuilder =
         let dm = dependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, output , reportError, path)
 
         match dm with
-        | _, dependencyManager when not(isNull dependencyManager) ->
+        | null, null ->
+           errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
+
+        | _, null when directive = Directive.Include ->
+            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+
+        | _, NonNull dependencyManager ->
             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                 tcConfigB.AddDependencyManagerText (dependencyManager, directive, m, path)
             else
                 errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
 
-        | _, _ when directive = Directive.Include ->
-            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
-
         // #r "Assembly"
-        | path, _ ->
+        | NonNull path, null ->
             tcConfigB.AddReferencedAssemblyByPath (m, path)
 
     member tcConfigB.RemoveReferencedAssemblyByPath (m, path) =
@@ -918,6 +925,8 @@ type TcConfig private (data: TcConfigBuilder, validate: bool) =
     member x.embedResources = data.embedResources
     member x.errorSeverityOptions = data.errorSeverityOptions
     member x.mlCompatibility = data.mlCompatibility
+    member x.assumeNullOnImport = data.assumeNullOnImport
+    member x.checkNullness = data.checkNullness
     member x.checkOverflow = data.checkOverflow
     member x.showReferenceResolutions = data.showReferenceResolutions
     member x.outputDir = data.outputDir
diff --git a/src/fsharp/CompilerConfig.fsi b/src/fsharp/CompilerConfig.fsi
index 00e824b4054..9833df22c5a 100644
--- a/src/fsharp/CompilerConfig.fsi
+++ b/src/fsharp/CompilerConfig.fsi
@@ -41,10 +41,10 @@ type IRawFSharpAssemblyData =
     abstract HasMatchingFSharpSignatureDataAttribute: ILGlobals -> bool
 
     ///  The raw F# signature data in the assembly, if any
-    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list
+    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
     ///  The raw F# optimization data in the assembly, if any
-    abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * (unit -> ReadOnlyByteMemory)) list
+    abstract GetRawFSharpOptimizationData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
     ///  The table of type forwarders in the assembly
     abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders
@@ -171,6 +171,8 @@ type TcConfigBuilder =
       mutable embedResources: string list
       mutable errorSeverityOptions: FSharpErrorSeverityOptions
       mutable mlCompatibility:bool
+      mutable assumeNullOnImport: bool
+      mutable checkNullness: bool
       mutable checkOverflow:bool
       mutable showReferenceResolutions:bool
       mutable outputDir: string option
@@ -280,7 +282,7 @@ type TcConfigBuilder =
       mutable langVersion : LanguageVersion
     }
 
-    static member Initial: TcConfigBuilder
+    static member Initial: ReferenceResolver.Resolver -> TcConfigBuilder
 
     static member CreateNew: 
         legacyReferenceResolver: ReferenceResolver.Resolver *
@@ -350,6 +352,8 @@ type TcConfig =
     member embedResources: string list
     member errorSeverityOptions: FSharpErrorSeverityOptions
     member mlCompatibility:bool
+    member assumeNullOnImport: bool
+    member checkNullness: bool
     member checkOverflow:bool
     member showReferenceResolutions:bool
     member outputDir: string option
diff --git a/src/fsharp/CompilerDiagnostics.fs b/src/fsharp/CompilerDiagnostics.fs
index d2941253095..ceb4959b4ec 100644
--- a/src/fsharp/CompilerDiagnostics.fs
+++ b/src/fsharp/CompilerDiagnostics.fs
@@ -170,6 +170,10 @@ let GetRangeOfDiagnostic(err: PhasedDiagnostic) =
       | ConstraintSolverTupleDiffLengths(_, _, _, m, _) 
       | ConstraintSolverInfiniteTypes(_, _, _, _, m, _) 
       | ConstraintSolverMissingConstraint(_, _, _, m, _) 
+      | ConstraintSolverNullnessWarningEquivWithTypes(_, _, _, _, _, m, _)
+      | ConstraintSolverNullnessWarningWithTypes(_, _, _, _, _, m, _)
+      | ConstraintSolverNullnessWarningWithType(_, _, _, m, _)
+      | ConstraintSolverNonNullnessWarningWithType(_, _, _, m, _)
       | ConstraintSolverTypesNotInEqualityRelation(_, _, _, m, _, _)
       | ConstraintSolverError(_, m, _) 
       | ConstraintSolverTypesNotInSubsumptionRelation(_, _, _, m, _) 
@@ -346,6 +350,10 @@ let GetDiagnosticNumber(err: PhasedDiagnostic) =
       | :? TypeProviderError as e -> e.Number
 #endif
       | ErrorsFromAddingSubsumptionConstraint (_, _, _, _, _, ContextInfo.DowncastUsedInsteadOfUpcast _, _) -> fst (FSComp.SR.considerUpcast("", ""))
+      | ConstraintSolverNullnessWarningEquivWithTypes _ -> 3261
+      | ConstraintSolverNullnessWarningWithTypes _ -> 3262
+      | ConstraintSolverNullnessWarningWithType _ -> 3263
+      | ConstraintSolverNonNullnessWarningWithType _ -> 3264
       | _ -> 193
     GetFromException err.Exception
    
@@ -415,6 +423,10 @@ let ConstraintSolverTupleDiffLengthsE() = DeclareResourceString("ConstraintSolve
 let ConstraintSolverInfiniteTypesE() = DeclareResourceString("ConstraintSolverInfiniteTypes", "%s%s")
 let ConstraintSolverMissingConstraintE() = DeclareResourceString("ConstraintSolverMissingConstraint", "%s")
 let ConstraintSolverTypesNotInEqualityRelation1E() = DeclareResourceString("ConstraintSolverTypesNotInEqualityRelation1", "%s%s")
+let ConstraintSolverNullnessWarningEquivWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningEquivWithTypes", "%s%s%s%s")
+let ConstraintSolverNullnessWarningWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningWithTypes", "%s%s%s%s")
+let ConstraintSolverNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNullnessWarningWithType", "%s")
+let ConstraintSolverNonNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNonNullnessWarningWithType", "%s")
 let ConstraintSolverTypesNotInEqualityRelation2E() = DeclareResourceString("ConstraintSolverTypesNotInEqualityRelation2", "%s%s")
 let ConstraintSolverTypesNotInSubsumptionRelationE() = DeclareResourceString("ConstraintSolverTypesNotInSubsumptionRelation", "%s%s%s")
 let ErrorFromAddingTypeEquation1E() = DeclareResourceString("ErrorFromAddingTypeEquation1", "%s%s%s")
@@ -615,6 +627,40 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
           if m.StartLine <> m2.StartLine then 
              os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
 
+      | ConstraintSolverNullnessWarningEquivWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) ->
+
+          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
+
+          os.Append(ConstraintSolverNullnessWarningEquivWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore
+
+          if m.StartLine <> m2.StartLine then
+             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+
+      | ConstraintSolverNullnessWarningWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) ->
+
+          let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
+
+          os.Append(ConstraintSolverNullnessWarningWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore
+
+          if m.StartLine <> m2.StartLine then
+             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+
+      | ConstraintSolverNullnessWarningWithType(denv, ty, _nullness, m, m2) ->
+
+          let t = NicePrint.minimalStringOfType denv ty
+          os.Append(ConstraintSolverNullnessWarningWithTypeE().Format (t)) |> ignore
+
+          if m.StartLine <> m2.StartLine then
+             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+
+      | ConstraintSolverNonNullnessWarningWithType(denv, ty, _nullness, m, m2) ->
+
+          let t = NicePrint.minimalStringOfType denv ty
+          os.Append(ConstraintSolverNonNullnessWarningWithTypeE().Format (t)) |> ignore
+
+          if m.StartLine <> m2.StartLine then
+             os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+
       | ConstraintSolverTypesNotInEqualityRelation(denv, (TType_measure _ as t1), (TType_measure _ as t2), m, m2, _) -> 
           // REVIEW: consider if we need to show _cxs (the type parameter constraints)
           let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv t1 t2
@@ -756,7 +802,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
               
               let retTy =
                   knownReturnType
-                  |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked()))
+                  |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked(), KnownAmbivalentToNull))
               
               let argRepr = 
                   callerArgs.ArgumentNamesAndTypes
@@ -1310,7 +1356,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
               // we need to check if unit was used as a type argument
               let rec hasUnitTType_app (types: TType list) =
                   match types with
-                  | TType_app (maybeUnit, []) :: ts -> 
+                  | TType_app (maybeUnit, [], _) :: ts -> 
                       match maybeUnit.TypeAbbrev with
                       | Some ttype when isUnitTy g ttype -> true
                       | _ -> hasUnitTType_app ts
@@ -1318,7 +1364,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
                   | [] -> false
 
               match minfoVirt.ApparentEnclosingType with
-              | TType_app (t, types) when t.IsFSharpInterfaceTycon && hasUnitTType_app types ->
+              | TType_app (t, types, _) when t.IsFSharpInterfaceTycon && hasUnitTType_app types ->
                   // match abstract member with 'unit' passed as generic argument
                   os.Append(OverrideDoesntOverride4E().Format sig1) |> ignore
               | _ -> 
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index b54914696de..f36e60f4212 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -56,13 +56,21 @@ let IsSignatureDataResource (r: ILResource) =
     r.Name.StartsWithOrdinal FSharpSignatureDataResourceName ||
     r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2
 
+let IsSignatureDataResourceB (r: ILResource) = 
+    r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB
+
 let IsOptimizationDataResource (r: ILResource) = 
     r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName|| 
     r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2
 
+let IsOptimizationDataResourceB (r: ILResource) = 
+    r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB
+
 let GetSignatureDataResourceName (r: ILResource) = 
     if r.Name.StartsWithOrdinal FSharpSignatureDataResourceName then 
         String.dropPrefix r.Name FSharpSignatureDataResourceName
+    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB then 
+        String.dropPrefix r.Name FSharpSignatureDataResourceNameB
     elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 then 
         String.dropPrefix r.Name FSharpSignatureDataResourceName2
     else failwith "GetSignatureDataResourceName"
@@ -70,6 +78,8 @@ let GetSignatureDataResourceName (r: ILResource) =
 let GetOptimizationDataResourceName (r: ILResource) = 
     if r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName then 
         String.dropPrefix r.Name FSharpOptimizationDataResourceName
+    elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB then 
+        String.dropPrefix r.Name FSharpOptimizationDataResourceNameB
     elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2 then 
         String.dropPrefix r.Name FSharpOptimizationDataResourceName2
     else failwith "GetOptimizationDataResourceName"
@@ -84,31 +94,54 @@ let MakeILResource rName bytes =
       CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
       MetadataIndex = NoMetadataIdx }
 
-let PickleToResource inMem file (g: TcGlobals) scope rName p x =
+let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x = 
     let file = PathMap.apply g.pathMap file
 
-    let bytes = pickleObjWithDanglingCcus inMem file g scope p x
+    let bytes, bytesB = pickleObjWithDanglingCcus inMem file g scope p x 
     let byteStorage =
         if inMem then
             ByteStorage.FromByteArrayAndCopy(bytes, useBackingMemoryMappedFile = true)
         else
             ByteStorage.FromByteArray(bytes)
 
-    { Name = rName
-      Location = ILResourceLocation.Local(byteStorage)
-      Access = ILResourceAccess.Public
-      CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
-      MetadataIndex = NoMetadataIdx }
+    let byteStorageB =
+        if inMem then
+            ByteStorage.FromByteArrayAndCopy(bytesB, useBackingMemoryMappedFile = true)
+        else
+            ByteStorage.FromByteArray(bytesB)
+
+    let resource =
+        { Name = rName
+          Location = ILResourceLocation.Local(byteStorage)
+          Access = ILResourceAccess.Public
+          CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
+          MetadataIndex = NoMetadataIdx }
+    let resourceB = 
+        if bytesB.Length > 0 then 
+            Some 
+              { Name = rNameB
+                Location = ILResourceLocation.Local(byteStorageB)
+                Access = ILResourceAccess.Public
+                CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
+                MetadataIndex = NoMetadataIdx 
+              }
+        else
+            None
+    resource, resourceB
+          
 
-let GetSignatureData (file, ilScopeRef, ilModule, byteReader) : PickledDataWithReferences = 
-    unpickleObjWithDanglingCcus file ilScopeRef ilModule unpickleCcuInfo (byteReader())
+let GetSignatureData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) : PickledDataWithReferences = 
+    let memA = byteReaderA()
+    let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br())
+    unpickleObjWithDanglingCcus file ilScopeRef ilModule unpickleCcuInfo memA memB
 
-let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: CcuThunk, file, inMem) : ILResource =
+let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: CcuThunk, file, inMem) =
     let mspec = ccu.Contents
     let mspec = ApplyExportRemappingToEntity tcGlobals exportRemapping mspec
     // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers 
     // don't complain when they see the resource.
-    let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpSignatureDataResourceName2 else FSharpSignatureDataResourceName
+    let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpSignatureDataResourceName2 else FSharpSignatureDataResourceName 
+    let rNameB = FSharpSignatureDataResourceNameB
 
     let includeDir =
         if String.IsNullOrEmpty tcConfig.implicitIncludeDir then ""
@@ -117,19 +150,22 @@ let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: Ccu
             |> System.IO.Path.GetFullPath
             |> PathMap.applyDir tcGlobals.pathMap
  
-    PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) pickleCcuInfo 
+    PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName)  (rNameB+ccu.AssemblyName) pickleCcuInfo 
         { mspec=mspec 
           compileTimeWorkingDir=includeDir
           usesQuotations = ccu.UsesFSharp20PlusQuotations }
 
-let GetOptimizationData (file, ilScopeRef, ilModule, byteReader) = 
-    unpickleObjWithDanglingCcus file ilScopeRef ilModule Optimizer.u_CcuOptimizationInfo (byteReader())
+let GetOptimizationData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) = 
+    let memA = byteReaderA()
+    let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br())
+    unpickleObjWithDanglingCcus file ilScopeRef ilModule Optimizer.u_CcuOptimizationInfo memA memB
 
 let WriteOptimizationData (tcGlobals, file, inMem, ccu: CcuThunk, modulInfo) = 
     // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers 
     // don't complain when they see the resource.
     let rName = if ccu.AssemblyName = getFSharpCoreLibraryName then FSharpOptimizationDataResourceName2 else FSharpOptimizationDataResourceName 
-    PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) Optimizer.p_CcuOptimizationInfo modulInfo
+    let rNameB = FSharpOptimizationDataResourceNameB 
+    PickleToResource inMem file tcGlobals ccu (rName+ccu.AssemblyName) (rNameB+ccu.AssemblyName) Optimizer.p_CcuOptimizationInfo modulInfo
 
 exception AssemblyNotResolved of (*originalName*) string * range
 exception MSBuildReferenceResolutionWarning of (*MSBuild warning code*)string * (*Message*)string * range
@@ -640,22 +676,47 @@ type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyR
                 [ for iresource in resources do
                     if IsSignatureDataResource iresource then 
                         let ccuName = GetSignatureDataResourceName iresource
-                        yield (ccuName, fun () -> iresource.GetBytes()) ]
+                        let readerA = fun () -> iresource.GetBytes()
+                        let readerB = 
+                            resources |> List.tryPick (fun iresourceB -> 
+                                if IsSignatureDataResourceB iresourceB then 
+                                    let ccuNameB = GetSignatureDataResourceName iresourceB
+                                    if ccuName = ccuNameB then
+                                        Some (fun () -> iresourceB.GetBytes() )
+                                    else None
+                                else None)
+                        yield (ccuName, (readerA, readerB)) ]
                         
             let sigDataReaders = 
                 if sigDataReaders.IsEmpty && List.contains ilShortAssemName externalSigAndOptData then 
                     let sigFileName = Path.ChangeExtension(filename, "sigdata")
                     if not (FileSystem.SafeExists sigFileName) then 
                         error(Error(FSComp.SR.buildExpectedSigdataFile (FileSystem.GetFullPathShim sigFileName), m))
-                    [ (ilShortAssemName, fun () -> ByteMemory.FromFile(sigFileName, FileAccess.Read, canShadowCopy=true).AsReadOnly())]
+                    let readerA () = ByteMemory.FromFile(sigFileName, FileAccess.Read, canShadowCopy=true).AsReadOnly()
+                    [ (ilShortAssemName, (readerA, None)) ]
                 else
                     sigDataReaders
             sigDataReaders
 
          member __.GetRawFSharpOptimizationData(m, ilShortAssemName, filename) =             
+            let resources = ilModule.Resources.AsList
             let optDataReaders = 
-                ilModule.Resources.AsList
-                |> List.choose (fun r -> if IsOptimizationDataResource r then Some(GetOptimizationDataResourceName r, (fun () -> r.GetBytes())) else None)
+                resources
+                |> List.choose (fun r -> 
+                    if IsOptimizationDataResource r then 
+                        let ccuName = GetOptimizationDataResourceName r
+                        let readerA = (fun () -> r.GetBytes())
+                        let readerB = 
+                            resources |> List.tryPick (fun iresourceB -> 
+                                if IsOptimizationDataResourceB iresourceB then 
+                                    let ccuNameB = GetOptimizationDataResourceName iresourceB
+                                    if ccuName = ccuNameB then
+                                        Some (fun () -> iresourceB.GetBytes() )
+                                    else None
+                                else None)
+                        Some(ccuName, (readerA, readerB)) 
+                    else 
+                        None)
 
             // Look for optimization data in a file 
             let optDataReaders = 
@@ -663,7 +724,8 @@ type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyR
                     let optDataFile = Path.ChangeExtension(filename, "optdata")
                     if not (FileSystem.SafeExists optDataFile) then 
                         error(Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore(optDataFile, FileSystem.GetFullPathShim optDataFile), m))
-                    [ (ilShortAssemName, (fun () -> ByteMemory.FromFile(optDataFile, FileAccess.Read, canShadowCopy=true).AsReadOnly()))]
+                    let readerA () = ByteMemory.FromFile(optDataFile, FileAccess.Read, canShadowCopy=true).AsReadOnly()
+                    [ (ilShortAssemName, (readerA, None))]
                 else
                     optDataReaders
             optDataReaders
@@ -944,11 +1006,19 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
 
 
 #if !NO_EXTENSIONTYPING
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
     member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) = 
-        let anameOpt = assembly.PUntaint((fun assembly -> match assembly with null -> None | a -> Some (a.GetName())), m)
-        match anameOpt with 
-        | None -> false, None
-        | Some aname -> 
+#else
+    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) = 
+#endif
+        match assembly with 
+        | Tainted.Null -> false,None
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+        | assembly -> 
+#else
+        | Tainted.NonNull assembly -> 
+#endif
+        let aname = assembly.PUntaint((fun a -> a.GetName()), m)
         let ilShortAssemName = aname.Name
         match tcImports.FindCcu (ctok, m, ilShortAssemName, lookupOnly=true) with 
         | ResolvedCcu ccu -> 
@@ -1194,7 +1264,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
 
     member tcImportsStrong.ImportTypeProviderExtensions 
                (ctok, tcConfig: TcConfig, 
-                fileNameOfRuntimeAssembly, 
+                fileNameOfRuntimeAssembly: string, 
                 ilScopeRefOfRuntimeAssembly, 
                 runtimeAssemblyAttributes: ILAttribute list, 
                 entityToInjectInto, invalidateCcu: Event<_>, m) = 
@@ -1207,7 +1277,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
             runtimeAssemblyAttributes 
             |> List.choose (TryDecodeTypeProviderAssemblyAttr (defaultArg ilGlobalsOpt EcmaMscorlibILGlobals))
             // If no design-time assembly is specified, use the runtime assembly
-            |> List.map (function null -> fileNameOfRuntimeAssembly | s -> s)
+            |> List.map (function null -> fileNameOfRuntimeAssembly | NonNull s -> s)
             // For each simple name of a design-time assembly, we take the first matching one in the order they are 
             // specified in the attributes
             |> List.distinctBy (fun s -> try Path.GetFileNameWithoutExtension s with _ -> s)
@@ -1397,8 +1467,8 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
 
         let ccuRawDataAndInfos = 
             ilModule.GetRawFSharpSignatureData(m, ilShortAssemName, filename)
-            |> List.map (fun (ccuName, sigDataReader) -> 
-                let data = GetSignatureData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader)
+            |> List.map (fun (ccuName, (sigDataReader, sigDataReaderB)) -> 
+                let data = GetSignatureData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB)
 
                 let optDatas = Map.ofList optDataReaders
 
@@ -1436,8 +1506,8 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
                          | None -> 
                             if verbose then dprintf "*** no optimization data for CCU %s, was DLL compiled with --no-optimization-data??\n" ccuName 
                             None
-                         | Some info ->
-                            let data = GetOptimizationData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), info)
+                         | Some (readerA, readerB) -> 
+                            let data = GetOptimizationData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), readerA, readerB)
                             let fixupThunk () = data.OptionalFixup(fun nm -> availableToOptionalCcu(tcImports.FindCcu(ctok, m, nm, lookupOnly=false)))
 
                             // Make a note of all ccuThunks that may still need to be fixed up when other dlls are loaded
@@ -1774,7 +1844,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         // OK, now we have both mscorlib.dll and FSharp.Core.dll we can create TcGlobals
         let tcGlobals = TcGlobals(tcConfig.compilingFslib, ilGlobals, fslibCcu,
                                   tcConfig.implicitIncludeDir, tcConfig.mlCompatibility,
-                                  tcConfig.isInteractive, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations,
+                                  tcConfig.isInteractive, tcConfig.assumeNullOnImport, tcConfig.checkNullness, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations,
                                   tcConfig.noDebugData, tcConfig.pathMap, tcConfig.langVersion)
 
 #if DEBUG
diff --git a/src/fsharp/CompilerImports.fsi b/src/fsharp/CompilerImports.fsi
index 67abae1f779..015fa538871 100644
--- a/src/fsharp/CompilerImports.fsi
+++ b/src/fsharp/CompilerImports.fsi
@@ -36,18 +36,22 @@ exception MSBuildReferenceResolutionError of (*MSBuild warning code*)string * (*
 /// Determine if an IL resource attached to an F# assembly is an F# signature data resource
 val IsSignatureDataResource: ILResource -> bool
 
+/// Determine if an IL resource attached to an F# assembly is an F# signature data resource (data stream B)
+val IsSignatureDataResourceB: ILResource -> bool
+
 /// Determine if an IL resource attached to an F# assembly is an F# optimization data resource
 val IsOptimizationDataResource: ILResource -> bool
 
 /// Determine if an IL resource attached to an F# assembly is an F# quotation data resource for reflected definitions
 val IsReflectedDefinitionsResource: ILResource -> bool
+
 val GetSignatureDataResourceName: ILResource -> string
 
-/// Write F# signature data as an IL resource
-val WriteSignatureData: TcConfig * TcGlobals * Remap * CcuThunk * filename: string * inMem: bool -> ILResource
+/// Write F# signature data as one or more IL resources
+val WriteSignatureData: TcConfig * TcGlobals * Remap * CcuThunk * filename: string * inMem: bool -> ILResource * ILResource option
 
-/// Write F# optimization data as an IL resource
-val WriteOptimizationData: TcGlobals * filename: string * inMem: bool * CcuThunk * Optimizer.LazyModuleInfo -> ILResource
+/// Write F# optimization data as an IL resource(s)
+val WriteOptimizationData: TcGlobals * filename: string * inMem: bool * CcuThunk * Optimizer.LazyModuleInfo -> ILResource * ILResource option
 
 []
 type ResolveAssemblyReferenceMode =
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index 69645f1700f..47ced009fe2 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -825,7 +825,6 @@ and ConvLValueExpr cenv env expr =
 
 // This function has to undo the work of mkExprAddrOfExpr 
 and ConvLValueExprCore cenv env expr = 
-    let g = cenv.g
     match expr with 
     | Expr.Op(op, tyargs, args, m) -> 
         match op, args, tyargs  with
diff --git a/src/fsharp/ScriptClosure.fs b/src/fsharp/ScriptClosure.fs
index 5b605f9060b..5812d722333 100644
--- a/src/fsharp/ScriptClosure.fs
+++ b/src/fsharp/ScriptClosure.fs
@@ -220,7 +220,7 @@ module ScriptPreprocessClosure =
                             | null ->
                                 errorR(Error(dependencyProvider.CreatePackageManagerUnknownError(tcConfig.compilerToolPaths, outputDir, packageManagerKey, reportError), m))
 
-                            | dependencyManager ->
+                            | NonNull dependencyManager ->
                                 let directive d =
                                     match d with
                                     | Directive.Resolution -> "r"
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index d5cfa11b408..dc0355fdfdb 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -1528,7 +1528,15 @@ type internal FsiDynamicCompiler
                         let dm = tcImports.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
 
                         match dm with
-                        | _, dependencyManager when not(isNull dependencyManager) ->
+                        | null, null ->
+                           errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
+                           st
+
+                        | _, null when directive = Directive.Include ->
+                            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+                            st
+
+                        | _, NonNull dependencyManager ->
                             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                                 fsiDynamicCompiler.EvalDependencyManagerTextFragment (dependencyManager, directive, m, path)
                                 st
@@ -1536,12 +1544,8 @@ type internal FsiDynamicCompiler
                                 errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
                                 st
 
-                        | _, _ when directive = Directive.Include ->
-                            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
-                            st
-
                         // #r "Assembly"
-                        | path, _ ->
+                        | NonNull path, _ ->
                             snd (fsiDynamicCompiler.EvalRequireReference (ctok, st, m, path))
                     ),
                     (fun _ _ -> ()))  
@@ -2175,18 +2179,6 @@ type internal FsiInteractionProcessor
                 // error already reported
                 istate, CompletedWithAlreadyReportedError
 
-            | NonNull p, null ->
-               if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
-                   fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
-                   istate, Completed None
-               else
-                   errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
-                   istate, Completed None
-
-            | _, _ when directive = Directive.Include ->
-                errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
-                istate,Completed None
-
             | NonNull p, null ->
                 let path =
                     if String.IsNullOrWhiteSpace(p) then ""
@@ -2210,6 +2202,18 @@ type internal FsiInteractionProcessor
                     fsiConsoleOutput.uprintnfnn "%s" format)
                 istate,Completed None
 
+            | _, null when directive = Directive.Include ->
+                errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+                istate,Completed None
+
+            | _, NonNull dependencyManager ->
+               if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
+                   fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
+                   istate, Completed None
+               else
+                   errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
+                   istate, Completed None
+
         istate |> InteractiveCatch errorLogger (fun istate ->
             match action with 
             | IDefns ([], _) ->
diff --git a/src/fsharp/xlf/FSComp.txt.cs.xlf b/src/fsharp/xlf/FSComp.txt.cs.xlf
index 2f58fdd21a5..9909c2dea2d 100644
--- a/src/fsharp/xlf/FSComp.txt.cs.xlf
+++ b/src/fsharp/xlf/FSComp.txt.cs.xlf
@@ -107,6 +107,11 @@
         Atribut sestavení {0} odkazuje na navržené sestavení {1}, které se nedá načíst nebo neexistuje. Ohlášená výjimka: {2} – {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         aplikativní výpočetní výrazy
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.de.xlf b/src/fsharp/xlf/FSComp.txt.de.xlf
index 9c871686986..5618c6dfdd2 100644
--- a/src/fsharp/xlf/FSComp.txt.de.xlf
+++ b/src/fsharp/xlf/FSComp.txt.de.xlf
@@ -107,6 +107,11 @@
         Das Assemblyattribut "{0}" verweist auf eine Designerassembly "{1}", die entweder nicht geladen werden kann oder nicht vorhanden ist. Gemeldete Ausnahme: {2} – {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         applikative Berechnungsausdrücke
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.es.xlf b/src/fsharp/xlf/FSComp.txt.es.xlf
index 1b7cca27a6a..ea021c3361f 100644
--- a/src/fsharp/xlf/FSComp.txt.es.xlf
+++ b/src/fsharp/xlf/FSComp.txt.es.xlf
@@ -107,6 +107,11 @@
         El atributo de ensamblado "{0}" hace referencia a un ensamblado de diseñador "{1}" que no se puede cargar o no existe. Se notificó la excepción: {2} - {3}.
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         expresiones de cálculo aplicativas
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.fr.xlf b/src/fsharp/xlf/FSComp.txt.fr.xlf
index 8cfcef04b64..fb1c266b7ac 100644
--- a/src/fsharp/xlf/FSComp.txt.fr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.fr.xlf
@@ -107,6 +107,11 @@
         L'attribut d'assembly '{0}' fait référence à un assembly de concepteur '{1}' qui ne peut pas être chargé ou qui n'existe pas. Exception signalée : {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         expressions de calcul applicatives
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index c0e837853c2..cdff18dab4e 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -410,6 +410,8 @@
       
         The /checknulls language feature is not enabled
         The /checknulls language feature is not enabled
+        
+      
       
         Cannot assign a value to another value marked literal
         Cannot assign a value to another value marked literal

From ca686a4c4d8ffacba5787e235cce2d0591977326 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 15:50:51 +0100
Subject: [PATCH 019/112] fix build

---
 src/absil/bytes.fs                            |  2 +-
 src/fsharp/CompilerImports.fs                 |  2 +-
 src/fsharp/FSharp.Build/MapSourceRoots.fs     |  4 +-
 src/fsharp/FSharp.Core/FSharp.Core.fsproj     |  1 -
 src/fsharp/LexFilter.fs                       |  2 +-
 .../DependencyProvider.fs                     | 16 +++---
 src/fsharp/lexhelp.fs                         |  1 -
 src/fsharp/pars.fsy                           | 27 +++-------
 src/fsharp/service/ServiceLexing.fs           |  2 +-
 src/fsharp/xlf/FSComp.txt.it.xlf              | 10 ++--
 src/fsharp/xlf/FSComp.txt.ja.xlf              | 50 ++-----------------
 src/fsharp/xlf/FSComp.txt.ko.xlf              | 10 ++--
 src/fsharp/xlf/FSComp.txt.pl.xlf              | 10 ++--
 src/fsharp/xlf/FSComp.txt.pt-BR.xlf           | 10 ++--
 src/fsharp/xlf/FSComp.txt.ru.xlf              | 10 ++--
 src/fsharp/xlf/FSComp.txt.tr.xlf              | 10 ++--
 src/fsharp/xlf/FSComp.txt.zh-Hans.xlf         | 10 ++--
 src/fsharp/xlf/FSComp.txt.zh-Hant.xlf         | 10 ++--
 tests/fsharp/core/nullness/test.fsx           |  2 -
 19 files changed, 68 insertions(+), 121 deletions(-)

diff --git a/src/absil/bytes.fs b/src/absil/bytes.fs
index be385c31799..e752259a518 100644
--- a/src/absil/bytes.fs
+++ b/src/absil/bytes.fs
@@ -538,7 +538,7 @@ type ByteStorage(getByteMemory: unit -> ReadOnlyByteMemory) =
         byteMemory
 
     member _.GetByteMemory() =
-        match cached with
+        match box cached with
         | null -> getAndCache ()
         | _ ->
             match cached.TryGetTarget() with
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index f36e60f4212..a94a222fb6d 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1171,7 +1171,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         match dependencyProviderOpt with 
         | None ->
             Debug.Assert(false, "this should never be called on FrameworkTcImports")
-            new DependencyProvider(null, null)
+            new DependencyProvider()
         | Some dependencyProvider -> dependencyProvider
 
     member tcImports.GetImportMap() = 
diff --git a/src/fsharp/FSharp.Build/MapSourceRoots.fs b/src/fsharp/FSharp.Build/MapSourceRoots.fs
index 84310352b8d..7b04a8fe9cc 100644
--- a/src/fsharp/FSharp.Build/MapSourceRoots.fs
+++ b/src/fsharp/FSharp.Build/MapSourceRoots.fs
@@ -168,7 +168,7 @@ type MapSourceRoots () =
     /// 
     /// 
     []
-    member val SourceRoots: ITaskItem[] = null with get, set
+    member val SourceRoots: ITaskItem[] = [| |] with get, set
 
     /// 
     /// True if the mapped paths should be deterministic.
@@ -180,7 +180,7 @@ type MapSourceRoots () =
     /// Items listed in  that have the same ItemSpec will be merged into a single item in this list.
     /// 
     []
-    member val MappedSourceRoots: ITaskItem[] = null with get, set
+    member val MappedSourceRoots: ITaskItem[] = [| |] with get, set
 
     override this.Execute() =
         match MapSourceRoots.PerformMapping this.Log this.SourceRoots this.Deterministic with
diff --git a/src/fsharp/FSharp.Core/FSharp.Core.fsproj b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
index 9af43f29f65..e538423d915 100644
--- a/src/fsharp/FSharp.Core/FSharp.Core.fsproj
+++ b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
@@ -11,7 +11,6 @@
     $(OtherFlags) --compiling-fslib-40
      
     $(DefineConstants);FSHARP_CORE
-    $(OtherFlags) --warnon:1182 --compiling-fslib --compiling-fslib-40 --maxerrors:20 --extraoptimizationloops:1
     BUILDING_WITH_LKG;$(DefineConstants)
     $(OtherFlags) --warnon:1182 --warnon:3390 --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1 --nowarn:57
     true 
diff --git a/src/fsharp/LexFilter.fs b/src/fsharp/LexFilter.fs
index e4e5f63d53d..87e534655c6 100644
--- a/src/fsharp/LexFilter.fs
+++ b/src/fsharp/LexFilter.fs
@@ -997,7 +997,7 @@ type LexFilterImpl (lightStatus: LightSyntaxStatus, compilingFsLib, lexer, lexbu
                     //      fx
                     //      fx
                     | DEFAULT | COLON | COLON_GREATER | STRUCT | NULL | DELEGATE | AND | WHEN 
-                    | QMARK | HACKNULL | AMBIVALENT
+                    | QMARK | AMBIVALENT
                     | DOT_DOT
                     | NEW
                     | LBRACE_BAR
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
index 31ada4ed44e..f0aea2b66c9 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
@@ -274,19 +274,19 @@ type ReflectionDependencyManagerProvider(theType: Type,
 
 /// Provides DependencyManagement functions.
 /// Class is IDisposable
-type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativeProbingRoots: NativeResolutionProbe) =
+type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe option, nativeProbingRoots: NativeResolutionProbe option) =
 
     // Note: creating a NativeDllResolveHandler currently installs process-wide handlers
     let dllResolveHandler =
         match nativeProbingRoots with 
-        | null -> { new IDisposable with member _.Dispose() = () }
-        | _ -> new NativeDllResolveHandler(nativeProbingRoots) :> IDisposable
+        | None -> { new IDisposable with member _.Dispose() = () }
+        | Some nativeProbingRoots -> new NativeDllResolveHandler(nativeProbingRoots) :> IDisposable
 
     // Note: creating a AssemblyResolveHandler currently installs process-wide handlers
     let assemblyResolveHandler = 
         match assemblyProbingPaths with 
-        | null -> { new IDisposable with member _.Dispose() = () }
-        | _ -> new AssemblyResolveHandler(assemblyProbingPaths) :> IDisposable
+        | None -> { new IDisposable with member _.Dispose() = () }
+        | Some assemblyProbingPaths -> new AssemblyResolveHandler(assemblyProbingPaths) :> IDisposable
 
     // Resolution Path = Location of FSharp.Compiler.Private.dll
     let assemblySearchPaths = lazy (
@@ -345,9 +345,11 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr
 
     let cache = ConcurrentDictionary<_,Result>(HashIdentity.Structural)
 
-    new (nativeProbingRoots: NativeResolutionProbe) = new DependencyProvider(null, nativeProbingRoots)
+    new (assemblyProbingPaths: AssemblyResolutionProbe, nativeProbingRoots: NativeResolutionProbe) = new DependencyProvider(Some assemblyProbingPaths, Some nativeProbingRoots)
 
-    new () = new DependencyProvider(null, null)
+    new (nativeProbingRoots: NativeResolutionProbe) = new DependencyProvider(None, Some nativeProbingRoots)
+
+    new () = new DependencyProvider(None, None)
 
     /// Returns a formatted help messages for registered dependencymanagers for the host to present
     member _.GetRegisteredDependencyManagerHelpText (compilerTools, outputDir, errorReport) = [|
diff --git a/src/fsharp/lexhelp.fs b/src/fsharp/lexhelp.fs
index f601a86f6ef..fff9b6264fb 100644
--- a/src/fsharp/lexhelp.fs
+++ b/src/fsharp/lexhelp.fs
@@ -321,7 +321,6 @@ module Keywords =
        FSHARP, "__token_ODO"       ,ODO
        FSHARP, "__token_OLET"      ,OLET(true)
        FSHARP, "__token_constraint",CONSTRAINT
-       FSHARP, "__hacknull",HACKNULL
        FSHARP, "__ambivalent",AMBIVALENT
       ]
     (*------- reserved keywords which are ml-compatibility ids *) 
diff --git a/src/fsharp/pars.fsy b/src/fsharp/pars.fsy
index c2bde71a873..ff66c2b35de 100644
--- a/src/fsharp/pars.fsy
+++ b/src/fsharp/pars.fsy
@@ -246,7 +246,7 @@ let rangeOfLongIdent(lid:LongIdent) =
 %token GREATER_RBRACK STRUCT SIG 
 %token STATIC MEMBER CLASS ABSTRACT OVERRIDE DEFAULT CONSTRUCTOR INHERIT 
 %token EXTERN VOID PUBLIC PRIVATE INTERNAL GLOBAL
-%token HACKNULL AMBIVALENT
+%token AMBIVALENT
 
 /* for parser 'escape hatch' out of expression context without consuming the 'recover' token */
 %token TYPE_COMING_SOON TYPE_IS_HERE MODULE_COMING_SOON MODULE_IS_HERE
@@ -1497,13 +1497,13 @@ tyconDefn:
   | typeNameInfo 
      { TypeDefn($1, SynTypeDefnRepr.Simple(SynTypeDefnSimpleRepr.None($1.Range), $1.Range), [], $1.Range) }
 
-  | typeNameInfo opt_equals tyconDefnRhsBlock 
-     { if not $2 then (
-            let (ComponentInfo(_, _, _, lid, _, _, _, _)) = $1 
-            // While the spec doesn't allow long idents here, the parser doesn't enforce this, so take one ident
-            let typeNameId = List.last lid
-            raiseParseErrorAt (rhs parseState 2) (FSComp.SR.parsEqualsMissingInTypeDefinition(typeNameId.ToString()))
-       )
+  | typeNameInfo EQUALS tyconDefnRhsBlock 
+     { //if not $2 then (
+       //     let (ComponentInfo(_, _, _, lid, _, _, _, _)) = $1 
+       //     // While the spec doesn't allow long idents here, the parser doesn't enforce this, so take one ident
+       //     let typeNameId = List.last lid
+       //     raiseParseErrorAt (rhs parseState 2) (FSComp.SR.parsEqualsMissingInTypeDefinition(typeNameId.ToString()))
+       //)
        let nameRange = rhs parseState 1
        let (tcDefRepr:SynTypeDefnRepr), members = $3 nameRange
        let declRange = unionRanges (rhs parseState 1) tcDefRepr.Range
@@ -4922,19 +4922,12 @@ appTypeConPower:
     { $1 }
 
 appType:
-  | appType HACKNULL
-    { SynType.WithNull($1, false, lhs parseState) }
-
   | appType AMBIVALENT
     { SynType.WithNull($1, true, lhs parseState) }
 
   | appType QMARK
     { SynType.WithNull($1, false, lhs parseState) }
 
-/*
-| appType OR NULL
-    { SynType.WithNull($1, false lhs parseState) }
-*/
   | appType arrayTypeSuffix 
       {  SynType.Array($2, $1, lhs parseState) }
 
@@ -5472,10 +5465,6 @@ deprecated_opt_equals:
   | EQUALS      { deprecatedWithError (FSComp.SR.parsNoEqualShouldFollowNamespace()) (lhs parseState); () } 
   | /* EMPTY */ {  }
 
-opt_equals:
-  | EQUALS      { true }
-  | /* EMPTY */ { false } 
-
 opt_OBLOCKSEP: 
   | OBLOCKSEP   { }
   | /* EMPTY */ { } 
diff --git a/src/fsharp/service/ServiceLexing.fs b/src/fsharp/service/ServiceLexing.fs
index 90a1c4ab7f4..842bf871460 100755
--- a/src/fsharp/service/ServiceLexing.fs
+++ b/src/fsharp/service/ServiceLexing.fs
@@ -280,7 +280,7 @@ module internal TokenClassifications =
         | IF | THEN  | ELSE | DO | DONE | LET _ | AND_BANG _ | IN | CONST
         | HIGH_PRECEDENCE_PAREN_APP | FIXED
         | HIGH_PRECEDENCE_BRACK_APP
-        | HACKNULL | AMBIVALENT
+        | AMBIVALENT
         | TYPE_COMING_SOON | TYPE_IS_HERE | MODULE_COMING_SOON | MODULE_IS_HERE
           -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
               
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index cdff18dab4e..1e4eaa036e6 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -107,6 +107,11 @@
         L'attributo di assembly '{0}' fa riferimento a un assembly '{1}' della finestra di progettazione che non è stato caricato o non esiste. L'eccezione restituita è {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         espressioni di calcolo applicativo
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index 836435c53fb..96c40e95f25 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -162,16 +162,16 @@
         The {0} definitions for type '{1}' in the signature and implementation are not compatible because the signature requires that the type supports the interface {2} but the interface has not been implemented
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         nullness checking
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         The {0} definitions in the signature and implementation are not compatible because the names differ. The type is called '{1}' in the signature file but '{2}' in implementation.
         The {0} definitions in the signature and implementation are not compatible because the names differ. The type is called '{1}' in the signature file but '{2}' in implementation.
@@ -1307,11 +1307,6 @@
         The argument types don't match
         
       
-      
-        Available overloads:\n{0}
-        Available overloads:\n{0}
-        
-      
       
         Candidates:\n{0}
         Candidates:\n{0}
@@ -1517,11 +1512,6 @@
         No overloads match for method '{0}'.
         
       
-      
-        Known types of arguments: {0}
-        Known types of arguments: {0}
-        
-      
       
         Known type of argument: {0}
         Known type of argument: {0}
@@ -1552,11 +1542,6 @@
         Optional arguments not permitted here
         
       
-      
-        Argument at index {0} doesn't match
-        Argument at index {0} doesn't match
-        
-      
       
         Argument '{0}' doesn't match
         Argument '{0}' doesn't match
@@ -1967,11 +1952,6 @@
         The type provider '{0}' reported an error in the context of provided type '{1}', member '{2}'. The error: {3}
         
       
-      
-        The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
-        The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}'. The exception reported was: {2} - {3}
         The type provider designer assembly '{0}' could not be loaded from folder '{1}'. The exception reported was: {2} - {3}
@@ -3697,11 +3677,6 @@
         Invalid warning level '{0}'
         
       
-      
-        Display the allowed values for language version, specify language version such as 'latest' or 'preview'
-        Display the allowed values for language version, specify language version such as 'latest' or 'preview'
-        
-      
       
         Specify a directory for the include path which is used to resolve source files and assemblies (Short form: -I)
         Specify a directory for the include path which is used to resolve source files and assemblies (Short form: -I)
@@ -6062,11 +6037,6 @@
         'use!' bindings must be of the form 'use! <var> = <expr>'
         
       
-      
-        use! may not be combined with and!
-        use! may not be combined with and!
-        
-      
       
         'use' bindings must be of the form 'use <var> = <expr>'
         'use' bindings must be of the form 'use <var> = <expr>'
@@ -6677,11 +6647,6 @@
         This control construct may only be used if the computation expression builder defines a '{0}' method
         
       
-      
-        The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
-        The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
-        
-      
       
         This is not a variable, constant, active recognizer or literal
         This is not a variable, constant, active recognizer or literal
@@ -7417,11 +7382,6 @@
         The struct, record or union type '{0}' has an explicit implementation of 'Object.GetHashCode' or 'Object.Equals'. You must apply the 'CustomEquality' attribute to the type
         
       
-      
-        Interface member '{0}' does not have a most specific implementation.
-        Interface member '{0}' does not have a most specific implementation.
-        
-      
       
         '{0}' cannot implement the interface '{1}' with the two instantiations '{2}' and '{3}' because they may unify.
         '{0}' cannot implement the interface '{1}' with the two instantiations '{2}' and '{3}' because they may unify.
diff --git a/src/fsharp/xlf/FSComp.txt.ko.xlf b/src/fsharp/xlf/FSComp.txt.ko.xlf
index fdb704198c2..20784dc38be 100644
--- a/src/fsharp/xlf/FSComp.txt.ko.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ko.xlf
@@ -107,6 +107,11 @@
         '{0}' 어셈블리 특성이 로드할 수 없거나 존재하지 않는 디자이너 어셈블리'{1}'을(를) 참조합니다. 보고된 예외: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         적용 가능한 계산 식
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.pl.xlf b/src/fsharp/xlf/FSComp.txt.pl.xlf
index f121abafa48..9ca734f828a 100644
--- a/src/fsharp/xlf/FSComp.txt.pl.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pl.xlf
@@ -107,6 +107,11 @@
         Atrybut zestawu „{0}” odwołuje się do zestawu projektanta „{1}”, którego nie można załadować lub który nie istnieje. Zgłoszony wyjątek: {2} — {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         praktyczne wyrażenia obliczeniowe
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
index 2a850142434..33769af0616 100644
--- a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
@@ -107,6 +107,11 @@
         O atributo de assembly '{0}' refere-se a um assembly de designer '{1}' que não pode ser carregado ou que não existe. A exceção relatada foi {2} – {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         expressões de computação aplicáveis
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.ru.xlf b/src/fsharp/xlf/FSComp.txt.ru.xlf
index 8bb8b94db5e..53a0f244d2d 100644
--- a/src/fsharp/xlf/FSComp.txt.ru.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ru.xlf
@@ -107,6 +107,11 @@
         Атрибут сборки "{0}" ссылается на сборку конструктора "{1}", которая не может быть загружена или не существует. Получено исключение: {2} — {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         применимые вычислительные выражения
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index d7fae6e3d0d..3ecd6f4fafd 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -107,6 +107,11 @@
         '{0}' bütünleştirilmiş kod özniteliği, yüklenemeyen veya mevcut olmayan '{1}' tasarımcı bütünleştirilmiş koduna başvuruyor. Bildirilen özel durum: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         uygulama hesaplama ifadeleri
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
index 8ff4a97b4fc..1bd32657cc4 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
@@ -107,6 +107,11 @@
         程序集属性“{0}”引用了无法加载或不存在的设计器程序集“{1}”。报告的异常是: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         适用的计算表达式
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
index 39065e81af2..69da8e85bb9 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
@@ -107,6 +107,11 @@
         無法載入組件屬性 '{0}' 參考的設計工具組件 '{1}' 或其不存在。回報的例外狀況: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         適用的計算運算式
@@ -157,11 +162,6 @@
         nullness checking
         
       
-      
-        open static classes
-        open static classes
-        
-      
       
         open type declaration
         open type declaration
diff --git a/tests/fsharp/core/nullness/test.fsx b/tests/fsharp/core/nullness/test.fsx
index 74f826baceb..0e2f99641cf 100644
--- a/tests/fsharp/core/nullness/test.fsx
+++ b/tests/fsharp/core/nullness/test.fsx
@@ -267,8 +267,6 @@ let add (s:string) = ()
 let f0c line = 
     add (nonNull "") // WRONG: should not give a nullness warning
 
-let f1 (x: (string __hacknull)) = x;;
-
 //let f2 (x: string or null) = x;;
 let f3 (x: string?) = x
 let f5 x = (x: int)

From f57aaca8c2d6ed42f2b4018529c39dac107d01d5 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 16:11:52 +0100
Subject: [PATCH 020/112] fix build

---
 src/fsharp/CheckExpressions.fs | 12 ------------
 1 file changed, 12 deletions(-)

diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index f503d3068ef..2ef883e6e4a 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -3248,18 +3248,6 @@ let ConvertArbitraryExprToEnumerable (cenv: cenv) ty (env: TcEnv) (expr: Expr) =
                    (mkLambda m enumeratorVar (betterCurrentExpr, enumElemTy)))
         expr, enumElemTy           
 
-<<<<<<< HEAD
-let mkSeqEmpty cenv env m genTy =
-    // We must discover the 'zero' of the monadic algebra being generated in order to compile failing matches.
-    let genResultTy = NewInferenceType cenv.g
-    UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
-    mkCallSeqEmpty cenv.g m genResultTy 
-
-let mkSeqCollect cenv env m enumElemTy genTy lam enumExpr =
-    let genResultTy = NewInferenceType cenv.g
-    UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
-    let enumExpr = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g enumElemTy) (tyOfExpr cenv.g enumExpr) enumExpr
-    mkCallSeqCollect cenv.g m enumElemTy genResultTy lam enumExpr
 //-------------------------------------------------------------------------
 // Post-transform initialization graphs using the 'lazy' interpretation.
 // See ML workshop paper.

From 427ec4c90488887289b86c4b22977f5d1c04bdbb Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 16:14:32 +0100
Subject: [PATCH 021/112] disable test

---
 .../ErrorMessages/TypeEqualsMissingTests.fs   | 24 +++++++++----------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/tests/FSharp.Compiler.ComponentTests/ErrorMessages/TypeEqualsMissingTests.fs b/tests/FSharp.Compiler.ComponentTests/ErrorMessages/TypeEqualsMissingTests.fs
index 70d7beebc92..ee29effab92 100644
--- a/tests/FSharp.Compiler.ComponentTests/ErrorMessages/TypeEqualsMissingTests.fs
+++ b/tests/FSharp.Compiler.ComponentTests/ErrorMessages/TypeEqualsMissingTests.fs
@@ -6,16 +6,16 @@ open Xunit
 open FSharp.Test.Utilities
 open FSharp.Compiler.SourceCodeServices
 
+// Disabled this test, see https://github.com/dotnet/fsharp/commit/98dc1b09fa1ff15176998dc2d28c5b5c8d0f80b1#r43542750
+//module ``Type definition missing equals`` =
 
-module ``Type definition missing equals`` =
-
-    []
-    let ``Missing equals in DU``() =
-        CompilerAssert.TypeCheckSingleError
-            """
-type X | A | B
-            """
-            FSharpErrorSeverity.Error
-            3360 
-            (2, 8, 2, 9)
-            "Unexpected token in type definition. Expected '=' after the type 'X'."
+//     []
+//     let ``Missing equals in DU``() =
+//         CompilerAssert.TypeCheckSingleError
+//             """
+// type X | A | B
+//             """
+//             FSharpErrorSeverity.Error
+//             3360 
+//             (2, 8, 2, 9)
+//             "Unexpected token in type definition. Expected '=' after the type 'X'."

From def696693e647230ecd3ef433c32a5cb863f0d7a Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 16:51:48 +0100
Subject: [PATCH 022/112] fix test case by using options instead of silly nulls

---
 src/fsharp/CompilerConfig.fs                  | 20 ++++++++--------
 .../DependencyProvider.fs                     | 24 +++++++------------
 .../DependencyProvider.fsi                    | 12 ++--------
 src/fsharp/ScriptClosure.fs                   |  4 ++--
 src/fsharp/fsi/fsi.fs                         | 20 ++++++++--------
 .../DependencyManagerInteractiveTests.fs      | 24 +++++++++----------
 .../SurfaceArea.netstandard.fs                |  4 ++--
 7 files changed, 46 insertions(+), 62 deletions(-)

diff --git a/src/fsharp/CompilerConfig.fs b/src/fsharp/CompilerConfig.fs
index dbed4de6d6f..850c3967222 100644
--- a/src/fsharp/CompilerConfig.fs
+++ b/src/fsharp/CompilerConfig.fs
@@ -787,24 +787,24 @@ type TcConfigBuilder =
                 | ErrorReportType.Warning -> warning(Error(error, m))
                 | ErrorReportType.Error -> errorR(Error(error, m)))
 
-        let dm = dependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, output , reportError, path)
+        let dm = dependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, output, reportError, path)
 
         match dm with
-        | null, null ->
-           errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
-
-        | _, null when directive = Directive.Include ->
-            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+        // #r "Assembly"
+        | Some path, None ->
+            tcConfigB.AddReferencedAssemblyByPath (m, path)
 
-        | _, NonNull dependencyManager ->
+        | _, Some dependencyManager ->
             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                 tcConfigB.AddDependencyManagerText (dependencyManager, directive, m, path)
             else
                 errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
 
-        // #r "Assembly"
-        | NonNull path, null ->
-            tcConfigB.AddReferencedAssemblyByPath (m, path)
+        | None, None when directive = Directive.Include ->
+            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+
+        | None, None ->
+           errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
 
     member tcConfigB.RemoveReferencedAssemblyByPath (m, path) =
         tcConfigB.referencedDLLs <- tcConfigB.referencedDLLs |> List.filter (fun ar -> not (Range.equals ar.Range m) || ar.Text <> path)
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
index f0aea2b66c9..e288ee038b7 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
@@ -365,11 +365,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
         DependencyManager.SR.packageManagerUnknown(packageManagerKey, String.Join(", ", searchPaths, compilerTools), registeredKeys)
 
     /// Fetch a dependencymanager that supports a specific key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string * IDependencyManagerProvider =
-#else
-    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string? * IDependencyManagerProvider? =
-#endif
+    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string option * IDependencyManagerProvider option =
         try
             if path.Contains ":" && not (Path.IsPathRooted path) then
                 let managers = RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
@@ -378,36 +374,32 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                 | None ->
                     let err, msg = this.CreatePackageManagerUnknownError(compilerTools, outputDir, (path.Split(':').[0]), reportError)
                     reportError.Invoke(ErrorReportType.Error, err, msg)
-                    null, null
+                    None, None
 
-                | Some kv -> path, kv.Value
+                | Some kv ->
+                    Some path, Some kv.Value
             else
-                path, null
+                Some path, None
         with 
         | e ->
             let e = stripTieWrapper e
             let err, msg = DependencyManager.SR.packageManagerError(e.Message)
             reportError.Invoke(ErrorReportType.Error, err, msg)
-            null, null
+            None, None
 
     /// Fetch a dependencymanager that supports a specific key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider =
-#else
-    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider? =
-#endif
+    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider option =
 
         try
             RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
             |> Map.tryFind key
-            |> Option.defaultValue Unchecked.defaultof
 
         with
         | e ->
             let e = stripTieWrapper e
             let err, msg = DependencyManager.SR.packageManagerError(e.Message)
             reportError.Invoke(ErrorReportType.Error, err, msg)
-            Unchecked.defaultof
+            None
 
     /// Resolve reference for a list of package manager lines
     member _.Resolve (packageManager:IDependencyManagerProvider,
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi
index e65d3e066d2..99bdde62340 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi
@@ -95,15 +95,7 @@ type DependencyProvider =
     member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string -> IResolveDependenciesResult
 
     /// Fetch a dependencymanager that supports a specific key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider
-#else
-    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider?
-#endif
+    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider option
 
     /// TryFindDependencyManagerInPath - given a #r "key:sometext" go and find a DependencyManager that satisfies the key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string * IDependencyManagerProvider
-#else
-    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string? * IDependencyManagerProvider?
-#endif
+    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string option * IDependencyManagerProvider option
diff --git a/src/fsharp/ScriptClosure.fs b/src/fsharp/ScriptClosure.fs
index 5812d722333..328b8e72032 100644
--- a/src/fsharp/ScriptClosure.fs
+++ b/src/fsharp/ScriptClosure.fs
@@ -217,10 +217,10 @@ module ScriptPreprocessClosure =
                         | _ ->
                             let outputDir =  tcConfig.outputDir |> Option.defaultValue ""
                             match dependencyProvider.TryFindDependencyManagerByKey(tcConfig.compilerToolPaths, outputDir, reportError, packageManagerKey) with
-                            | null ->
+                            | None ->
                                 errorR(Error(dependencyProvider.CreatePackageManagerUnknownError(tcConfig.compilerToolPaths, outputDir, packageManagerKey, reportError), m))
 
-                            | NonNull dependencyManager ->
+                            | Some dependencyManager ->
                                 let directive d =
                                     match d with
                                     | Directive.Resolution -> "r"
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index 0886c685fe5..1f35b48bf9c 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -1478,10 +1478,10 @@ type internal FsiDynamicCompiler
                 let outputDir =  tcConfigB.outputDir |> Option.defaultValue ""
 
                 match fsiOptions.DependencyProvider.TryFindDependencyManagerByKey(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, packageManagerKey) with
-                | null ->
+                | None ->
                     errorR(Error(fsiOptions.DependencyProvider.CreatePackageManagerUnknownError(tcConfigB.compilerToolPaths, outputDir, packageManagerKey, reportError m), m))
                     istate
-                | NonNull dependencyManager ->
+                | Some dependencyManager ->
                     let directive d =
                         match d with
                         | Directive.Resolution -> "r"
@@ -1529,15 +1529,15 @@ type internal FsiDynamicCompiler
                         let dm = tcImports.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
 
                         match dm with
-                        | null, null ->
+                        | None, None ->
                            errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
                            st
 
-                        | _, null when directive = Directive.Include ->
+                        | _, None when directive = Directive.Include ->
                             errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
                             st
 
-                        | _, NonNull dependencyManager ->
+                        | _, Some dependencyManager ->
                             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                                 fsiDynamicCompiler.EvalDependencyManagerTextFragment (dependencyManager, directive, m, path)
                                 st
@@ -1546,7 +1546,7 @@ type internal FsiDynamicCompiler
                                 st
 
                         // #r "Assembly"
-                        | NonNull path, _ ->
+                        | Some path, _ ->
                             snd (fsiDynamicCompiler.EvalRequireReference (ctok, st, m, path))
                     ),
                     (fun _ _ -> ()))  
@@ -2176,11 +2176,11 @@ type internal FsiInteractionProcessor
         let packageManagerDirective directive path m =
             let dm = fsiOptions.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
             match dm with
-            | null, null ->
+            | None, None ->
                 // error already reported
                 istate, CompletedWithAlreadyReportedError
 
-            | NonNull p, null ->
+            | Some p, None ->
                 let path =
                     if String.IsNullOrWhiteSpace(p) then ""
                     else p
@@ -2203,11 +2203,11 @@ type internal FsiInteractionProcessor
                     fsiConsoleOutput.uprintnfnn "%s" format)
                 istate,Completed None
 
-            | _, null when directive = Directive.Include ->
+            | None, None when directive = Directive.Include ->
                 errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
                 istate,Completed None
 
-            | _, NonNull dependencyManager ->
+            | _, Some dependencyManager ->
                if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                    fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
                    istate, Completed None
diff --git a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
index 7e4e2780db9..c54d71bc844 100644
--- a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
+++ b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
@@ -80,7 +80,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result = dp.Resolve(idm, ".fsx", [|"r", "FSharp.Data"|], reportError, "net472")
@@ -109,7 +109,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
 
         let result = dp.Resolve(idm, ".fsx", [|"r", "Microsoft.Data.Sqlite, 3.1.8"|], reportError, "netcoreapp3.1")
         Assert.Equal(true, result.Success)
@@ -132,7 +132,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result = dp.Resolve(idm, ".fsx", [|"r", "System.Collections.Immutable.DoesNotExist"|], reportError, "net472")
@@ -163,7 +163,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result1 = dp1.Resolve(idm1, ".fsx", [|"r", "FSharp.Data"|], reportError, "net472")
             Assert.Equal(true, result1.Success)
@@ -184,7 +184,7 @@ type DependencyManagerInteractiveTests() =
         Assert.True((result2.Roots |> Seq.head).EndsWith("/fsharp.data/3.3.3/"))
 
         use dp2 = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-        let idm2 = dp2.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm2 = dp2.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result3 = dp2.Resolve(idm2, ".fsx", [|"r", "System.Json, Version=4.6.0"|], reportError, "net472")
@@ -218,7 +218,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result1 = dp1.Resolve(idm1, ".fsx", [|"r", "Microsoft.Extensions.Configuration.Abstractions, 3.1.1"|], reportError, "net472")
@@ -287,7 +287,7 @@ TorchSharp.Tensor.LongTensor.From([| 0L .. 100L |]).Device
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(AssemblyResolutionProbe(assemblyProbingPaths), NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed")
@@ -383,7 +383,7 @@ printfn ""%A"" result
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed")
@@ -464,7 +464,7 @@ printfn ""%A"" result
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed")
@@ -521,7 +521,7 @@ x |> Seq.iter(fun r ->
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         // Expected: error FS3217: PackageManager can not reference the System Package 'FSharp.Core'
@@ -547,7 +547,7 @@ x |> Seq.iter(fun r ->
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
             dp.Resolve(idm, ".csx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed but should have succeeded")
@@ -582,7 +582,7 @@ x |> Seq.iter(fun r ->
         Assert.False (found, "Invoke the nativeProbingRoots callback -- Error the ResolvingUnmanagedDll still fired ")
 
         use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result = dp.Resolve(idm, ".fsx", [|"r", "FSharp.Data"|], reportError, "net472")
diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index e4a89018279..42240609179 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -42396,11 +42396,11 @@ Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.G
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: Void .ctor(System.Object, IntPtr)
 Microsoft.DotNet.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe)
-Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IDependencyManagerProvider TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
+Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.IDependencyManagerProvider] TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IResolveDependenciesResult Resolve(Microsoft.DotNet.DependencyManager.IDependencyManagerProvider, System.String, System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.String,System.String]], Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String, System.String, System.String, System.String, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: System.String[] GetRegisteredDependencyManagerHelpText(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)
 Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[System.Int32,System.String] CreatePackageManagerUnknownError(System.Collections.Generic.IEnumerable`1[System.String], System.String, System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)
-Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[System.String,Microsoft.DotNet.DependencyManager.IDependencyManagerProvider] TryFindDependencyManagerInPath(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
+Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[Microsoft.FSharp.Core.FSharpOption`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.IDependencyManagerProvider]] TryFindDependencyManagerInPath(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor(Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe, Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor(Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor()

From d9c70406d43895d51d2e7035a0500e902efb1b41 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 24 Oct 2020 18:25:16 +0100
Subject: [PATCH 023/112] fix baselines

---
 .../SurfaceArea.netstandard.fs                | 31 +++++++++++++++++--
 1 file changed, 29 insertions(+), 2 deletions(-)

diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index 42240609179..345981e79b6 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -18355,7 +18355,6 @@ FSharp.Compiler.AbstractIL.Internal.Library+String: System.String lowerCaseFirst
 FSharp.Compiler.AbstractIL.Internal.Library+String: System.String lowercase(System.String)
 FSharp.Compiler.AbstractIL.Internal.Library+String: System.String make(Int32, Char)
 FSharp.Compiler.AbstractIL.Internal.Library+String: System.String sub(System.String, Int32, Int32)
-FSharp.Compiler.AbstractIL.Internal.Library+String: System.String trim(System.String)
 FSharp.Compiler.AbstractIL.Internal.Library+String: System.String uncapitalize(System.String)
 FSharp.Compiler.AbstractIL.Internal.Library+String: System.String uppercase(System.String)
 FSharp.Compiler.AbstractIL.Internal.Library+String: System.String[] getLines(System.String)
@@ -18488,7 +18487,6 @@ FSharp.Compiler.AbstractIL.Internal.Library: System.Lazy`1[a] notlazy[a](a)
 FSharp.Compiler.AbstractIL.Internal.Library: Void DoesNotRequireCompilerThreadTokenAndCouldPossiblyBeMadeConcurrent(CompilationThreadToken)
 FSharp.Compiler.AbstractIL.Internal.Library: Void RequireCompilationThread(CompilationThreadToken)
 FSharp.Compiler.AbstractIL.Internal.Library: a getHole[a](Microsoft.FSharp.Core.FSharpRef`1[Microsoft.FSharp.Core.FSharpOption`1[a]])
-FSharp.Compiler.AbstractIL.Internal.Library: a nonNull[a](System.String, a)
 FSharp.Compiler.AbstractIL.Internal.Library: a notFound[a]()
 FSharp.Compiler.AbstractIL.Internal.Library: d foldOn[a,b,c,d](Microsoft.FSharp.Core.FSharpFunc`2[a,b], Microsoft.FSharp.Core.FSharpFunc`2[c,Microsoft.FSharp.Core.FSharpFunc`2[b,d]], c, a)
 FSharp.Compiler.AbstractIL.Internal.Utils: Boolean get_runningOnMono()
@@ -20178,6 +20176,10 @@ FSharp.Compiler.PrettyNaming: System.String qmark
 FSharp.Compiler.PrettyNaming: System.String qmarkSet
 FSharp.Compiler.PrettyNaming: System.String unassignedTyparName
 FSharp.Compiler.PrettyNaming: System.Tuple`2[System.String,System.Tuple`2[System.String,System.String][]] demangleProvidedTypeName(System.String)
+FSharp.Compiler.PrettyNaming: System.String FSharpOptimizationDataResourceNameB
+FSharp.Compiler.PrettyNaming: System.String FSharpSignatureDataResourceNameB
+FSharp.Compiler.PrettyNaming: System.String get_FSharpOptimizationDataResourceNameB()
+FSharp.Compiler.PrettyNaming: System.String get_FSharpSignatureDataResourceNameB()
 FSharp.Compiler.QuickParse: Boolean TestMemberOrOverrideDeclaration(FSharp.Compiler.SourceCodeServices.FSharpTokenInfo[])
 FSharp.Compiler.QuickParse: FSharp.Compiler.PartialLongName GetPartialLongNameEx(System.String, Int32)
 FSharp.Compiler.QuickParse: Int32 CorrectIdentifierToken(System.String, Int32)
@@ -23232,6 +23234,10 @@ FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`
 FSharp.Compiler.SourceCodeServices.FSharpType: System.String Format(FSharp.Compiler.SourceCodeServices.FSharpDisplayContext)
 FSharp.Compiler.SourceCodeServices.FSharpType: System.String ToString()
 FSharp.Compiler.SourceCodeServices.FSharpType: System.Tuple`2[System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]],FSharp.Compiler.SourceCodeServices.FSharpParameter] Prettify(System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]], FSharp.Compiler.SourceCodeServices.FSharpParameter)
+FSharp.Compiler.SourceCodeServices.FSharpType: Boolean HasNullAnnotation
+FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsNullAmbivalent
+FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_HasNullAnnotation()
+FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsNullAmbivalent()
 FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean Equals(System.Object)
 FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean HasFields
 FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
@@ -41698,6 +41704,27 @@ FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValInfo
 FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValSig
 FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValTyparDecls
 FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+TyparStaticReq
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSubtypeOfType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSupportsMember()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Int32 Tag
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Int32 get_Tag()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: SynTypar genericName
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: SynTypar get_genericName()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: System.String ToString()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: range get_range()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: range range
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparNotSupportsNull(SynTypar, range)
 FSharp.Compiler.SyntaxTreeOps+SynArgNameGenerator: System.String New()
 FSharp.Compiler.SyntaxTreeOps+SynArgNameGenerator: Void .ctor()
 FSharp.Compiler.SyntaxTreeOps+SynArgNameGenerator: Void Reset()

From c357ba395c9660acc27f6d07d7af770bb1acbc4a Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 25 Oct 2020 19:04:42 +0000
Subject: [PATCH 024/112] fix build

---
 src/fsharp/TypedTreePickle.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index 486cb136dee..be9423ffcb9 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -882,7 +882,7 @@ let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option)
          ipubpaths = new_itbl "ipubpaths (fake)" [| |] 
          isimpletys = new_itbl "isimpletys (fake)" [| |] 
          ifile=file
-         ilModule = ilModule }
+         iILModule = ilModule }
     let ccuNameTab = u_array u_encoded_ccuref st2
     let z1 = u_int st2
     let ntycons = if z1 < 0 then -z1-1 else z1

From ef5547c5f3b088605b8325de188c02de019829f0 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 25 Oct 2020 19:08:07 +0000
Subject: [PATCH 025/112] fix build

---
 src/fsharp/TypedTreePickle.fs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index be9423ffcb9..ddbccc21700 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -871,7 +871,7 @@ let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option)
     let st2 =
        { is = ByteStream.FromBytes (phase2bytes, 0, phase2bytes.Length)
          isB = ByteStream.FromBytes (ByteMemory.FromArray([| |]).AsReadOnly(),0,0) 
-         iilscope= ilscope
+         iilscope= viewedScope
          iccus= new_itbl "iccus (fake)" [| |] 
          ientities= NodeInTable<_,_>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ientities",0) 
          itypars= NodeInTable<_,_>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"itypars",0) 
@@ -918,10 +918,10 @@ let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option)
              ifile = file
              iILModule = ilModule }
         let res = u st1
-        check ilscope st1.ientities
-        check ilscope st1.ientities
-        check ilscope st1.ivals
-        check ilscope st1.itypars
+        check viewedScope st1.ientities
+        check viewedScope st1.ientities
+        check viewedScope st1.ivals
+        check viewedScope st1.itypars
         res
 
     {RawData=data; FixupThunks=ccuTab.itbl_rows }

From 9279cda064165200f0ae63636edb6558c6702bd5 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 25 Oct 2020 19:13:47 +0000
Subject: [PATCH 026/112] fix build

---
 src/fsharp/service/QuickParse.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs
index 799219dd446..eb7d9c4f62b 100644
--- a/src/fsharp/service/QuickParse.fs
+++ b/src/fsharp/service/QuickParse.fs
@@ -172,7 +172,7 @@ module QuickParse =
     /// a call to `DeclItemsForNamesAtPosition` for intellisense. This will
     /// allow us to use find the correct qualified items rather than resorting
     /// to the more expensive and less accurate environment lookup.
-    let GetCompleteIdentifierIsland (tolerateJustAfter: bool) (tokenText: string) (index: int) : (string * int * bool) option =
+    let GetCompleteIdentifierIsland (tolerateJustAfter: bool) (lineStr: string) (index: int) : (string * int * bool) option =
         if String.IsNullOrEmpty tokenText then None
         else     
             let directResult = GetCompleteIdentifierIslandImpl tokenText index

From 966fd6128d3344d9c9453892d7674b8fddc68bad Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 25 Oct 2020 19:15:53 +0000
Subject: [PATCH 027/112] fix build

---
 src/fsharp/service/QuickParse.fs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs
index eb7d9c4f62b..7a60d2c1b0e 100644
--- a/src/fsharp/service/QuickParse.fs
+++ b/src/fsharp/service/QuickParse.fs
@@ -173,11 +173,11 @@ module QuickParse =
     /// allow us to use find the correct qualified items rather than resorting
     /// to the more expensive and less accurate environment lookup.
     let GetCompleteIdentifierIsland (tolerateJustAfter: bool) (lineStr: string) (index: int) : (string * int * bool) option =
-        if String.IsNullOrEmpty tokenText then None
+        if String.IsNullOrEmpty lineStr then None
         else     
-            let directResult = GetCompleteIdentifierIslandImpl tokenText index
+            let directResult = GetCompleteIdentifierIslandImpl lineStr index
             if tolerateJustAfter && directResult = None then 
-                GetCompleteIdentifierIslandImpl tokenText (index - 1)
+                GetCompleteIdentifierIslandImpl lineStr (index - 1)
             else 
                 directResult
 

From 0726126854cd311b8f7d85dd7bac0bf49add2aa5 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 25 Oct 2020 19:38:33 +0000
Subject: [PATCH 028/112] update baselines

---
 .../SurfaceArea.netstandard.fs                | 209 ++++++++++++++++++
 1 file changed, 209 insertions(+)

diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index 345981e79b6..a990c7c43fc 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -41948,6 +41948,215 @@ FSharp.Compiler.XmlDoc: FSharp.Compiler.XmlDoc+PreXmlDoc
 FSharp.Compiler.XmlDoc: FSharp.Compiler.XmlDoc+XmlDoc
 FSharp.Compiler.XmlDoc: FSharp.Compiler.XmlDoc+XmlDocCollector
 FSharp.Compiler.XmlDoc: FSharp.Compiler.XmlDoc+XmlDocStatics
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsAnon
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsAnonRecd
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsApp
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsArray
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsFun
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsHashConstraint
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsLongIdent
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsLongIdentApp
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsMeasureDivide
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsMeasurePower
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsParen
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstant
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantExpr
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantNamed
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsTuple
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsVar
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsWithGlobalConstraints
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsAnon()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsAnonRecd()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsApp()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsArray()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsFun()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsHashConstraint()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsLongIdent()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsLongIdentApp()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsMeasureDivide()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsMeasurePower()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsParen()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstant()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantExpr()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantNamed()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsTuple()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsVar()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsWithGlobalConstraints()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Int32 Tag
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Int32 get_Tag()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: System.String ToString()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range Range
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range get_Range()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range get_range()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range range
+FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 StaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 WithNull
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsAnon
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsAnonRecd
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsApp
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsArray
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsFun
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsHashConstraint
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsLongIdent
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsLongIdentApp
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsMeasureDivide
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsMeasurePower
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsParen
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstant
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantExpr
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantNamed
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsTuple
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsVar
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsWithGlobalConstraints
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean ambivalent
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsAnon()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsAnonRecd()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsApp()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsArray()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsFun()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsHashConstraint()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsLongIdent()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsLongIdentApp()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsMeasureDivide()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsMeasurePower()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsParen()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstant()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantExpr()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantNamed()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsTuple()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsVar()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsWithGlobalConstraints()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_ambivalent()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Int32 Tag
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Int32 get_Tag()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: SynType get_innerType()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: SynType innerType
+FSharp.Compiler.SyntaxTree+SynType+WithNull: System.String ToString()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range Range
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range get_Range()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range get_range()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range range
+FSharp.Compiler.SyntaxTree+SynType: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+WithNull
+FSharp.Compiler.SyntaxTree+SynType: SynType NewStaticConstantNull(range)
+FSharp.Compiler.SyntaxTree+SynType: SynType NewWithNull(SynType, Boolean, range)
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparDefaultsToType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsComparable
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsDelegate
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsEnum
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsEquatable
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsReferenceType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsUnmanaged
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsValueType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSubtypeOfType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSupportsMember
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparDefaultsToType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsComparable()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsDelegate()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsEnum()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsEquatable()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsReferenceType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsUnmanaged()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsValueType()
 Internal.Utilities.PathMap: Boolean Equals(Internal.Utilities.PathMap)
 Internal.Utilities.PathMap: Boolean Equals(System.Object)
 Internal.Utilities.PathMap: Boolean Equals(System.Object, System.Collections.IEqualityComparer)

From b3f18490d021898f7f2d5c8055638cba4b7e254f Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 25 Oct 2020 21:52:42 +0000
Subject: [PATCH 029/112] revert some changes

---
 src/fsharp/fsi/fsi.fs | 38 ++++++++++++++++++++------------------
 1 file changed, 20 insertions(+), 18 deletions(-)

diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index 52a5dc11dba..b683a751b23 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -1529,14 +1529,6 @@ type internal FsiDynamicCompiler
                         let dm = tcImports.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
 
                         match dm with
-                        | None, None ->
-                           errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
-                           st
-
-                        | _, None when directive = Directive.Include ->
-                            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
-                            st
-
                         | _, Some dependencyManager ->
                             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                                 fsiDynamicCompiler.EvalDependencyManagerTextFragment (dependencyManager, directive, m, path)
@@ -1545,9 +1537,16 @@ type internal FsiDynamicCompiler
                                 errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
                                 st
 
+                        | _, _ when directive = Directive.Include ->
+                            errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+                            st
+
                         // #r "Assembly"
                         | Some path, _ ->
                             snd (fsiDynamicCompiler.EvalRequireReference (ctok, st, m, path))
+
+                        | None, None ->
+                           st
                     ),
                     (fun _ _ -> ()))  
                    (tcConfigB, inp, Path.GetDirectoryName sourceFile, istate))
@@ -2180,6 +2179,18 @@ type internal FsiInteractionProcessor
                 // error already reported
                 istate, CompletedWithAlreadyReportedError
 
+            | _, Some dependencyManager ->
+               if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
+                   fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
+                   istate, Completed None
+               else
+                   errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
+                   istate, Completed None
+
+            | _, _ when directive = Directive.Include ->
+                errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+                istate,Completed None
+
             | Some p, None ->
                 let path =
                     if String.IsNullOrWhiteSpace(p) then ""
@@ -2203,18 +2214,9 @@ type internal FsiInteractionProcessor
                     fsiConsoleOutput.uprintnfnn "%s" format)
                 istate,Completed None
 
-            | None, None when directive = Directive.Include ->
-                errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
+            | _, _ ->
                 istate,Completed None
 
-            | _, Some dependencyManager ->
-               if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
-                   fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
-                   istate, Completed None
-               else
-                   errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
-                   istate, Completed None
-
         istate |> InteractiveCatch errorLogger (fun istate ->
             match action with 
             | IDefns ([], _) ->

From 9701a85088324dba318cb6a82201e54623591db1 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 26 Oct 2020 13:53:07 +0000
Subject: [PATCH 030/112] fix build

---
 src/fsharp/CompilerConfig.fs                  |  3 ---
 src/fsharp/CompilerConfig.fsi                 |  2 --
 src/fsharp/CompilerImports.fs                 |  2 +-
 src/fsharp/CompilerOptions.fs                 |  1 -
 src/fsharp/FSComp.txt                         |  2 +-
 src/fsharp/FSharp.Build/FSharp.Build.fsproj   |  2 +-
 .../FSharp.Compiler.Private.fsproj            |  2 +-
 .../FSharp.Compiler.Server.Shared.fsproj      |  2 +-
 src/fsharp/FSharp.Core/FSharp.Core.fsproj     |  1 -
 src/fsharp/LanguageFeatures.fs                |  2 +-
 src/fsharp/TcGlobals.fs                       |  4 +---
 src/fsharp/fsi/fsi.fsproj                     |  2 +-
 src/fsharp/import.fs                          | 18 +++++++-------
 src/fsharp/xlf/FSComp.txt.cs.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.de.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.es.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.fr.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.it.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.ja.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.ko.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.pl.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.pt-BR.xlf           |  4 ++--
 src/fsharp/xlf/FSComp.txt.ru.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.tr.xlf              |  4 ++--
 src/fsharp/xlf/FSComp.txt.zh-Hans.xlf         |  4 ++--
 src/fsharp/xlf/FSComp.txt.zh-Hant.xlf         |  4 ++--
 .../Microsoft.FSharp.Core/BigIntType.fs       |  2 +-
 tests/fsharp/core/nullness/test.fsx           |  4 ++--
 tests/fsharp/tests.fs                         | 24 +++++++++----------
 .../src/FSharp.Editor/FSharp.Editor.fsproj    |  2 +-
 30 files changed, 60 insertions(+), 67 deletions(-)

diff --git a/src/fsharp/CompilerConfig.fs b/src/fsharp/CompilerConfig.fs
index 181105b8d56..92a77df35d2 100644
--- a/src/fsharp/CompilerConfig.fs
+++ b/src/fsharp/CompilerConfig.fs
@@ -351,7 +351,6 @@ type TcConfigBuilder =
       mutable embedResources: string list
       mutable errorSeverityOptions: FSharpErrorSeverityOptions
       mutable mlCompatibility: bool
-      mutable assumeNullOnImport: bool
       mutable checkNullness: bool
       mutable checkOverflow: bool
       mutable showReferenceResolutions: bool
@@ -517,7 +516,6 @@ type TcConfigBuilder =
           subsystemVersion = 4, 0 // per spec for 357994
           useHighEntropyVA = false
           mlCompatibility = false
-          assumeNullOnImport = false
           checkNullness = false
           checkOverflow = false
           showReferenceResolutions = false
@@ -925,7 +923,6 @@ type TcConfig private (data: TcConfigBuilder, validate: bool) =
     member x.embedResources = data.embedResources
     member x.errorSeverityOptions = data.errorSeverityOptions
     member x.mlCompatibility = data.mlCompatibility
-    member x.assumeNullOnImport = data.assumeNullOnImport
     member x.checkNullness = data.checkNullness
     member x.checkOverflow = data.checkOverflow
     member x.showReferenceResolutions = data.showReferenceResolutions
diff --git a/src/fsharp/CompilerConfig.fsi b/src/fsharp/CompilerConfig.fsi
index 9833df22c5a..c1481b82ccf 100644
--- a/src/fsharp/CompilerConfig.fsi
+++ b/src/fsharp/CompilerConfig.fsi
@@ -171,7 +171,6 @@ type TcConfigBuilder =
       mutable embedResources: string list
       mutable errorSeverityOptions: FSharpErrorSeverityOptions
       mutable mlCompatibility:bool
-      mutable assumeNullOnImport: bool
       mutable checkNullness: bool
       mutable checkOverflow:bool
       mutable showReferenceResolutions:bool
@@ -352,7 +351,6 @@ type TcConfig =
     member embedResources: string list
     member errorSeverityOptions: FSharpErrorSeverityOptions
     member mlCompatibility:bool
-    member assumeNullOnImport: bool
     member checkNullness: bool
     member checkOverflow:bool
     member showReferenceResolutions:bool
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index b1aefed6950..d40ddffeffd 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1844,7 +1844,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         // OK, now we have both mscorlib.dll and FSharp.Core.dll we can create TcGlobals
         let tcGlobals = TcGlobals(tcConfig.compilingFslib, ilGlobals, fslibCcu,
                                   tcConfig.implicitIncludeDir, tcConfig.mlCompatibility,
-                                  tcConfig.isInteractive, tcConfig.assumeNullOnImport, tcConfig.checkNullness, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations,
+                                  tcConfig.isInteractive, tcConfig.checkNullness, tryFindSysTypeCcu, tcConfig.emitDebugInfoInQuotations,
                                   tcConfig.noDebugData, tcConfig.pathMap, tcConfig.langVersion)
 
 #if DEBUG
diff --git a/src/fsharp/CompilerOptions.fs b/src/fsharp/CompilerOptions.fs
index 605ad80f76f..01f09d7a10c 100644
--- a/src/fsharp/CompilerOptions.fs
+++ b/src/fsharp/CompilerOptions.fs
@@ -1033,7 +1033,6 @@ let testFlag tcConfigB =
             ("test", tagString,
              OptionString (fun s -> 
                 match s with
-                | "AssumeNullOnImport" -> tcConfigB.assumeNullOnImport <- true
                 | "StackSpan"        -> tcConfigB.internalTestSpanStackReferring <- true
                 | "ErrorRanges"      -> tcConfigB.errorStyle <- ErrorStyle.TestErrors
                 | "Tracking"         -> Lib.tracking <- true (* general purpose on/off diagnostics flag *)
diff --git a/src/fsharp/FSComp.txt b/src/fsharp/FSComp.txt
index 4aaca606cb6..8707689aece 100644
--- a/src/fsharp/FSComp.txt
+++ b/src/fsharp/FSComp.txt
@@ -1496,7 +1496,7 @@ notAFunctionButMaybeDeclaration,"This value is not a function and cannot be appl
 3268,csNullNotNullConstraintInconsistent,"The constraints 'null' and 'not null' are inconsistent"
 3269,csStructNullConstraintInconsistent,"The constraints 'struct' and 'null' are inconsistent"
 3270,csDelegateComparisonConstraintInconsistent,"The constraints 'delegate' and 'comparison' are inconsistent"
-3271,tcNullnessCheckingNotEnabled,"The /checknulls language feature is not enabled"
+3271,tcNullnessCheckingNotEnabled,"The --checknulls language feature is not enabled"
 csTypeHasNullAsTrueValue,"The type '%s' has 'null' as a true representation value but a constraint does not permit this"
 csTypeHasNullAsExtraValue,"The type '%s' has 'null' as an extra value but a constraint does not permit this"
 3300,chkInvalidFunctionParameterType,"The parameter '%s' has an invalid type '%s'. This is not permitted by the rules of Common IL."
diff --git a/src/fsharp/FSharp.Build/FSharp.Build.fsproj b/src/fsharp/FSharp.Build/FSharp.Build.fsproj
index 000bef26261..f3525087205 100644
--- a/src/fsharp/FSharp.Build/FSharp.Build.fsproj
+++ b/src/fsharp/FSharp.Build/FSharp.Build.fsproj
@@ -10,7 +10,7 @@
     FSharp.Build
     $(NoWarn);45;55;62;75;1204
     true
-    $(OtherFlags) --checknulls
+    $(OtherFlags) --checknulls --langversion:preview
     $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1
     true
     $(DefineConstants);LOCALIZATION_FSBUILD
diff --git a/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj b/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj
index 0e2baec1b2b..609e029dbb1 100644
--- a/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj
+++ b/src/fsharp/FSharp.Compiler.Private/FSharp.Compiler.Private.fsproj
@@ -9,7 +9,7 @@
     FSharp.Compiler.Private
     $(NoWarn);45;55;62;75;1204
     true
-    $(OtherFlags) --checknulls
+    $(OtherFlags) --checknulls --langversion:preview
     $(DefineConstants);COMPILER
     $(DefineConstants);LOCALIZATION_FCOMP
     $(OtherFlags) --warnon:3218 --warnon:1182 /warnon:3390 --maxerrors:20 --extraoptimizationloops:1
diff --git a/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj b/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
index 417f4456918..bdbf1c5dc2d 100644
--- a/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
+++ b/src/fsharp/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
@@ -7,7 +7,7 @@
     net472
     FSharp.Compiler.Server.Shared
     true
-    $(OtherFlags) --checknulls
+    $(OtherFlags) --checknulls --langversion:preview
   
 
   
diff --git a/src/fsharp/FSharp.Core/FSharp.Core.fsproj b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
index 1caf84c8b33..1258aa3045a 100644
--- a/src/fsharp/FSharp.Core/FSharp.Core.fsproj
+++ b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
@@ -9,7 +9,6 @@
     true
     $(OtherFlags) --warnon:3218
     $(OtherFlags) --compiling-fslib-40
-     
     $(DefineConstants);FSHARP_CORE
     BUILDING_WITH_LKG;$(DefineConstants)
     $(OtherFlags) --warnon:3218 --warnon:1182 --warnon:3390 --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1 --nowarn:57
diff --git a/src/fsharp/LanguageFeatures.fs b/src/fsharp/LanguageFeatures.fs
index 2b0b02eff3d..83415117680 100644
--- a/src/fsharp/LanguageFeatures.fs
+++ b/src/fsharp/LanguageFeatures.fs
@@ -76,7 +76,7 @@ type LanguageVersion (specifiedVersionAsString) =
             LanguageFeature.NameOf, previewVersion
             LanguageFeature.StringInterpolation, previewVersion
             LanguageFeature.OverloadsForCustomOperations, previewVersion
-            LanguageFeature.NullnessChecking, languageVersion47 // TODO: currently always on because requires FSharp.Core build
+            LanguageFeature.NullnessChecking, previewVersion // TODO: currently always on because requires FSharp.Core build
         ]
 
     let specified =
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index 24956a3f457..1d827a8e1d1 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -163,7 +163,7 @@ let tname_IAsyncResult = "System.IAsyncResult"
 //------------------------------------------------------------------------- 
 
 type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, directoryToResolveRelativePaths, 
-                      mlCompatibility: bool, isInteractive:bool, assumeNullOnImport: bool, checkNullness: bool,
+                      mlCompatibility: bool, isInteractive:bool, checkNullness: bool,
                       // The helper to find system types amongst referenced DLLs
                       tryFindSysTypeCcu, 
                       emitDebugInfoInQuotations: bool, noDebugData: bool,
@@ -934,8 +934,6 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   /// A table of all intrinsics that the compiler cares about
   member __.knownIntrinsics                = v_knownIntrinsics
 
-  member __.assumeNullOnImport = assumeNullOnImport
-
   member __.checkNullness = checkNullness
 
   member __.langFeatureNullness = v_langFeatureNullness
diff --git a/src/fsharp/fsi/fsi.fsproj b/src/fsharp/fsi/fsi.fsproj
index 87dac51c111..e550dd97879 100644
--- a/src/fsharp/fsi/fsi.fsproj
+++ b/src/fsharp/fsi/fsi.fsproj
@@ -10,7 +10,7 @@
     .exe
     $(NoWarn);45;55;62;75;1204
     true
-    $(OtherFlags) --checknulls
+    $(OtherFlags) --checknulls --langversion:preview
     $(OtherFlags)  --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
     --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
     fsi.res
diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs
index 98eefdafbc0..ce3e49266b7 100644
--- a/src/fsharp/import.fs
+++ b/src/fsharp/import.fs
@@ -165,16 +165,18 @@ let ImportTyconRefApp (env: ImportMap) tcref tyargs nullness =
     env.g.improveType tcref tyargs nullness
 
 let ImportNullness (g: TcGlobals) =
-    if g.langFeatureNullness && g.assumeNullOnImport then
-        KnownWithNull
-    else
-        KnownAmbivalentToNull
+    ignore g
+    // if g.langFeatureNullness && g.assumeNullOnImport then
+    //     KnownWithNull
+    // else
+    KnownAmbivalentToNull
 
 let ImportNullnessForTyconRef (g: TcGlobals) (m: range) (tcref: TyconRef) =
-    if g.langFeatureNullness && g.assumeNullOnImport && TyconRefNullIsExtraValueOld g m tcref then
-        KnownWithNull
-    else
-        KnownAmbivalentToNull
+    ignore (g, tcref)
+    // if g.langFeatureNullness && g.assumeNullOnImport && TyconRefNullIsExtraValueOld g m tcref then
+    //     KnownWithNull
+    // else
+    KnownAmbivalentToNull
 
 /// Import an IL type as an F# type.
 let rec ImportILType (env: ImportMap) m tinst ty =  
diff --git a/src/fsharp/xlf/FSComp.txt.cs.xlf b/src/fsharp/xlf/FSComp.txt.cs.xlf
index 9909c2dea2d..7757497ea60 100644
--- a/src/fsharp/xlf/FSComp.txt.cs.xlf
+++ b/src/fsharp/xlf/FSComp.txt.cs.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.de.xlf b/src/fsharp/xlf/FSComp.txt.de.xlf
index 5618c6dfdd2..dfa0f94b0e9 100644
--- a/src/fsharp/xlf/FSComp.txt.de.xlf
+++ b/src/fsharp/xlf/FSComp.txt.de.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.es.xlf b/src/fsharp/xlf/FSComp.txt.es.xlf
index ea021c3361f..85d4878d1f0 100644
--- a/src/fsharp/xlf/FSComp.txt.es.xlf
+++ b/src/fsharp/xlf/FSComp.txt.es.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.fr.xlf b/src/fsharp/xlf/FSComp.txt.fr.xlf
index fb1c266b7ac..2c7ecc7349a 100644
--- a/src/fsharp/xlf/FSComp.txt.fr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.fr.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index 1e4eaa036e6..e2de4cae569 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index 96c40e95f25..1b7afb97e1a 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -373,8 +373,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.ko.xlf b/src/fsharp/xlf/FSComp.txt.ko.xlf
index 20784dc38be..1fc6ec30553 100644
--- a/src/fsharp/xlf/FSComp.txt.ko.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ko.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.pl.xlf b/src/fsharp/xlf/FSComp.txt.pl.xlf
index 9ca734f828a..c9a5b1eb554 100644
--- a/src/fsharp/xlf/FSComp.txt.pl.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pl.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
index 33769af0616..21411e21330 100644
--- a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.ru.xlf b/src/fsharp/xlf/FSComp.txt.ru.xlf
index 53a0f244d2d..a05a6bea79c 100644
--- a/src/fsharp/xlf/FSComp.txt.ru.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ru.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index 3ecd6f4fafd..122b9c32a4c 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
index 1bd32657cc4..142c588805f 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
index 69da8e85bb9..6e5b260541e 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The /checknulls language feature is not enabled
-        The /checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
+        The --checknulls language feature is not enabled
         
       
       
diff --git a/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs b/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs
index 2765f4677a5..6f7b5921ad1 100644
--- a/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs
+++ b/tests/FSharp.Core.UnitTests/FSharp.Core/Microsoft.FSharp.Core/BigIntType.fs
@@ -111,7 +111,7 @@ type BigIntType() =
 #endif
         
         // Null
-        Assert.False(a.Equals(null:obj)) // TODO NULLNESS - this type annoation was needed to resolve overloading, even with /checknulls off
+        Assert.False(a.Equals(null:obj)) // TODO NULLNESS - this type annoation was needed to resolve overloading, even with --checknulls off
 
 #if CROSS_PLATFORM_COMPILER // see https://bugzilla.xamarin.com/show_bug.cgi?id=22591
 #else
diff --git a/tests/fsharp/core/nullness/test.fsx b/tests/fsharp/core/nullness/test.fsx
index 0e2f99641cf..2a544431d8e 100644
--- a/tests/fsharp/core/nullness/test.fsx
+++ b/tests/fsharp/core/nullness/test.fsx
@@ -292,10 +292,10 @@ module NullConstraintTests =
 #endif
 
 #if !NO_CHECKNULLS
-     // This gave an error in F# 4.5.  It now only gives a warning when /checknulls is on which is sort of ok
+     // This gave an error in F# 4.5.  It now only gives a warning when --checknulls is on which is sort of ok
      // since we are treating .NET and F# types more symmetrically.
      //
-     // TODO: However it gives no error or warning at all with /checknulls off in F# 5.0...  That seems bad.
+     // TODO: However it gives no error or warning at all with --checknulls off in F# 5.0...  That seems bad.
     let f2 (y : C) = y
 
     let f3 (y : C) = y // Expect a Nullness warning
diff --git a/tests/fsharp/tests.fs b/tests/fsharp/tests.fs
index b168a9e3a8d..9ce9201058e 100644
--- a/tests/fsharp/tests.fs
+++ b/tests/fsharp/tests.fs
@@ -229,11 +229,11 @@ module CoreTests =
 #if !NETCOREAPP
     []
     let ``subtype-langversion-50-checknulls`` () =
-        let cfg = testConfig "core/subtype"
+        let cfg = testConfig' "core/subtype"
 
         use testOkFile = fileguard cfg "test.ok"
 
-        fsc cfg "%s -o:test-checknulls.exe -g --langversion:latest --checknulls" cfg.fsc_flags ["test.fsx"]
+        fsc cfg "%s -o:test-checknulls.exe -g --langversion:preview --checknulls" cfg.fsc_flags ["test.fsx"]
 
         exec cfg ("." ++ "test-checknulls.exe") ""
 
@@ -241,11 +241,11 @@ module CoreTests =
 
     []
     let ``subtype-langversion-50-no-checknulls`` () =
-        let cfg = testConfig "core/subtype"
+        let cfg = testConfig' "core/subtype"
 
         use testOkFile = fileguard cfg "test.ok"
 
-        fsc cfg "%s -o:test-no-checknulls.exe -g --langversion:latest --checknulls-" cfg.fsc_flags ["test.fsx"]
+        fsc cfg "%s -o:test-no-checknulls.exe -g --langversion:preview --checknulls-" cfg.fsc_flags ["test.fsx"]
 
         exec cfg ("." ++ "test-no-checknulls.exe") ""
 
@@ -253,7 +253,7 @@ module CoreTests =
 
     []
     let ``subtype-langversion-45`` () =
-        let cfg = testConfig "core/subtype"
+        let cfg = testConfig' "core/subtype"
 
         use testOkFile = fileguard cfg "test.ok"
 
@@ -265,7 +265,7 @@ module CoreTests =
 
     []
     let nullness_no_checknulls () =
-        let cfg = testConfig "core/nullness"
+        let cfg = testConfig' "core/nullness"
 
         use testOkFile = fileguard cfg "test.ok"
 
@@ -277,11 +277,11 @@ module CoreTests =
 
     []
     let nullness_checknulls () =
-        let cfg = testConfig "core/nullness"
+        let cfg = testConfig' "core/nullness"
 
         use testOkFile = fileguard cfg "test.ok"
 
-        fsc cfg "%s -o:test-checknulls.exe -g --checknulls" cfg.fsc_flags ["test.fsx"]
+        fsc cfg "%s -o:test-checknulls.exe -g --checknulls --langversion:preview" cfg.fsc_flags ["test.fsx"]
 
         exec cfg ("." ++ "test-checknulls.exe") ""
 
@@ -1230,12 +1230,12 @@ module CoreTests =
     let ``libtest-AS_DLL`` () = singleTestBuildAndRun' "core/libtest" AS_DLL
 
     []
-    let ``libtest-langversion-50-checknulls`` () =
-        let cfg = testConfig "core/libtest"
+    let ``libtest-langversion-preview-checknulls`` () =
+        let cfg = testConfig' "core/libtest"
 
         use testOkFile = fileguard cfg "test.ok"
 
-        fsc cfg "%s -o:test-checknulls.exe -g --langversion:latest --checknulls" cfg.fsc_flags ["test.fsx"]
+        fsc cfg "%s -o:test-checknulls.exe -g --langversion:preview --checknulls" cfg.fsc_flags ["test.fsx"]
 
         exec cfg ("." ++ "test-checknulls.exe") ""
 
@@ -1244,7 +1244,7 @@ module CoreTests =
  
     []
     let ``libtest-langversion-45`` () =
-        let cfg = testConfig "core/libtest"
+        let cfg = testConfig' "core/libtest"
 
         use testOkFile = fileguard cfg "test.ok"
 
diff --git a/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj b/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
index b4370231f26..fb3ac0e8f90 100644
--- a/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
+++ b/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
@@ -10,7 +10,7 @@
     true
     $(SystemValueTupleVersion)
     $(OtherFlags) --warnon:1182 --subsystemversion:6.00
-    $(OtherFlags) /checknulls
+    $(OtherFlags) --checknulls --langversion:preview
     false
   
 

From 75597a9f4ff44013ba2f8a65a67521372194198f Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 26 Oct 2020 14:00:45 +0000
Subject: [PATCH 031/112] fix build

---
 src/fsharp/import.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs
index ce3e49266b7..c2e1d7da3c4 100644
--- a/src/fsharp/import.fs
+++ b/src/fsharp/import.fs
@@ -172,7 +172,7 @@ let ImportNullness (g: TcGlobals) =
     KnownAmbivalentToNull
 
 let ImportNullnessForTyconRef (g: TcGlobals) (m: range) (tcref: TyconRef) =
-    ignore (g, tcref)
+    ignore (g, tcref, m)
     // if g.langFeatureNullness && g.assumeNullOnImport && TyconRefNullIsExtraValueOld g m tcref then
     //     KnownWithNull
     // else

From eb3522ffb13ca91ae508f04a31ab3e9d03d9c5af Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 26 Oct 2020 16:17:44 +0000
Subject: [PATCH 032/112] fix build, rename patterns

---
 fcs-samples/FscExe/FscMain.fs                 |   4 +-
 fcs-samples/FsiExe/console.fs                 |   4 +-
 fcs-samples/InteractiveService/Program.fs     |   4 +-
 .../FSharp.Compiler.Service.Tests.fsproj      | 106 ---
 fcs/FSharp.Compiler.Service/AssemblyInfo.fs   |  62 --
 .../FSharp.Compiler.Service.fsproj            | 745 ------------------
 src/fsharp/AccessibilityLogic.fs              |   6 +-
 src/fsharp/CheckExpressions.fs                |   8 +-
 src/fsharp/CompilerConfig.fs                  |   8 +-
 src/fsharp/CompilerImports.fs                 |   2 +-
 src/fsharp/DotNetFrameworkDependencies.fs     |   5 +-
 src/fsharp/ErrorLogger.fs                     |   5 +-
 src/fsharp/ExtensionTyping.fs                 |  58 +-
 src/fsharp/FSComp.txt                         |   2 +-
 src/fsharp/FSharp.Build/Fsc.fs                |  23 +-
 src/fsharp/FSharp.Build/Fsi.fs                |  15 +-
 src/fsharp/FSharp.Build/WriteCodeFragment.fs  |   7 +-
 .../FSharp.Compiler.Service.fsproj            |   1 +
 src/fsharp/FSharp.Core/FSharp.Core.fsproj     |   5 +-
 src/fsharp/FSharp.Core/prim-types.fs          |  16 +-
 src/fsharp/FSharp.Core/prim-types.fsi         |  31 +-
 src/fsharp/InternalCollections.fs             |   4 +-
 src/fsharp/LegacyHostedCompilerForTesting.fs  |   2 +-
 src/fsharp/LegacyMSBuildReferenceResolver.fs  |  10 +-
 src/fsharp/MethodCalls.fs                     |   2 +-
 .../AssemblyResolveHandler.fs                 |  14 +-
 .../AssemblyResolveHandler.fsi                |   2 +-
 .../DependencyProvider.fs                     |  49 +-
 .../DependencyProvider.fsi                    |  16 +-
 .../Microsoft.DotNet.DependencyManager.fsproj |   1 +
 .../NativeDllResolveHandler.fs                |   8 +-
 .../NativeDllResolveHandler.fsi               |   2 +-
 src/fsharp/ScriptClosure.fs                   |   4 +-
 src/fsharp/TypedTree.fs                       |   6 +-
 src/fsharp/absil/illib.fs                     |  10 +-
 src/fsharp/absil/ilread.fs                    |   4 +-
 src/fsharp/absil/ilreflect.fs                 |  14 +-
 src/fsharp/absil/ilsign.fs                    |   2 +-
 src/fsharp/fsi/console.fs                     |   9 +-
 src/fsharp/fsi/fsi.fs                         |  26 +-
 src/fsharp/fsi/fsi.fsproj                     |   1 -
 src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj         |   1 +
 src/fsharp/infos.fs                           |   4 +-
 src/fsharp/lib.fs                             |   4 +-
 src/fsharp/service/QuickParse.fs              |   6 +-
 src/fsharp/tainted.fs                         |   2 +-
 src/fsharp/utils/sformat.fs                   |  29 +-
 src/fsharp/xlf/FSComp.txt.cs.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.de.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.es.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.fr.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.it.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.ja.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.ko.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.pl.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.pt-BR.xlf           |   4 +-
 src/fsharp/xlf/FSComp.txt.ru.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.tr.xlf              |   4 +-
 src/fsharp/xlf/FSComp.txt.zh-Hans.xlf         |   4 +-
 src/fsharp/xlf/FSComp.txt.zh-Hant.xlf         |   4 +-
 .../DependencyManagerInteractiveTests.fs      |  30 +-
 .../SurfaceArea.netstandard.fs                |   8 +-
 tests/FSharp.Core.UnitTests/SurfaceArea.fs    |   4 +-
 .../SurfaceArea.net40.fs                      |   4 +-
 .../BraceCompletionSessionProvider.fs         |   2 +-
 .../CodeLens/FSharpCodeLensService.fs         |   4 +-
 .../src/FSharp.Editor/Common/Extensions.fs    |   2 +-
 .../LanguageService/LanguageService.fs        |   2 +-
 .../Navigation/GoToDefinition.fs              |   2 +-
 .../src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj    |   1 +
 .../tests/Salsa/VisualFSharp.Salsa.fsproj     |   1 +
 .../UnitTests/VisualFSharp.UnitTests.fsproj   |   1 +
 72 files changed, 305 insertions(+), 1157 deletions(-)
 delete mode 100644 fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj
 delete mode 100644 fcs/FSharp.Compiler.Service/AssemblyInfo.fs
 delete mode 100644 fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj

diff --git a/fcs-samples/FscExe/FscMain.fs b/fcs-samples/FscExe/FscMain.fs
index 36b980cbbb3..6d9315bf8c2 100644
--- a/fcs-samples/FscExe/FscMain.fs
+++ b/fcs-samples/FscExe/FscMain.fs
@@ -168,13 +168,13 @@ module FSharpResidentCompiler =
                         if runningOnMono then
                             let shellName, useShellExecute = 
                                 match System.Environment.GetEnvironmentVariable("FSC_MONO") with 
-                                | null -> 
+                                | Null -> 
                                     if onWindows then 
                                         // e.g. "C:\Program Files\Mono-2.6.1\lib\mono\2.0\mscorlib.dll" --> "C:\Program Files\Mono-2.6.1\bin\mono.exe"
                                         Path.Combine(Path.GetDirectoryName (typeof.Assembly.Location), @"..\..\..\bin\mono.exe"), false
                                     else
                                         "mono-sgen", true
-                                | path -> path, true
+                                | NonNull path -> path, true
                                      
                             ProcessStartInfo(FileName = shellName,
                                              Arguments = fscServerExe + " /server",
diff --git a/fcs-samples/FsiExe/console.fs b/fcs-samples/FsiExe/console.fs
index efde3707c25..7ed6202fc22 100644
--- a/fcs-samples/FsiExe/console.fs
+++ b/fcs-samples/FsiExe/console.fs
@@ -21,12 +21,12 @@ type internal History() =
     member x.Clear() = list.Clear(); current <- -1
     member x.Add line = 
         match line with 
-        | null | "" -> ()
+        | Null | "" -> ()
         | _ -> list.Add(line)
 
     member x.AddLast line = 
         match line with 
-        | null | "" -> ()
+        | Null | "" -> ()
         | _ -> list.Add(line); current <- list.Count
 
     // Dead code   
diff --git a/fcs-samples/InteractiveService/Program.fs b/fcs-samples/InteractiveService/Program.fs
index 4b8d968864c..25b4851e779 100644
--- a/fcs-samples/InteractiveService/Program.fs
+++ b/fcs-samples/InteractiveService/Program.fs
@@ -33,7 +33,7 @@ let main (argv) =
                 printfn "Ok"
         with e -> 
             match e.InnerException with
-            | null -> printfn "Error evaluating expression (%s)" e.Message
-            | err -> printfn "Error evaluating expression (%s)" err.Message
+            | Null -> printfn "Error evaluating expression (%s)" e.Message
+            | NonNull err -> printfn "Error evaluating expression (%s)" err.Message
     // | _ -> printfn "Error evaluating expression (%s)" e.Message
     0
\ No newline at end of file
diff --git a/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj b/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj
deleted file mode 100644
index 90637fee549..00000000000
--- a/fcs/FSharp.Compiler.Service.Tests/FSharp.Compiler.Service.Tests.fsproj
+++ /dev/null
@@ -1,106 +0,0 @@
-
-  
-     
-  
-    $(FcsTargetNetFxFramework);netcoreapp3.1
-    true
-    4.1.19
-    $(NoWarn);44;75;
-    true
-    true
-    false
-    true
-    true 
-    $(DefineConstants);USES_FSHARP_CORE_45_PACKAGE
-  
-  
-    
-      FsUnit.fs
-    
-    
-      Common.fs
-    
-    
-      AssemblyReaderShim.fs
-    
-    
-      EditorTests.fs
-    
-    
-      Symbols.fs
-    
-    
-      FileSystemTests.fs
-    
-    
-      ProjectAnalysisTests.fs
-    
-    
-      MultiProjectAnalysisTests.fs
-    
-    
-      PerfTests.fs
-    
-    
-      InteractiveCheckerTests.fs
-    
-    
-      ExprTests.fs
-    
-    
-      CSharpProjectAnalysis.fs
-    
-    
-      StructureTests.fs
-    
-    
-      TokenizerTests.fs
-    
-    
-      ServiceUntypedParseTests.fs
-    
-    
-      TreeVisitorTests.fs
-    
-    
-      PatternMatchCompilationTests.fs
-    
-    
-      ScriptOptionsTests.fs
-    
-    
-      Program.fs
-    
-    
-      {{FSCoreVersion}}
-      $(FSCoreVersion)
-    
-  
-  
-    
-    
-    
-    
-    
-    
-    
-  
-  
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-    
-  
-
\ No newline at end of file
diff --git a/fcs/FSharp.Compiler.Service/AssemblyInfo.fs b/fcs/FSharp.Compiler.Service/AssemblyInfo.fs
deleted file mode 100644
index 0381c7d51d1..00000000000
--- a/fcs/FSharp.Compiler.Service/AssemblyInfo.fs
+++ /dev/null
@@ -1,62 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-namespace Microsoft.FSharp
-open System.Reflection
-open System.Runtime.InteropServices
-
-[]
-[]
-[]
-[]
-[]
-[]
-
-#if NO_STRONG_NAMES
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-
-// Note: internals visible to unit test DLLs in Retail (and all) builds.
-[]
-[]
-[]
-[]
-[]
-#endif
-
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-[]
-
-// Until dotnet sdk can version assemblies, use this
-//#if BUILD_FROM_SOURCE
-//[]
-//[]
-//[]
-//#endif
-
-do()
\ No newline at end of file
diff --git a/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj b/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
deleted file mode 100644
index 4557c62e8ff..00000000000
--- a/fcs/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
+++ /dev/null
@@ -1,745 +0,0 @@
-
-
-  
-  
-  
-  
-    $(FcsTargetNetFxFramework);netstandard2.0
-    true
-    $(DefineConstants);COMPILER_SERVICE_AS_DLL
-    $(DefineConstants);COMPILER
-    $(DefineConstants);BUILD_FROM_SOURCE
-    $(DefineConstants);ENABLE_MONO_SUPPORT
-    $(DefineConstants);NO_STRONG_NAMES
-    $(DefineConstants);LOCALIZATION_FSCOMP
-    $(TargetFramework)\
-    $(TargetFramework)\
-    $(OtherFlags) /warnon:1182
-    $(OtherFlags) --times
-    $(NoWarn);44;62;69;65;54;61;75;62;9;2003;NU5125
-    true 
-    true
-    true
-    embedded
-  
-  
-    The F# compiler as library. For editors, for tools, for scripting. For you.
-    The F# compiler services package contains a custom build of the F# compiler that exposes additional functionality for implementing F# language bindings, additional tools based on the compiler or refactoring tools. The package also includes F# interactive service that can be used for embedding F# scripting into your applications.
-    false
-    Microsoft Corporation; F# community contributors
-    MIT
-    https://github.com/fsharp/FSharp.Compiler.Service
-    logo.png
-    F#, fsharp, interactive, compiler, editor
-    true
-    true
-  
-  
-    $(DefineConstants);FX_NO_PDB_READER
-    $(DefineConstants);FX_NO_PDB_WRITER
-    $(DefineConstants);FX_NO_SYMBOLSTORE
-    $(DefineConstants);FX_NO_APP_DOMAINS
-    $(DefineConstants);FX_NO_WIN_REGISTRY
-    $(DefineConstants);FX_NO_SYSTEM_CONFIGURATION
-    $(DefineConstants);FX_RESHAPED_REFEMIT
-  
-  
-    
-    
-      AssemblyInfo/AssemblyInfo.fs
-    
-    
-      FSComp.txt
-    
-    
-      DependencyManager.txt
-    
-    
-      FSIstrings.txt
-    
-    
-      FSStrings.resx
-      FSStrings.resources
-    
-    
-      --module FSharp.Compiler.AbstractIL.Internal.AsciiParser --open FSharp.Compiler.AbstractIL --internal --lexlib Internal.Utilities.Text.Lexing --parslib Internal.Utilities.Text.Parsing
-      ilpars.fsy
-    
-    
-      --module FSharp.Compiler.Parser --open FSharp.Compiler --internal --lexlib Internal.Utilities.Text.Lexing --parslib Internal.Utilities.Text.Parsing
-      pars.fsy
-    
-    
-      Logger.fsi
-    
-    
-      Logger.fs
-    
-    
-      ErrorText/sformat.fsi
-    
-    
-      ErrorText/sformat.fs
-    
-    
-      ErrorText/sr.fsi
-    
-    
-      ErrorText/sr.fs
-    
-    
-      Driver\LanguageFeatures.fsi
-    
-    
-      Driver\LanguageFeatures.fs
-    
-    
-      LexYaccRuntime/prim-lexing.fsi
-    
-    
-      LexYaccRuntime/prim-lexing.fs
-    
-    
-      LexYaccRuntime/prim-parsing.fsi
-    
-    
-      LexYaccRuntime/prim-parsing.fs
-    
-    
-      Utilities/PathMap.fsi
-    
-    
-      Utilities/PathMap.fs
-    
-    
-      Utilities/ResizeArray.fsi
-    
-    
-      Utilities/ResizeArray.fs
-    
-    
-      Utilities/HashMultiMap.fsi
-    
-    
-      Utilities/HashMultiMap.fs
-    
-    
-      Utilities/EditDistance.fs
-    
-    
-      Utilities/TaggedCollections.fsi
-    
-    
-      Utilities/TaggedCollections.fs
-    
-    
-      Utilities/QueueList.fs
-    
-    
-      Utilities/ildiag.fsi
-    
-    
-      Utilities/ildiag.fs
-    
-    
-      Utilities/illib.fs
-    
-    
-      Utilities/filename.fsi
-    
-    
-      Utilities/filename.fs
-    
-    
-      Utilities/zmap.fsi
-    
-    
-      Utilities/zmap.fs
-    
-    
-      Utilities/zset.fsi
-    
-    
-      Utilities/zset.fs
-    
-    
-      Utilities/bytes.fsi
-    
-    
-      Utilities/bytes.fs
-    
-    
-      Utilities\XmlAdapters.fs
-    
-    
-      Utilities/lib.fs
-    
-    
-      Utilities/InternalCollections.fsi
-    
-    
-      Utilities/InternalCollections.fs
-    
-    
-      Utilities/rational.fsi
-    
-    
-      Utilities/rational.fs
-    
-    
-      ErrorLogging/range.fsi
-    
-    
-      ErrorLogging/range.fs
-    
-    
-      ErrorLogging/ErrorLogger.fs
-    
-    
-      ErrorLogging/ErrorResolutionHints.fs
-    
-    
-      --unicode --lexlib Internal.Utilities.Text.Lexing
-      AbsIL/illex.fsl
-    
-    
-      AbsIL/il.fsi
-    
-    
-      AbsIL/il.fs
-    
-    
-      AbsIL/ilx.fsi
-    
-    
-      AbsIL/ilx.fs
-    
-    
-      AbsIL/ilascii.fsi
-    
-    
-      AbsIL/ilascii.fs
-    
-    
-      AbsIL/ilprint.fsi
-    
-    
-      AbsIL/ilprint.fs
-    
-    
-      AbsIL/ilmorph.fsi
-    
-    
-      AbsIL/ilmorph.fs
-    
-  
-  
-    
-      AbsIL/ilsign.fs
-    
-  
-  
-    
-      AbsIL/ilnativeres.fsi
-    
-    
-      AbsIL/ilnativeres.fs
-    
-    
-      AbsIL/ilsupp.fsi
-    
-    
-      AbsIL/ilsupp.fs
-    
-    
-      AbsIL/ilpars.fs
-    
-    
-      AbsIL/illex.fs
-    
-    
-      AbsIL/ilbinary.fsi
-    
-    
-      AbsIL/ilbinary.fs
-    
-    
-      AbsIL/ilread.fsi
-    
-    
-      AbsIL/ilread.fs
-    
-    
-      AbsIL/ilwritepdb.fsi
-    
-    
-      AbsIL/ilwritepdb.fs
-    
-    
-      AbsIL/ilwrite.fsi
-    
-    
-      AbsIL/ilwrite.fs
-    
-    
-      AbsIL/ilreflect.fs
-    
-    
-      ReferenceResolution/reshapedmsbuild.fs
-    
-    
-      ReferenceResolution/ReferenceResolver.fs
-    
-    
-      ReferenceResolution/SimulatedMSBuildReferenceResolver.fs
-    
-    
-      CompilerLocation/CompilerLocationUtils.fs
-    
-    
-      PrettyNaming/PrettyNaming.fs
-    
-    
-      ILXErase/ilxsettings.fs
-    
-    
-      ILXErase/EraseClosures.fsi
-    
-    
-      ILXErase/EraseClosures.fs
-    
-    
-      ILXErase/EraseUnions.fsi
-    
-    
-      ILXErase/EraseUnions.fs
-    
-    
-      --unicode --lexlib Internal.Utilities.Text.Lexing
-      ParserAndUntypedAST/lex.fsl
-    
-    
-      --unicode --lexlib Internal.Utilities.Text.Lexing
-      ParserAndUntypedAST/pplex.fsl
-    
-    
-      --module FSharp.Compiler.PPParser --open FSharp.Compiler --internal --lexlib Internal.Utilities.Text.Lexing --parslib Internal.Utilities.Text.Parsing
-      ParserAndUntypedAST/pppars.fsy
-    
-    
-      ParserAndUntypedAST/UnicodeLexing.fsi
-    
-    
-      ParserAndUntypedAST/UnicodeLexing.fs
-    
-    
-      ParserAndUntypedAST/layout.fsi
-    
-    
-      ParserAndUntypedAST/layout.fs
-    
-    
-      ParserAndUntypedAST/XmlDoc.fs
-    
-    
-      ParserAndUntypedAST/SyntaxTree.fs
-    
-    
-      ParserAndUntypedAST/SyntaxTreeOps.fs
-    
-    
-      ParserAndUntypedAST/ParseHelpers.fs
-    
-    
-      ParserAndUntypedAST/pppars.fs
-    
-    
-      ParserAndUntypedAST/pars.fs
-    
-    
-      ParserAndUntypedAST/lexhelp.fsi
-    
-    
-      ParserAndUntypedAST/lexhelp.fs
-    
-    
-      ParserAndUntypedAST/pplex.fs
-    
-    
-      ParserAndUntypedAST/lex.fs
-    
-    
-      ParserAndUntypedAST/LexFilter.fs
-    
-    
-      TypedTree/tainted.fsi
-    
-    
-      TypedTree/tainted.fs
-    
-    
-      TypedTree/ExtensionTyping.fsi
-    
-    
-      TypedTree/ExtensionTyping.fs
-    
-    
-      TypedTree/QuotationPickler.fsi
-    
-    
-      TypedTree/QuotationPickler.fs
-    
-    
-      TypedTree/CompilerGlobalState.fs
-    
-    
-      TypedTree/TypedTree.fs
-    
-    
-      TypedTree/TypedTreeBasics.fs
-    
-    
-      TypedTree/TcGlobals.fs
-    
-    
-      TypedTree/TypedTreeOps.fsi
-    
-    
-      TypedTree/TypedTreeOps.fs
-    
-    
-      TypedTree/TypedTreePickle.fsi
-    
-    
-      TypedTree/TypedTreePickle.fs
-    
-    
-      Logic/import.fsi
-    
-    
-      Logic/import.fs
-    
-    
-      Logic/infos.fs
-    
-    
-      Logic/AccessibilityLogic.fs
-    
-    
-      Logic/AttributeChecking.fs
-    
-    
-      Logic/TypeRelations.fs
-    
-    
-      Logic/InfoReader.fs
-    
-    
-      Logic/NicePrint.fs
-    
-    
-      Logic/AugmentWithHashCompare.fsi
-    
-    
-      Logic/AugmentWithHashCompare.fs
-    
-    
-      Logic/NameResolution.fsi
-    
-    
-      Logic/NameResolution.fs
-    
-    
-      Logic/SignatureConformance.fs
-    
-    
-      Logic/MethodOverrides.fs
-    
-    
-      Logic/MethodCalls.fs
-    
-    
-      Logic/PatternMatchCompilation.fsi
-    
-    
-      Logic/PatternMatchCompilation.fs
-    
-    
-      Logic/ConstraintSolver.fsi
-    
-    
-      Logic/ConstraintSolver.fs
-    
-    
-      Logic/CheckFormatStrings.fsi
-    
-    
-      Logic/CheckFormatStrings.fs
-    
-    
-      Logic/FindUnsolved.fsi
-    
-    
-      Logic/FindUnsolved.fs
-    
-    
-      Logic/QuotationTranslator.fsi
-    
-    
-      Logic/QuotationTranslator.fs
-    
-    
-      Logic/PostInferenceChecks.fsi
-    
-    
-      Logic/PostInferenceChecks.fs
-    
-    
-      Logic/TypeChecker.fsi
-    
-    
-      Logic/TypeChecker.fs
-    
-    
-      Optimize/Optimizer.fsi
-    
-    
-      Optimize/Optimizer.fs
-    
-    
-      Optimize/DetupleArgs.fsi
-    
-    
-      Optimize/DetupleArgs.fs
-    
-    
-      Optimize/InnerLambdasToTopLevelFuncs.fsi
-    
-    
-      Optimize/InnerLambdasToTopLevelFuncs.fs
-    
-    
-      Optimize/LowerCallsAndSeqs.fsi
-    
-    
-      Optimize/LowerCallsAndSeqs.fs
-    
-    
-      Optimize/autobox.fsi
-    
-    
-      Optimize/autobox.fs
-    
-    
-      CodeGen/IlxGen.fsi
-    
-    
-      CodeGen/IlxGen.fs
-    
-    
-      Driver\DotNetFrameworkDependencies.fs
-    
-    
-      Driver\AssemblyResolveHandler.fsi
-    
-    
-      Driver\AssemblyResolveHandler.fs
-    
-    
-      Driver\NativeDllResolveHandler.fsi
-    
-    
-      Driver\NativeDllResolveHandler.fs
-    
-    
-      Driver/DependencyProvider.fsi
-    
-    
-      Driver/DependencyProvider.fs
-    
-    
-      Driver/CompileOps.fsi
-    
-    
-      Driver/CompileOps.fs
-    
-    
-      Driver/CompileOptions.fsi
-    
-    
-      Driver/CompileOptions.fs
-    
-    
-      Driver/fsc.fsi
-    
-    
-      Driver/fsc.fs
-    
-    
-      Symbols/SymbolHelpers.fsi
-    
-    
-      Symbols/SymbolHelpers.fs
-    
-    
-      Symbols/Symbols.fsi
-    
-    
-      Symbols/Symbols.fs
-    
-    
-      Symbols/Exprs.fsi
-    
-    
-      Symbols/Exprs.fs
-    
-    
-      Symbols/SymbolPatterns.fsi
-    
-    
-      Symbols/SymbolPatterns.fs
-    
-    
-      Service/Reactor.fsi
-    
-    
-      Service/Reactor.fs
-    
-    
-      Service/SemanticClassification.fsi
-    
-    
-      Service/SemanticClassification.fs
-    
-    
-      Service/ItemKey.fsi
-    
-    
-      Service/ItemKey.fs
-    
-    
-      Service/IncrementalBuild.fsi
-    
-    
-      Service/IncrementalBuild.fs
-    
-    
-      Service/ServiceConstants.fs
-    
-    
-      Service/ServiceLexing.fsi
-    
-    
-      Service/ServiceLexing.fs
-    
-    
-      Service/ServiceParseTreeWalk.fs
-    
-    
-      Service/ServiceNavigation.fsi
-    
-    
-      Service/ServiceNavigation.fs
-    
-    
-      Service/ServiceParamInfoLocations.fsi
-    
-    
-      Service/ServiceParamInfoLocations.fs
-    
-    
-      Service/ServiceUntypedParse.fsi
-    
-    
-      Service/ServiceUntypedParse.fs
-    
-    
-      Service/ServiceDeclarationLists.fsi
-    
-    
-      Service/ServiceDeclarationLists.fs
-    
-    
-      Service/ServiceAssemblyContent.fsi
-    
-    
-      Service/ServiceAssemblyContent.fs
-    
-    
-      Service/ServiceXmlDocParser.fsi
-    
-    
-      Service/ServiceXmlDocParser.fs
-    
-    
-      Service/ExternalSymbol.fsi
-    
-    
-      Service/ExternalSymbol.fs
-    
-    
-      Service/QuickParse.fsi
-    
-    
-      Service/QuickParse.fs
-    
-    
-      Service/FSharpCheckerResults.fsi
-    
-    
-      Service/FSharpCheckerResults.fs
-    
-    
-      Service/service.fsi
-    
-    
-      Service/service.fs
-    
-    
-      Service/ServiceInterfaceStubGenerator.fsi
-    
-    
-      Service/ServiceInterfaceStubGenerator.fs
-    
-    
-      Service/ServiceStructure.fsi
-    
-    
-      Service/ServiceStructure.fs
-    
-    
-      Service/ServiceAnalysis.fsi
-    
-    
-      Service/ServiceAnalysis.fs
-    
-    
-      Service/fsi.fsi
-    
-    
-      Service/fsi.fs
-    
-  
-  
-    
-    
-    
-    
-    
-    
-  
-  
-    
-    
-    
-  
-  
-    
-    
-    
-    
-      $(FSharpSourcesRoot)\..\packages\System.ValueTuple.4.4.0\lib\netstandard1.0\System.ValueTuple.dll
-    
-  
-  
-
diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index eb0bead7797..7da69f977cc 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -3,15 +3,15 @@
 /// The basic logic of private/internal/protected/InternalsVisibleTo/public accessibility
 module internal FSharp.Compiler.AccessibilityLogic
 
-open FSharp.Compiler.AbstractIL.IL 
 open FSharp.Compiler 
+open FSharp.Compiler.AbstractIL.IL 
+open FSharp.Compiler.AbstractIL.Internal.Library
 open FSharp.Compiler.ErrorLogger
 open FSharp.Compiler.Infos
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TcGlobals
-open FSharp.Compiler.AbstractIL.Internal.Library
 
 #if !NO_EXTENSIONTYPING
 open FSharp.Compiler.ExtensionTyping
@@ -380,7 +380,7 @@ let IsPropInfoAccessible g amap m ad = function
                 let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo?) = // TODO NULLNESS: using ProvidedMethodBase? gives a nullness warning
 #endif
                     match mi with
-                    | null -> None
+                    | Null -> None
                     | NonNull mi -> 
                         Some(ComputeILAccess mi.IsPublic mi.IsFamily mi.IsFamilyOrAssembly mi.IsFamilyAndAssembly)
 
diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index 2d81ee5521e..3185d0d0fcf 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -4520,8 +4520,8 @@ and CrackStaticConstantArgs cenv env tpenv (staticParameters: Tainted 
                     if sp.PUntaint((fun sp -> sp.IsOptional), m) then
                          match sp.PUntaint((fun sp -> sp.RawDefaultValue), m) with
-                         | null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, containerName, containerName, spName), m))
-                         | v -> v
+                         | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, containerName, containerName, spName), m))
+                         | NonNull v -> v
                     else
                       error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, containerName, containerName, spName), m))
                  | ps -> 
@@ -5055,8 +5055,8 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
                             CallNameResolutionSink cenv.tcSink (id.idRange, env.NameEnv, argItem, emptyTyparInst, ItemOccurence.Pattern, ad)
 
                             match box result.[idx] with
-                            | null -> result.[idx] <- pat
-                            | _ ->
+                            | Null -> result.[idx] <- pat
+                            | NonNull _ ->
                                 extraPatterns.Add pat
                                 errorR (Error (FSComp.SR.tcUnionCaseFieldCannotBeUsedMoreThanOnce (id.idText), id.idRange))
 
diff --git a/src/fsharp/CompilerConfig.fs b/src/fsharp/CompilerConfig.fs
index 92a77df35d2..a9f43e0bbab 100644
--- a/src/fsharp/CompilerConfig.fs
+++ b/src/fsharp/CompilerConfig.fs
@@ -789,19 +789,19 @@ type TcConfigBuilder =
 
         match dm with
         // #r "Assembly"
-        | Some path, None ->
+        | NonNull path, Null ->
             tcConfigB.AddReferencedAssemblyByPath (m, path)
 
-        | _, Some dependencyManager ->
+        | _, NonNull dependencyManager ->
             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                 tcConfigB.AddDependencyManagerText (dependencyManager, directive, m, path)
             else
                 errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
 
-        | None, None when directive = Directive.Include ->
+        | Null, Null when directive = Directive.Include ->
             errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
 
-        | None, None ->
+        | Null, Null ->
            errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
 
     member tcConfigB.RemoveReferencedAssemblyByPath (m, path) =
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index d40ddffeffd..c517e12d94b 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1277,7 +1277,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
             runtimeAssemblyAttributes 
             |> List.choose (TryDecodeTypeProviderAssemblyAttr (defaultArg ilGlobalsOpt EcmaMscorlibILGlobals))
             // If no design-time assembly is specified, use the runtime assembly
-            |> List.map (function null -> fileNameOfRuntimeAssembly | NonNull s -> s)
+            |> List.map (function Null -> fileNameOfRuntimeAssembly | NonNull s -> s)
             // For each simple name of a design-time assembly, we take the first matching one in the order they are 
             // specified in the attributes
             |> List.distinctBy (fun s -> try Path.GetFileNameWithoutExtension s with _ -> s)
diff --git a/src/fsharp/DotNetFrameworkDependencies.fs b/src/fsharp/DotNetFrameworkDependencies.fs
index 0fcb0e6d9b8..b0870c0e442 100644
--- a/src/fsharp/DotNetFrameworkDependencies.fs
+++ b/src/fsharp/DotNetFrameworkDependencies.fs
@@ -12,6 +12,7 @@ module internal FSharp.Compiler.DotNetFrameworkDependencies
     open System.Runtime.InteropServices
     open Internal.Utilities
     open Internal.Utilities.FSharpEnvironment
+    open FSharp.Compiler.AbstractIL.Internal.Library
 
     type private TypeInThisAssembly = class end
 
@@ -80,8 +81,8 @@ module internal FSharp.Compiler.DotNetFrameworkDependencies
             try
                 let asm = Assembly.GetEntryAssembly()
                 match asm with
-                | null -> ""
-                | asm ->
+                | Null -> ""
+                | NonNull asm ->
                     let depsJsonPath = Path.ChangeExtension(asm.Location, "deps.json")
                     if File.Exists(depsJsonPath) then
                         File.ReadAllText(depsJsonPath)
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index 081611f5ea9..18c2262854d 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -3,6 +3,7 @@
 module public FSharp.Compiler.ErrorLogger
 
 open FSharp.Compiler 
+open FSharp.Compiler.AbstractIL.Internal.Library
 open FSharp.Compiler.Range
 open FSharp.Compiler.Features
 open System
@@ -319,14 +320,14 @@ type internal CompileThreadStatic =
         with get() = 
             match box CompileThreadStatic.buildPhase with
             // FUTURE: reenable these asserts, which have historically fired in some compiler service scenarios
-            | null -> (* assert false; *) BuildPhase.DefaultPhase
+            | Null -> (* assert false; *) BuildPhase.DefaultPhase
             | _ -> CompileThreadStatic.buildPhase
         and set v = CompileThreadStatic.buildPhase <- v
             
     static member ErrorLogger
         with get() = 
             match box CompileThreadStatic.errorLogger with
-            | null -> AssertFalseErrorLogger
+            | Null -> AssertFalseErrorLogger
             | _ -> CompileThreadStatic.errorLogger
         and set v = CompileThreadStatic.errorLogger <- v
 
diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index d94eca194cf..521127fb0e3 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -60,7 +60,7 @@ module internal ExtensionTyping =
                     [ for t in exportedTypes do 
                           let ca = t.GetCustomAttributes(typeof, true)
                           match ca with 
-                          | null -> ()
+                          | Null -> ()
                           | NonNull ca -> 
                               if ca.Length > 0 then 
                                   yield t ]
@@ -164,7 +164,7 @@ module internal ExtensionTyping =
                                 CreateTypeProvider (t, runtimeAssemblyFilename, resolutionEnvironment, isInvalidationSupported,
                                     isInteractive, systemRuntimeContainsType, systemRuntimeAssemblyVersion, m)
                             match box resolver with 
-                            | null -> ()
+                            | Null -> ()
                             | _ -> yield (resolver, ilScopeRefOfRuntimeAssembly)
 
                       |   None, _ -> 
@@ -228,7 +228,7 @@ module internal ExtensionTyping =
     let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string?) =
 #endif
         match nsp with 
-        | null -> ()
+        | Null -> ()
         | NonNull nsp -> 
             if String.IsNullOrWhiteSpace nsp then
                 // Empty namespace is not allowed
@@ -262,7 +262,7 @@ module internal ExtensionTyping =
     type ProvidedTypeComparer() = 
         let key (ty: ProvidedType) =
             match ty.Assembly with
-            | null -> ("", ty.FullName)
+            | Null -> ("", ty.FullName)
             | NonNull a -> (a.FullName, ty.FullName)
         static member val Instance = ProvidedTypeComparer()
         interface IEqualityComparer with
@@ -420,14 +420,14 @@ module internal ExtensionTyping =
         static member Create ctxt x : ProvidedType? = 
 #endif
             match x with 
-            | null -> null 
+            | Null -> null 
             | NonNull t -> ProvidedType (t, ctxt)
 
         static member CreateNonNull ctxt x = ProvidedType (x, ctxt)
 
         static member CreateWithNullCheck ctxt name x = 
             match x with
-            | null -> nullArg name 
+            | Null -> nullArg name 
             | t -> ProvidedType (t, ctxt)
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -436,7 +436,7 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: Type[]?) : ProvidedType[]? = 
 #endif
             match xs with
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedType.CreateNonNull ctxt)
 
         static member CreateNoContext (x:Type) = ProvidedType.Create ProvidedTypeContext.Empty x
@@ -551,7 +551,7 @@ module internal ExtensionTyping =
         static member Create ctxt (x: ParameterInfo?) : ProvidedParameterInfo? = 
 #endif
             match x with 
-            | null -> null 
+            | Null -> null 
             | NonNull x -> ProvidedParameterInfo (x, ctxt)
 
         static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
@@ -562,12 +562,12 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: ParameterInfo[]?) : ProvidedParameterInfo[]? = 
 #endif
             match xs with 
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
         
         static member CreateArrayNonNull ctxt xs : ProvidedParameterInfo[] = 
             match box xs with 
-            | null -> [| |]
+            | Null -> [| |]
             | _  -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
         
         interface IProvidedCustomAttributeProvider with 
@@ -667,7 +667,7 @@ module internal ExtensionTyping =
                             [| typeof; typeof; typeof |], null)  
 
                     match meth with 
-                    | null -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
+                    | Null -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
                     | _ -> 
                     let mbAsObj = 
                        try meth.Invoke(provider, bindingFlags ||| BindingFlags.InvokeMethod, null, [| box x; box fullNameAfterArguments; box staticArgs  |], null) 
@@ -697,7 +697,7 @@ module internal ExtensionTyping =
         static member Create ctxt x : ProvidedFieldInfo? = 
 #endif
             match x with 
-            | null -> null 
+            | Null -> null 
             | NonNull x -> ProvidedFieldInfo (x, ctxt)
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -706,7 +706,7 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: FieldInfo[]?) : ProvidedFieldInfo[]? = 
 #endif
             match xs with 
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt)
 
         member __.IsInitOnly = x.IsInitOnly
@@ -747,7 +747,7 @@ module internal ExtensionTyping =
         static member Create ctxt (x: MethodInfo?) : ProvidedMethodInfo? = 
 #endif
             match x with 
-            | null -> null
+            | Null -> null
             | NonNull x -> ProvidedMethodInfo (x, ctxt)
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -756,7 +756,7 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: MethodInfo[]?) : ProvidedMethodInfo[]? = 
 #endif
             match xs with 
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt)
 
         member __.Handle = x
@@ -786,7 +786,7 @@ module internal ExtensionTyping =
         static member Create ctxt x : ProvidedPropertyInfo? = 
 #endif
             match x with 
-            | null -> null 
+            | Null -> null 
             | NonNull x -> ProvidedPropertyInfo (x, ctxt)
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -795,7 +795,7 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: PropertyInfo[]?) : ProvidedPropertyInfo[]? = 
 #endif
             match xs with
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt)
 
         member __.Handle = x
@@ -831,7 +831,7 @@ module internal ExtensionTyping =
         static member Create ctxt x : ProvidedEventInfo? = 
 #endif
             match x with 
-            | null -> null 
+            | Null -> null 
             | NonNull x -> ProvidedEventInfo (x, ctxt)
         
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -840,7 +840,7 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: EventInfo[]?) : ProvidedEventInfo[]? = 
 #endif
             match xs with 
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt)
         
         member __.Handle = x
@@ -872,7 +872,7 @@ module internal ExtensionTyping =
         static member Create ctxt (x: ConstructorInfo?) : ProvidedConstructorInfo? = 
 #endif
             match x with 
-            | null -> null 
+            | Null -> null 
             | NonNull x -> ProvidedConstructorInfo (x, ctxt)
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -881,7 +881,7 @@ module internal ExtensionTyping =
         static member CreateArray ctxt (xs: ConstructorInfo[]?) : ProvidedConstructorInfo[]? = 
 #endif
             match xs with 
-            | null -> null
+            | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt)
 
         member __.Handle = x
@@ -976,7 +976,7 @@ module internal ExtensionTyping =
         static member Create ctxt t : ProvidedExpr? = 
 #endif
             match box t with 
-            | null -> null 
+            | Null -> null 
             | _ -> ProvidedExpr (t, ctxt)
 
         static member CreateNonNull ctxt t : ProvidedExpr = 
@@ -984,7 +984,7 @@ module internal ExtensionTyping =
 
         static member CreateArray ctxt xs : ProvidedExpr[] = 
             match box xs with 
-            | null -> [| |]
+            | Null -> [| |]
             | _ -> xs |> Array.map (ProvidedExpr.CreateNonNull ctxt)
 
         override __.Equals y = match y with :? ProvidedExpr as y -> x.Equals y.Handle | _ -> false
@@ -1008,7 +1008,7 @@ module internal ExtensionTyping =
 
         static member CreateArray ctxt xs : ProvidedVar[] = 
             match box xs with 
-            | null -> [| |]
+            | Null -> [| |]
             | _ -> xs |> Array.map (ProvidedVar.CreateNonNull ctxt)
 
         override __.Equals y = match y with :? ProvidedVar as y -> x.Equals y.Handle | _ -> false
@@ -1058,7 +1058,7 @@ module internal ExtensionTyping =
 
         let path = 
             [|  match namespaceName with 
-                | null -> ()
+                | Null -> ()
                 | NonNull namespaceName -> yield! namespaceName.Split([|'.'|])
                 yield! declaringTypes st [] |]
         
@@ -1259,7 +1259,7 @@ module internal ExtensionTyping =
             match st.PApply((fun st -> st.DeclaringType), m) with 
             | Tainted.Null -> 
                match st.PUntaint((fun st -> st.Namespace), m) with 
-               | null -> typeName
+               | Null -> typeName
                | NonNull ns -> ns + "." + typeName
             | _ -> typeName
 
@@ -1383,7 +1383,7 @@ module internal ExtensionTyping =
                       | _ ->
                           if sp.PUntaint ((fun sp -> sp.IsOptional), range) then 
                               match sp.PUntaint((fun sp -> sp.RawDefaultValue), range) with
-                              | null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
+                              | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
                               | v -> v
                           else
                               error(Error(FSComp.SR.etProvidedTypeReferenceMissingArgument spName, range0)))
@@ -1402,7 +1402,7 @@ module internal ExtensionTyping =
     let GetPartsOfNamespaceRecover(namespaceName: string?) = 
 #endif
         match namespaceName with 
-        | null -> [] 
+        | Null -> [] 
         | NonNull namespaceName -> 
             if namespaceName.Length = 0 then [""]
             else splitNamespace (nonNull namespaceName)
@@ -1414,7 +1414,7 @@ module internal ExtensionTyping =
     let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string?) = 
 #endif
         match namespaceName with 
-        | null -> [] 
+        | Null -> [] 
         | NonNull namespaceName -> 
             if namespaceName.Length = 0 then
                 errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m))  
diff --git a/src/fsharp/FSComp.txt b/src/fsharp/FSComp.txt
index 8707689aece..09f5ef84d4b 100644
--- a/src/fsharp/FSComp.txt
+++ b/src/fsharp/FSComp.txt
@@ -1496,7 +1496,7 @@ notAFunctionButMaybeDeclaration,"This value is not a function and cannot be appl
 3268,csNullNotNullConstraintInconsistent,"The constraints 'null' and 'not null' are inconsistent"
 3269,csStructNullConstraintInconsistent,"The constraints 'struct' and 'null' are inconsistent"
 3270,csDelegateComparisonConstraintInconsistent,"The constraints 'delegate' and 'comparison' are inconsistent"
-3271,tcNullnessCheckingNotEnabled,"The --checknulls language feature is not enabled"
+3271,tcNullnessCheckingNotEnabled,"The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored."
 csTypeHasNullAsTrueValue,"The type '%s' has 'null' as a true representation value but a constraint does not permit this"
 csTypeHasNullAsExtraValue,"The type '%s' has 'null' as an extra value but a constraint does not permit this"
 3300,chkInvalidFunctionParameterType,"The parameter '%s' has an invalid type '%s'. This is not permitted by the rules of Common IL."
diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs
index 7c8ee132aab..4126054e0f9 100644
--- a/src/fsharp/FSharp.Build/Fsc.fs
+++ b/src/fsharp/FSharp.Build/Fsc.fs
@@ -12,9 +12,10 @@ open Microsoft.Build.Utilities
 open Internal.Utilities
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+// Shim to match nullness checking library support in preview
 []
 module Utils = 
-    let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
 
 //There are a lot of flags on fsc.exe.
@@ -145,7 +146,7 @@ type public Fsc () as this =
         // DebugType
         builder.AppendSwitchIfNotNull("--debug:",
             match debugType with 
-            | null -> null
+            | Null -> null
             | NonNull debugType -> 
                 match debugType.ToUpperInvariant() with
                 | "NONE"     -> null
@@ -192,7 +193,7 @@ type public Fsc () as this =
 #else
             let ToUpperInvariant (s:string?) =
 #endif
-                match s with null -> null | NonNull s -> s.ToUpperInvariant()
+                match s with Null -> null | NonNull s -> s.ToUpperInvariant()
             match ToUpperInvariant(platform), prefer32bit, ToUpperInvariant(targetType) with
                 | "ANYCPU", true, "EXE"
                 | "ANYCPU", true, "WINEXE" -> "anycpu32bitpreferred"
@@ -203,7 +204,7 @@ type public Fsc () as this =
         // checksumAlgorithm
         builder.AppendSwitchIfNotNull("--checksumalgorithm:",
             match checksumAlgorithm with
-            | null -> null
+            | Null -> null
             | NonNull checksumAlgorithm ->
                 match checksumAlgorithm.ToUpperInvariant() with
                 | "SHA1" -> "Sha1"
@@ -230,7 +231,7 @@ type public Fsc () as this =
         // ReferencePath
         let referencePathArray = // create a array of strings
             match referencePath with
-            | null -> null
+            | Null -> null
             | NonNull referencePath ->
                  referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries)
 
@@ -239,7 +240,7 @@ type public Fsc () as this =
         // TargetType
         builder.AppendSwitchIfNotNull("--target:", 
             match targetType with 
-            | null -> null
+            | Null -> null
             | NonNull targetType -> 
                 match targetType.ToUpperInvariant() with
                 | "LIBRARY" -> "library"
@@ -250,7 +251,7 @@ type public Fsc () as this =
 
         // NoWarn
         match disabledWarnings with
-        | null -> ()
+        | Null -> ()
         | NonNull disabledWarnings ->
             builder.AppendSwitchesIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",")
         
@@ -266,14 +267,14 @@ type public Fsc () as this =
         // REVIEW: why is this logic here? In any case these are errors already by default!
         let warningsAsErrorsArray =
             match warningsAsErrors with
-            | null -> [|"76"|]
+            | Null -> [|"76"|]
             | NonNull warningsAsErrors -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries)
 
         builder.AppendSwitchesIfNotNull("--warnaserror:", warningsAsErrorsArray, ",")
 
         // WarningsNotAsErrors
         match warningsNotAsErrors with
-        | null -> ()
+        | Null -> ()
         | NonNull warningsNotAsErrors ->
             builder.AppendSwitchesIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",")
 
@@ -313,7 +314,7 @@ type public Fsc () as this =
         
         let pathMapArray = // create a array of strings
             match pathMap with
-            | null -> null
+            | Null -> null
             | NonNull pathMap ->
                  pathMap.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries)
 
@@ -645,7 +646,7 @@ type public Fsc () as this =
     override fsc.GenerateCommandLineCommands() =
         let builder = new FSharpCommandLineBuilder()
         match dotnetFscCompilerPath with
-        | null | "" -> ()
+        | Null | "" -> ()
         | NonNull dotnetFscCompilerPath ->
             builder.AppendSwitch(dotnetFscCompilerPath)
         builder.ToString()
diff --git a/src/fsharp/FSharp.Build/Fsi.fs b/src/fsharp/FSharp.Build/Fsi.fs
index 9d6add386c2..c63fd3ae9be 100644
--- a/src/fsharp/FSharp.Build/Fsi.fs
+++ b/src/fsharp/FSharp.Build/Fsi.fs
@@ -13,8 +13,9 @@ open Internal.Utilities
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
 []
+// Shim to match nullness checking library support in preview
 module UtilsFsi = 
-    let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
 
 //There are a lot of flags on fsi.exe.
@@ -108,12 +109,12 @@ type public Fsi () as this =
 
         let referencePathArray = // create a array of strings
             match referencePath with
-            | null -> null
+            | Null -> null
             | NonNull referencePath -> referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries)
 
         // NoWarn
         match disabledWarnings with
-        | null -> ()
+        | Null -> ()
         | NonNull disabledWarnings -> builder.AppendSwitchesIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",")
 
         builder.AppendSwitchIfNotNull("--warn:", warningLevel)
@@ -123,13 +124,13 @@ type public Fsi () as this =
         // Change warning 76, HashReferenceNotAllowedInNonScript/HashDirectiveNotAllowedInNonScript/HashIncludeNotAllowedInNonScript, into an error
         let warningsAsErrorsArray =
             match warningsAsErrors with
-            | null -> [| "76" |]
+            | Null -> [| "76" |]
             | NonNull warningsAsErrors -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries)
 
         builder.AppendSwitchesIfNotNull("--warnaserror:", warningsAsErrorsArray, ",")
 
         match warningsNotAsErrors with
-        | null -> ()
+        | Null -> ()
         | NonNull warningsNotAsErrors -> builder.AppendSwitchesIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",")
 
         builder.AppendSwitchIfNotNull("--LCID:", vslcid)
@@ -315,7 +316,7 @@ type public Fsi () as this =
         else
             let host = box fsi.HostObject
             match host with
-            | null -> base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
+            | Null -> base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
             | _ ->
                 let sources = sources|>Array.map(fun i->i.ItemSpec)
                 let invokeCompiler baseCallDelegate =
@@ -342,7 +343,7 @@ type public Fsi () as this =
     override fsi.GenerateCommandLineCommands() =
         let builder = new FSharpCommandLineBuilder()
         match dotnetFsiCompilerPath with
-        | null | "" -> ()
+        | Null | "" -> ()
         | NonNull dotnetFsiCompilerPath ->
             builder.AppendSwitch(dotnetFsiCompilerPath)
         builder.ToString()
diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
index 10fde48de20..c14d9985622 100644
--- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs
+++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
@@ -14,8 +14,9 @@ open Microsoft.Build.Utilities
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
 []
+// Shim to match nullness checking library support in preview
 module UtilsWriteCodeFragment = 
-    let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
 
 type WriteCodeFragment() =
@@ -123,7 +124,7 @@ type WriteCodeFragment() =
         member this.Execute() =
             try
                 match _outputFile with 
-                | null -> failwith "Output location must be specified"
+                | Null -> failwith "Output location must be specified"
                 | NonNull outputFile -> 
 
                 let boilerplate =
@@ -151,7 +152,7 @@ type WriteCodeFragment() =
 
                 let outputFileItem =
                     match _outputDirectory with 
-                    | null -> outputFile
+                    | Null -> outputFile
                     | NonNull outputDirectory -> 
                         if Path.IsPathRooted(fileName) then 
                             outputFile
diff --git a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
index 2f7d9d26d30..91dc41c87bc 100644
--- a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
+++ b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
@@ -9,6 +9,7 @@
     $(DefineConstants);COMPILER
     $(DefineConstants);ENABLE_MONO_SUPPORT
     $(OtherFlags) /warnon:3218 /warnon:1182 /warnon:3390 --times
+    $(OtherFlags) --checknulls --langversion:preview
     true
     
     true
diff --git a/src/fsharp/FSharp.Core/FSharp.Core.fsproj b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
index 1258aa3045a..ebdda01583e 100644
--- a/src/fsharp/FSharp.Core/FSharp.Core.fsproj
+++ b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
@@ -8,10 +8,11 @@
     $(NoWarn);45;55;62;75;1204
     true
     $(OtherFlags) --warnon:3218
-    $(OtherFlags) --compiling-fslib-40
     $(DefineConstants);FSHARP_CORE
     BUILDING_WITH_LKG;$(DefineConstants)
-    $(OtherFlags) --warnon:3218 --warnon:1182 --warnon:3390 --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1 --nowarn:57
+    $(OtherFlags) --warnon:3218 --warnon:1182 --warnon:3390
+    $(OtherFlags) --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1 --nowarn:57
+    $(OtherFlags) --langversion:preview
     true 
     true
 
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 6cc8e97954a..55aeec63a32 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -3814,24 +3814,24 @@ namespace Microsoft.FSharp.Core
                 raise (System.NullReferenceException())
 
         []
-        let inline (|Null|NotNull|) (value : 'T? when 'T : not null) = 
+        let inline (|Null|NonNull|) (value : 'T? when 'T : not null) = 
             match value with 
             | null -> Null () 
-            | _ -> NotNull (# "" value : 'T #)
+            | _ -> NonNull (# "" value : 'T #)
 
         []
-        let inline (|NullV|NotNullV|) (value : Nullable<'T>) = 
-            if value.HasValue then NotNullV value.Value
+        let inline (|NullV|NonNullV|) (value : Nullable<'T>) = 
+            if value.HasValue then NonNullV value.Value
             else NullV ()
 
-        []
-        let inline (|NonNull|) (value : 'T? when 'T : not null) =
+        []
+        let inline (|NonNullQuick|) (value : 'T? when 'T : not null) =
             match box value with 
             | null -> raise (System.NullReferenceException()) 
             | _ -> (# "" value : 'T #)
 
-        []
-        let inline (|NonNullV|) (value : Nullable<'T>) =
+        []
+        let inline (|NonNullQuickV|) (value : Nullable<'T>) =
             if value.HasValue then value.Value
             else raise (System.NullReferenceException()) 
 
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 3dea46c3019..09dd4140da2 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -2700,6 +2700,7 @@ namespace Microsoft.FSharp.Core
         /// A nullable value representing the argument.
         /// The argument value. If it is null, the defaultValue is returned.
         []
+        []
         val inline defaultIfNull : defaultValue:'T -> arg:'T? -> 'T when 'T : not struct and 'T : not null
 
         /// Used to specify a default value for an nullable value argument in the implementation of a function
@@ -2707,6 +2708,7 @@ namespace Microsoft.FSharp.Core
         /// A nullable value representing the argument.
         /// The argument value. If it is null, the defaultValue is returned.
         []
+        []
         val inline defaultIfNullV : defaultValue:'T -> arg:Nullable<'T> -> 'T 
 #endif
 
@@ -2852,30 +2854,38 @@ namespace Microsoft.FSharp.Core
         /// The value to check.
         /// A choice indicating whether the value is null or not-null.
         []
-        val inline (|Null|NotNull|) : value: 'T? -> Choice  when 'T : not null
+        []
+        val inline (|Null|NonNull|) : value: 'T? -> Choice  when 'T : not null
         
         /// Determines whether the given value is null.
+        /// In a future revision of nullness support this may be unified with 'Null|NonNull'.
         /// The value to check.
         /// A choice indicating whether the value is null or not-null.
         []
-        val inline (|NullV|NotNullV|) : value: Nullable<'T> -> Choice 
+        []
+        val inline (|NullV|NonNullV|) : value: Nullable<'T> -> Choice 
         
         /// When used in a pattern checks the given value is not null.
         /// The value to check.
         /// The non-null value.
-        []
-        val inline (|NonNull|) : value: 'T? -> 'T when 'T : not null 
+        []
+        []
+        val inline (|NonNullQuick|) : value: 'T? -> 'T when 'T : not null 
         
         /// When used in a pattern checks the given value is not null.
+        /// In a future revision of nullness support this may be unified with 'NonNullQuick'.
         /// The value to check.
         /// The non-null value.
-        []
-        val inline (|NonNullV|) : value: Nullable<'T> -> 'T 
+        []
+        []
+        val inline (|NonNullQuickV|) : value: Nullable<'T> -> 'T 
         
         /// Determines whether the given value is null.
+        /// In a future revision of nullness support this may be unified with 'isNull'.
         /// The value to check.
         /// True when value is null, false otherwise.
         []
+        []
         val inline isNullV : value:Nullable<'T> -> bool
 #endif
 
@@ -2889,32 +2899,40 @@ namespace Microsoft.FSharp.Core
 
 #if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
         /// Get the null value for a value type.
+        /// In a future revision of nullness support this may be unified with 'null'.
         /// The null value for a value type.
         []
+        []
         val inline nullV<'T when 'T : struct and 'T : (new : unit -> 'T) and 'T :> ValueType> :  Nullable<'T>
 
         /// Asserts that the value is non-null.
         /// The value to check.
         /// The value when it is not null. If the value is null an exception is raised.
         []
+        []
         val inline nonNull : value: 'T? -> 'T when 'T : not struct and 'T : not null
 
         /// Asserts that the value is non-null.
+        /// In a future revision of nullness support this may be unified with 'nonNull'.
         /// The value to check.
         /// True when value is null, false otherwise.
         []
+        []
         val inline nonNullV : value:Nullable<'T> -> 'T 
 
         /// Asserts that the value is non-null.
         /// The value to check.
         /// True when value is null, false otherwise.
         []
+        []
         val inline withNull : value:'T -> 'T? when 'T : not struct (* and 'T : not null *)
 
         /// Asserts that the value is non-null.
+        /// In a future revision of nullness support this may be unified with 'withNull'.
         /// The value to check.
         /// True when value is null, false otherwise.
         []
+        []
         val inline withNullV : value:'T -> Nullable<'T> 
 #endif
 
@@ -2951,6 +2969,7 @@ namespace Microsoft.FSharp.Core
         /// 
         /// The result value.
         []
+        []
         val inline nullArgCheck : argumentName:string -> 'T? -> 'T when 'T : not struct and 'T : not null
 #endif
 
diff --git a/src/fsharp/InternalCollections.fs b/src/fsharp/InternalCollections.fs
index f317fe2fa7c..52b1b51c490 100755
--- a/src/fsharp/InternalCollections.fs
+++ b/src/fsharp/InternalCollections.fs
@@ -75,8 +75,8 @@ type internal AgedLookup<'Token, 'Key, 'Value when 'Value : not struct>(keepStro
             | Weak(weakReference) ->
 #if FX_NO_GENERIC_WEAKREFERENCE
                 match weakReference.Target with 
-                | null -> assert onStrongDiscard.IsNone; ()
-                | value -> yield key,(value:?>'Value) ]
+                | Null -> assert onStrongDiscard.IsNone; ()
+                | NonNull value -> yield key,(value:?>'Value) ]
 #else
                 match weakReference.TryGetTarget () with
                 | false, _ -> assert onStrongDiscard.IsNone; ()
diff --git a/src/fsharp/LegacyHostedCompilerForTesting.fs b/src/fsharp/LegacyHostedCompilerForTesting.fs
index eaffc6e7d80..c28fc91a3e1 100644
--- a/src/fsharp/LegacyHostedCompilerForTesting.fs
+++ b/src/fsharp/LegacyHostedCompilerForTesting.fs
@@ -140,7 +140,7 @@ type internal FscCompiler(legacyReferenceResolver) =
         // compensate for this in case caller didn't know
         let args =
             match box args with
-            | null -> [|"fsc"|]
+            | Null -> [|"fsc"|]
             | _ -> 
             match args with
             | [||] -> [|"fsc"|]
diff --git a/src/fsharp/LegacyMSBuildReferenceResolver.fs b/src/fsharp/LegacyMSBuildReferenceResolver.fs
index a2a57731aa8..76ecc658461 100644
--- a/src/fsharp/LegacyMSBuildReferenceResolver.fs
+++ b/src/fsharp/LegacyMSBuildReferenceResolver.fs
@@ -23,8 +23,8 @@ module LegacyMSBuildReferenceResolver
         // (the reference assemblies are always in the 32-bit location, which is PF(x86) on an x64 machine)
         let PF = 
             match Environment.GetEnvironmentVariable("ProgramFiles(x86)") with
-            | null -> Environment.GetEnvironmentVariable("ProgramFiles")  // if PFx86 is null, then we are 32-bit and just get PF
-            | s -> s 
+            | Null -> Environment.GetEnvironmentVariable("ProgramFiles")  // if PFx86 is null, then we are 32-bit and just get PF
+            | NonNull s -> s 
         PF + @"\Reference Assemblies\Microsoft\Framework\.NETFramework"
 
 
@@ -91,7 +91,7 @@ module LegacyMSBuildReferenceResolver
         match v with
         | Some v -> 
             match ToolLocationHelper.GetPathToDotNetFramework v with
-            | null -> []
+            | Null -> []
             | NonNull x -> [x]
         | _ -> []
 
@@ -102,8 +102,8 @@ module LegacyMSBuildReferenceResolver
         r
 #else
         match Microsoft.Build.Utilities.ToolLocationHelper.GetPathToStandardLibraries(".NETFramework",version,"") with
-        | null | "" -> []
-        | x -> [x]
+        | Null | "" -> []
+        | NonNull x -> [x]
 #endif
 
     /// Use MSBuild to determine the version of the highest installed set of reference assemblies, failing that grab the highest installed framework version
diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs
index 345c6ee9e67..d30c6316153 100644
--- a/src/fsharp/MethodCalls.fs
+++ b/src/fsharp/MethodCalls.fs
@@ -1457,7 +1457,7 @@ module ProvidedMethodCalls =
                     let baseType = 
                         st.PApply((fun st -> 
                             match st.BaseType with 
-                            | null -> ProvidedType.CreateNoContext(typeof)  // it might be an interface
+                            | Null -> ProvidedType.CreateNoContext(typeof)  // it might be an interface
                             | NonNull st -> st), m)
                     loop baseType
                 else
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fs b/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fs
index f4403c341fe..1657b9fd7d3 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fs
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fs
@@ -17,7 +17,7 @@ type AssemblyResolutionProbe = delegate of Unit -> seq
 open System.Runtime.Loader
 
 /// Type that encapsulates AssemblyResolveHandler for managed packages
-type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProbe) =
+type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProbe option) =
 
     let resolveAssemblyNetStandard (ctxt: AssemblyLoadContext) (assemblyName: AssemblyName): Assembly =
 
@@ -26,8 +26,8 @@ type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProb
 
         let assemblyPaths =
             match assemblyProbingPaths with
-            | null -> Seq.empty
-            | _ ->  assemblyProbingPaths.Invoke()
+            | None -> Seq.empty
+            | Some assemblyProbingPaths ->  assemblyProbingPaths.Invoke()
 
         try
             // args.Name is a displayname formatted assembly version.
@@ -51,7 +51,7 @@ type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProb
 #endif
 
 /// Type that encapsulates AssemblyResolveHandler for managed packages
-type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProbe) =
+type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProbe option) =
 
     let resolveAssemblyNET (assemblyName: AssemblyName): Assembly =
 
@@ -60,8 +60,8 @@ type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProb
 
         let assemblyPaths =
             match assemblyProbingPaths with
-            | null -> Seq.empty
-            | _ ->  assemblyProbingPaths.Invoke()
+            | None -> Seq.empty
+            | Some assemblyProbingPaths ->  assemblyProbingPaths.Invoke()
 
         try
             // args.Name is a displayname formatted assembly version.
@@ -82,7 +82,7 @@ type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProb
         member _x.Dispose() =
             AppDomain.CurrentDomain.remove_AssemblyResolve(handler)
 
-type AssemblyResolveHandler (assemblyProbingPaths: AssemblyResolutionProbe) =
+type AssemblyResolveHandler (assemblyProbingPaths: AssemblyResolutionProbe option) =
 
     let handler =
 #if NETSTANDARD
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fsi b/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fsi
index e30cb7839dd..83d564e5b3e 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fsi
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/AssemblyResolveHandler.fsi
@@ -13,6 +13,6 @@ type AssemblyResolutionProbe = delegate of Unit -> seq
 type AssemblyResolveHandler =
 
     /// Construct a new DependencyProvider
-    new: assemblyProbingPaths: AssemblyResolutionProbe -> AssemblyResolveHandler
+    new: assemblyProbingPaths: AssemblyResolutionProbe option -> AssemblyResolveHandler
 
     interface IDisposable
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
index e288ee038b7..6b9b321f857 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fs
@@ -69,6 +69,11 @@ module ReflectionHelper =
             e.InnerException
         | _ -> e
 
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    // Shim to match nullness checking library support in preview
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+#endif
+
 /// Indicate the type of error to report
 []
 type ErrorReportType =
@@ -277,16 +282,10 @@ type ReflectionDependencyManagerProvider(theType: Type,
 type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe option, nativeProbingRoots: NativeResolutionProbe option) =
 
     // Note: creating a NativeDllResolveHandler currently installs process-wide handlers
-    let dllResolveHandler =
-        match nativeProbingRoots with 
-        | None -> { new IDisposable with member _.Dispose() = () }
-        | Some nativeProbingRoots -> new NativeDllResolveHandler(nativeProbingRoots) :> IDisposable
+    let dllResolveHandler = new NativeDllResolveHandler(nativeProbingRoots) :> IDisposable
 
     // Note: creating a AssemblyResolveHandler currently installs process-wide handlers
-    let assemblyResolveHandler = 
-        match assemblyProbingPaths with 
-        | None -> { new IDisposable with member _.Dispose() = () }
-        | Some assemblyProbingPaths -> new AssemblyResolveHandler(assemblyProbingPaths) :> IDisposable
+    let assemblyResolveHandler = new AssemblyResolveHandler(assemblyProbingPaths) :> IDisposable
 
     // Resolution Path = Location of FSharp.Compiler.Private.dll
     let assemblySearchPaths = lazy (
@@ -365,7 +364,11 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
         DependencyManager.SR.packageManagerUnknown(packageManagerKey, String.Join(", ", searchPaths, compilerTools), registeredKeys)
 
     /// Fetch a dependencymanager that supports a specific key
-    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string option * IDependencyManagerProvider option =
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string * IDependencyManagerProvider =
+#else
+    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string? * IDependencyManagerProvider? =
+#endif
         try
             if path.Contains ":" && not (Path.IsPathRooted path) then
                 let managers = RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
@@ -374,32 +377,37 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                 | None ->
                     let err, msg = this.CreatePackageManagerUnknownError(compilerTools, outputDir, (path.Split(':').[0]), reportError)
                     reportError.Invoke(ErrorReportType.Error, err, msg)
-                    None, None
+                    null, null
 
                 | Some kv ->
-                    Some path, Some kv.Value
+                    path, kv.Value
             else
-                Some path, None
+                path, null
         with 
         | e ->
             let e = stripTieWrapper e
             let err, msg = DependencyManager.SR.packageManagerError(e.Message)
             reportError.Invoke(ErrorReportType.Error, err, msg)
-            None, None
+            null, null
 
     /// Fetch a dependencymanager that supports a specific key
-    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider option =
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider =
+#else
+    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider? =
+#endif
 
         try
             RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
             |> Map.tryFind key
+            |> Option.toObj
 
         with
         | e ->
             let e = stripTieWrapper e
             let err, msg = DependencyManager.SR.packageManagerError(e.Message)
             reportError.Invoke(ErrorReportType.Error, err, msg)
-            None
+            null
 
     /// Resolve reference for a list of package manager lines
     member _.Resolve (packageManager:IDependencyManagerProvider,
@@ -407,7 +415,11 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                        packageManagerTextLines: (string * string) seq,
                        reportError: ResolvingErrorReport,
                        executionTfm: string,
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
                        []executionRid: string,
+#else
+                       []executionRid: string?,
+#endif
                        []implicitIncludeDir: string,
                        []mainScriptName: string,
                        []fileName: string): IResolveDependenciesResult =
@@ -418,10 +430,9 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
             cache.GetOrAdd(key, System.Func<_,_>(fun _ -> 
                 try
                     let executionRid =
-                        if isNull executionRid then
-                            RidHelpers.platformRid
-                        else
-                            executionRid
+                        match executionRid with
+                        | Null -> RidHelpers.platformRid
+                        | NonNull executionRid -> executionRid
                     Ok (packageManager.ResolveDependencies(implicitIncludeDir, mainScriptName, fileName, scriptExt, packageManagerTextLines, executionTfm, executionRid))
 
                 with e ->
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi
index 99bdde62340..c4fedf88584 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/DependencyProvider.fsi
@@ -92,10 +92,22 @@ type DependencyProvider =
     member CreatePackageManagerUnknownError: string seq * string * string * ResolvingErrorReport -> int * string
 
     /// Resolve reference for a list of package manager lines
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
     member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string -> IResolveDependenciesResult
+#else
+    member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string -> IResolveDependenciesResult
+#endif
 
     /// Fetch a dependencymanager that supports a specific key
-    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider option
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider
+#else
+    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider?
+#endif
 
     /// TryFindDependencyManagerInPath - given a #r "key:sometext" go and find a DependencyManager that satisfies the key
-    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string option * IDependencyManagerProvider option
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string * IDependencyManagerProvider
+#else
+    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string? * IDependencyManagerProvider?
+#endif
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/Microsoft.DotNet.DependencyManager.fsproj b/src/fsharp/Microsoft.DotNet.DependencyManager/Microsoft.DotNet.DependencyManager.fsproj
index f77c694ff6f..287a9d83b6e 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/Microsoft.DotNet.DependencyManager.fsproj
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/Microsoft.DotNet.DependencyManager.fsproj
@@ -11,6 +11,7 @@
     $(NoWarn);45;55;62;75;1204
     true
     $(OtherFlags) --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
+    $(OtherFlags) --checknulls --langversion:preview
     true 
   
 
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs b/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs
index 672172655eb..65c7d756bfd 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs
@@ -30,7 +30,7 @@ type NativeAssemblyLoadContext () =
 
 
 /// Type that encapsulates Native library probing for managed packages
-type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe) =
+type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe option) =
     let probingFileNames (name: string) =
         // coreclr native library probing algorithm: https://github.com/dotnet/coreclr/blob/9773db1e7b1acb3ec75c9cc0e36bd62dcbacd6d5/src/System.Private.CoreLib/shared/System/Runtime/Loader/LibraryNameVariation.Unix.cs
         let isRooted = Path.IsPathRooted name
@@ -78,8 +78,8 @@ type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe)
 
         let probe =
             match nativeProbingRoots with
-            | null -> None
-            | _ ->  
+            | None -> None
+            | Some nativeProbingRoots ->  
                 nativeProbingRoots.Invoke()
                 |> Seq.tryPick(fun root ->
                     probingFileNames name |> Seq.tryPick(fun name ->
@@ -108,7 +108,7 @@ type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe)
 
 #endif
 
-type NativeDllResolveHandler (_nativeProbingRoots: NativeResolutionProbe) =
+type NativeDllResolveHandler (_nativeProbingRoots: NativeResolutionProbe option) =
 
     let handler:IDisposable option =
 #if NETSTANDARD
diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fsi b/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fsi
index 6e2545e2a07..c0a50f2e74b 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fsi
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fsi
@@ -12,6 +12,6 @@ type NativeResolutionProbe = delegate of Unit -> seq
 type NativeDllResolveHandler =
 
     /// Construct a new NativeDllResolveHandler
-    new: _nativeProbingRoots: NativeResolutionProbe -> NativeDllResolveHandler
+    new: _nativeProbingRoots: NativeResolutionProbe option -> NativeDllResolveHandler
 
     interface IDisposable
diff --git a/src/fsharp/ScriptClosure.fs b/src/fsharp/ScriptClosure.fs
index 86be2438fab..22edb0cbcd2 100644
--- a/src/fsharp/ScriptClosure.fs
+++ b/src/fsharp/ScriptClosure.fs
@@ -217,10 +217,10 @@ module ScriptPreprocessClosure =
                         | _ ->
                             let outputDir =  tcConfig.outputDir |> Option.defaultValue ""
                             match dependencyProvider.TryFindDependencyManagerByKey(tcConfig.compilerToolPaths, outputDir, reportError, packageManagerKey) with
-                            | None ->
+                            | Null ->
                                 errorR(Error(dependencyProvider.CreatePackageManagerUnknownError(tcConfig.compilerToolPaths, outputDir, packageManagerKey, reportError), m))
 
-                            | Some dependencyManager ->
+                            | NonNull dependencyManager ->
                                 let directive d =
                                     match d with
                                     | Directive.Resolution -> "r"
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 8b92efe2351..28dab1b8c0c 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -5180,7 +5180,7 @@ type CcuThunk =
     member ccu.Deref = 
         match ccu.target with 
         | null -> raise(UnresolvedReferenceNoRange ccu.name)
-        | NonNull tg -> tg
+        | NonNullQuick tg -> tg
 
     member ccu.IsUnresolvedReference = isNull ccu.target
 #endif
@@ -5449,7 +5449,7 @@ type Construct() =
               IsDelegate = (fun () -> st.PUntaint((fun st -> 
                                    let baseType = st.BaseType 
                                    match baseType with 
-                                   | null -> false
+                                   | Null -> false
                                    | NonNull x -> 
                                    match x with 
                                    | x when x.IsGenericType -> false
@@ -5721,7 +5721,7 @@ type Construct() =
     static member ComputeDefinitionLocationOfProvidedItem<'T when 'T :> IProvidedCustomAttributeProvider> (p: Tainted<'T>) : range option =
         let attrs = p.PUntaintNoFailure(fun x -> x.GetDefinitionLocationAttribute(p.TypeProvider.PUntaintNoFailure id))
         match attrs with
-        | None | Some (null, _, _) -> None
+        | None | Some (Null, _, _) -> None
         | Some (NonNull filePath, line, column) -> 
             // Coordinates from type provider are 1-based for lines and columns
             // Coordinates internally in the F# compiler are 1-based for lines and 0-based for columns
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index a791ec7f2cc..a371e89f18a 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -21,8 +21,10 @@ let notlazy v = Lazy<_>.CreateFromValue v
 let inline isNil l = List.isEmpty l
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v
+// Shim to match nullness checking library support in preview
+let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
 let inline nonNull<'T> (x: 'T) = x
+let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
 
 /// Returns true if the list has less than 2 elements. Otherwise false.
@@ -1338,7 +1340,7 @@ module Shim =
                 let isInvalidPath(p: string?) = 
 #endif
                     match p with 
-                    | null | "" -> true
+                    | Null | "" -> true
                     | NonNull p -> p.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -1347,7 +1349,7 @@ module Shim =
                 let isInvalidFilename(p: string?) = 
 #endif
                     match p with 
-                    | null | "" -> true
+                    | Null | "" -> true
                     | NonNull p -> p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -1356,7 +1358,7 @@ module Shim =
                 let isInvalidDirectory(d: string?) = 
 #endif
                     match d with 
-                    | null -> true
+                    | Null -> true
                     | NonNull d -> d.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 
                 isInvalidPath path || 
diff --git a/src/fsharp/absil/ilread.fs b/src/fsharp/absil/ilread.fs
index 43da4a037d1..0ec85a52f33 100644
--- a/src/fsharp/absil/ilread.fs
+++ b/src/fsharp/absil/ilread.fs
@@ -705,7 +705,7 @@ let mkCacheInt32 lowMem _inbase _nm _sz =
                 let c = new Dictionary(11)
                 cache :=  c
                 c
-            | NonNull c -> c 
+            | NonNullQuick c -> c 
 
         match cache.TryGetValue idx with
         | true, res ->
@@ -734,7 +734,7 @@ let mkCacheGeneric lowMem _inbase _nm _sz =
                 let c = new Dictionary<_, _>(11) 
                 cache := c
                 c
-            | NonNull c -> c
+            | NonNullQuick c -> c
 
         match cache.TryGetValue(idx) with
         | true, v ->
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index cacc67f6374..c82038066f4 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -400,7 +400,7 @@ let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type, typB, typeDef)=
 let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type?, typB, typeDef)= 
 #endif
     match typT with 
-    | null -> failwithf "binding null type in envBindTypeRef: %s\n" tref.Name
+    | Null -> failwithf "binding null type in envBindTypeRef: %s\n" tref.Name
     | NonNull typT ->
         {emEnv with emTypMap = Zmap.add tref (typT, typB, typeDef, None) emEnv.emTypMap}
 
@@ -535,7 +535,7 @@ let rec convTypeSpec cenv emEnv preferCreated (tspec: ILTypeSpec) =
         | true, false -> typT                                          
         | _, false -> null
     match res with 
-    | null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tspec.TypeRef.QualifiedName, tspec.Scope.QualifiedName), range0))
+    | Null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tspec.TypeRef.QualifiedName, tspec.Scope.QualifiedName), range0))
     | NonNull res -> res
       
 and convTypeAux cenv emEnv preferCreated ty =
@@ -673,7 +673,7 @@ let typeIsNotQueryable (ty: Type) =
 let queryableTypeGetField _emEnv (parentT: Type) (fref: ILFieldRef) =
     let res = parentT.GetField(fref.Name, BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance ||| BindingFlags.Static )  
     match res with 
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fref.Name, fref.DeclaringTypeRef.FullName, fref.DeclaringTypeRef.Scope.QualifiedName), range0))
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fref.Name, fref.DeclaringTypeRef.FullName, fref.DeclaringTypeRef.Scope.QualifiedName), range0))
     | NonNull res -> res
     
 let nonQueryableTypeGetField (parentTI: Type) (fieldInfo: FieldInfo) : FieldInfo = 
@@ -681,7 +681,7 @@ let nonQueryableTypeGetField (parentTI: Type) (fieldInfo: FieldInfo) : FieldInfo
         if parentTI.IsGenericType then TypeBuilder.GetField(parentTI, fieldInfo) 
         else fieldInfo
     match res with 
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fieldInfo.Name, parentTI.AssemblyQualifiedName, parentTI.Assembly.FullName), range0))
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fieldInfo.Name, parentTI.AssemblyQualifiedName, parentTI.Assembly.FullName), range0))
     | NonNull res -> res
 
 
@@ -834,7 +834,7 @@ let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) : MethodInfo =
             else 
                 queryableTypeGetMethod cenv emEnv parentTI mref 
     match res with 
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("method", mref.Name, parentTI.FullName, parentTI.Assembly.FullName), range0))
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("method", mref.Name, parentTI.FullName, parentTI.Assembly.FullName), range0))
     | NonNull res -> res 
 
 //----------------------------------------------------------------------------
@@ -864,7 +864,7 @@ let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) :
         convTypesToArray cenv emEnv mref.ArgTypes
     let res = parentT.GetConstructor(BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance, null, reqArgTs, null)  
     match res with 
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName), range0))
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName), range0))
     | NonNull res -> res
 
 
@@ -892,7 +892,7 @@ let convConstructorSpec cenv emEnv (mspec: ILMethodSpec) =
             else
                 queryableTypeGetConstructor cenv emEnv parentTI mref 
     match res with 
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", "", parentTI.FullName, parentTI.Assembly.FullName), range0))
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", "", parentTI.FullName, parentTI.Assembly.FullName), range0))
     | NonNull res -> res
 
 let emitLabelMark emEnv (ilG: ILGenerator) (label: ILCodeLabel) =
diff --git a/src/fsharp/absil/ilsign.fs b/src/fsharp/absil/ilsign.fs
index 0a7ce5f6909..c7070795a72 100644
--- a/src/fsharp/absil/ilsign.fs
+++ b/src/fsharp/absil/ilsign.fs
@@ -157,7 +157,7 @@ open FSharp.Compiler.AbstractIL.Internal.Utils
         let validateRSAField (field: byte[]?) expected (name: string) =
 #endif
             match field with 
-            | null -> ()
+            | Null -> ()
             | NonNull field ->
                 if field.Length <> expected then 
                     raise (CryptographicException(String.Format(getResourceString(FSComp.SR.ilSignInvalidRSAParams()), name)))
diff --git a/src/fsharp/fsi/console.fs b/src/fsharp/fsi/console.fs
index 31c7d9b24aa..717da2f2bd6 100644
--- a/src/fsharp/fsi/console.fs
+++ b/src/fsharp/fsi/console.fs
@@ -13,7 +13,10 @@ open System.Collections.Generic
 []
 module internal ConsoleOptions =
 
-  let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v
+#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+  // Shim to match nullness checking library support in preview
+  let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+#endif
 
   let readKeyFixup (c:char) =
       // Assumes the c:char is actually a byte in the System.Console.InputEncoding.
@@ -48,7 +51,7 @@ type internal History() =
     member x.Add (line: string?) = 
 #endif
         match line with 
-        | null | "" -> ()
+        | Null | "" -> ()
         | NonNull line -> list.Add(line)
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -57,7 +60,7 @@ type internal History() =
     member x.AddLast (line: string?) =  
 #endif
         match line with 
-        | null | "" -> ()
+        | Null | "" -> ()
         | NonNull line ->
             list.Add(line)
             current <- list.Count
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index b683a751b23..d0f6beff797 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -1478,10 +1478,10 @@ type internal FsiDynamicCompiler
                 let outputDir =  tcConfigB.outputDir |> Option.defaultValue ""
 
                 match fsiOptions.DependencyProvider.TryFindDependencyManagerByKey(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, packageManagerKey) with
-                | None ->
+                | Null ->
                     errorR(Error(fsiOptions.DependencyProvider.CreatePackageManagerUnknownError(tcConfigB.compilerToolPaths, outputDir, packageManagerKey, reportError m), m))
                     istate
-                | Some dependencyManager ->
+                | NonNull dependencyManager ->
                     let directive d =
                         match d with
                         | Directive.Resolution -> "r"
@@ -1529,7 +1529,7 @@ type internal FsiDynamicCompiler
                         let dm = tcImports.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
 
                         match dm with
-                        | _, Some dependencyManager ->
+                        | _, NonNull dependencyManager ->
                             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                                 fsiDynamicCompiler.EvalDependencyManagerTextFragment (dependencyManager, directive, m, path)
                                 st
@@ -1542,10 +1542,10 @@ type internal FsiDynamicCompiler
                             st
 
                         // #r "Assembly"
-                        | Some path, _ ->
+                        | NonNull path, _ ->
                             snd (fsiDynamicCompiler.EvalRequireReference (ctok, st, m, path))
 
-                        | None, None ->
+                        | Null, Null ->
                            st
                     ),
                     (fun _ _ -> ()))  
@@ -2003,9 +2003,9 @@ type internal FsiStdinLexerProvider
           (isFeatureSupported, (fun (buf: char[], start, len) ->
             //fprintf fsiConsoleOutput.Out "Calling ReadLine\n"
             let inputOption = try Some(readF()) with :? EndOfStreamException -> None
-            inputOption |> Option.iter (fun t -> fsiStdinSyphon.Add ((match t with null -> "" | NonNull t -> t) + "\n"))
+            inputOption |> Option.iter (fun t -> fsiStdinSyphon.Add ((match t with Null -> "" | NonNull t -> t) + "\n"))
             match inputOption with 
-            |  Some(null) | None -> 
+            |  Some(Null) | None -> 
                  if progress then fprintfn fsiConsoleOutput.Out "End of file from TextReader.ReadLine"
                  0
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
@@ -2027,12 +2027,12 @@ type internal FsiStdinLexerProvider
     //----------------------------------------------------------------------------
 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    let removeZeroCharsFromString (str:string) = (* bug://4466 *)
+    let removeZeroCharsFromString (str:string) =
 #else
-    let removeZeroCharsFromString (str:string?) : string? = (* bug://4466 *)
+    let removeZeroCharsFromString (str:string?) : string? =
 #endif
         match str with 
-        | null -> str
+        | Null -> str
         | NonNull str -> 
             if str.Contains("\000") then
               System.String(str |> Seq.filter (fun c -> c<>'\000') |> Seq.toArray)
@@ -2175,11 +2175,11 @@ type internal FsiInteractionProcessor
         let packageManagerDirective directive path m =
             let dm = fsiOptions.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
             match dm with
-            | None, None ->
+            | Null, Null ->
                 // error already reported
                 istate, CompletedWithAlreadyReportedError
 
-            | _, Some dependencyManager ->
+            | _, NonNull dependencyManager ->
                if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                    fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
                    istate, Completed None
@@ -2191,7 +2191,7 @@ type internal FsiInteractionProcessor
                 errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
                 istate,Completed None
 
-            | Some p, None ->
+            | NonNull p, Null ->
                 let path =
                     if String.IsNullOrWhiteSpace(p) then ""
                     else p
diff --git a/src/fsharp/fsi/fsi.fsproj b/src/fsharp/fsi/fsi.fsproj
index e550dd97879..3b51e13dcd6 100644
--- a/src/fsharp/fsi/fsi.fsproj
+++ b/src/fsharp/fsi/fsi.fsproj
@@ -12,7 +12,6 @@
     true
     $(OtherFlags) --checknulls --langversion:preview
     $(OtherFlags)  --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
-    --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
     fsi.res
     true
   
diff --git a/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj b/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj
index d39051b414c..85c14e21863 100644
--- a/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj
+++ b/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj
@@ -10,6 +10,7 @@
     $(NoWarn);45;55;62;75;1204
     true
     $(OtherFlags)  --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
+    $(OtherFlags) --checknulls --langversion:preview
     ..\fsi\fsi.res
     true
     true
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index 0fadd4f37ca..2f37103aad5 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -636,8 +636,8 @@ type ILFieldInit with
     /// Compute the ILFieldInit for the given provided constant value for a provided enum type.
     static member FromProvidedObj m (v: obj) =
         match v with
-        | null -> ILFieldInit.Null
-        | _ ->
+        | Null -> ILFieldInit.Null
+        | NonNull v ->
             let objTy = v.GetType()
             let v = if objTy.IsEnum then objTy.GetField("value__").GetValue v else v
             match v with
diff --git a/src/fsharp/lib.fs b/src/fsharp/lib.fs
index 1d92e676a41..ec150cdc404 100755
--- a/src/fsharp/lib.fs
+++ b/src/fsharp/lib.fs
@@ -26,7 +26,7 @@ let dispose (x:System.IDisposable) =
 #else
 let dispose (x:System.IDisposable?) = 
 #endif
-    match x with null -> () | NonNull x -> x.Dispose()
+    match x with null -> () | NonNullQuick x -> x.Dispose()
 
 //-------------------------------------------------------------------------
 // Library: bits
@@ -464,7 +464,7 @@ module internal AsyncUtil =
 #endif
                 match sc with
                 | null -> ThreadPool.QueueUserWorkItem(fun _ -> cont res) |> ignore
-                | NonNull sc ->
+                | NonNullQuick sc ->
                     sc.Post((fun _ -> cont res), state=null)
 
             // Run continuations outside the lock
diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs
index 7a60d2c1b0e..5a1039a5dd9 100644
--- a/src/fsharp/service/QuickParse.fs
+++ b/src/fsharp/service/QuickParse.fs
@@ -75,7 +75,7 @@ module QuickParse =
     let GetCompleteIdentifierIslandImpl (lineStr: string?) (index: int) : (string * int * bool) option =
 #endif
         match lineStr with 
-        | null -> None
+        | Null -> None
         | NonNull lineStr -> 
         if index < 0 || index >= lineStr.Length then None 
         else
@@ -190,7 +190,7 @@ module QuickParse =
     let GetPartialLongName(lineStr: string?, index: int) =
 #endif
         match lineStr with
-        | null -> defaultName
+        | Null -> defaultName
         | NonNull lineStr ->
         if index < 0 then defaultName
         elif index >= lineStr.Length then defaultName
@@ -235,7 +235,7 @@ module QuickParse =
     let GetPartialLongNameEx(lineStr: string?, index: int) : PartialLongName =
 #endif
         match lineStr with
-        | null -> PartialLongName.Empty(index)
+        | Null -> PartialLongName.Empty(index)
         | NonNull lineStr ->
         if index < 0 then PartialLongName.Empty(index)
         elif index >= lineStr.Length then PartialLongName.Empty(index)
diff --git a/src/fsharp/tainted.fs b/src/fsharp/tainted.fs
index d6dc49fb59c..2ac4cd6b9f2 100644
--- a/src/fsharp/tainted.fs
+++ b/src/fsharp/tainted.fs
@@ -130,7 +130,7 @@ type internal Tainted<'T> (context : TaintedContext, value : 'T) =
         let a : 'U[]? = this.Protect f range
 #endif
         match a with 
-        | null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range)
+        | Null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range)
         | NonNull a -> a |> Array.map (fun u -> Tainted(context,u))
 
     member this.PApplyOption(f,range:range) =        
diff --git a/src/fsharp/utils/sformat.fs b/src/fsharp/utils/sformat.fs
index c0bb2a4f302..4747ed50f88 100644
--- a/src/fsharp/utils/sformat.fs
+++ b/src/fsharp/utils/sformat.fs
@@ -114,11 +114,14 @@ type IEnvironment =
     abstract MaxColumns: int
     abstract MaxRows: int
 
-module TaggedTextOps =
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-    let inline (|NonNull|) x = match x with null -> raise (NullReferenceException()) | v -> v
-    let inline nonNull<'T> (x: 'T) = x
+[]
+module NullShim =
+    // Shim to match nullness checking library support in preview
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
+
+module TaggedTextOps =
     let mkTag tag text = 
         { new TaggedText with 
             member _.Tag = tag
@@ -409,7 +412,7 @@ module ReflectUtils =
         // of an F# value.
         let GetValueInfoOfObject (bindingFlags: BindingFlags) (obj: obj) =
             match obj with 
-            | null -> NullValue
+            | Null -> NullValue
             | _ -> 
             let reprty = obj.GetType() 
 
@@ -459,7 +462,7 @@ module ReflectUtils =
         let GetValueInfo bindingFlags (x: 'a, ty: Type)  (* x could be null *) = 
             let obj = (box x)
             match obj with 
-            | null ->
+            | Null ->
                 let isNullaryUnion =
                     match ty.GetCustomAttributes(typeof, false) with
                     | [|:? CompilationRepresentationAttribute as attr|] -> 
@@ -470,7 +473,7 @@ module ReflectUtils =
                     UnionCaseValue(nullaryCase.Name, [| |])
                 elif isUnitType ty then UnitValue
                 else NullValue
-            | _ -> 
+            | NonNull obj -> 
                 GetValueInfoOfObject bindingFlags (obj) 
 
 module Display = 
@@ -714,8 +717,8 @@ module Display =
 
     let getListValueInfo bindingFlags (x:obj, ty:Type) =
         match x with 
-        | null -> None 
-        | _ -> 
+        | Null -> None 
+        | NonNull x -> 
             match Value.GetValueInfo bindingFlags (x, ty) with
             | UnionCaseValue ("Cons", recd) -> Some (unpackCons recd)
             | UnionCaseValue ("Empty", [| |]) -> None
@@ -839,9 +842,9 @@ module Display =
             try
                 if depthLim<=0 || exceededPrintSize() then wordL (tagPunctuation "...") else
                 match x with 
-                | null -> 
+                | Null -> 
                     reprL showMode (depthLim-1) prec info x
-                | _ ->
+                | NonNull x ->
                     if (path.ContainsKey(x)) then 
                         wordL (tagPunctuation "...")
                     else 
@@ -855,7 +858,7 @@ module Display =
                             else
                                 // Try the StructuredFormatDisplayAttribute extensibility attribute
                                 match ty.GetCustomAttributes (typeof, true) with
-                                | null | [| |] -> None
+                                | Null | [| |] -> None
                                 | NonNull res -> 
                                 structuredFormatObjectL showMode ty depthLim (res.[0] :?> StructuredFormatDisplayAttribute) x
 
@@ -1221,7 +1224,7 @@ module Display =
 
     let leafFormatter (opts:FormatOptions) (obj :obj) =
         match obj with 
-        | null -> tagKeyword "null"
+        | Null -> tagKeyword "null"
         | :? double as d -> 
             let s = d.ToString(opts.FloatingPointFormat,opts.FormatProvider)
             let t = 
@@ -1265,7 +1268,7 @@ module Display =
                 try 
                     let text = obj.ToString()
                     match text with
-                    | null -> ""
+                    | Null -> ""
                     | _ -> text
                 with e ->
                     // If a .ToString() call throws an exception, catch it and use the message as the result.
diff --git a/src/fsharp/xlf/FSComp.txt.cs.xlf b/src/fsharp/xlf/FSComp.txt.cs.xlf
index 7757497ea60..13bd45e8bae 100644
--- a/src/fsharp/xlf/FSComp.txt.cs.xlf
+++ b/src/fsharp/xlf/FSComp.txt.cs.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.de.xlf b/src/fsharp/xlf/FSComp.txt.de.xlf
index dfa0f94b0e9..8c198d73613 100644
--- a/src/fsharp/xlf/FSComp.txt.de.xlf
+++ b/src/fsharp/xlf/FSComp.txt.de.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.es.xlf b/src/fsharp/xlf/FSComp.txt.es.xlf
index 85d4878d1f0..e62e6bc8ba4 100644
--- a/src/fsharp/xlf/FSComp.txt.es.xlf
+++ b/src/fsharp/xlf/FSComp.txt.es.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.fr.xlf b/src/fsharp/xlf/FSComp.txt.fr.xlf
index 2c7ecc7349a..8c36d4cf36f 100644
--- a/src/fsharp/xlf/FSComp.txt.fr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.fr.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index e2de4cae569..e3726c37596 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index 1b7afb97e1a..7345ebf1cff 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -373,8 +373,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.ko.xlf b/src/fsharp/xlf/FSComp.txt.ko.xlf
index 1fc6ec30553..3788bb99c5f 100644
--- a/src/fsharp/xlf/FSComp.txt.ko.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ko.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.pl.xlf b/src/fsharp/xlf/FSComp.txt.pl.xlf
index c9a5b1eb554..51ae28dc6f7 100644
--- a/src/fsharp/xlf/FSComp.txt.pl.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pl.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
index 21411e21330..a4d0625a6c3 100644
--- a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.ru.xlf b/src/fsharp/xlf/FSComp.txt.ru.xlf
index a05a6bea79c..86a67be0e2f 100644
--- a/src/fsharp/xlf/FSComp.txt.ru.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ru.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index 122b9c32a4c..bdfc0d8bb74 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
index 142c588805f..2f25ae5e204 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
index 6e5b260541e..2a7db53b143 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
@@ -408,8 +408,8 @@
         
       
       
-        The --checknulls language feature is not enabled
-        The --checknulls language feature is not enabled
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
         
       
       
diff --git a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
index c54d71bc844..fe901ce9b08 100644
--- a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
+++ b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
@@ -80,7 +80,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result = dp.Resolve(idm, ".fsx", [|"r", "FSharp.Data"|], reportError, "net472")
@@ -109,7 +109,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
 
         let result = dp.Resolve(idm, ".fsx", [|"r", "Microsoft.Data.Sqlite, 3.1.8"|], reportError, "netcoreapp3.1")
         Assert.Equal(true, result.Success)
@@ -132,7 +132,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result = dp.Resolve(idm, ".fsx", [|"r", "System.Collections.Immutable.DoesNotExist"|], reportError, "net472")
@@ -163,7 +163,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result1 = dp1.Resolve(idm1, ".fsx", [|"r", "FSharp.Data"|], reportError, "net472")
             Assert.Equal(true, result1.Success)
@@ -184,7 +184,7 @@ type DependencyManagerInteractiveTests() =
         Assert.True((result2.Roots |> Seq.head).EndsWith("/fsharp.data/3.3.3/"))
 
         use dp2 = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-        let idm2 = dp2.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm2 = dp2.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result3 = dp2.Resolve(idm2, ".fsx", [|"r", "System.Json, Version=4.6.0"|], reportError, "net472")
@@ -218,7 +218,7 @@ type DependencyManagerInteractiveTests() =
                 | ErrorReportType.Warning -> printfn "PackageManagementWarning %d : %s" code message
             ResolvingErrorReport (report)
 
-        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm1 = dp1.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result1 = dp1.Resolve(idm1, ".fsx", [|"r", "Microsoft.Extensions.Configuration.Abstractions, 3.1.1"|], reportError, "net472")
@@ -287,7 +287,7 @@ TorchSharp.Tensor.LongTensor.From([| 0L .. 100L |]).Device
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(AssemblyResolutionProbe(assemblyProbingPaths), NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed")
@@ -383,7 +383,7 @@ printfn ""%A"" result
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed")
@@ -391,7 +391,7 @@ printfn ""%A"" result
         resolverPackageRoots <- result.Roots
         resolverReferences <- result.Resolutions
 
-        use _nativeDepencyResolver = new NativeDllResolveHandler(NativeResolutionProbe(nativeProbingRoots))
+        use _nativeDepencyResolver = new NativeDllResolveHandler(Some(NativeResolutionProbe(nativeProbingRoots)))
 
         // Build and execute script
         let referenceText =
@@ -464,7 +464,7 @@ printfn ""%A"" result
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed")
@@ -472,7 +472,7 @@ printfn ""%A"" result
         resolverPackageRoots <- result.Roots
         resolverReferences <- result.Resolutions
 
-        use _assemblyResolver = new AssemblyResolveHandler(AssemblyResolutionProbe(assemblyProbingPaths))
+        use _assemblyResolver = new AssemblyResolveHandler(Some(AssemblyResolutionProbe(assemblyProbingPaths)))
 
         // Build and execute script
         let referenceText =
@@ -521,7 +521,7 @@ x |> Seq.iter(fun r ->
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
             dp.Resolve(idm, ".fsx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         // Expected: error FS3217: PackageManager can not reference the System Package 'FSharp.Core'
@@ -547,7 +547,7 @@ x |> Seq.iter(fun r ->
         // Restore packages, Get Reference dll paths and package roots
         let result =
             use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+            let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
             dp.Resolve(idm, ".csx", packagemanagerlines, reportError, "netcoreapp3.1")
 
         Assert.True(result.Success, "resolve failed but should have succeeded")
@@ -582,7 +582,7 @@ x |> Seq.iter(fun r ->
         Assert.False (found, "Invoke the nativeProbingRoots callback -- Error the ResolvingUnmanagedDll still fired ")
 
         use dp = new DependencyProvider(NativeResolutionProbe(nativeProbingRoots))
-        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget").Value
+        let idm = dp.TryFindDependencyManagerByKey(Seq.empty, "", reportError, "nuget")
 
         if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
             let result = dp.Resolve(idm, ".fsx", [|"r", "FSharp.Data"|], reportError, "net472")
@@ -645,7 +645,7 @@ x |> Seq.iter(fun r ->
 
         // Set up AssemblyResolver to resolve dll's
         do
-            use dp = new AssemblyResolveHandler(AssemblyResolutionProbe(assemblyProbingPaths))
+            use dp = new AssemblyResolveHandler(Some(AssemblyResolutionProbe(assemblyProbingPaths)))
 
             // Invoking a non-existent assembly causes a probe. which should invoke the call back
             try Assembly.Load("NoneSuchAssembly") |> ignore with _ -> ()
diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index a990c7c43fc..e32c80a0230 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -42631,12 +42631,12 @@ Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.G
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] Invoke()
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: Void .ctor(System.Object, IntPtr)
-Microsoft.DotNet.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe)
-Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.IDependencyManagerProvider] TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
+Microsoft.DotNet.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe))
+Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IDependencyManagerProvider TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IResolveDependenciesResult Resolve(Microsoft.DotNet.DependencyManager.IDependencyManagerProvider, System.String, System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.String,System.String]], Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String, System.String, System.String, System.String, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: System.String[] GetRegisteredDependencyManagerHelpText(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)
 Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[System.Int32,System.String] CreatePackageManagerUnknownError(System.Collections.Generic.IEnumerable`1[System.String], System.String, System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)
-Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[Microsoft.FSharp.Core.FSharpOption`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.IDependencyManagerProvider]] TryFindDependencyManagerInPath(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
+Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[System.String,Microsoft.DotNet.DependencyManager.IDependencyManagerProvider] TryFindDependencyManagerInPath(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor(Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe, Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor(Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor()
@@ -42681,7 +42681,7 @@ Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] S
 Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] StdOut
 Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] get_StdError()
 Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] get_StdOut()
-Microsoft.DotNet.DependencyManager.NativeDllResolveHandler: Void .ctor(Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
+Microsoft.DotNet.DependencyManager.NativeDllResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.NativeResolutionProbe])
 Microsoft.DotNet.DependencyManager.NativeResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] EndInvoke(System.IAsyncResult)
 Microsoft.DotNet.DependencyManager.NativeResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] Invoke()
 Microsoft.DotNet.DependencyManager.NativeResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
diff --git a/tests/FSharp.Core.UnitTests/SurfaceArea.fs b/tests/FSharp.Core.UnitTests/SurfaceArea.fs
index a3355e5b1ce..ce1686771d9 100644
--- a/tests/FSharp.Core.UnitTests/SurfaceArea.fs
+++ b/tests/FSharp.Core.UnitTests/SurfaceArea.fs
@@ -2068,9 +2068,9 @@ Microsoft.FSharp.Core.Operators: System.Nullable`1[T] WithNullV[T](T)
 Microsoft.FSharp.Core.Operators: T DefaultIfNone[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
 Microsoft.FSharp.Core.Operators: T DefaultIfNullV[T](T, System.Nullable`1[T])
 Microsoft.FSharp.Core.Operators: T DefaultIfNull[T](T, T)
-Microsoft.FSharp.Core.Operators: T NonNullPattern[T](T)
+Microsoft.FSharp.Core.Operators: T NonNullQuickPattern[T](T)
 Microsoft.FSharp.Core.Operators: T NonNullV[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: T NonNullValuePattern[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T NonNullQuickValuePattern[T](System.Nullable`1[T])
 Microsoft.FSharp.Core.Operators: T NonNull[T](T)
 Microsoft.FSharp.Core.Operators: T NullArgCheck[T](System.String, T)
 Microsoft.FSharp.Core.Operators: T WithNull[T](T)
diff --git a/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs b/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
index a9cd0ad50c3..7334c52edee 100644
--- a/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
+++ b/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
@@ -2066,9 +2066,9 @@ Microsoft.FSharp.Core.Operators: System.Nullable`1[T] WithNullV[T](T)
 Microsoft.FSharp.Core.Operators: T DefaultIfNone[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
 Microsoft.FSharp.Core.Operators: T DefaultIfNullV[T](T, System.Nullable`1[T])
 Microsoft.FSharp.Core.Operators: T DefaultIfNull[T](T, T)
-Microsoft.FSharp.Core.Operators: T NonNullPattern[T](T)
+Microsoft.FSharp.Core.Operators: T NonNullQuickPattern[T](T)
 Microsoft.FSharp.Core.Operators: T NonNullV[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: T NonNullValuePattern[T](System.Nullable`1[T])
+Microsoft.FSharp.Core.Operators: T NonNullQuickValuePattern[T](System.Nullable`1[T])
 Microsoft.FSharp.Core.Operators: T NonNull[T](T)
 Microsoft.FSharp.Core.Operators: T NullArgCheck[T](System.String, T)
 Microsoft.FSharp.Core.Operators: T WithNull[T](T)
diff --git a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
index 93f708e171f..5f840336edd 100644
--- a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
@@ -193,7 +193,7 @@ type BraceCompletionSession
         member this.PreBackspace handledCommand =
             handledCommand <- false
             match openingPoint with 
-            | null -> ()
+            | Null -> ()
             | NonNull openingPoint -> 
 
             let caretPos = tryGetCaretPosition this
diff --git a/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs b/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
index a3e6f96f7c9..019582ebb5e 100644
--- a/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
+++ b/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
@@ -333,7 +333,7 @@ type internal FSharpCodeLensService
 #endif
                             // TODO NULLNESS - check that doing nothing when codeLens.UiElement is null is ok
                             match codeLens.UiElement with 
-                            | null -> ()
+                            | Null -> ()
                             | NonNull uiElement ->
                             let animation = 
                                 DoubleAnimation(
@@ -362,7 +362,7 @@ type internal FSharpCodeLensService
                 // logInfof "Trackingspan %A is being added." trackingSpan 
                 if codeLens.Computed then 
                     match codeLens.UiElement with 
-                    | null -> ()
+                    | Null -> ()
                     | NonNull uiElement ->
                         lineLens.AddUiElementToCodeLensOnce (newTrackingSpan, uiElement)
                 else
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index a18d1673997..3660cd6c7a6 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -266,7 +266,7 @@ module Exception =
 
         let rec flattenInner (exc: System.Exception?) =
             match exc with
-            | null -> []
+            | Null -> []
             | NonNull exc -> [exc.Message] @ (flattenInner exc.InnerException)
         
         // If an aggregate exception only has a single inner exception, use that as the root
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
index e30d92cad29..288e396acc6 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
@@ -38,7 +38,7 @@ type internal RoamingProfileStorageLocation(keyName: string) =
     member __.GetKeyNameForLanguage(languageName: string?) =
         let unsubstitutedKeyName = keyName
         match languageName with
-        | null -> unsubstitutedKeyName
+        | Null -> unsubstitutedKeyName
         | NonNull languageName ->
             let substituteLanguageName = if languageName = FSharpConstants.FSharpLanguageName then "FSharp" else languageName
             unsubstitutedKeyName.Replace("%LANGUAGE%", substituteLanguageName)
diff --git a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
index dc1c8b43066..98fc805f7de 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
@@ -25,7 +25,7 @@ module private Symbol =
     let fullName (root: ISymbol) : string =
         let rec inner parts (sym: ISymbol?) =
             match sym with
-            | null ->
+            | Null ->
                 parts
             // TODO: do we have any other terminating cases?
             | NonNull sym when sym.Kind = SymbolKind.NetModule || sym.Kind = SymbolKind.Assembly ->
diff --git a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
index 7df8e60ebd3..f4828bf68ab 100644
--- a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
+++ b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
@@ -9,6 +9,7 @@
     true
     $(SystemValueTupleVersion)
     $(OtherFlags) --subsystemversion:6.00
+    $(OtherFlags) --langversion:preview 
     false
   
 
diff --git a/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj b/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj
index c3473e7b184..732942af067 100644
--- a/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj
+++ b/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj
@@ -10,6 +10,7 @@
     $(SystemValueTupleVersion)
     true
     false
+    $(OtherFlags) --langversion:preview 
   
 
   
diff --git a/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj b/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj
index c3028d5b8c9..7db538b61dc 100644
--- a/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj
+++ b/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj
@@ -15,6 +15,7 @@
     false
     nunit
     true
+    $(OtherFlags) --langversion:preview 
   
 
   

From daec1d687f9fc13f23c07feeb7042b251baa92e1 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 26 Oct 2020 18:01:04 +0000
Subject: [PATCH 033/112] fix baseline

---
 tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index e32c80a0230..d556b61649d 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -42631,7 +42631,7 @@ Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.G
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] Invoke()
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
 Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: Void .ctor(System.Object, IntPtr)
-Microsoft.DotNet.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe))
+Microsoft.DotNet.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe])
 Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IDependencyManagerProvider TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IResolveDependenciesResult Resolve(Microsoft.DotNet.DependencyManager.IDependencyManagerProvider, System.String, System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.String,System.String]], Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String, System.String, System.String, System.String, System.String)
 Microsoft.DotNet.DependencyManager.DependencyProvider: System.String[] GetRegisteredDependencyManagerHelpText(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)

From c99336303c400b045658652f3c106004276d6a43 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 26 Oct 2020 21:39:10 +0000
Subject: [PATCH 034/112] fixup baselines and minimize diff

---
 src/fsharp/IlxGen.fs                          | 98 +++++++++----------
 .../AsyncExpressionSteppingTest1.il.bsl       | 14 +--
 .../AsyncExpressionSteppingTest2.il.bsl       | 14 +--
 .../AsyncExpressionSteppingTest3.il.bsl       | 14 +--
 .../AsyncExpressionSteppingTest4.il.bsl       | 14 +--
 .../AsyncExpressionSteppingTest5.il.bsl       | 14 +--
 .../AsyncExpressionSteppingTest6.il.bsl       | 14 +--
 .../EmittedIL/AttributeTargets/Default.il.bsl | 16 ++-
 .../EmittedIL/AttributeTargets/Field.il.bsl   | 16 ++-
 .../AttributeTargets/Property.il.bsl          | 16 ++-
 .../CCtorDUWithMember01.il.bsl                | 16 ++-
 .../CCtorDUWithMember02.il.bsl                | 14 +--
 .../CCtorDUWithMember03.il.bsl                | 14 +--
 .../CCtorDUWithMember04.il.bsl                | 14 +--
 .../CompiledNameAttribute01.il.bsl            | 12 +--
 .../CompiledNameAttribute02.il.bsl            | 18 +---
 .../CompiledNameAttribute03.il.bsl            | 12 +--
 .../CompiledNameAttribute04.il.bsl            | 16 +--
 .../ComputationExpr01.il.bsl                  | 14 +--
 .../ComputationExpr02.il.bsl                  | 14 +--
 .../ComputationExpr03.il.bsl                  | 14 +--
 .../ComputationExpr04.il.bsl                  | 14 +--
 .../ComputationExpr05.il.bsl                  | 14 +--
 .../ComputationExpr06.il.bsl                  | 14 +--
 .../ComputationExpr07.il.bsl                  | 14 +--
 ...tBoxStruct_ArrayOfArray_CSInterface.il.bsl | 12 +--
 ...tBoxStruct_ArrayOfArray_FSInterface.il.bsl | 12 +--
 ..._ArrayOfArray_FSInterface_NoExtMeth.il.bsl | 12 +--
 .../DoNotBoxStruct_Array_CSInterface.il.bsl   | 12 +--
 .../DoNotBoxStruct_Array_FSInterface.il.bsl   | 12 +--
 ...xStruct_Array_FSInterface_NoExtMeth.il.bsl | 12 +--
 .../DoNotBoxStruct_MDArray_CSInterface.il.bsl | 12 +--
 .../DoNotBoxStruct_MDArray_FSInterface.il.bsl | 12 +--
 ...truct_MDArray_FSInterface_NoExtMeth.il.bsl | 12 +--
 .../DoNotBoxStruct_NoArray_CSInterface.il.bsl | 12 +--
 .../DoNotBoxStruct_NoArray_FSInterface.il.bsl | 12 +--
 ...truct_NoArray_FSInterface_NoExtMeth.il.bsl | 12 +--
 .../DoNotBoxStruct_ToString.il.bsl            | 10 +-
 .../GeneratedIterators/GenIter01.il.bsl       | 14 +--
 .../GeneratedIterators/GenIter02.il.bsl       | 14 +--
 .../GeneratedIterators/GenIter03.il.bsl       | 14 +--
 .../GeneratedIterators/GenIter04.il.bsl       | 14 +--
 .../InequalityComparison01.il.bsl             | 14 +--
 .../InequalityComparison02.il.bsl             | 14 +--
 .../InequalityComparison03.il.bsl             | 14 +--
 .../InequalityComparison04.il.bsl             | 14 +--
 .../InequalityComparison05.il.bsl             | 12 +--
 .../ListExpressionSteppingTest1.il.bsl        | 14 +--
 .../ListExpressionSteppingTest2.il.bsl        | 14 +--
 .../ListExpressionSteppingTest3.il.bsl        | 14 +--
 .../ListExpressionSteppingTest4.il.bsl        | 14 +--
 .../ListExpressionSteppingTest5.il.bsl        | 14 +--
 .../ListExpressionSteppingTest6.il.bsl        | 14 +--
 ...hodImplAttribute.AggressiveInlining.il.bsl | 14 +--
 .../MethodImplAttribute.ForwardRef.il.bsl     | 14 +--
 .../MethodImplAttribute.InternalCall.il.bsl   | 14 +--
 .../MethodImplAttribute.NoInlining.il.bsl     | 14 +--
 .../MethodImplAttribute.NoOptimization.il.bsl | 14 +--
 .../MethodImplAttribute.PreserveSig.il.bsl    | 14 +--
 .../MethodImplAttribute.Synchronized.il.bsl   | 14 +--
 .../MethodImplAttribute.Unmanaged.il.bsl      | 14 +--
 .../EmittedIL/Misc/AbstractClass.il.bsl       | 18 +---
 .../CodeGen/EmittedIL/Misc/AnonRecd.il.bsl    | 10 +-
 .../Misc/ArgumentNamesInClosures01.il.bsl     | 18 +---
 .../EmittedIL/Misc/CodeGenRenamings01.il.bsl  | 14 +--
 .../CustomAttributeGenericParameter01.il.bsl  | 12 +--
 .../CodeGen/EmittedIL/Misc/Decimal01.il.bsl   |  8 +-
 .../EmittedIL/Misc/EntryPoint01.il.bsl        | 14 +--
 .../EmittedIL/Misc/EqualsOnUnions01.il.bsl    | 16 ++-
 .../CodeGen/EmittedIL/Misc/ForLoop01.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Misc/ForLoop02.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Misc/ForLoop03.il.bsl   | 14 +--
 .../Misc/GeneralizationOnUnions01.il.bsl      | 16 ++-
 .../Misc/GenericTypeStaticField01.il.bsl      | 14 +--
 .../EmittedIL/Misc/IfThenElse01.il.bsl        | 14 +--
 .../EmittedIL/Misc/LetIfThenElse01.il.bsl     | 12 +--
 .../CodeGen/EmittedIL/Misc/Lock01.il.bsl      | 12 +--
 .../CodeGen/EmittedIL/Misc/Marshal.il.bsl     | 14 +--
 .../EmittedIL/Misc/MethodImplNoInline.il.bsl  | 14 +--
 .../Misc/MethodImplNoInline02.il.bsl          | 14 +--
 .../Misc/ModuleWithExpression01.il.bsl        | 14 +--
 .../EmittedIL/Misc/NoBoxingOnDispose01.il.bsl | 12 +--
 .../Misc/NonEscapingArguments02.il.bsl        | 14 +--
 .../CodeGen/EmittedIL/Misc/PreserveSig.il.bsl | 14 +--
 .../EmittedIL/Misc/Seq_for_all01.il.bsl       | 14 +--
 .../CodeGen/EmittedIL/Misc/Structs01.il.bsl   | 16 ++-
 .../CodeGen/EmittedIL/Misc/Structs02.il.bsl   | 16 ++-
 .../Misc/StructsAsArrayElements01.il.bsl      | 16 ++-
 .../Misc/TryWith_NoFilterBlocks01.il.bsl      |  8 +-
 .../Source/CodeGen/EmittedIL/Misc/cas.il.bsl  | 18 +---
 .../Operators/comparison_decimal01.il.bsl     |  8 +-
 .../Linq101Aggregates01.il.bsl                | 12 +--
 .../Linq101ElementOperators01.il.bsl          | 12 +--
 .../Linq101Grouping01.il.bsl                  | 10 +-
 .../Linq101Joins01.il.bsl                     | 14 +--
 .../Linq101Ordering01.il.bsl                  | 14 +--
 .../Linq101Partitioning01.il.bsl              | 14 +--
 .../Linq101Quantifiers01.il.bsl               | 14 +--
 .../Linq101Select01.il.bsl                    | 12 +--
 .../Linq101SetOperators01.il.bsl              | 14 +--
 .../Linq101Where01.il.bsl                     | 14 +--
 .../SeqExpressionSteppingTest1.il.bsl         | 14 +--
 .../SeqExpressionSteppingTest2.il.bsl         | 14 +--
 .../SeqExpressionSteppingTest3.il.bsl         | 14 +--
 .../SeqExpressionSteppingTest4.il.bsl         | 14 +--
 .../SeqExpressionSteppingTest5.il.bsl         | 14 +--
 .../SeqExpressionSteppingTest6.il.bsl         | 14 +--
 .../SeqExpressionSteppingTest7.il.bsl         | 12 +--
 .../SeqExpressionTailCalls01.il.bsl           | 14 +--
 .../SeqExpressionTailCalls02.il.bsl           | 14 +--
 .../ToplevelModule.il.bsl                     |  2 +-
 .../ToplevelNamespace.il.bsl                  |  2 +-
 .../EmittedIL/StaticInit/LetBinding01.il.bsl  | 14 +--
 .../StaticInit/StaticInit_Class01.il.bsl      | 18 +---
 .../StaticInit/StaticInit_Module01.il.bsl     | 14 +--
 .../StaticInit/StaticInit_Struct01.il.bsl     | 14 +--
 .../SteppingMatch/SteppingMatch01.il.bsl      | 12 +--
 .../SteppingMatch/SteppingMatch02.il.bsl      | 12 +--
 .../SteppingMatch/SteppingMatch03.il.bsl      | 12 +--
 .../SteppingMatch/SteppingMatch04.il.bsl      | 12 +--
 .../SteppingMatch/SteppingMatch05.il.bsl      | 12 +--
 .../SteppingMatch/SteppingMatch06.il.bsl      | 18 ++--
 .../SteppingMatch/SteppingMatch07.il.bsl      | 18 ++--
 .../SteppingMatch/SteppingMatch08.il.bsl      | 14 +--
 .../SteppingMatch/SteppingMatch09.il.bsl      | 12 +--
 .../TestFunctions/TestFunction1.il.bsl        | 14 +--
 .../TestFunctions/TestFunction10.il.bsl       | 14 +--
 .../TestFunctions/TestFunction13.il.bsl       | 12 +--
 .../TestFunctions/TestFunction14.il.bsl       | 14 +--
 .../TestFunctions/TestFunction16.il.bsl       | 16 ++-
 .../TestFunctions/TestFunction17.il.bsl       | 16 ++-
 .../TestFunctions/TestFunction19.il.bsl       | 18 +---
 .../TestFunctions/TestFunction20.il.bsl       | 18 +---
 .../TestFunctions/TestFunction21.il.bsl       | 16 ++-
 .../TestFunctions/TestFunction23.il.bsl       | 16 ++-
 .../TestFunctions/TestFunction24.il.bsl       | 16 ++-
 .../TestFunctions/TestFunction3b.il.bsl       | 14 +--
 .../TestFunctions/TestFunction3c.il.bsl       | 19 ++--
 .../TestFunctions/TestFunction9b4.il.bsl      | 12 +--
 .../TestFunctions/Testfunction11.il.bsl       | 14 +--
 .../TestFunctions/Testfunction12.il.bsl       | 14 +--
 .../TestFunctions/Testfunction15.il.bsl       | 14 +--
 .../TestFunctions/Testfunction18.il.bsl       | 10 +-
 .../TestFunctions/Testfunction2.il.bsl        | 14 +--
 .../TestFunctions/Testfunction22.il.bsl       |  8 +-
 .../TestFunctions/Testfunction22b.il.bsl      |  8 +-
 .../TestFunctions/Testfunction22c.il.bsl      |  8 +-
 .../TestFunctions/Testfunction22d.il.bsl      |  8 +-
 .../TestFunctions/Testfunction22e.il.bsl      |  8 +-
 .../TestFunctions/Testfunction22f.il.bsl      | 13 ++-
 .../TestFunctions/Testfunction22g.il.bsl      |  8 +-
 .../TestFunctions/Testfunction22h.il.bsl      |  8 +-
 .../TestFunctions/Testfunction3.il.bsl        | 14 +--
 .../TestFunctions/Testfunction4.il.bsl        | 14 +--
 .../TestFunctions/Testfunction5.il.bsl        | 14 +--
 .../TestFunctions/Testfunction6.il.bsl        | 14 +--
 .../TestFunctions/Testfunction7.il.bsl        | 14 +--
 .../TestFunctions/Testfunction8.il.bsl        | 14 +--
 .../TestFunctions/Testfunction9.il.bsl        | 14 +--
 .../TestFunctions/Testfunction9b.il.bsl       | 14 +--
 .../TestFunctions/Testfunction9b1.il.bsl      | 14 +--
 .../TestFunctions/Testfunction9b2.il.bsl      | 14 +--
 .../TestFunctions/Testfunction9b3.il.bsl      | 14 +--
 .../EmittedIL/Tuples/OptionalArg01.il.bsl     | 18 +---
 .../CodeGen/EmittedIL/Tuples/Tuple01.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple02.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple03.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple04.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple05.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple06.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple07.il.bsl   |  8 +-
 .../CodeGen/EmittedIL/Tuples/Tuple08.il.bsl   |  8 +-
 .../EmittedIL/Tuples/TupleElimination.il.bsl  | 17 ++--
 .../EmittedIL/Tuples/TupleMonster.il.bsl      |  8 +-
 .../Tuples/ValueTupleAliasConstructor.il.bsl  | 14 +--
 .../ForLoop/ForEachOnArray01.il.bsl           | 14 +--
 .../ForLoop/ForEachOnList01.il.bsl            | 19 ++--
 .../ForLoop/ForEachOnString01.il.bsl          | 19 ++--
 .../ForLoop/NoAllocationOfTuple01.il.bsl      | 14 +--
 .../ForLoop/NoIEnumerable01.il.bsl            | 19 ++--
 .../ForLoop/NoIEnumerable02.il.bsl            | 19 ++--
 .../ForLoop/NoIEnumerable03.il.bsl            | 19 ++--
 .../ForLoop/ZeroToArrLength01.il.bsl          | 14 +--
 .../ForLoop/ZeroToArrLength02.il.bsl          | 14 +--
 .../GenericComparison/Compare01.il.bsl        | 14 +--
 .../GenericComparison/Compare02.il.bsl        | 14 +--
 .../GenericComparison/Compare03.il.bsl        | 17 ++--
 .../GenericComparison/Compare04.il.bsl        | 17 ++--
 .../GenericComparison/Compare05.il.bsl        | 16 ++-
 .../GenericComparison/Compare06.il.bsl        | 16 ++-
 .../GenericComparison/Compare07.il.bsl        | 14 +--
 .../GenericComparison/Compare08.il.bsl        | 14 +--
 .../GenericComparison/Compare09.il.bsl        | 14 +--
 .../GenericComparison/Compare10.il.bsl        | 16 ++-
 .../GenericComparison/Compare11.il.bsl        | 14 +--
 .../GenericComparison/Equals01.il.bsl         | 14 +--
 .../GenericComparison/Equals02.il.bsl         | 17 ++--
 .../GenericComparison/Equals03.il.bsl         | 17 ++--
 .../GenericComparison/Equals04.il.bsl         | 16 ++-
 .../GenericComparison/Equals05.il.bsl         | 16 ++-
 .../GenericComparison/Equals06.il.bsl         | 14 +--
 .../GenericComparison/Equals07.il.bsl         | 14 +--
 .../GenericComparison/Equals08.il.bsl         | 14 +--
 .../GenericComparison/Equals09.il.bsl         | 16 ++-
 .../GenericComparison/Hash01.il.bsl           | 14 +--
 .../GenericComparison/Hash02.il.bsl           | 18 +---
 .../GenericComparison/Hash03.il.bsl           | 17 ++--
 .../GenericComparison/Hash04.il.bsl           | 17 ++--
 .../GenericComparison/Hash05.il.bsl           | 16 ++-
 .../GenericComparison/Hash06.il.bsl           | 16 ++-
 .../GenericComparison/Hash07.il.bsl           | 14 +--
 .../GenericComparison/Hash08.il.bsl           | 16 ++-
 .../GenericComparison/Hash09.il.bsl           | 14 +--
 .../GenericComparison/Hash10.il.bsl           | 14 +--
 .../GenericComparison/Hash11.il.bsl           | 14 +--
 .../GenericComparison/Hash12.il.bsl           | 16 ++-
 .../Optimizations/Inlining/Match01.il.bsl     | 16 ++-
 .../Optimizations/Inlining/Match02.il.bsl     | 14 +--
 .../Inlining/StructUnion01.il.bsl             | 16 ++-
 219 files changed, 1234 insertions(+), 1836 deletions(-)

diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 2859130d05f..d3fe1d4019e 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -7321,10 +7321,10 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                 let name = vref.DisplayName
                 match vref.MemberInfo with
                 | None -> None
-                | Some memberInfo -> 
-                    match name, memberInfo.MemberFlags.MemberKind with 
-                    | ("Item" | "op_IndexedLookup"), (MemberKind.PropertyGet  | MemberKind.PropertySet) when not (isNil (ArgInfosOfPropertyVal g vref.Deref)) ->
-                        Some( mkILCustomAttribute g.ilg (g.FindSysILTypeRef "System.Reflection.DefaultMemberAttribute", [g.ilg.typ_String], [ILAttribElem.String(Some(name))], []) ) 
+                | Some memberInfo ->
+                    match name, memberInfo.MemberFlags.MemberKind with
+                    | ("Item" | "op_IndexedLookup"), (MemberKind.PropertyGet | MemberKind.PropertySet) when not (isNil (ArgInfosOfPropertyVal g vref.Deref)) ->
+                        Some( mkILCustomAttribute g.ilg (g.FindSysILTypeRef "System.Reflection.DefaultMemberAttribute", [g.ilg.typ_String], [ILAttribElem.String(Some name)], []) )
                     | _ -> None)
             |> Option.toList
 
@@ -7376,9 +7376,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                 tycon.AllFieldsArray |> Array.forall (fun f -> f.IsStatic)
 
             isEmptyStruct && cenv.opts.workAroundReflectionEmitBugs && not tycon.TyparsNoRange.IsEmpty
-        
+
         // Compute a bunch of useful things for each field
-        let isCLIMutable = (TryFindFSharpBoolAttribute  g g.attrib_CLIMutableAttribute tycon.Attribs = Some true)
+        let isCLIMutable = (TryFindFSharpBoolAttribute g g.attrib_CLIMutableAttribute tycon.Attribs = Some true)
         let fieldSummaries =
 
              [ for fspec in tycon.AllFieldsArray do
@@ -7406,7 +7406,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
 
                   let ilFieldOffset =
                      match TryFindFSharpAttribute g g.attrib_FieldOffsetAttribute fspec.FieldAttribs with
-                     | Some (Attrib(_, _, [ AttribInt32Arg fieldOffset ], _, _, _, _))  ->
+                     | Some (Attrib(_, _, [ AttribInt32Arg fieldOffset ], _, _, _, _)) ->
                          Some fieldOffset
                      | Some (Attrib(_, _, _, _, _, _, m)) ->
                          errorR(Error(FSComp.SR.ilFieldOffsetAttributeCouldNotBeDecoded(), m))
@@ -7421,15 +7421,15 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                         if useGenuineField then yield! fspec.PropertyAttribs
                         yield! fspec.FieldAttribs ]
 
-                            
+
                   let ilNotSerialized = HasFSharpAttributeOpt g g.attrib_NonSerializedAttribute attribs
-                  
-                  let fattribs = 
+
+                  let fattribs =
                       attribs
-                      // Do not generate FieldOffset as a true CLI custom attribute, since it is implied by other corresponding CLI metadata 
-                      |> List.filter (IsMatchingFSharpAttribute g g.attrib_FieldOffsetAttribute >> not) 
-                      // Do not generate NonSerialized as a true CLI custom attribute, since it is implied by other corresponding CLI metadata 
-                      |> List.filter (IsMatchingFSharpAttributeOpt g g.attrib_NonSerializedAttribute >> not) 
+                      // Do not generate FieldOffset as a true CLI custom attribute, since it is implied by other corresponding CLI metadata
+                      |> List.filter (IsMatchingFSharpAttribute g g.attrib_FieldOffsetAttribute >> not)
+                      // Do not generate NonSerialized as a true CLI custom attribute, since it is implied by other corresponding CLI metadata
+                      |> List.filter (IsMatchingFSharpAttributeOpt g g.attrib_NonSerializedAttribute >> not)
 
                   let ilFieldMarshal, fattribs = GenMarshal cenv fattribs
 
@@ -7437,9 +7437,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                   // AND the field is not mutable (because we can take the address of a mutable field).
                   // Otherwise fields are always accessed via their property getters/setters
                   let isFieldHidden = isPropHidden || (not useGenuineField && not isFSharpMutable)
-                  
-                  let extraAttribs = 
-                     match tyconRepr with 
+
+                  let extraAttribs =
+                     match tyconRepr with
                      | TRecdRepr _ when not useGenuineField -> [ g.DebuggerBrowsableNeverAttribute ] // hide fields in records in debug display
                      | _ -> [] // don't hide fields in classes in debug display
 
@@ -7463,13 +7463,13 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                         .WithFieldMarshal(ilFieldMarshal)
                   yield fdef
 
-               if requiresExtraField then 
-                   yield mkILInstanceField ("__dummy", g.ilg.typ_Int32, None, ILMemberAccess.Assembly) ]
-         
+               if requiresExtraField then
+                   yield mkILInstanceField("__dummy", g.ilg.typ_Int32, None, ILMemberAccess.Assembly) ]
+
         // Generate property definitions for the fields compiled as properties 
-        let ilPropertyDefsForFields = 
+        let ilPropertyDefsForFields =
              [ for (i, (useGenuineField, _, isFSharpMutable, isStatic, propAttribs, ilPropType, _, fspec)) in Seq.indexed fieldSummaries do
-                 if not useGenuineField then 
+                 if not useGenuineField then
                      let ilCallingConv = if isStatic then ILCallingConv.Static else ILCallingConv.Instance
                      let ilPropName = fspec.Name
                      let ilHasSetter = isCLIMutable || isFSharpMutable
@@ -7527,19 +7527,19 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                                                       [// 'T -> string'
                                                        funcTy
                                                        // rest follow from 'StringFormat'
-                                                       GenUnitTy cenv eenv m  
-                                                       g.ilg.typ_String 
-                                                       g.ilg.typ_String 
+                                                       GenUnitTy cenv eenv m 
+                                                       g.ilg.typ_String
+                                                       g.ilg.typ_String
                                                        g.ilg.typ_String], [])
                       // Instantiate with our own type
                       let sprintfMethSpec = mkILMethSpec(sprintfMethSpec.MethodRef, AsObject, [], [funcTy])
                       // Here's the body of the method. Call printf, then invoke the function it returns
                       let callInstrs = EraseClosures.mkCallFunc g.ilxPubCloEnv (fun _ -> 0us) eenv.tyenv.Count Normalcall (Apps_app(ilThisTy, Apps_done g.ilg.typ_String))
-                      let ilMethodDef = mkILNonGenericInstanceMethod (debugDisplayMethodName,ILMemberAccess.Assembly, [],
+                      let ilMethodDef = mkILNonGenericInstanceMethod (debugDisplayMethodName, ILMemberAccess.Assembly, [],
                                                    mkILReturn g.ilg.typ_Object,
-                                                   mkMethodBody 
+                                                   mkMethodBody
                                                          (true, [], 2,
-                                                          nonBranchingInstrsToCode 
+                                                          nonBranchingInstrsToCode
                                                             ([ // load the hardwired format string
                                                                yield I_ldstr "%+0.8A"
                                                                // make the printf format object
@@ -7588,8 +7588,8 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                  // FSharp 3.0 feature: adding CLIMutable to a record type causes emit of default constructor, and all fields get property setters
                  // Records that are value types do not create a default constructor with CLIMutable or ComVisible
                  if not isStructRecord && (isCLIMutable || (TryFindFSharpBoolAttribute g g.attrib_ComVisibleAttribute tycon.Attribs = Some true)) then
-                     yield mkILSimpleStorageCtor(None, Some g.ilg.typ_Object.TypeSpec, ilThisTy, [], [], reprAccess) 
-                 
+                     yield mkILSimpleStorageCtor(None, Some g.ilg.typ_Object.TypeSpec, ilThisTy, [], [], reprAccess)
+
                  if not (tycon.HasMember g "ToString" []) then
                     yield! GenToStringMethod cenv eenv ilThisTy m
 
@@ -7608,9 +7608,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                              | paraml -> paraml
                          GenActualSlotsig m cenv eenvinner (TSlotSig(nm, ty, ctps, mtps, paraml, returnTy)) [] []
                      yield! mkILDelegateMethods reprAccess g.ilg (g.iltyp_AsyncCallback, g.iltyp_IAsyncResult) (p, r)
-                 | _ -> 
+                 | _ ->
                      ()
-              | TUnionRepr _ when not (tycon.HasMember g "ToString" []) -> 
+              | TUnionRepr _ when not (tycon.HasMember g "ToString" []) ->
                   yield! GenToStringMethod cenv eenv ilThisTy m
               | _ -> () ]
           
@@ -7618,7 +7618,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
         let ilProperties = mkILProperties (ilPropertyDefsForFields @ abstractPropDefs)
         let ilEvents = mkILEvents abstractEventDefs
         let ilFields = mkILFields ilFieldDefs
-        
+
         let tdef, tdefDiscards =
            let isSerializable = (TryFindFSharpBoolAttribute g g.attrib_AutoSerializableAttribute tycon.Attribs <> Some false)
 
@@ -7628,14 +7628,14 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                let tdef = tdef.With(customAttrs = mkILCustomAttrs ilCustomAttrs, genericParams = ilGenParams)
                tdef, None
 
-           | TRecdRepr _ | TFSharpObjectRepr _ as tyconRepr  ->
+           | TRecdRepr _ | TFSharpObjectRepr _ as tyconRepr ->
                let super = superOfTycon g tycon
                let ilBaseTy = GenType cenv.amap m eenvinner.tyenv super
            
                // Build a basic type definition
                let isObjectType = (match tyconRepr with TFSharpObjectRepr _ -> true | _ -> false)
-               let ilAttrs = 
-                   ilCustomAttrs @ 
+               let ilAttrs =
+                   ilCustomAttrs @
                    [mkCompilationMappingAttr g
                        (int (if isObjectType
                              then SourceConstructFlags.ObjectType
@@ -7663,7 +7663,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                                             mkILMethods ilMethods, ilFields, emptyILTypeDefs, ilProperties, ilEvents, mkILCustomAttrs ilAttrs,
                                             typeDefTrigger)
 
-               // Set some the extra entries in the definition 
+               // Set some the extra entries in the definition
                let isTheSealedAttribute = tyconRefEq g tcref g.attrib_SealedAttribute.TyconRef
 
                let tdef =
@@ -7673,9 +7673,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                        .WithImport(isComInteropTy g thisTy)
                        .With(methodImpls=mkILMethodImpls methodImpls)
 
-               let tdLayout,tdEncoding = 
+               let tdLayout, tdEncoding =
                     match TryFindFSharpAttribute g g.attrib_StructLayoutAttribute tycon.Attribs with
-                    | Some (Attrib(_, _, [ AttribInt32Arg(layoutKind) ], namedArgs, _, _, _))  -> 
+                    | Some (Attrib(_, _, [ AttribInt32Arg(layoutKind) ], namedArgs, _, _, _)) ->
                         let decoder = AttributeDecoder namedArgs
                         let ilPack = decoder.FindInt32 "Pack" 0x0
                         let ilSize = decoder.FindInt32 "Size" 0x0
@@ -7753,8 +7753,8 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                     cudAlternatives= alternatives
                     cudWhere = None}
 
-               let layout = 
-                   if isStructTy g thisTy then 
+               let layout =
+                   if isStructTy g thisTy then
                        if (match ilTypeDefKind with ILTypeDefKind.ValueType -> true | _ -> false) then
                            // Structs with no instance fields get size 1, pack 0
                            ILTypeDefLayout.Sequential { Size=Some 1; Pack=Some 0us }
@@ -7763,8 +7763,8 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                    else
                        ILTypeDefLayout.Auto
 
-               let cattrs = 
-                   mkILCustomAttrs (ilCustomAttrs @ 
+               let cattrs =
+                   mkILCustomAttrs (ilCustomAttrs @
                                     [mkCompilationMappingAttr g
                                         (int (if hiddenRepr
                                               then SourceConstructFlags.SumType ||| SourceConstructFlags.NonPublicRepresentation
@@ -7829,7 +7829,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
 /// Generate the type for an F# exception declaration.
 and GenExnDef cenv mgbuf eenv m (exnc: Tycon) =
     let g = cenv.g
-    let exncref  = mkLocalEntityRef exnc
+    let exncref = mkLocalEntityRef exnc
     match exnc.ExceptionInfo with
     | TExnAbbrevRepr _ | TExnAsmRepr _ | TExnNone -> ()
     | TExnFresh _ ->
@@ -7858,16 +7858,16 @@ and GenExnDef cenv mgbuf eenv m (exnc: Tycon) =
                                  init = None,
                                  args = [],
                                  customAttrs=mkILCustomAttrs (GenAttrs cenv eenv fld.PropertyAttribs @ [mkCompilationMappingAttrWithSeqNum g (int SourceConstructFlags.Field) i]))
-               yield (ilMethodDef, ilFieldDef, ilPropDef, (ilPropName, ilFieldName, ilPropType)) ] 
+               yield (ilMethodDef, ilFieldDef, ilPropDef, (ilPropName, ilFieldName, ilPropType)) ]
              |> List.unzip4
 
-        let ilCtorDef = 
+        let ilCtorDef =
             mkILSimpleStorageCtorWithParamNames(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], ChooseParamNames fieldNamesAndTypes, reprAccess) 
 
         // In compiled code, all exception types get a parameterless constructor for use with XML serialization
         // This does default-initialization of all fields
-        let ilCtorDefNoArgs = 
-            if not (isNil fieldNamesAndTypes) then 
+        let ilCtorDefNoArgs =
+            if not (isNil fieldNamesAndTypes) then
                 [ mkILSimpleStorageCtor(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], [], reprAccess) ]
             else
                 []
@@ -7878,7 +7878,7 @@ and GenExnDef cenv mgbuf eenv m (exnc: Tycon) =
           | Some serializationInfoType, Some streamingContextType ->
             let ilCtorDefForSerialization =
                 mkILCtor(ILMemberAccess.Family,
-                        [mkILParamNamed("info", serializationInfoType); mkILParamNamed("context", streamingContextType)],
+                        [mkILParamNamed("info", serializationInfoType);mkILParamNamed("context", streamingContextType)],
                         mkMethodBody
                           (false, [], 8,
                            nonBranchingInstrsToCode
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
index 8192cf8f300..b2f7c4caff8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AsyncExpressionSteppingTest1
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000260
 }
-.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest1
-{
-  // Offset: 0x00000268 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest1
 {
-  // Offset: 0x00000270 Length: 0x000000B1
+  // Offset: 0x00000268 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest1.dll
-// MVID: {5E172EE9-6394-B5D4-A745-0383E92E175E}
+// MVID: {5F972A55-6394-B5D4-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B30000
+// Image base: 0x06830000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
index 4458b102ecb..647f0b9921e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AsyncExpressionSteppingTest2
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000260
 }
-.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest2
-{
-  // Offset: 0x00000268 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest2
 {
-  // Offset: 0x00000270 Length: 0x000000B1
+  // Offset: 0x00000268 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest2.dll
-// MVID: {5E172EE9-6394-D499-A745-0383E92E175E}
+// MVID: {5F972A55-6394-D499-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B70000
+// Image base: 0x068B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
index 5295afe21a8..bce144589e7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AsyncExpressionSteppingTest3
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000026B
 }
-.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest3
-{
-  // Offset: 0x00000270 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest3
 {
-  // Offset: 0x00000278 Length: 0x000000B1
+  // Offset: 0x00000270 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest3.dll
-// MVID: {5E172EE9-6394-F35E-A745-0383E92E175E}
+// MVID: {5F972A55-6394-F35E-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B40000
+// Image base: 0x06C50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
index ff6fdbc4003..c2c8261a44f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AsyncExpressionSteppingTest4
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000026B
 }
-.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest4
-{
-  // Offset: 0x00000270 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest4
 {
-  // Offset: 0x00000278 Length: 0x000000B1
+  // Offset: 0x00000270 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest4.dll
-// MVID: {5E172EE9-6394-6D4B-A745-0383E92E175E}
+// MVID: {5F972A55-6394-6D4B-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04EB0000
+// Image base: 0x06980000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
index 0295edd8d7e..5f7de40ef2a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AsyncExpressionSteppingTest5
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002AC
 }
-.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest5
-{
-  // Offset: 0x000002B0 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest5
 {
-  // Offset: 0x000002C0 Length: 0x000000BE
+  // Offset: 0x000002B0 Length: 0x000000BE
 }
 .module AsyncExpressionSteppingTest5.dll
-// MVID: {5E172EE9-6394-30E8-A745-0383E92E175E}
+// MVID: {5F972A55-6394-30E8-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x051B0000
+// Image base: 0x06DD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
index 92419a88da4..561c0296597 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AsyncExpressionSteppingTest6
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000297
 }
-.mresource public FSharpSignatureDataB.AsyncExpressionSteppingTest6
-{
-  // Offset: 0x000002A0 Length: 0x00000008
-}
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest6
 {
-  // Offset: 0x000002B0 Length: 0x000000BE
+  // Offset: 0x000002A0 Length: 0x000000BE
 }
 .module AsyncExpressionSteppingTest6.dll
-// MVID: {5E172EE9-6394-4FAD-A745-0383E92E175E}
+// MVID: {5F972A55-6394-4FAD-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05730000
+// Image base: 0x08DA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
index 6b5b69437b4..8c9dd21d4da 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Default
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Default
 {
-  // Offset: 0x000003F8 Length: 0x0000001A
+  // Offset: 0x000003F8 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.Default
 {
-  // Offset: 0x00000418 Length: 0x000000BA
-}
-.mresource public FSharpOptimizationDataB.Default
-{
-  // Offset: 0x000004D8 Length: 0x00000003
+  // Offset: 0x00000400 Length: 0x000000BA
 }
 .module Default.dll
-// MVID: {5E172EE9-AAA9-67BB-A745-0383E92E175E}
+// MVID: {5F972A55-AAA9-67BB-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F50000
+// Image base: 0x09620000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
index a4a24276b28..13c7da2bc61 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Field
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Field
 {
-  // Offset: 0x000003F0 Length: 0x0000001A
+  // Offset: 0x000003F0 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.Field
 {
-  // Offset: 0x00000410 Length: 0x000000B8
-}
-.mresource public FSharpOptimizationDataB.Field
-{
-  // Offset: 0x000004D0 Length: 0x00000003
+  // Offset: 0x000003F8 Length: 0x000000B8
 }
 .module Field.dll
-// MVID: {5E172EE9-96F8-CD6E-A745-0383E92E175E}
+// MVID: {5F972A55-96F8-CD6E-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00AD0000
+// Image base: 0x069B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
index fc67fb1a820..79e1268210d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Property
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Property
 {
-  // Offset: 0x000003F8 Length: 0x0000001A
+  // Offset: 0x000003F8 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.Property
 {
-  // Offset: 0x00000418 Length: 0x000000BB
-}
-.mresource public FSharpOptimizationDataB.Property
-{
-  // Offset: 0x000004D8 Length: 0x00000003
+  // Offset: 0x00000400 Length: 0x000000BB
 }
 .module Property.dll
-// MVID: {5E172EE9-9B5C-7949-A745-0383E92E175E}
+// MVID: {5F972A55-9B5C-7949-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06660000
+// Image base: 0x06790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
index ed293df765b..2ca79077c5b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CCtorDUWithMember01
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.CCtorDUWithMember01
 {
-  // Offset: 0x00000780 Length: 0x00000085
+  // Offset: 0x00000780 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.CCtorDUWithMember01
 {
-  // Offset: 0x00000810 Length: 0x00000227
-}
-.mresource public FSharpOptimizationDataB.CCtorDUWithMember01
-{
-  // Offset: 0x00000A40 Length: 0x0000002F
+  // Offset: 0x00000788 Length: 0x00000227
 }
 .module CCtorDUWithMember01.exe
-// MVID: {5E172EE9-26F1-14EE-A745-0383E92E175E}
+// MVID: {5F972A55-26F1-14EE-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04F90000
+// Image base: 0x06E20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
index ca350d4eb5f..79da48b37ed 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CCtorDUWithMember02
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000302
 }
-.mresource public FSharpSignatureDataB.CCtorDUWithMember02
-{
-  // Offset: 0x00000308 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.CCtorDUWithMember02
 {
-  // Offset: 0x00000310 Length: 0x000000E4
+  // Offset: 0x00000308 Length: 0x000000E4
 }
 .module CCtorDUWithMember02.exe
-// MVID: {5E172EE9-D176-C99D-A745-0383E92E175E}
+// MVID: {5F972A55-D176-C99D-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E50000
+// Image base: 0x06BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
index 21214051e43..8a28cad710d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CCtorDUWithMember03
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000293
 }
-.mresource public FSharpSignatureDataB.CCtorDUWithMember03
-{
-  // Offset: 0x00000298 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.CCtorDUWithMember03
 {
-  // Offset: 0x000002A0 Length: 0x000000B2
+  // Offset: 0x00000298 Length: 0x000000B2
 }
 .module CCtorDUWithMember03.exe
-// MVID: {5E172EE9-C97B-D207-A745-0383E92E175E}
+// MVID: {5F972A55-C97B-D207-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05A80000
+// Image base: 0x065A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
index 9818c01e75f..e7d837dfe3d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CCtorDUWithMember04
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000293
 }
-.mresource public FSharpSignatureDataB.CCtorDUWithMember04
-{
-  // Offset: 0x00000298 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.CCtorDUWithMember04
 {
-  // Offset: 0x000002A0 Length: 0x000000B2
+  // Offset: 0x00000298 Length: 0x000000B2
 }
 .module CCtorDUWithMember04.exe
-// MVID: {5E172EE9-CF28-717B-A745-0383E92E175E}
+// MVID: {5F972A55-CF28-717B-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x06E80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
index d499744c0e5..36f788dd567 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CompiledNameAttribute01
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.CompiledNameAttribute01
 {
-  // Offset: 0x00000270 Length: 0x00000009
+  // Offset: 0x00000270 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute01
 {
-  // Offset: 0x00000280 Length: 0x00000086
+  // Offset: 0x00000278 Length: 0x00000086
 }
 .module CompiledNameAttribute01.exe
-// MVID: {5E172EE9-EF5A-FC2A-A745-0383E92E175E}
+// MVID: {5F972A55-EF5A-FC2A-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05690000
+// Image base: 0x06C20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
index 880b10e280a..4a1bb05f81d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CompiledNameAttribute02
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002E4
 }
-.mresource public FSharpSignatureDataB.CompiledNameAttribute02
-{
-  // Offset: 0x000002E8 Length: 0x00000011
-}
 .mresource public FSharpOptimizationData.CompiledNameAttribute02
 {
-  // Offset: 0x00000300 Length: 0x000000CD
-}
-.mresource public FSharpOptimizationDataB.CompiledNameAttribute02
-{
-  // Offset: 0x000003D8 Length: 0x00000006
+  // Offset: 0x000002E8 Length: 0x000000CD
 }
 .module CompiledNameAttribute02.exe
-// MVID: {5E172EE9-F755-F3C0-A745-0383E92E175E}
+// MVID: {5F972A55-F755-F3C0-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x06AD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
index f1225f0a8d0..ab7e55430cf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CompiledNameAttribute03
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.CompiledNameAttribute03
 {
-  // Offset: 0x00000278 Length: 0x00000009
+  // Offset: 0x00000278 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute03
 {
-  // Offset: 0x00000288 Length: 0x00000086
+  // Offset: 0x00000280 Length: 0x00000086
 }
 .module CompiledNameAttribute03.exe
-// MVID: {5E172EE9-2CE4-60B9-A745-0383E92E175E}
+// MVID: {5F972A55-2CE4-60B9-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00A60000
+// Image base: 0x067F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
index eb9fe794b59..2be23266ea6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CompiledNameAttribute04
 {
@@ -29,28 +29,28 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute04
 {
-  // Offset: 0x00000000 Length: 0x00000CD1
+  // Offset: 0x00000000 Length: 0x00000CD9
 }
 .mresource public FSharpSignatureDataB.CompiledNameAttribute04
 {
-  // Offset: 0x00000CD8 Length: 0x00000110
+  // Offset: 0x00000CE0 Length: 0x00000007
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute04
 {
-  // Offset: 0x00000DF0 Length: 0x000002CB
+  // Offset: 0x00000CF0 Length: 0x000002CB
 }
 .mresource public FSharpOptimizationDataB.CompiledNameAttribute04
 {
-  // Offset: 0x000010C0 Length: 0x0000004E
+  // Offset: 0x00000FC0 Length: 0x00000002
 }
 .module CompiledNameAttribute04.exe
-// MVID: {5E172EE9-34DF-584F-A745-0383E92E175E}
+// MVID: {5F972A55-34DF-584F-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05A80000
+// Image base: 0x06E70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
index 3801147eea9..6f458f11610 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020E
 }
-.mresource public FSharpSignatureDataB.ComputationExpr01
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ComputationExpr01
 {
-  // Offset: 0x00000220 Length: 0x0000007D
+  // Offset: 0x00000218 Length: 0x0000007D
 }
 .module ComputationExpr01.exe
-// MVID: {5E172EEA-3703-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-3703-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x068A0000
+// Image base: 0x06740000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
index def473dac08..bd87c2a8946 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020E
 }
-.mresource public FSharpSignatureDataB.ComputationExpr02
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ComputationExpr02
 {
-  // Offset: 0x00000220 Length: 0x0000007D
+  // Offset: 0x00000218 Length: 0x0000007D
 }
 .module ComputationExpr02.exe
-// MVID: {5E172EEA-3624-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-3624-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069E0000
+// Image base: 0x08EF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
index 5ecaa602414..f5d12cafea8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000238
 }
-.mresource public FSharpSignatureDataB.ComputationExpr03
-{
-  // Offset: 0x00000240 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ComputationExpr03
 {
-  // Offset: 0x00000248 Length: 0x0000008C
+  // Offset: 0x00000240 Length: 0x0000008C
 }
 .module ComputationExpr03.exe
-// MVID: {5E172EEA-3649-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-3649-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F90000
+// Image base: 0x06650000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
index abbfeb2028a..f98d58ba46b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020E
 }
-.mresource public FSharpSignatureDataB.ComputationExpr04
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ComputationExpr04
 {
-  // Offset: 0x00000220 Length: 0x0000007D
+  // Offset: 0x00000218 Length: 0x0000007D
 }
 .module ComputationExpr04.exe
-// MVID: {5E172EEA-366A-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-366A-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x073C0000
+// Image base: 0x06B10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
index 6ab8b1c9c59..3d5d1d04f80 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020E
 }
-.mresource public FSharpSignatureDataB.ComputationExpr05
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ComputationExpr05
 {
-  // Offset: 0x00000220 Length: 0x0000007D
+  // Offset: 0x00000218 Length: 0x0000007D
 }
 .module ComputationExpr05.exe
-// MVID: {5E172EEA-3687-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-3687-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056B0000
+// Image base: 0x07140000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
index b1281cbd296..54e07a12562 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020E
 }
-.mresource public FSharpSignatureDataB.ComputationExpr06
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ComputationExpr06
 {
-  // Offset: 0x00000220 Length: 0x0000007D
+  // Offset: 0x00000218 Length: 0x0000007D
 }
 .module ComputationExpr06.exe
-// MVID: {5E172EEA-35A8-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-35A8-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07000000
+// Image base: 0x06AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
index 6123bc95719..e5ec63dc3af 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020E
 }
-.mresource public FSharpSignatureDataB.ComputationExpr07
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ComputationExpr07
 {
-  // Offset: 0x00000220 Length: 0x0000007D
+  // Offset: 0x00000218 Length: 0x0000007D
 }
 .module ComputationExpr07.exe
-// MVID: {5E172EEA-35BD-E566-A745-0383EA2E175E}
+// MVID: {5F972A55-35BD-E566-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05490000
+// Image base: 0x06600000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
index 207466bed34..f4105d64e9a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_CSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_CSInterface
 {
-  // Offset: 0x00000270 Length: 0x00000007
+  // Offset: 0x00000270 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_CSInterface
 {
-  // Offset: 0x00000280 Length: 0x000000A6
+  // Offset: 0x00000278 Length: 0x000000A6
 }
 .module DoNotBoxStruct_ArrayOfArray_CSInterface.exe
-// MVID: {5E172EEA-FF24-C89E-A745-0383EA2E175E}
+// MVID: {5F972A55-FF24-C89E-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07000000
+// Image base: 0x069F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
index 62f05da4440..1ffa3743f5e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_FSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface
 {
-  // Offset: 0x00000278 Length: 0x00000008
+  // Offset: 0x00000278 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface
 {
-  // Offset: 0x00000288 Length: 0x000000A6
+  // Offset: 0x00000280 Length: 0x000000A6
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface.exe
-// MVID: {5E172EEA-8A45-C8A0-A745-0383EA2E175E}
+// MVID: {5F972A55-8A45-C8A0-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E90000
+// Image base: 0x092B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
index 659c4f2f9b7..18cc350c253 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000298 Length: 0x00000008
+  // Offset: 0x00000298 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x000002A8 Length: 0x000000BA
+  // Offset: 0x000002A0 Length: 0x000000BA
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.exe
-// MVID: {5E172EEA-1475-D984-A745-0383EA2E175E}
+// MVID: {5F972A55-1475-D984-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B10000
+// Image base: 0x04CB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 80,82 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
index fda1b46ad9f..a12395112cc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_Array_CSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_CSInterface
 {
-  // Offset: 0x00000258 Length: 0x00000006
+  // Offset: 0x00000258 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_CSInterface
 {
-  // Offset: 0x00000268 Length: 0x00000098
+  // Offset: 0x00000260 Length: 0x00000098
 }
 .module DoNotBoxStruct_Array_CSInterface.exe
-// MVID: {5E172EEA-1735-654E-A745-0383EA2E175E}
+// MVID: {5F972A55-1735-654E-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05450000
+// Image base: 0x06BF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
index 60b58866f5a..797c1b49f37 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_Array_FSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface
 {
-  // Offset: 0x00000260 Length: 0x00000007
+  // Offset: 0x00000260 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface
 {
-  // Offset: 0x00000270 Length: 0x00000098
+  // Offset: 0x00000268 Length: 0x00000098
 }
 .module DoNotBoxStruct_Array_FSInterface.exe
-// MVID: {5E172EEA-1737-9DA5-A745-0383EA2E175E}
+// MVID: {5F972A55-1737-9DA5-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06C00000
+// Image base: 0x07300000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
index de311f0a4f8..18813f1cf97 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000278 Length: 0x00000007
+  // Offset: 0x00000278 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000288 Length: 0x000000AC
+  // Offset: 0x00000280 Length: 0x000000AC
 }
 .module DoNotBoxStruct_Array_FSInterface_NoExtMeth.exe
-// MVID: {5E172EEA-8127-3EE3-A745-0383EA2E175E}
+// MVID: {5F972A55-8127-3EE3-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00AF0000
+// Image base: 0x08DD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 74,76 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
index 6a0cc6bc5c5..a48c67cc25f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_MDArray_CSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_CSInterface
 {
-  // Offset: 0x00000260 Length: 0x00000006
+  // Offset: 0x00000260 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_CSInterface
 {
-  // Offset: 0x00000270 Length: 0x0000009C
+  // Offset: 0x00000268 Length: 0x0000009C
 }
 .module DoNotBoxStruct_MDArray_CSInterface.exe
-// MVID: {5E172EEA-24A8-8796-A745-0383EA2E175E}
+// MVID: {5F972A55-24A8-8796-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04D60000
+// Image base: 0x06900000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
index e00dbe4d4b5..5db1502c77b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_MDArray_FSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface
 {
-  // Offset: 0x00000260 Length: 0x00000007
+  // Offset: 0x00000260 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface
 {
-  // Offset: 0x00000270 Length: 0x0000009C
+  // Offset: 0x00000268 Length: 0x0000009C
 }
 .module DoNotBoxStruct_MDArray_FSInterface.exe
-// MVID: {5E172EEA-8279-DA45-A745-0383EA2E175E}
+// MVID: {5F972A55-8279-DA45-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05790000
+// Image base: 0x06830000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
index a6ae718815d..0b0c726fbfd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000280 Length: 0x00000007
+  // Offset: 0x00000280 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000290 Length: 0x000000B0
+  // Offset: 0x00000288 Length: 0x000000B0
 }
 .module DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.exe
-// MVID: {5E172EEA-A67D-867A-A745-0383EA2E175E}
+// MVID: {5F972A55-A67D-867A-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06A00000
+// Image base: 0x06CE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 77,79 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
index 4b8db85a65b..c22f8f080da 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_NoArray_CSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_CSInterface
 {
-  // Offset: 0x00000250 Length: 0x00000005
+  // Offset: 0x00000250 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_CSInterface
 {
-  // Offset: 0x00000260 Length: 0x0000009C
+  // Offset: 0x00000258 Length: 0x0000009C
 }
 .module DoNotBoxStruct_NoArray_CSInterface.exe
-// MVID: {5E172EEA-5654-8082-A745-0383EA2E175E}
+// MVID: {5F972A55-5654-8082-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05080000
+// Image base: 0x09AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
index dfa1f69aed6..18f6c403c01 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_NoArray_FSInterface
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface
 {
-  // Offset: 0x00000250 Length: 0x00000006
+  // Offset: 0x00000250 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface
 {
-  // Offset: 0x00000260 Length: 0x0000009C
+  // Offset: 0x00000258 Length: 0x0000009C
 }
 .module DoNotBoxStruct_NoArray_FSInterface.exe
-// MVID: {5E172EEA-3F8A-B9D0-A745-0383EA2E175E}
+// MVID: {5F972A55-3F8A-B9D0-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04D90000
+// Image base: 0x06E90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
index 1d97f47b55a..5733a2d8340 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000270 Length: 0x00000006
+  // Offset: 0x00000270 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000280 Length: 0x000000B0
+  // Offset: 0x00000278 Length: 0x000000B0
 }
 .module DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.exe
-// MVID: {5E172EEA-CD0A-F713-A745-0383EA2E175E}
+// MVID: {5F972A55-CD0A-F713-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05780000
+// Image base: 0x07240000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 68,70 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
index 12879c75dea..89dab1650f2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly DoNotBoxStruct_ToString
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.DoNotBoxStruct_ToString
 {
-  // Offset: 0x00000208 Length: 0x00000004
+  // Offset: 0x00000208 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ToString
 {
   // Offset: 0x00000210 Length: 0x00000086
 }
 .module DoNotBoxStruct_ToString.exe
-// MVID: {5E172EEA-8D34-C606-A745-0383EA2E175E}
+// MVID: {5F972A55-8D34-C606-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05180000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
index c850d3c5f73..58c18d5e020 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly GenIter01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F3
 }
-.mresource public FSharpSignatureDataB.GenIter01
-{
-  // Offset: 0x000001F8 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.GenIter01
 {
-  // Offset: 0x00000200 Length: 0x0000007A
+  // Offset: 0x000001F8 Length: 0x0000007A
 }
 .module GenIter01.exe
-// MVID: {5E172EE9-F836-DC98-A745-0383E92E175E}
+// MVID: {5F972A55-F836-DC98-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06990000
+// Image base: 0x06F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
index d3529d70cb0..bf425f46f44 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly GenIter02
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F4
 }
-.mresource public FSharpSignatureDataB.GenIter02
-{
-  // Offset: 0x000001F8 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.GenIter02
 {
-  // Offset: 0x00000200 Length: 0x0000007B
+  // Offset: 0x000001F8 Length: 0x0000007B
 }
 .module GenIter02.exe
-// MVID: {5E172EE9-F857-DC98-A745-0383E92E175E}
+// MVID: {5F972A55-F857-DC98-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05200000
+// Image base: 0x098B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
index b11ae5dd02d..7a143029d01 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly GenIter03
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F4
 }
-.mresource public FSharpSignatureDataB.GenIter03
-{
-  // Offset: 0x000001F8 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.GenIter03
 {
-  // Offset: 0x00000200 Length: 0x0000007B
+  // Offset: 0x000001F8 Length: 0x0000007B
 }
 .module GenIter03.exe
-// MVID: {5E172EE9-F77C-DC98-A745-0383E92E175E}
+// MVID: {5F972A55-F77C-DC98-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06D80000
+// Image base: 0x07250000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
index 525d99725ee..9126a44dfbc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly GenIter04
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001E4
 }
-.mresource public FSharpSignatureDataB.GenIter04
-{
-  // Offset: 0x000001E8 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.GenIter04
 {
-  // Offset: 0x000001F0 Length: 0x0000007B
+  // Offset: 0x000001E8 Length: 0x0000007B
 }
 .module GenIter04.exe
-// MVID: {5E172EE9-F79D-DC98-A745-0383E92E175E}
+// MVID: {5F972A55-F79D-DC98-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05200000
+// Image base: 0x09750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
index bcda8a39a7c..09fc1e215ff 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly InequalityComparison01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020A
 }
-.mresource public FSharpSignatureDataB.InequalityComparison01
-{
-  // Offset: 0x00000210 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.InequalityComparison01
 {
-  // Offset: 0x00000220 Length: 0x00000085
+  // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison01.exe
-// MVID: {5E172EE9-263A-E6D5-A745-0383E92E175E}
+// MVID: {5F972A55-263A-E6D5-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F90000
+// Image base: 0x08D40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
index bb4deb3a3a0..95b56faed4d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly InequalityComparison02
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020A
 }
-.mresource public FSharpSignatureDataB.InequalityComparison02
-{
-  // Offset: 0x00000210 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.InequalityComparison02
 {
-  // Offset: 0x00000220 Length: 0x00000085
+  // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison02.exe
-// MVID: {5E172EE9-263A-E72C-A745-0383E92E175E}
+// MVID: {5F972A55-263A-E72C-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06800000
+// Image base: 0x07420000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
index 486ec3ca464..5bc7287e3f5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly InequalityComparison03
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020A
 }
-.mresource public FSharpSignatureDataB.InequalityComparison03
-{
-  // Offset: 0x00000210 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.InequalityComparison03
 {
-  // Offset: 0x00000220 Length: 0x00000085
+  // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison03.exe
-// MVID: {5E172EE9-263A-E70B-A745-0383E92E175E}
+// MVID: {5F972A55-263A-E70B-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F80000
+// Image base: 0x06970000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
index 463b9ce1162..b51da8b0c4a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly InequalityComparison04
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020A
 }
-.mresource public FSharpSignatureDataB.InequalityComparison04
-{
-  // Offset: 0x00000210 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.InequalityComparison04
 {
-  // Offset: 0x00000220 Length: 0x00000085
+  // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison04.exe
-// MVID: {5E172EE9-263A-E772-A745-0383E92E175E}
+// MVID: {5F972A55-263A-E772-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06740000
+// Image base: 0x08E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
index d3be0b41b70..1718964d376 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly InequalityComparison05
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.InequalityComparison05
 {
-  // Offset: 0x00000238 Length: 0x0000000A
+  // Offset: 0x00000238 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.InequalityComparison05
 {
-  // Offset: 0x00000248 Length: 0x00000085
+  // Offset: 0x00000240 Length: 0x00000085
 }
 .module InequalityComparison05.exe
-// MVID: {5E172EE9-263A-E751-A745-0383E92E175E}
+// MVID: {5F972A55-263A-E751-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06AE0000
+// Image base: 0x092C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
index 29cc4a14779..b05d724f905 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ListExpressionSteppingTest1
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000269
 }
-.mresource public FSharpSignatureDataB.ListExpressionSteppingTest1
-{
-  // Offset: 0x00000270 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest1
 {
-  // Offset: 0x00000278 Length: 0x000000AF
+  // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest1.exe
-// MVID: {5E172EE8-50CF-F6CE-A745-0383E82E175E}
+// MVID: {5F972A55-50CF-F6CE-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04D20000
+// Image base: 0x09870000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
index e8408fc48f6..65180b27683 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ListExpressionSteppingTest2
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000269
 }
-.mresource public FSharpSignatureDataB.ListExpressionSteppingTest2
-{
-  // Offset: 0x00000270 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest2
 {
-  // Offset: 0x00000278 Length: 0x000000AF
+  // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest2.exe
-// MVID: {5E172EE8-D3DE-B780-A745-0383E82E175E}
+// MVID: {5F972A55-D3DE-B780-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B90000
+// Image base: 0x06790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
index 1735b9fd58d..33b41ea807f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ListExpressionSteppingTest3
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000279
 }
-.mresource public FSharpSignatureDataB.ListExpressionSteppingTest3
-{
-  // Offset: 0x00000280 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest3
 {
-  // Offset: 0x00000290 Length: 0x000000AF
+  // Offset: 0x00000280 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest3.exe
-// MVID: {5E172EE8-AE45-39B4-A745-0383E82E175E}
+// MVID: {5F972A55-AE45-39B4-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x07190000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
index 10e15495ff0..4544f41dc25 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ListExpressionSteppingTest4
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000269
 }
-.mresource public FSharpSignatureDataB.ListExpressionSteppingTest4
-{
-  // Offset: 0x00000270 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest4
 {
-  // Offset: 0x00000278 Length: 0x000000AF
+  // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest4.exe
-// MVID: {5E172EE8-3154-FA67-A745-0383E82E175E}
+// MVID: {5F972A55-3154-FA67-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x050B0000
+// Image base: 0x066D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
index 71d72eea401..5f260379adf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ListExpressionSteppingTest5
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000269
 }
-.mresource public FSharpSignatureDataB.ListExpressionSteppingTest5
-{
-  // Offset: 0x00000270 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest5
 {
-  // Offset: 0x00000278 Length: 0x000000AF
+  // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest5.exe
-// MVID: {5E172EE8-CBE3-BFEA-A745-0383E82E175E}
+// MVID: {5F972A55-CBE3-BFEA-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05180000
+// Image base: 0x06B30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
index b354ad7db9d..8bbdb87c318 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ListExpressionSteppingTest6
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000291
 }
-.mresource public FSharpSignatureDataB.ListExpressionSteppingTest6
-{
-  // Offset: 0x00000298 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.ListExpressionSteppingTest6
 {
-  // Offset: 0x000002A8 Length: 0x000000BC
+  // Offset: 0x00000298 Length: 0x000000BC
 }
 .module ListExpressionSteppingTest6.exe
-// MVID: {5E172EE8-98A2-AB14-A745-0383E82E175E}
+// MVID: {5F972A55-98A2-AB14-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x057E0000
+// Image base: 0x06A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
index 118e00512ae..96e21af823e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.AggressiveInlining
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000347
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.AggressiveInlining
-{
-  // Offset: 0x00000350 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.AggressiveInlining
 {
-  // Offset: 0x00000360 Length: 0x00000085
+  // Offset: 0x00000350 Length: 0x00000085
 }
 .module MethodImplAttribute.AggressiveInlining.dll
-// MVID: {5E172EE8-66DC-14D3-A745-0383E82E175E}
+// MVID: {5F972A55-66DC-14D3-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x071D0000
+// Image base: 0x09520000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
index 772633b0749..68b09878223 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.ForwardRef
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000032D
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.ForwardRef
-{
-  // Offset: 0x00000338 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.ForwardRef
 {
-  // Offset: 0x00000348 Length: 0x0000007D
+  // Offset: 0x00000338 Length: 0x0000007D
 }
 .module MethodImplAttribute.ForwardRef.dll
-// MVID: {5E172EE8-C517-03FF-A745-0383E82E175E}
+// MVID: {5F972A55-C517-03FF-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05250000
+// Image base: 0x06900000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
index 2950354ee78..6e8e67e1e20 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.InternalCall
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000335
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.InternalCall
-{
-  // Offset: 0x00000340 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.InternalCall
 {
-  // Offset: 0x00000350 Length: 0x0000007F
+  // Offset: 0x00000340 Length: 0x0000007F
 }
 .module MethodImplAttribute.InternalCall.dll
-// MVID: {5E172EE8-FBF7-6A35-A745-0383E82E175E}
+// MVID: {5F972A55-FBF7-6A35-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E70000
+// Image base: 0x06770000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
index b0f9638afa9..6b732c3239e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.NoInlining
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000032D
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.NoInlining
-{
-  // Offset: 0x00000338 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.NoInlining
 {
-  // Offset: 0x00000348 Length: 0x0000007D
+  // Offset: 0x00000338 Length: 0x0000007D
 }
 .module MethodImplAttribute.NoInlining.dll
-// MVID: {5E172EE8-F47B-58B3-A745-0383E82E175E}
+// MVID: {5F972A55-F47B-58B3-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05880000
+// Image base: 0x091F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
index a0c9572e55c..162f0931376 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.NoOptimization
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000339
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.NoOptimization
-{
-  // Offset: 0x00000340 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.NoOptimization
 {
-  // Offset: 0x00000350 Length: 0x00000081
+  // Offset: 0x00000340 Length: 0x00000081
 }
 .module MethodImplAttribute.NoOptimization.dll
-// MVID: {5E172EE8-D394-5177-A745-0383E82E175E}
+// MVID: {5F972A55-D394-5177-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06360000
+// Image base: 0x06900000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
index 25c341fbd82..57f9944a1f6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.PreserveSig
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000332
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.PreserveSig
-{
-  // Offset: 0x00000338 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.PreserveSig
 {
-  // Offset: 0x00000348 Length: 0x0000007E
+  // Offset: 0x00000338 Length: 0x0000007E
 }
 .module MethodImplAttribute.PreserveSig.dll
-// MVID: {5E172EE8-0C64-31CC-A745-0383E82E175E}
+// MVID: {5F972A55-0C64-31CC-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B10000
+// Image base: 0x06BE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
index 76ec08780d2..d0f4e1ead51 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.Synchronized
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000333
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.Synchronized
-{
-  // Offset: 0x00000338 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.Synchronized
 {
-  // Offset: 0x00000348 Length: 0x0000007F
+  // Offset: 0x00000338 Length: 0x0000007F
 }
 .module MethodImplAttribute.Synchronized.dll
-// MVID: {5E172EE8-D8F1-2CC7-A745-0383E82E175E}
+// MVID: {5F972A55-D8F1-2CC7-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00A00000
+// Image base: 0x08DD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
index 6a0823cee6b..7d23ef8c645 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly MethodImplAttribute.Unmanaged
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000032A
 }
-.mresource public FSharpSignatureDataB.MethodImplAttribute.Unmanaged
-{
-  // Offset: 0x00000330 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.MethodImplAttribute.Unmanaged
 {
-  // Offset: 0x00000340 Length: 0x0000007C
+  // Offset: 0x00000330 Length: 0x0000007C
 }
 .module MethodImplAttribute.Unmanaged.dll
-// MVID: {5E172EE8-FF34-309C-A745-0383E82E175E}
+// MVID: {5F972A55-FF34-309C-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06FB0000
+// Image base: 0x08E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
index 6039244c15e..f2cc7cd2a65 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AbstractClass
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000302
 }
-.mresource public FSharpSignatureDataB.AbstractClass
-{
-  // Offset: 0x00000308 Length: 0x00000015
-}
 .mresource public FSharpOptimizationData.AbstractClass
 {
-  // Offset: 0x00000328 Length: 0x000000B1
-}
-.mresource public FSharpOptimizationDataB.AbstractClass
-{
-  // Offset: 0x000003E0 Length: 0x00000003
+  // Offset: 0x00000308 Length: 0x000000B1
 }
 .module AbstractClass.exe
-// MVID: {5E172EE9-333C-8BAF-A745-0383E92E175E}
+// MVID: {5F972A55-333C-8BAF-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BC0000
+// Image base: 0x06900000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
index 4ef8a731858..0ef58f0f50c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly AnonRecd
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.AnonRecd
 {
-  // Offset: 0x000001C8 Length: 0x00000004
+  // Offset: 0x000001C8 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.AnonRecd
 {
   // Offset: 0x000001D0 Length: 0x0000006B
 }
 .module AnonRecd.exe
-// MVID: {5E172EE9-C42F-5208-A745-0383E92E175E}
+// MVID: {5F972A55-C42F-5208-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05610000
+// Image base: 0x09940000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl
index f5371aab3c8..c533c1aa489 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ArgumentNamesInClosures01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ArgumentNamesInClosures01
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000039B
 }
-.mresource public FSharpSignatureDataB.ArgumentNamesInClosures01
-{
-  // Offset: 0x000003A0 Length: 0x00000021
-}
 .mresource public FSharpOptimizationData.ArgumentNamesInClosures01
 {
-  // Offset: 0x000003C8 Length: 0x0000010D
-}
-.mresource public FSharpOptimizationDataB.ArgumentNamesInClosures01
-{
-  // Offset: 0x000004E0 Length: 0x0000000F
+  // Offset: 0x000003A0 Length: 0x0000010D
 }
 .module ArgumentNamesInClosures01.dll
-// MVID: {5E172EE9-39CA-41B5-A745-0383E92E175E}
+// MVID: {5F972A55-39CA-41B5-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06D60000
+// Image base: 0x08E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
index abe476356b5..e0e9cc0a361 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CodeGenRenamings01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000003C8
 }
-.mresource public FSharpSignatureDataB.CodeGenRenamings01
-{
-  // Offset: 0x000003D0 Length: 0x00000019
-}
 .mresource public FSharpOptimizationData.CodeGenRenamings01
 {
-  // Offset: 0x000003F0 Length: 0x0000011B
+  // Offset: 0x000003D0 Length: 0x0000011B
 }
 .module CodeGenRenamings01.exe
-// MVID: {5E172EE9-8173-986B-A745-0383E92E175E}
+// MVID: {5F972A55-8173-986B-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04E70000
+// Image base: 0x06CE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
index 4fcbfcabad5..dd4e879cce2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly CustomAttributeGenericParameter01
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.CustomAttributeGenericParameter01
 {
-  // Offset: 0x000002C8 Length: 0x00000006
+  // Offset: 0x000002C8 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.CustomAttributeGenericParameter01
 {
-  // Offset: 0x000002D8 Length: 0x0000007A
+  // Offset: 0x000002D0 Length: 0x0000007A
 }
 .module CustomAttributeGenericParameter01.exe
-// MVID: {5E172EE9-F08A-F524-A745-0383E92E175E}
+// MVID: {5F972A55-F08A-F524-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05490000
+// Image base: 0x07000000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
index 6fa27f19cbf..a7ba294dc67 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.Decimal01
 {
-  // Offset: 0x00000000 Length: 0x00000139
+  // Offset: 0x00000000 Length: 0x0000013B
 }
 .mresource public FSharpOptimizationData.Decimal01
 {
   // Offset: 0x00000140 Length: 0x00000050
 }
 .module Decimal01.exe
-// MVID: {5F1F9A50-F150-FA46-A745-0383509A1F5F}
+// MVID: {5F972A55-F150-FA46-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06840000
+// Image base: 0x070C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,7 +71,7 @@
     // Code size       13 (0xd)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 9,13 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Decimal01.fs'
+    .line 6,6 : 9,13 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Decimal01.fs'
     IL_0000:  ldc.i4.s   12
     IL_0002:  ldc.i4.0
     IL_0003:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
index 566922839df..6229e69a52b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly EntryPoint01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000024F
 }
-.mresource public FSharpSignatureDataB.EntryPoint01
-{
-  // Offset: 0x00000258 Length: 0x00000008
-}
 .mresource public FSharpOptimizationData.EntryPoint01
 {
-  // Offset: 0x00000268 Length: 0x00000090
+  // Offset: 0x00000258 Length: 0x00000090
 }
 .module EntryPoint01.exe
-// MVID: {5E172EE9-9846-72C1-A745-0383E92E175E}
+// MVID: {5F972A55-9846-72C1-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05A10000
+// Image base: 0x06F10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
index c7e2dd89161..b3c1f7096e9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly EqualsOnUnions01
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.EqualsOnUnions01
 {
-  // Offset: 0x00000640 Length: 0x0000007B
+  // Offset: 0x00000640 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.EqualsOnUnions01
 {
-  // Offset: 0x000006C0 Length: 0x000001C7
-}
-.mresource public FSharpOptimizationDataB.EqualsOnUnions01
-{
-  // Offset: 0x00000890 Length: 0x0000002A
+  // Offset: 0x00000648 Length: 0x000001C7
 }
 .module EqualsOnUnions01.exe
-// MVID: {5E172EE9-BBFB-14A0-A745-0383E92E175E}
+// MVID: {5F972A55-BBFB-14A0-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06840000
+// Image base: 0x06760000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
index d1b2c04707a..a1330e858cd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ForLoop01
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x00000050
 }
 .module ForLoop01.exe
-// MVID: {5E172EE9-1795-791C-A745-0383E92E175E}
+// MVID: {5F972A55-1795-791C-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056B0000
+// Image base: 0x06870000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
index fe28223388d..e9d441d8400 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ForLoop02
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x00000050
 }
 .module ForLoop02.exe
-// MVID: {5E172EE9-1736-791C-A745-0383E92E175E}
+// MVID: {5F972A55-1736-791C-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05390000
+// Image base: 0x06730000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
index a0998d6e8b5..f776a6d1f6c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ForLoop03
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F6
 }
-.mresource public FSharpSignatureDataB.ForLoop03
-{
-  // Offset: 0x00000200 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.ForLoop03
 {
-  // Offset: 0x00000210 Length: 0x0000007B
+  // Offset: 0x00000200 Length: 0x0000007B
 }
 .module ForLoop03.exe
-// MVID: {5E172EE9-1757-791C-A745-0383E92E175E}
+// MVID: {5F972A55-1757-791C-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06820000
+// Image base: 0x067C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
index 90b16fdc3c9..c2843e0af25 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly GeneralizationOnUnions01
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.GeneralizationOnUnions01
 {
-  // Offset: 0x00000690 Length: 0x0000007F
+  // Offset: 0x00000690 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.GeneralizationOnUnions01
 {
-  // Offset: 0x00000718 Length: 0x000001F4
-}
-.mresource public FSharpOptimizationDataB.GeneralizationOnUnions01
-{
-  // Offset: 0x00000910 Length: 0x0000002A
+  // Offset: 0x00000698 Length: 0x000001F4
 }
 .module GeneralizationOnUnions01.exe
-// MVID: {5E172EE9-4CA2-8CD1-A745-0383E92E175E}
+// MVID: {5F972A55-4CA2-8CD1-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05970000
+// Image base: 0x068C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
index f24c9360fab..4957a445a2d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly GenericTypeStaticField01
 {
@@ -33,24 +33,24 @@
 }
 .mresource public FSharpSignatureDataB.GenericTypeStaticField01
 {
-  // Offset: 0x00000608 Length: 0x0000004C
+  // Offset: 0x00000608 Length: 0x00000015
 }
 .mresource public FSharpOptimizationData.GenericTypeStaticField01
 {
-  // Offset: 0x00000658 Length: 0x000001E1
+  // Offset: 0x00000628 Length: 0x000001E1
 }
 .mresource public FSharpOptimizationDataB.GenericTypeStaticField01
 {
-  // Offset: 0x00000840 Length: 0x00000018
+  // Offset: 0x00000810 Length: 0x00000006
 }
 .module GenericTypeStaticField01.exe
-// MVID: {5E172EE9-1E75-7E6B-A745-0383E92E175E}
+// MVID: {5F972A55-1E75-7E6B-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07000000
+// Image base: 0x09B10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl
index cf0b0512acb..e1461b431e8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/IfThenElse01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly IfThenElse01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001FD
 }
-.mresource public FSharpSignatureDataB.IfThenElse01
-{
-  // Offset: 0x00000208 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.IfThenElse01
 {
-  // Offset: 0x00000210 Length: 0x00000092
+  // Offset: 0x00000208 Length: 0x00000092
 }
 .module IfThenElse01.dll
-// MVID: {5E172EE9-2D6C-0B5D-A745-0383E92E175E}
+// MVID: {5F972A55-2D6C-0B5D-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x067D0000
+// Image base: 0x074E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
index 773e36db404..c82f7b80c38 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly LetIfThenElse01
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.LetIfThenElse01
 {
-  // Offset: 0x000001E0 Length: 0x00000007
+  // Offset: 0x000001E0 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.LetIfThenElse01
 {
-  // Offset: 0x000001F0 Length: 0x00000076
+  // Offset: 0x000001E8 Length: 0x00000076
 }
 .module LetIfThenElse01.exe
-// MVID: {5E172EE9-BE5A-D8FD-A745-0383E92E175E}
+// MVID: {5F972A55-BE5A-D8FD-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06FC0000
+// Image base: 0x09140000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
index d37e2f889b7..8eb360f2de6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Lock01.il.bsl
@@ -36,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000180
 }
-.mresource public FSharpSignatureDataB.Lock01
-{
-  // Offset: 0x00000188 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.Lock01
 {
-  // Offset: 0x00000190 Length: 0x00000064
+  // Offset: 0x00000188 Length: 0x00000064
 }
 .module Lock01.exe
-// MVID: {5F1F9A50-2BCA-B308-A745-0383509A1F5F}
+// MVID: {5F972A55-2BCA-B308-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06970000
+// Image base: 0x06940000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -81,7 +77,7 @@
       // Code size       2 (0x2)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 20,20 : 19,21 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Lock01.fs'
+      .line 20,20 : 19,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Misc\\Lock01.fs'
       IL_0000:  ldnull
       IL_0001:  ret
     } // end of method clo@20::Invoke
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
index 316736df6c0..cdc029a6bc3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Marshal
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000507
 }
-.mresource public FSharpSignatureDataB.Marshal
-{
-  // Offset: 0x00000510 Length: 0x00000025
-}
 .mresource public FSharpOptimizationData.Marshal
 {
-  // Offset: 0x00000540 Length: 0x0000004E
+  // Offset: 0x00000510 Length: 0x0000004E
 }
 .module Marshal.exe
-// MVID: {5E172EE9-7500-369C-A745-0383E92E175E}
+// MVID: {5F972A55-7500-369C-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05560000
+// Image base: 0x058B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
index 6a989e4de59..2773eb1e52f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
@@ -32,26 +32,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002FB
 }
-.mresource public FSharpSignatureDataB.MethodImplNoInline
-{
-  // Offset: 0x00000300 Length: 0x00000008
-}
 .mresource public FSharpOptimizationData.MethodImplNoInline
 {
-  // Offset: 0x00000310 Length: 0x000000F5
-}
-.mresource public FSharpOptimizationDataB.MethodImplNoInline
-{
-  // Offset: 0x00000410 Length: 0x00000009
+  // Offset: 0x00000300 Length: 0x000000F5
 }
 .module MethodImplNoInline.exe
-// MVID: {5E172EE9-4480-09E2-A745-0383E92E175E}
+// MVID: {5F972A55-4480-09E2-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056D0000
+// Image base: 0x08F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
index 698485454f0..86679759817 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
@@ -32,26 +32,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000301
 }
-.mresource public FSharpSignatureDataB.MethodImplNoInline02
-{
-  // Offset: 0x00000308 Length: 0x00000008
-}
 .mresource public FSharpOptimizationData.MethodImplNoInline02
 {
-  // Offset: 0x00000318 Length: 0x000000F9
-}
-.mresource public FSharpOptimizationDataB.MethodImplNoInline02
-{
-  // Offset: 0x00000418 Length: 0x00000009
+  // Offset: 0x00000308 Length: 0x000000F9
 }
 .module MethodImplNoInline02.exe
-// MVID: {5E172EE9-084F-1A8E-A745-0383E92E175E}
+// MVID: {5F972A55-084F-1A8E-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04E70000
+// Image base: 0x072F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
index d59358b23c4..ca2aaeddef8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ModuleWithExpression01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000020A
 }
-.mresource public FSharpSignatureDataB.ModuleWithExpression01
-{
-  // Offset: 0x00000210 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.ModuleWithExpression01
 {
-  // Offset: 0x00000218 Length: 0x000000A6
+  // Offset: 0x00000210 Length: 0x000000A6
 }
 .module ModuleWithExpression01.exe
-// MVID: {5E172EE9-CD1E-A8B4-A745-0383E92E175E}
+// MVID: {5F972A55-CD1E-A8B4-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06CF0000
+// Image base: 0x067B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
index 0f5279f2c01..c20e6d78d11 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly NoBoxingOnDispose01
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.NoBoxingOnDispose01
 {
-  // Offset: 0x00000220 Length: 0x00000005
+  // Offset: 0x00000220 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.NoBoxingOnDispose01
 {
-  // Offset: 0x00000230 Length: 0x0000007F
+  // Offset: 0x00000228 Length: 0x0000007F
 }
 .module NoBoxingOnDispose01.exe
-// MVID: {5E172EE9-4EA9-C934-A745-0383E92E175E}
+// MVID: {5F972A55-4EA9-C934-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06550000
+// Image base: 0x07350000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
index 5157c0a2df9..efededb5d58 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly NonEscapingArguments02
 {
@@ -33,24 +33,24 @@
 }
 .mresource public FSharpSignatureDataB.NonEscapingArguments02
 {
-  // Offset: 0x00000360 Length: 0x0000001C
+  // Offset: 0x00000360 Length: 0x00000005
 }
 .mresource public FSharpOptimizationData.NonEscapingArguments02
 {
-  // Offset: 0x00000380 Length: 0x0000019E
+  // Offset: 0x00000370 Length: 0x0000019E
 }
 .mresource public FSharpOptimizationDataB.NonEscapingArguments02
 {
-  // Offset: 0x00000528 Length: 0x0000000D
+  // Offset: 0x00000518 Length: 0x00000002
 }
 .module NonEscapingArguments02.dll
-// MVID: {5E172EE9-BB56-6582-A745-0383E92E175E}
+// MVID: {5F972A55-BB56-6582-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B50000
+// Image base: 0x06900000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
index 1efb93c58ae..6fafbfec224 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly PreserveSig
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002F1
 }
-.mresource public FSharpSignatureDataB.PreserveSig
-{
-  // Offset: 0x000002F8 Length: 0x0000000F
-}
 .mresource public FSharpOptimizationData.PreserveSig
 {
-  // Offset: 0x00000310 Length: 0x0000004A
+  // Offset: 0x000002F8 Length: 0x0000004A
 }
 .module PreserveSig.dll
-// MVID: {5E172EE9-E8CC-64FE-A745-0383E92E175E}
+// MVID: {5F972A55-E8CC-64FE-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070E0000
+// Image base: 0x069E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl
index 995e2aa8d3a..5c8cf7df3fc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Seq_for_all01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Seq_for_all01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001A7
 }
-.mresource public FSharpSignatureDataB.Seq_for_all01
-{
-  // Offset: 0x000001B0 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.Seq_for_all01
 {
-  // Offset: 0x000001B8 Length: 0x00000072
+  // Offset: 0x000001B0 Length: 0x00000072
 }
 .module Seq_for_all01.exe
-// MVID: {5E172EE9-D30D-BA80-A745-0383E92E175E}
+// MVID: {5F972A55-D30D-BA80-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B80000
+// Image base: 0x06D10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
index e9547bf842d..e7f7b8bef93 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Structs01
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Structs01
 {
-  // Offset: 0x00000748 Length: 0x00000093
+  // Offset: 0x00000748 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Structs01
 {
-  // Offset: 0x000007E0 Length: 0x00000231
-}
-.mresource public FSharpOptimizationDataB.Structs01
-{
-  // Offset: 0x00000A18 Length: 0x00000035
+  // Offset: 0x00000750 Length: 0x00000231
 }
 .module Structs01.exe
-// MVID: {5E172EE9-701F-5E27-A745-0383E92E175E}
+// MVID: {5F972A55-701F-5E27-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F50000
+// Image base: 0x067B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
index 4a6acdcb362..3225534d3b5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Structs02
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Structs02
 {
-  // Offset: 0x00000780 Length: 0x00000096
+  // Offset: 0x00000780 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Structs02
 {
-  // Offset: 0x00000820 Length: 0x00000237
-}
-.mresource public FSharpOptimizationDataB.Structs02
-{
-  // Offset: 0x00000A60 Length: 0x00000035
+  // Offset: 0x00000788 Length: 0x00000237
 }
 .module Structs02.exe
-// MVID: {5E172EE9-7040-5E27-A745-0383E92E175E}
+// MVID: {5F972A55-7040-5E27-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05800000
+// Image base: 0x06F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
index 9fff6dd6eb2..bb736c0da39 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly StructsAsArrayElements01
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.StructsAsArrayElements01
 {
-  // Offset: 0x00000758 Length: 0x0000009B
+  // Offset: 0x00000758 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.StructsAsArrayElements01
 {
-  // Offset: 0x000007F8 Length: 0x0000022C
-}
-.mresource public FSharpOptimizationDataB.StructsAsArrayElements01
-{
-  // Offset: 0x00000A28 Length: 0x00000038
+  // Offset: 0x00000760 Length: 0x0000022C
 }
 .module StructsAsArrayElements01.dll
-// MVID: {5E172EE9-29F3-6E68-A745-0383E92E175E}
+// MVID: {5F972A55-29F3-6E68-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F10000
+// Image base: 0x071A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
index ce48c684fae..64b4cc2029d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TryWith_NoFilterBlocks01
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x0000005F
 }
 .module TryWith_NoFilterBlocks01.exe
-// MVID: {5E172EE9-3DEF-9A40-A745-0383E92E175E}
+// MVID: {5F972A55-3DEF-9A40-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04EC0000
+// Image base: 0x08D00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
index 220781c651f..4f4d5ce1fe6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern cas
 {
@@ -38,26 +38,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000619
 }
-.mresource public FSharpSignatureDataB.cas
-{
-  // Offset: 0x00000620 Length: 0x00000026
-}
 .mresource public FSharpOptimizationData.cas
 {
-  // Offset: 0x00000650 Length: 0x000000F3
-}
-.mresource public FSharpOptimizationDataB.cas
-{
-  // Offset: 0x00000748 Length: 0x00000008
+  // Offset: 0x00000620 Length: 0x000000F3
 }
 .module cas.exe
-// MVID: {5E172EE9-35EA-18E3-A745-0383E92E175E}
+// MVID: {5F972A55-35EA-18E3-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05200000
+// Image base: 0x06D40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
index fefd5e583ba..4e3706a5e70 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.comparison_decimal01
 {
-  // Offset: 0x00000000 Length: 0x00000170
+  // Offset: 0x00000000 Length: 0x00000172
 }
 .mresource public FSharpOptimizationData.comparison_decimal01
 {
   // Offset: 0x00000178 Length: 0x0000005B
 }
 .module comparison_decimal01.exe
-// MVID: {5F1FA087-76D8-7EE3-A745-038387A01F5F}
+// MVID: {5F972A55-76D8-7EE3-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BE0000
+// Image base: 0x08E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,7 +71,7 @@
     // Code size       228 (0xe4)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 9,20 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
+    .line 4,4 : 9,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
     IL_0000:  ldc.i4.s   10
     IL_0002:  ldc.i4.0
     IL_0003:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
index aa54f9ff122..aed578ab405 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Aggregates01.il.bsl
@@ -45,22 +45,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000608
 }
-.mresource public FSharpSignatureDataB.Linq101Aggregates01
-{
-  // Offset: 0x00000610 Length: 0x00000027
-}
 .mresource public FSharpOptimizationData.Linq101Aggregates01
 {
-  // Offset: 0x00000640 Length: 0x00000211
+  // Offset: 0x00000610 Length: 0x00000211
 }
 .module Linq101Aggregates01.exe
-// MVID: {5E172EEB-D281-4783-A745-0383EB2E175E}
+// MVID: {5F972A56-D281-4783-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x052A0000
+// Image base: 0x06AB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -114,7 +110,7 @@
       .locals init ([0] int32 V_0,
                [1] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Aggregates01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Aggregates01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Aggregates01/uniqueFactors@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
index b3b3eb96df4..b02e5481b42 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101ElementOperators01.il.bsl
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000037E
 }
-.mresource public FSharpSignatureDataB.Linq101ElementOperators01
-{
-  // Offset: 0x00000388 Length: 0x0000000C
-}
 .mresource public FSharpOptimizationData.Linq101ElementOperators01
 {
-  // Offset: 0x00000398 Length: 0x00000127
+  // Offset: 0x00000388 Length: 0x00000127
 }
 .module Linq101ElementOperators01.exe
-// MVID: {5E172EEB-19D7-C20D-A745-0383EB2E175E}
+// MVID: {5F972A56-19D7-C20D-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05260000
+// Image base: 0x06C00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -109,7 +105,7 @@
       .locals init ([0] class [Utils]Utils/Product V_0,
                [1] class [Utils]Utils/Product p)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101ElementOperators01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101ElementOperators01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101ElementOperators01/products12@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
index e2903d37c9e..2af6ec48eb5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Grouping01.il.bsl
@@ -45,22 +45,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000403
 }
-.mresource public FSharpSignatureDataB.Linq101Grouping01
-{
-  // Offset: 0x00000408 Length: 0x0000001E
-}
 .mresource public FSharpOptimizationData.Linq101Grouping01
 {
-  // Offset: 0x00000430 Length: 0x00000129
+  // Offset: 0x00000408 Length: 0x00000129
 }
 .module Linq101Grouping01.exe
-// MVID: {5E172EEB-FB79-E5BF-A745-0383EB2E175E}
+// MVID: {5F972A56-FB79-E5BF-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06EC0000
+// Image base: 0x068F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl
index 9450225888b..ce65a407aaf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Joins01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern Utils
 {
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000030A
 }
-.mresource public FSharpSignatureDataB.Linq101Joins01
-{
-  // Offset: 0x00000310 Length: 0x00000011
-}
 .mresource public FSharpOptimizationData.Linq101Joins01
 {
-  // Offset: 0x00000328 Length: 0x000000C3
+  // Offset: 0x00000310 Length: 0x000000C3
 }
 .module Linq101Joins01.exe
-// MVID: {5E172EEB-151B-685E-A745-0383EB2E175E}
+// MVID: {5F972A56-151B-685E-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05180000
+// Image base: 0x06C70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl
index b87ab4c1ecc..63bf6701504 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Ordering01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern Utils
 {
@@ -35,22 +35,18 @@
 {
   // Offset: 0x00000000 Length: 0x000003AE
 }
-.mresource public FSharpSignatureDataB.Linq101Ordering01
-{
-  // Offset: 0x000003B8 Length: 0x00000012
-}
 .mresource public FSharpOptimizationData.Linq101Ordering01
 {
-  // Offset: 0x000003D0 Length: 0x00000134
+  // Offset: 0x000003B8 Length: 0x00000134
 }
 .module Linq101Ordering01.exe
-// MVID: {5E172EEB-649A-6956-A745-0383EB2E175E}
+// MVID: {5F972A56-649A-6956-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05770000
+// Image base: 0x09620000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
index 119375510ec..2aa4871ffc6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Partitioning01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern Utils
 {
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x000003D2
 }
-.mresource public FSharpSignatureDataB.Linq101Partitioning01
-{
-  // Offset: 0x000003D8 Length: 0x00000014
-}
 .mresource public FSharpOptimizationData.Linq101Partitioning01
 {
-  // Offset: 0x000003F0 Length: 0x00000138
+  // Offset: 0x000003D8 Length: 0x00000138
 }
 .module Linq101Partitioning01.exe
-// MVID: {5E172EEB-B280-A6A2-A745-0383EB2E175E}
+// MVID: {5F972A56-B280-A6A2-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05A80000
+// Image base: 0x06FE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
index 53dffdbd1fb..7c9308799fc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Quantifiers01.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern Utils
 {
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000393
 }
-.mresource public FSharpSignatureDataB.Linq101Quantifiers01
-{
-  // Offset: 0x00000398 Length: 0x00000012
-}
 .mresource public FSharpOptimizationData.Linq101Quantifiers01
 {
-  // Offset: 0x000003B0 Length: 0x000000FF
+  // Offset: 0x00000398 Length: 0x000000FF
 }
 .module Linq101Quantifiers01.exe
-// MVID: {5E172EEB-76DD-E373-A745-0383EB2E175E}
+// MVID: {5F972A56-76DD-E373-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05120000
+// Image base: 0x08E00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -109,7 +105,7 @@
       .locals init ([0] string V_0,
                [1] string w)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Quantifiers01.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Quantifiers01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      int32 Linq101Quantifiers01/iAfterE@12::pc
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
index 5f5a627602b..7e0a7634bd6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Select01.il.bsl
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000657
 }
-.mresource public FSharpSignatureDataB.Linq101Select01
-{
-  // Offset: 0x00000660 Length: 0x00000035
-}
 .mresource public FSharpOptimizationData.Linq101Select01
 {
-  // Offset: 0x000006A0 Length: 0x00000204
+  // Offset: 0x00000660 Length: 0x00000204
 }
 .module Linq101Select01.exe
-// MVID: {5E172EEB-6057-8F80-A745-0383EB2E175E}
+// MVID: {5F972A56-6057-8F80-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05950000
+// Image base: 0x073A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -86,7 +82,7 @@
       .maxstack  5
       .locals init ([0] int32 n)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 12,12 : 9,28 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Select01.fs'
+      .line 12,12 : 9,28 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\QueryExpressionStepping\\Linq101Select01.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 13,13 : 9,23 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
index c300ca6037f..9d8453171de 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101SetOperators01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern Utils
 {
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000038C
 }
-.mresource public FSharpSignatureDataB.Linq101SetOperators01
-{
-  // Offset: 0x00000390 Length: 0x0000000E
-}
 .mresource public FSharpOptimizationData.Linq101SetOperators01
 {
-  // Offset: 0x000003A8 Length: 0x0000011E
+  // Offset: 0x00000390 Length: 0x0000011E
 }
 .module Linq101SetOperators01.exe
-// MVID: {5E172EEB-4EE5-349F-A745-0383EB2E175E}
+// MVID: {5F972A56-4EE5-349F-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x07320000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
index 0ac2b348ad2..2af0917f401 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/QueryExpressionStepping/Linq101Where01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly extern Utils
 {
@@ -40,22 +40,18 @@
 {
   // Offset: 0x00000000 Length: 0x000003CA
 }
-.mresource public FSharpSignatureDataB.Linq101Where01
-{
-  // Offset: 0x000003D0 Length: 0x00000012
-}
 .mresource public FSharpOptimizationData.Linq101Where01
 {
-  // Offset: 0x000003E8 Length: 0x0000012E
+  // Offset: 0x000003D0 Length: 0x0000012E
 }
 .module Linq101Where01.exe
-// MVID: {5E172EEB-FF23-CD21-A745-0383EB2E175E}
+// MVID: {5F972A56-FF23-CD21-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06990000
+// Image base: 0x06530000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
index 292e94a8948..8ca303f2f8e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest1
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000263
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest1
-{
-  // Offset: 0x00000268 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest1
 {
-  // Offset: 0x00000270 Length: 0x000000AD
+  // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest1.exe
-// MVID: {5E172EEB-2432-947D-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-947D-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06570000
+// Image base: 0x06790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
index bac373d1c8e..f7f98069f5f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest2
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000263
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest2
-{
-  // Offset: 0x00000268 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest2
 {
-  // Offset: 0x00000270 Length: 0x000000AD
+  // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest2.exe
-// MVID: {5E172EEB-2432-951E-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-951E-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06CF0000
+// Image base: 0x092C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
index 9448b989f16..4f512fd968f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest3
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000273
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest3
-{
-  // Offset: 0x00000278 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest3
 {
-  // Offset: 0x00000288 Length: 0x000000AD
+  // Offset: 0x00000278 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest3.exe
-// MVID: {5E172EEB-2432-943F-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-943F-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F30000
+// Image base: 0x09100000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
index 93d2751ce6f..a2b31282cfe 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest4
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000263
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest4
-{
-  // Offset: 0x00000268 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest4
 {
-  // Offset: 0x00000270 Length: 0x000000AD
+  // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest4.exe
-// MVID: {5E172EEB-2432-93E0-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-93E0-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F90000
+// Image base: 0x06D70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
index 109bbf0dd1b..ec77a4a878c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest5
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000263
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest5
-{
-  // Offset: 0x00000268 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest5
 {
-  // Offset: 0x00000270 Length: 0x000000AD
+  // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest5.exe
-// MVID: {5E172EEB-2432-9401-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-9401-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B50000
+// Image base: 0x097C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
index 34db9d218d3..217c51ea871 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest6
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000298
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest6
-{
-  // Offset: 0x000002A0 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest6
 {
-  // Offset: 0x000002B0 Length: 0x000000BA
+  // Offset: 0x000002A0 Length: 0x000000BA
 }
 .module SeqExpressionSteppingTest6.exe
-// MVID: {5E172EEB-2432-94A2-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-94A2-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05500000
+// Image base: 0x06A50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
index b7891e4f00c..b7a2de2766b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionSteppingTest7
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SeqExpressionSteppingTest7
 {
-  // Offset: 0x00000270 Length: 0x00000007
+  // Offset: 0x00000270 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest7
 {
-  // Offset: 0x00000280 Length: 0x00000098
+  // Offset: 0x00000278 Length: 0x00000098
 }
 .module SeqExpressionSteppingTest7.exe
-// MVID: {5E172EEB-2432-93C3-A745-0383EB2E175E}
+// MVID: {5F972A56-2432-93C3-A745-0383562A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056D0000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
index cb1dc0dcf4d..588853d826c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionTailCalls01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000219
 }
-.mresource public FSharpSignatureDataB.SeqExpressionTailCalls01
-{
-  // Offset: 0x00000220 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.SeqExpressionTailCalls01
 {
-  // Offset: 0x00000228 Length: 0x0000008C
+  // Offset: 0x00000220 Length: 0x0000008C
 }
 .module SeqExpressionTailCalls01.exe
-// MVID: {5E172EE9-093A-A6BE-A745-0383E92E175E}
+// MVID: {5F972A55-093A-A6BE-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07150000
+// Image base: 0x06830000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
index 113a6903e16..ecd5ebad611 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SeqExpressionTailCalls02
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000252
 }
-.mresource public FSharpSignatureDataB.SeqExpressionTailCalls02
-{
-  // Offset: 0x00000258 Length: 0x00000008
-}
 .mresource public FSharpOptimizationData.SeqExpressionTailCalls02
 {
-  // Offset: 0x00000268 Length: 0x0000009E
+  // Offset: 0x00000258 Length: 0x0000009E
 }
 .module SeqExpressionTailCalls02.exe
-// MVID: {5E172EE9-093A-EC43-A745-0383E92E175E}
+// MVID: {5F972A55-093A-EC43-A745-0383552A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x071D0000
+// Image base: 0x091F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
index 12e248098a4..8f7043eeff2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
@@ -1,4 +1,4 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
index 12e248098a4..8f7043eeff2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
@@ -1,4 +1,4 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
index 5434a3a9e45..3a2b12606bc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly LetBinding01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001B0
 }
-.mresource public FSharpSignatureDataB.LetBinding01
-{
-  // Offset: 0x000001B8 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.LetBinding01
 {
-  // Offset: 0x000001C0 Length: 0x00000070
+  // Offset: 0x000001B8 Length: 0x00000070
 }
 .module LetBinding01.exe
-// MVID: {5E172EE8-269D-BEEF-A745-0383E82E175E}
+// MVID: {5F972A68-269D-BEEF-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070F0000
+// Image base: 0x09810000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
index c54bea6ecd5..7dc5eb6653e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly StaticInit_Class01
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000032F
 }
-.mresource public FSharpSignatureDataB.StaticInit_Class01
-{
-  // Offset: 0x00000338 Length: 0x00000011
-}
 .mresource public FSharpOptimizationData.StaticInit_Class01
 {
-  // Offset: 0x00000350 Length: 0x000000AD
-}
-.mresource public FSharpOptimizationDataB.StaticInit_Class01
-{
-  // Offset: 0x00000408 Length: 0x00000003
+  // Offset: 0x00000338 Length: 0x000000AD
 }
 .module StaticInit_Class01.dll
-// MVID: {5E172EE8-EC34-E66E-A745-0383E82E175E}
+// MVID: {5F972A68-EC34-E66E-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06510000
+// Image base: 0x068D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
index 32669ce9feb..dff3712ca51 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly StaticInit_Module01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002A3
 }
-.mresource public FSharpSignatureDataB.StaticInit_Module01
-{
-  // Offset: 0x000002A8 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.StaticInit_Module01
 {
-  // Offset: 0x000002B0 Length: 0x000000DF
+  // Offset: 0x000002A8 Length: 0x000000DF
 }
 .module StaticInit_Module01.dll
-// MVID: {5E172EE8-705F-DF4F-A745-0383E82E175E}
+// MVID: {5F972A68-705F-DF4F-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05400000
+// Image base: 0x08EC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
index e3a7b35c405..9262fb9088b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
@@ -38,24 +38,20 @@
 }
 .mresource public FSharpSignatureDataB.StaticInit_Struct01
 {
-  // Offset: 0x000007A8 Length: 0x0000009B
+  // Offset: 0x000007A8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.StaticInit_Struct01
 {
-  // Offset: 0x00000848 Length: 0x0000021F
-}
-.mresource public FSharpOptimizationDataB.StaticInit_Struct01
-{
-  // Offset: 0x00000A70 Length: 0x00000035
+  // Offset: 0x000007B0 Length: 0x0000021F
 }
 .module StaticInit_Struct01.dll
-// MVID: {5E172EE8-05F6-D6CB-A745-0383E82E175E}
+// MVID: {5F972A68-05F6-D6CB-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x053B0000
+// Image base: 0x07130000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -85,7 +81,7 @@
       .locals init ([0] valuetype StaticInit_Struct01/C& V_0,
                [1] class [mscorlib]System.Collections.IComparer V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 4,4 : 6,7 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Struct01.fs'
+      .line 4,4 : 6,7 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\StaticInit\\StaticInit_Struct01.fs'
       IL_0000:  ldarga.s   obj
       IL_0002:  stloc.0
       IL_0003:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
index 485613166c2..b227ab22d9b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch01
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch01
 {
-  // Offset: 0x00000218 Length: 0x00000007
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.SteppingMatch01
 {
-  // Offset: 0x00000228 Length: 0x0000007A
+  // Offset: 0x00000220 Length: 0x0000007A
 }
 .module SteppingMatch01.dll
-// MVID: {5E172EE8-ABFD-13F6-A745-0383E82E175E}
+// MVID: {5F972A68-ABFD-13F6-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06540000
+// Image base: 0x07060000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
index 0d83af4b9e2..18d25b34ab8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch02
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch02
 {
-  // Offset: 0x00000218 Length: 0x00000007
+  // Offset: 0x00000218 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.SteppingMatch02
 {
-  // Offset: 0x00000228 Length: 0x0000007A
+  // Offset: 0x00000220 Length: 0x0000007A
 }
 .module SteppingMatch02.dll
-// MVID: {5E172EE8-CAC2-C63D-A745-0383E82E175E}
+// MVID: {5F972A68-CAC2-C63D-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E60000
+// Image base: 0x095E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
index 5dbc80fbea3..471b225f756 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch03
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch03
 {
-  // Offset: 0x00000230 Length: 0x00000009
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.SteppingMatch03
 {
-  // Offset: 0x00000240 Length: 0x0000007A
+  // Offset: 0x00000238 Length: 0x0000007A
 }
 .module SteppingMatch03.dll
-// MVID: {5E172EE8-4E87-D110-A745-0383E82E175E}
+// MVID: {5F972A68-4E87-D110-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07340000
+// Image base: 0x06AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
index 2cce90853e3..0e38ced2f44 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch04
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch04
 {
-  // Offset: 0x00000230 Length: 0x00000009
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.SteppingMatch04
 {
-  // Offset: 0x00000240 Length: 0x0000007B
+  // Offset: 0x00000238 Length: 0x0000007B
 }
 .module SteppingMatch04.dll
-// MVID: {5E172EE8-6D4C-8357-A745-0383E82E175E}
+// MVID: {5F972A68-6D4C-8357-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05030000
+// Image base: 0x07160000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
index b55e53fda35..e8125dabf40 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch05
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch05
 {
-  // Offset: 0x00000230 Length: 0x00000009
+  // Offset: 0x00000230 Length: 0x00000003
 }
 .mresource public FSharpOptimizationData.SteppingMatch05
 {
-  // Offset: 0x00000240 Length: 0x0000007B
+  // Offset: 0x00000238 Length: 0x0000007B
 }
 .module SteppingMatch05.dll
-// MVID: {5E172EE8-30E9-4ADA-A745-0383E82E175E}
+// MVID: {5F972A68-30E9-4ADA-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04F70000
+// Image base: 0x08E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
index 7f698c780df..41a55384d17 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch06
 {
@@ -29,28 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch06
 {
-  // Offset: 0x00000000 Length: 0x0000066D
+  // Offset: 0x00000000 Length: 0x00000675
 }
 .mresource public FSharpSignatureDataB.SteppingMatch06
 {
-  // Offset: 0x00000678 Length: 0x0000007D
+  // Offset: 0x00000680 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.SteppingMatch06
 {
-  // Offset: 0x00000700 Length: 0x000001D9
-}
-.mresource public FSharpOptimizationDataB.SteppingMatch06
-{
-  // Offset: 0x000008E0 Length: 0x0000002A
+  // Offset: 0x00000688 Length: 0x000001D9
 }
 .module SteppingMatch06.dll
-// MVID: {5E172EE8-4FAE-FD21-A745-0383E82E175E}
+// MVID: {5F972A68-4FAE-FD21-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069B0000
+// Image base: 0x06EB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
index 1af0d6ccf76..edc1e05d6fd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch07
 {
@@ -29,28 +29,24 @@
 }
 .mresource public FSharpSignatureData.SteppingMatch07
 {
-  // Offset: 0x00000000 Length: 0x0000066D
+  // Offset: 0x00000000 Length: 0x00000675
 }
 .mresource public FSharpSignatureDataB.SteppingMatch07
 {
-  // Offset: 0x00000678 Length: 0x0000007D
+  // Offset: 0x00000680 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.SteppingMatch07
 {
-  // Offset: 0x00000700 Length: 0x000001D9
-}
-.mresource public FSharpOptimizationDataB.SteppingMatch07
-{
-  // Offset: 0x000008E0 Length: 0x0000002A
+  // Offset: 0x00000688 Length: 0x000001D9
 }
 .module SteppingMatch07.dll
-// MVID: {5E172EE8-D373-07F3-A745-0383E82E175E}
+// MVID: {5F972A68-D373-07F3-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x065C0000
+// Image base: 0x09A00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
index 6b13007efbf..95f7cd4c051 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch08
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001DB
 }
-.mresource public FSharpSignatureDataB.SteppingMatch08
-{
-  // Offset: 0x000001E0 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.SteppingMatch08
 {
-  // Offset: 0x000001E8 Length: 0x00000079
+  // Offset: 0x000001E0 Length: 0x00000079
 }
 .module SteppingMatch08.dll
-// MVID: {5E172EE8-F238-BA3A-A745-0383E82E175E}
+// MVID: {5F972A68-F238-BA3A-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056B0000
+// Image base: 0x06AF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
index 39c3f3fb590..bc5d85918f8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly SteppingMatch09
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch09
 {
-  // Offset: 0x00000310 Length: 0x00000013
+  // Offset: 0x00000310 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.SteppingMatch09
 {
-  // Offset: 0x00000328 Length: 0x000000EB
+  // Offset: 0x00000318 Length: 0x000000EB
 }
 .module SteppingMatch09.dll
-// MVID: {5E172EE8-4935-D6AC-A745-0383E82E175E}
+// MVID: {5F972A68-4935-D6AC-A745-0383682A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05AA0000
+// Image base: 0x09560000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl
index b1ba5f7ff5d..80922f50c86 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction1
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001C6
 }
-.mresource public FSharpSignatureDataB.TestFunction1
-{
-  // Offset: 0x000001D0 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.TestFunction1
 {
-  // Offset: 0x000001D8 Length: 0x00000070
+  // Offset: 0x000001D0 Length: 0x00000070
 }
 .module TestFunction1.exe
-// MVID: {5E172EE9-65FC-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-65FC-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069B0000
+// Image base: 0x06B00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl
index a1c2c866b17..eeca6285aba 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction10
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001C5
 }
-.mresource public FSharpSignatureDataB.TestFunction10
-{
-  // Offset: 0x000001D0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction10
 {
-  // Offset: 0x000001D8 Length: 0x00000072
+  // Offset: 0x000001D0 Length: 0x00000072
 }
 .module TestFunction10.exe
-// MVID: {5E172EE9-A624-44FB-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-44FB-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05680000
+// Image base: 0x08D10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
index 715397bf45f..2e9b83a1fe4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction13
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction13
 {
-  // Offset: 0x00000208 Length: 0x00000007
+  // Offset: 0x00000208 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.TestFunction13
 {
-  // Offset: 0x00000218 Length: 0x00000072
+  // Offset: 0x00000210 Length: 0x00000072
 }
 .module TestFunction13.exe
-// MVID: {5E172EE9-A624-451C-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-451C-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x057C0000
+// Image base: 0x06990000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl
index e57bd3bedf4..eb43eb9132b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction14.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction14
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001E6
 }
-.mresource public FSharpSignatureDataB.TestFunction14
-{
-  // Offset: 0x000001F0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction14
 {
-  // Offset: 0x000001F8 Length: 0x00000072
+  // Offset: 0x000001F0 Length: 0x00000072
 }
 .module TestFunction14.exe
-// MVID: {5E172EE9-A624-4587-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-4587-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04E50000
+// Image base: 0x06C10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
index 911dac5fe28..338ae65b8b5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction16
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction16
 {
-  // Offset: 0x00000688 Length: 0x0000007F
+  // Offset: 0x00000688 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.TestFunction16
 {
-  // Offset: 0x00000710 Length: 0x000001CD
-}
-.mresource public FSharpOptimizationDataB.TestFunction16
-{
-  // Offset: 0x000008E8 Length: 0x0000002A
+  // Offset: 0x00000690 Length: 0x000001CD
 }
 .module TestFunction16.exe
-// MVID: {5E172EE9-A624-45C5-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-45C5-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04E90000
+// Image base: 0x06D20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
index dadc8afd4ee..ab2cb4cddc0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction17
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction17
 {
-  // Offset: 0x00000678 Length: 0x0000007E
+  // Offset: 0x00000678 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.TestFunction17
 {
-  // Offset: 0x00000700 Length: 0x000001CD
-}
-.mresource public FSharpOptimizationDataB.TestFunction17
-{
-  // Offset: 0x000008D8 Length: 0x0000002A
+  // Offset: 0x00000680 Length: 0x000001CD
 }
 .module TestFunction17.exe
-// MVID: {5E172EE9-A624-45A8-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-45A8-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F60000
+// Image base: 0x09700000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl
index cce7c1e9bd0..ce230b86d46 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction19.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction19
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000034E
 }
-.mresource public FSharpSignatureDataB.TestFunction19
-{
-  // Offset: 0x00000358 Length: 0x00000021
-}
 .mresource public FSharpOptimizationData.TestFunction19
 {
-  // Offset: 0x00000380 Length: 0x00000100
-}
-.mresource public FSharpOptimizationDataB.TestFunction19
-{
-  // Offset: 0x00000488 Length: 0x0000000E
+  // Offset: 0x00000358 Length: 0x00000100
 }
 .module TestFunction19.exe
-// MVID: {5E172EE9-A624-46AE-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-46AE-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BC0000
+// Image base: 0x06F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl
index 4d3dbfa0114..3c630336500 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction20.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction20
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000038F
 }
-.mresource public FSharpSignatureDataB.TestFunction20
-{
-  // Offset: 0x00000398 Length: 0x00000026
-}
 .mresource public FSharpOptimizationData.TestFunction20
 {
-  // Offset: 0x000003C8 Length: 0x00000100
-}
-.mresource public FSharpOptimizationDataB.TestFunction20
-{
-  // Offset: 0x000004D0 Length: 0x0000000E
+  // Offset: 0x00000398 Length: 0x00000100
 }
 .module TestFunction20.exe
-// MVID: {5E172EE9-A643-44FB-A745-0383E92E175E}
+// MVID: {5F972A6E-A643-44FB-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F00000
+// Image base: 0x07210000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
index 6ee932c09a7..810867f1baf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction21
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction21
 {
-  // Offset: 0x00000680 Length: 0x0000007E
+  // Offset: 0x00000680 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.TestFunction21
 {
-  // Offset: 0x00000708 Length: 0x000001CD
-}
-.mresource public FSharpOptimizationDataB.TestFunction21
-{
-  // Offset: 0x000008E0 Length: 0x0000002A
+  // Offset: 0x00000688 Length: 0x000001CD
 }
 .module TestFunction21.exe
-// MVID: {5E172EE9-A643-45E6-A745-0383E92E175E}
+// MVID: {5F972A6E-A643-45E6-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05720000
+// Image base: 0x06C80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
index 660f8639b94..741dfd6383a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction23
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction23
 {
-  // Offset: 0x00000340 Length: 0x0000001C
+  // Offset: 0x00000340 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.TestFunction23
 {
-  // Offset: 0x00000360 Length: 0x000000E3
-}
-.mresource public FSharpOptimizationDataB.TestFunction23
-{
-  // Offset: 0x00000448 Length: 0x00000008
+  // Offset: 0x00000348 Length: 0x000000E3
 }
 .module TestFunction23.exe
-// MVID: {5E172EE9-A643-451C-A745-0383E92E175E}
+// MVID: {5F972A6E-A643-451C-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05940000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
index 09467e000a1..e60b9cca65c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction24
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction24
 {
-  // Offset: 0x00000750 Length: 0x0000008A
+  // Offset: 0x00000750 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.TestFunction24
 {
-  // Offset: 0x000007E0 Length: 0x00000228
-}
-.mresource public FSharpOptimizationDataB.TestFunction24
-{
-  // Offset: 0x00000A10 Length: 0x0000002A
+  // Offset: 0x00000758 Length: 0x00000228
 }
 .module TestFunction24.exe
-// MVID: {5E172EE9-A643-4587-A745-0383E92E175E}
+// MVID: {5F972A6E-A643-4587-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06910000
+// Image base: 0x074C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl
index 583cc50e989..0d26834dffb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3b.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction3b
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001FC
 }
-.mresource public FSharpSignatureDataB.TestFunction3b
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction3b
 {
-  // Offset: 0x00000210 Length: 0x0000008A
+  // Offset: 0x00000200 Length: 0x0000008A
 }
 .module TestFunction3b.exe
-// MVID: {5E172EE9-A662-4FC9-A745-0383E92E175E}
+// MVID: {5F972A6E-A662-4FC9-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E40000
+// Image base: 0x04CE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
index 95a5c812391..8299cf5b9c9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction3c.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly TestFunction3c
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001FC
 }
-.mresource public FSharpSignatureDataB.TestFunction3c
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction3c
 {
-  // Offset: 0x00000210 Length: 0x0000008A
+  // Offset: 0x00000200 Length: 0x0000008A
 }
 .module TestFunction3c.exe
-// MVID: {5E172EE9-A662-4FAC-A745-0383E92E175E}
+// MVID: {5F972A6E-A662-4FAC-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x09300000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
index 2c26fddbff7..d4732ebcc5a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction9b4
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction9b4
 {
-  // Offset: 0x00000248 Length: 0x00000006
+  // Offset: 0x00000248 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.TestFunction9b4
 {
-  // Offset: 0x00000258 Length: 0x00000085
+  // Offset: 0x00000250 Length: 0x00000085
 }
 .module TestFunction9b4.exe
-// MVID: {5E172EE9-A091-56C1-A745-0383E92E175E}
+// MVID: {5F972A6E-A091-56C1-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x06960000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl
index 2f582c9d70f..633353d6772 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction11
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001E4
 }
-.mresource public FSharpSignatureDataB.TestFunction11
-{
-  // Offset: 0x000001E8 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction11
 {
-  // Offset: 0x000001F0 Length: 0x00000072
+  // Offset: 0x000001E8 Length: 0x00000072
 }
 .module TestFunction11.exe
-// MVID: {5E172EE9-A624-45E6-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-45E6-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05160000
+// Image base: 0x06FB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl
index b9f94f0cfc3..83c135375ab 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction12.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction12
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001D7
 }
-.mresource public FSharpSignatureDataB.TestFunction12
-{
-  // Offset: 0x000001E0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction12
 {
-  // Offset: 0x000001E8 Length: 0x00000072
+  // Offset: 0x000001E0 Length: 0x00000072
 }
 .module TestFunction12.exe
-// MVID: {5E172EE9-A624-4539-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-4539-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04EF0000
+// Image base: 0x06620000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl
index d15bf2944bf..fec7f01701b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction15.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction15
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001E6
 }
-.mresource public FSharpSignatureDataB.TestFunction15
-{
-  // Offset: 0x000001F0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction15
 {
-  // Offset: 0x000001F8 Length: 0x00000072
+  // Offset: 0x000001F0 Length: 0x00000072
 }
 .module TestFunction15.exe
-// MVID: {5E172EE9-A624-4662-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-4662-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B50000
+// Image base: 0x06900000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
index 7af2e22b838..27ff3841017 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction18
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction18
 {
-  // Offset: 0x000001E8 Length: 0x00000004
+  // Offset: 0x000001E8 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.TestFunction18
 {
   // Offset: 0x000001F0 Length: 0x00000072
 }
 .module TestFunction18.exe
-// MVID: {5E172EE9-A624-4603-A745-0383E92E175E}
+// MVID: {5F972A6E-A624-4603-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06DC0000
+// Image base: 0x06A60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl
index 75931b4de0d..9bc402aa343 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction2
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F9
 }
-.mresource public FSharpSignatureDataB.TestFunction2
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction2
 {
-  // Offset: 0x00000210 Length: 0x00000088
+  // Offset: 0x00000200 Length: 0x00000088
 }
 .module TestFunction2.exe
-// MVID: {5E172EE9-661D-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-661D-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B50000
+// Image base: 0x07420000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl
index 9f81a1be9e7..339f93a564a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000055
 }
 .module Testfunction22.exe
-// MVID: {5E172EE9-5AA3-4518-A745-0383E92E175E}
+// MVID: {5F972A6E-5AA3-4518-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06940000
+// Image base: 0x06F30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl
index eb6f4e5f165..ac757d61682 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22b.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22b
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22b.exe
-// MVID: {5E172EE9-8504-18B7-A745-0383E92E175E}
+// MVID: {5F972A6E-8504-18B7-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00A80000
+// Image base: 0x071D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl
index f4af3fd91a3..5742fec5052 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22c.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22c
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22c.exe
-// MVID: {5E172EE9-459D-3DF8-A745-0383E92E175E}
+// MVID: {5F972A6E-459D-3DF8-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E00000
+// Image base: 0x08F10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl
index f07f8d59a71..62c08c776ce 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22d.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22d
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22d.exe
-// MVID: {5E172EE9-FDCA-89B1-A745-0383E92E175E}
+// MVID: {5F972A6E-FDCA-89B1-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E70000
+// Image base: 0x06790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl
index ee505ba231a..d4e99f95e40 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22e.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22e
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22e.exe
-// MVID: {5E172EE9-C83B-1CB9-A745-0383E92E175E}
+// MVID: {5F972A6E-C83B-1CB9-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06C70000
+// Image base: 0x06CD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
index 6891fe7e21c..0f06b9c0ff6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22f.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Testfunction22f
 {
@@ -36,13 +41,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22f.exe
-// MVID: {5E172EE9-C040-2523-A745-0383E92E175E}
+// MVID: {5F972A6E-C040-2523-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05030000
+// Image base: 0x07210000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl
index 0d44c25cc2c..b132f188c64 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22g.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22g
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22g.exe
-// MVID: {5E172EE9-CA89-74DB-A745-0383E92E175E}
+// MVID: {5F972A6E-CA89-74DB-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B70000
+// Image base: 0x09330000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl
index b43d454eef8..d63f71921ba 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction22h.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Testfunction22h
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x00000056
 }
 .module Testfunction22h.exe
-// MVID: {5E172EE9-0266-39F6-A745-0383E92E175E}
+// MVID: {5F972A6E-0266-39F6-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x066E0000
+// Image base: 0x06F50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl
index 5dcd2b82863..f42a1172e3a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction3
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F9
 }
-.mresource public FSharpSignatureDataB.TestFunction3
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction3
 {
-  // Offset: 0x00000210 Length: 0x00000088
+  // Offset: 0x00000200 Length: 0x00000088
 }
 .module TestFunction3.exe
-// MVID: {5E172EE9-663A-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-663A-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06750000
+// Image base: 0x06DF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl
index 7f61c60ec26..2480450e1b8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction4
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F9
 }
-.mresource public FSharpSignatureDataB.TestFunction4
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction4
 {
-  // Offset: 0x00000210 Length: 0x00000088
+  // Offset: 0x00000200 Length: 0x00000088
 }
 .module TestFunction4.exe
-// MVID: {5E172EE9-665B-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-665B-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05670000
+// Image base: 0x06B20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl
index a94a6c3d37b..3697a2b6901 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction5
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F9
 }
-.mresource public FSharpSignatureDataB.TestFunction5
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction5
 {
-  // Offset: 0x00000210 Length: 0x00000088
+  // Offset: 0x00000200 Length: 0x00000088
 }
 .module TestFunction5.exe
-// MVID: {5E172EE9-6570-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-6570-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06EC0000
+// Image base: 0x07000000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl
index 03ea295784b..e4d8870570c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction6
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F9
 }
-.mresource public FSharpSignatureDataB.TestFunction6
-{
-  // Offset: 0x00000200 Length: 0x00000006
-}
 .mresource public FSharpOptimizationData.TestFunction6
 {
-  // Offset: 0x00000210 Length: 0x00000088
+  // Offset: 0x00000200 Length: 0x00000088
 }
 .module TestFunction6.exe
-// MVID: {5E172EE9-6591-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-6591-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04F50000
+// Image base: 0x07430000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl
index 519884b0e16..72bfbb93bae 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction7.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction7
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001BB
 }
-.mresource public FSharpSignatureDataB.TestFunction7
-{
-  // Offset: 0x000001C0 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.TestFunction7
 {
-  // Offset: 0x000001C8 Length: 0x00000070
+  // Offset: 0x000001C0 Length: 0x00000070
 }
 .module TestFunction7.exe
-// MVID: {5E172EE9-65AE-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-65AE-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05860000
+// Image base: 0x09010000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl
index 4db474cc748..0c9aafd9000 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction8.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction8
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001C4
 }
-.mresource public FSharpSignatureDataB.TestFunction8
-{
-  // Offset: 0x000001C8 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.TestFunction8
 {
-  // Offset: 0x000001D0 Length: 0x00000070
+  // Offset: 0x000001C8 Length: 0x00000070
 }
 .module TestFunction8.exe
-// MVID: {5E172EE9-65CF-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-65CF-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056C0000
+// Image base: 0x07450000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl
index b5e1f1b9a87..2abe4f9b303 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction9
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001D2
 }
-.mresource public FSharpSignatureDataB.TestFunction9
-{
-  // Offset: 0x000001D8 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.TestFunction9
 {
-  // Offset: 0x000001E0 Length: 0x00000070
+  // Offset: 0x000001D8 Length: 0x00000070
 }
 .module TestFunction9.exe
-// MVID: {5E172EE9-64F4-8929-A745-0383E92E175E}
+// MVID: {5F972A6E-64F4-8929-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x071D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl
index cb14e633848..e08689db423 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction9b
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001F2
 }
-.mresource public FSharpSignatureDataB.TestFunction9b
-{
-  // Offset: 0x000001F8 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction9b
 {
-  // Offset: 0x00000200 Length: 0x00000072
+  // Offset: 0x000001F8 Length: 0x00000072
 }
 .module TestFunction9b.exe
-// MVID: {5E172EE9-A52C-4FC9-A745-0383E92E175E}
+// MVID: {5F972A6E-A52C-4FC9-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x070B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl
index 0044e07c896..a4a430e1a3f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction9b1
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000204
 }
-.mresource public FSharpSignatureDataB.TestFunction9b1
-{
-  // Offset: 0x00000208 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction9b1
 {
-  // Offset: 0x00000210 Length: 0x00000083
+  // Offset: 0x00000208 Length: 0x00000083
 }
 .module TestFunction9b1.exe
-// MVID: {5E172EE9-A406-DAF4-A745-0383E92E175E}
+// MVID: {5F972A6E-A406-DAF4-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F00000
+// Image base: 0x06C60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl
index 96c84014e70..55eb5f1c436 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction9b2
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000204
 }
-.mresource public FSharpSignatureDataB.TestFunction9b2
-{
-  // Offset: 0x00000208 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction9b2
 {
-  // Offset: 0x00000210 Length: 0x00000083
+  // Offset: 0x00000208 Length: 0x00000083
 }
 .module TestFunction9b2.exe
-// MVID: {5E172EE9-9C0B-E35E-A745-0383E92E175E}
+// MVID: {5F972A6E-9C0B-E35E-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F70000
+// Image base: 0x064A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl
index c8fc0f585ac..b10932fc3ca 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction9b3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TestFunction9b3
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000204
 }
-.mresource public FSharpSignatureDataB.TestFunction9b3
-{
-  // Offset: 0x00000208 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.TestFunction9b3
 {
-  // Offset: 0x00000210 Length: 0x00000083
+  // Offset: 0x00000208 Length: 0x00000083
 }
 .module TestFunction9b3.exe
-// MVID: {5E172EE9-C1A4-612A-A745-0383E92E175E}
+// MVID: {5F972A6E-C1A4-612A-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05230000
+// Image base: 0x09AE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl
index 4cfa4c873fd..c9767595d1f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/OptionalArg01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly OptionalArg01
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000045A
 }
-.mresource public FSharpSignatureDataB.OptionalArg01
-{
-  // Offset: 0x00000460 Length: 0x00000030
-}
 .mresource public FSharpOptimizationData.OptionalArg01
 {
-  // Offset: 0x00000498 Length: 0x00000445
-}
-.mresource public FSharpOptimizationDataB.OptionalArg01
-{
-  // Offset: 0x000008E8 Length: 0x00000039
+  // Offset: 0x00000460 Length: 0x00000445
 }
 .module OptionalArg01.exe
-// MVID: {5E172EE9-4F48-B5AF-A745-0383E92E175E}
+// MVID: {5F972A6E-4F48-B5AF-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07070000
+// Image base: 0x071B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl
index 41c2675e53d..8650d7babfc 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple01
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple01.exe
-// MVID: {5E172EE9-6FDB-3E0B-A745-0383E92E175E}
+// MVID: {5F972A6E-6FDB-3E0B-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x051A0000
+// Image base: 0x09370000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl
index cd04e5b9c84..911442ecff2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple02
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple02.exe
-// MVID: {5E172EE9-ECCC-7D58-A745-0383E92E175E}
+// MVID: {5F972A6E-ECCC-7D58-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05620000
+// Image base: 0x06A40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl
index 6ee3041c00d..5daf9e80ae8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple03
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple03.exe
-// MVID: {5E172EE9-AD65-A299-A745-0383E92E175E}
+// MVID: {5F972A6E-AD65-A299-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05540000
+// Image base: 0x06760000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl
index 0a248cbd7d6..3803e899f8d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple04
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple04.exe
-// MVID: {5E172EE9-6A2E-9E97-A745-0383E92E175E}
+// MVID: {5F972A6E-6A2E-9E97-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06A60000
+// Image base: 0x09920000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl
index 03cab27231b..2b9c733b0b8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple05
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple05.exe
-// MVID: {5E172EE9-349F-319F-A745-0383E92E175E}
+// MVID: {5F972A6E-349F-319F-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x064E0000
+// Image base: 0x06A30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl
index 11f513347a2..472767b4cce 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple06
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple06.exe
-// MVID: {5E172EE9-67E0-4675-A745-0383E92E175E}
+// MVID: {5F972A6E-67E0-4675-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BC0000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl
index 79065231c12..d4c8423bcf3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple07
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple07.exe
-// MVID: {5E172EE9-7229-962D-A745-0383E92E175E}
+// MVID: {5F972A6E-7229-962D-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05600000
+// Image base: 0x09880000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl
index dca270786d7..0ca52f39026 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/Tuple08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Tuple08
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x0000004E
 }
 .module Tuple08.exe
-// MVID: {5E172EE9-E542-67B3-A745-0383E92E175E}
+// MVID: {5F972A6E-E542-67B3-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x050B0000
+// Image base: 0x06CC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
index 565dee2afe7..2a7083e68ac 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleElimination.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly TupleElimination
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000022A
 }
-.mresource public FSharpSignatureDataB.TupleElimination
-{
-  // Offset: 0x00000230 Length: 0x00000007
-}
 .mresource public FSharpOptimizationData.TupleElimination
 {
   // Offset: 0x00000230 Length: 0x0000007B
 }
 .module TupleElimination.exe
-// MVID: {5E172EE9-DFDD-92DF-A745-0383E92E175E}
+// MVID: {5F972A6E-DFDD-92DF-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x057F0000
+// Image base: 0x06840000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl
index 6f2d0089f8b..eb80a05c61a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/TupleMonster.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly TupleMonster
 {
@@ -36,13 +36,13 @@
   // Offset: 0x00000150 Length: 0x00000053
 }
 .module TupleMonster.exe
-// MVID: {5E172EE9-1552-41D8-A745-0383E92E175E}
+// MVID: {5F972A6E-1552-41D8-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B30000
+// Image base: 0x08F90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl
index 5bd6576a64b..a1d96e73adb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Tuples/ValueTupleAliasConstructor.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ValueTupleAliasConstructor
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001E0
 }
-.mresource public FSharpSignatureDataB.ValueTupleAliasConstructor
-{
-  // Offset: 0x000001E8 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.ValueTupleAliasConstructor
 {
-  // Offset: 0x000001F0 Length: 0x00000061
+  // Offset: 0x000001E8 Length: 0x00000061
 }
 .module ValueTupleAliasConstructor.exe
-// MVID: {5E172EE9-A8CF-BB34-A745-0383E92E175E}
+// MVID: {5F972A6E-A8CF-BB34-A745-03836E2A975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06D20000
+// Image base: 0x06A30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
index d8b5a12e1e4..51e164b3723 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ForEachOnArray01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001DC
 }
-.mresource public FSharpSignatureDataB.ForEachOnArray01
-{
-  // Offset: 0x000001E0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ForEachOnArray01
 {
-  // Offset: 0x000001E8 Length: 0x0000007C
+  // Offset: 0x000001E0 Length: 0x0000007C
 }
 .module ForEachOnArray01.dll
-// MVID: {5E1730A7-7E2E-D3AE-A745-0383A730175E}
+// MVID: {5F972DEC-7E2E-D3AE-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F70000
+// Image base: 0x06590000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
index 55e96939e3f..3f63952ccfa 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnList01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly ForEachOnList01
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002E9
 }
-.mresource public FSharpSignatureDataB.ForEachOnList01
-{
-  // Offset: 0x000002F0 Length: 0x00000016
-}
 .mresource public FSharpOptimizationData.ForEachOnList01
 {
-  // Offset: 0x00000310 Length: 0x000000DB
+  // Offset: 0x000002F0 Length: 0x000000DB
 }
 .module ForEachOnList01.dll
-// MVID: {5E1730A7-56DF-F74F-A745-0383A730175E}
+// MVID: {5F972DEC-56DF-F74F-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x054B0000
+// Image base: 0x07050000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
index 8b002e59be2..b42e0c92116 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnString01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly ForEachOnString01
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000350
 }
-.mresource public FSharpSignatureDataB.ForEachOnString01
-{
-  // Offset: 0x00000358 Length: 0x0000001B
-}
 .mresource public FSharpOptimizationData.ForEachOnString01
 {
-  // Offset: 0x00000378 Length: 0x000000FF
+  // Offset: 0x00000358 Length: 0x000000FF
 }
 .module ForEachOnString01.dll
-// MVID: {5E1730A7-105C-852B-A745-0383A730175E}
+// MVID: {5F972DEC-105C-852B-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05680000
+// Image base: 0x06AC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
index 4902a1b0cdf..8f6df7005de 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly NoAllocationOfTuple01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001DC
 }
-.mresource public FSharpSignatureDataB.NoAllocationOfTuple01
-{
-  // Offset: 0x000001E0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.NoAllocationOfTuple01
 {
-  // Offset: 0x000001E8 Length: 0x00000085
+  // Offset: 0x000001E0 Length: 0x00000085
 }
 .module NoAllocationOfTuple01.dll
-// MVID: {5E1730A7-13B5-F699-A745-0383A730175E}
+// MVID: {5F972DEC-13B5-F699-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05930000
+// Image base: 0x06A10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
index 7ff446e21e5..a58a000f4cb 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly NoIEnumerable01
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001CD
 }
-.mresource public FSharpSignatureDataB.NoIEnumerable01
-{
-  // Offset: 0x000001D8 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.NoIEnumerable01
 {
-  // Offset: 0x000001E0 Length: 0x0000006C
+  // Offset: 0x000001D8 Length: 0x0000006C
 }
 .module NoIEnumerable01.dll
-// MVID: {5E1730A7-31A1-8DCB-A745-0383A730175E}
+// MVID: {5F972DEC-31A1-8DCB-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05070000
+// Image base: 0x06E60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
index f77566c6427..d34ecc4f73a 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly NoIEnumerable02
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001CD
 }
-.mresource public FSharpSignatureDataB.NoIEnumerable02
-{
-  // Offset: 0x000001D8 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.NoIEnumerable02
 {
-  // Offset: 0x000001E0 Length: 0x0000006C
+  // Offset: 0x000001D8 Length: 0x0000006C
 }
 .module NoIEnumerable02.dll
-// MVID: {5E1730A7-5066-4012-A745-0383A730175E}
+// MVID: {5F972DEC-5066-4012-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06710000
+// Image base: 0x06990000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
index 7ae5b76beb5..51341a836da 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly NoIEnumerable03
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001DB
 }
-.mresource public FSharpSignatureDataB.NoIEnumerable03
-{
-  // Offset: 0x000001E0 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.NoIEnumerable03
 {
-  // Offset: 0x000001F0 Length: 0x0000006C
+  // Offset: 0x000001E0 Length: 0x0000006C
 }
 .module NoIEnumerable03.dll
-// MVID: {5E1730A7-7903-6020-A745-0383A730175E}
+// MVID: {5F972DEC-7903-6020-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06DC0000
+// Image base: 0x08E40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
index b1c638497e2..4785aec3051 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ZeroToArrLength01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001DC
 }
-.mresource public FSharpSignatureDataB.ZeroToArrLength01
-{
-  // Offset: 0x000001E0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ZeroToArrLength01
 {
-  // Offset: 0x000001E8 Length: 0x0000007B
+  // Offset: 0x000001E0 Length: 0x0000007B
 }
 .module ZeroToArrLength01.dll
-// MVID: {5E1730A7-A3D0-03A7-A745-0383A730175E}
+// MVID: {5F972DEC-A3D0-03A7-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x063B0000
+// Image base: 0x069D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
index c6714454cc9..ac6adf256b4 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly ZeroToArrLength02
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001DC
 }
-.mresource public FSharpSignatureDataB.ZeroToArrLength02
-{
-  // Offset: 0x000001E0 Length: 0x00000004
-}
 .mresource public FSharpOptimizationData.ZeroToArrLength02
 {
-  // Offset: 0x000001E8 Length: 0x0000007B
+  // Offset: 0x000001E0 Length: 0x0000007B
 }
 .module ZeroToArrLength02.dll
-// MVID: {5E1730A7-A36B-03A7-A745-0383A730175E}
+// MVID: {5F972DEC-A36B-03A7-A745-0383EC2D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x053F0000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
index 18b6bb63b63..827e881efc9 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000221
 }
-.mresource public FSharpSignatureDataB.Compare01
-{
-  // Offset: 0x00000228 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare01
 {
-  // Offset: 0x00000230 Length: 0x000000B2
+  // Offset: 0x00000228 Length: 0x000000B2
 }
 .module Compare01.dll
-// MVID: {5E1730AF-04A0-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-04A0-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056F0000
+// Image base: 0x06770000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
index 65b7f84e90a..14be69ba17e 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare02
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000228
 }
-.mresource public FSharpSignatureDataB.Compare02
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare02
 {
-  // Offset: 0x00000238 Length: 0x000000B9
+  // Offset: 0x00000230 Length: 0x000000B9
 }
 .module Compare02.dll
-// MVID: {5E1730AF-0481-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-0481-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07320000
+// Image base: 0x09700000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
index e17a131504d..dee5dedafe7 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Compare03
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000233
 }
-.mresource public FSharpSignatureDataB.Compare03
-{
-  // Offset: 0x00000238 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare03
 {
   // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare03.dll
-// MVID: {5E1730AF-0562-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-0562-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x057B0000
+// Image base: 0x06A60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
index 9291690e5cf..648b1011ff8 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Compare04
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000233
 }
-.mresource public FSharpSignatureDataB.Compare04
-{
-  // Offset: 0x00000238 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare04
 {
   // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare04.dll
-// MVID: {5E1730AF-053B-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-053B-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B40000
+// Image base: 0x06870000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
index e9cc40ad02f..3552b7964bd 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare05
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Compare05
 {
-  // Offset: 0x000006E0 Length: 0x0000007E
+  // Offset: 0x000006E0 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Compare05
 {
-  // Offset: 0x00000768 Length: 0x000003BA
-}
-.mresource public FSharpOptimizationDataB.Compare05
-{
-  // Offset: 0x00000B28 Length: 0x00000057
+  // Offset: 0x000006E8 Length: 0x000003BA
 }
 .module Compare05.dll
-// MVID: {5E1730AF-051C-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-051C-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069B0000
+// Image base: 0x071B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
index 3f763a998d7..ac0893f6196 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare06
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Compare06
 {
-  // Offset: 0x000006D8 Length: 0x0000007D
+  // Offset: 0x000006D8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Compare06
 {
-  // Offset: 0x00000760 Length: 0x000003BC
-}
-.mresource public FSharpOptimizationDataB.Compare06
-{
-  // Offset: 0x00000B20 Length: 0x00000057
+  // Offset: 0x000006E0 Length: 0x000003BC
 }
 .module Compare06.dll
-// MVID: {5E1730AF-04FD-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-04FD-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05770000
+// Image base: 0x09B00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
index 499467aa795..4899aa9e4d8 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare07
 {
@@ -33,24 +33,24 @@
 }
 .mresource public FSharpSignatureDataB.Compare07
 {
-  // Offset: 0x00000890 Length: 0x000000A8
+  // Offset: 0x00000890 Length: 0x00000013
 }
 .mresource public FSharpOptimizationData.Compare07
 {
-  // Offset: 0x00000940 Length: 0x0000068C
+  // Offset: 0x000008A8 Length: 0x0000068C
 }
 .mresource public FSharpOptimizationDataB.Compare07
 {
-  // Offset: 0x00000FD0 Length: 0x000000B8
+  // Offset: 0x00000F38 Length: 0x00000014
 }
 .module Compare07.dll
-// MVID: {5E1730AF-05DE-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-05DE-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x053D0000
+// Image base: 0x06CE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
index 09c05d056eb..8b7dfbb568d 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare08
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000022C
 }
-.mresource public FSharpSignatureDataB.Compare08
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare08
 {
-  // Offset: 0x00000238 Length: 0x000000B2
+  // Offset: 0x00000230 Length: 0x000000B2
 }
 .module Compare08.dll
-// MVID: {5E1730AF-03E7-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-03E7-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06730000
+// Image base: 0x066E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
index 9b68d8c4e46..259d4a880d0 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare09
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000022C
 }
-.mresource public FSharpSignatureDataB.Compare09
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare09
 {
-  // Offset: 0x00000238 Length: 0x000000B2
+  // Offset: 0x00000230 Length: 0x000000B2
 }
 .module Compare09.dll
-// MVID: {5E1730AF-03C8-F88E-A745-0383AF30175E}
+// MVID: {5F972DF5-03C8-F88E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070F0000
+// Image base: 0x073D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
index b71c9aaadc7..cf8e4b2b4dc 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare10
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Compare10
 {
-  // Offset: 0x00000A98 Length: 0x000000FA
+  // Offset: 0x00000A98 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.Compare10
 {
-  // Offset: 0x00000B98 Length: 0x0000058E
-}
-.mresource public FSharpOptimizationDataB.Compare10
-{
-  // Offset: 0x00001130 Length: 0x000000AE
+  // Offset: 0x00000AA0 Length: 0x0000058E
 }
 .module Compare10.dll
-// MVID: {5E1730AF-04BF-1753-A745-0383AF30175E}
+// MVID: {5F972DF5-04BF-1753-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06610000
+// Image base: 0x06B80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
index 20add977d22..0698ea16ee2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Compare11
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000022C
 }
-.mresource public FSharpSignatureDataB.Compare11
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Compare11
 {
-  // Offset: 0x00000238 Length: 0x000000B1
+  // Offset: 0x00000230 Length: 0x000000B1
 }
 .module Compare11.dll
-// MVID: {5E1730AF-04A0-1753-A745-0383AF30175E}
+// MVID: {5F972DF5-04A0-1753-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F30000
+// Image base: 0x06F00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
index e005866e8db..34df2e24fe2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000230
 }
-.mresource public FSharpSignatureDataB.Equals01
-{
-  // Offset: 0x00000238 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Equals01
 {
-  // Offset: 0x00000240 Length: 0x000000B6
+  // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals01.dll
-// MVID: {5E1730AF-0759-50B1-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-50B1-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x073C0000
+// Image base: 0x068B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
index e12cd3aff5c..60c10646543 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Equals02
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000230
 }
-.mresource public FSharpSignatureDataB.Equals02
-{
-  // Offset: 0x00000238 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Equals02
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals02.dll
-// MVID: {5E1730AF-0759-B6D8-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-B6D8-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05A30000
+// Image base: 0x094C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
index 68011af959a..bba9c379b76 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Equals03
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000230
 }
-.mresource public FSharpSignatureDataB.Equals03
-{
-  // Offset: 0x00000238 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Equals03
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals03.dll
-// MVID: {5E1730AF-0759-3313-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-3313-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x057B0000
+// Image base: 0x06AD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
index ef7c077b6c5..00822024268 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals04
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Equals04
 {
-  // Offset: 0x000006E0 Length: 0x0000007E
+  // Offset: 0x000006E0 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Equals04
 {
-  // Offset: 0x00000768 Length: 0x000003B7
-}
-.mresource public FSharpOptimizationDataB.Equals04
-{
-  // Offset: 0x00000B28 Length: 0x00000057
+  // Offset: 0x000006E8 Length: 0x000003B7
 }
 .module Equals04.dll
-// MVID: {5E1730AF-0759-EA8A-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-EA8A-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x071D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
index bd1eb917243..6650b729857 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals05
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Equals05
 {
-  // Offset: 0x000006D0 Length: 0x0000007D
+  // Offset: 0x000006D0 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Equals05
 {
-  // Offset: 0x00000758 Length: 0x000003B9
-}
-.mresource public FSharpOptimizationDataB.Equals05
-{
-  // Offset: 0x00000B18 Length: 0x00000057
+  // Offset: 0x000006D8 Length: 0x000003B9
 }
 .module Equals05.dll
-// MVID: {5E1730AF-0759-CBC5-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-CBC5-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05060000
+// Image base: 0x06FD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
index d39e63f68c2..4595bb50dd5 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals06
 {
@@ -33,24 +33,24 @@
 }
 .mresource public FSharpSignatureDataB.Equals06
 {
-  // Offset: 0x00000890 Length: 0x000000A8
+  // Offset: 0x00000890 Length: 0x00000013
 }
 .mresource public FSharpOptimizationData.Equals06
 {
-  // Offset: 0x00000940 Length: 0x00000688
+  // Offset: 0x000008A8 Length: 0x00000688
 }
 .mresource public FSharpOptimizationDataB.Equals06
 {
-  // Offset: 0x00000FD0 Length: 0x000000B8
+  // Offset: 0x00000F38 Length: 0x00000014
 }
 .module Equals06.dll
-// MVID: {5E1730AF-0759-31EC-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-31EC-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05310000
+// Image base: 0x06820000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
index 1f55a16962a..3338309635f 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals07
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000229
 }
-.mresource public FSharpSignatureDataB.Equals07
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Equals07
 {
-  // Offset: 0x00000238 Length: 0x000000AF
+  // Offset: 0x00000230 Length: 0x000000AF
 }
 .module Equals07.dll
-// MVID: {5E1730AF-0759-AE27-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-AE27-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06D50000
+// Image base: 0x07040000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
index ab5e14981d9..098cc93dfc5 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals08
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000229
 }
-.mresource public FSharpSignatureDataB.Equals08
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Equals08
 {
-  // Offset: 0x00000238 Length: 0x000000AF
+  // Offset: 0x00000230 Length: 0x000000AF
 }
 .module Equals08.dll
-// MVID: {5E1730AF-0759-659E-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-659E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05790000
+// Image base: 0x05190000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
index ab32955f118..b348e90e427 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Equals09
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Equals09
 {
-  // Offset: 0x00000A98 Length: 0x000000FA
+  // Offset: 0x00000A98 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.Equals09
 {
-  // Offset: 0x00000B98 Length: 0x0000058B
-}
-.mresource public FSharpOptimizationDataB.Equals09
-{
-  // Offset: 0x00001128 Length: 0x000000AE
+  // Offset: 0x00000AA0 Length: 0x0000058B
 }
 .module Equals09.dll
-// MVID: {5E1730AF-0759-46D9-A745-0383AF30175E}
+// MVID: {5F972DF5-0759-46D9-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05840000
+// Image base: 0x06B00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
index 400236e5cd7..273784d12fb 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash01
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000215
 }
-.mresource public FSharpSignatureDataB.Hash01
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash01
 {
-  // Offset: 0x00000228 Length: 0x000000A9
+  // Offset: 0x00000220 Length: 0x000000A9
 }
 .module Hash01.dll
-// MVID: {5E1730AF-9642-78D3-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-78D3-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07320000
+// Image base: 0x070B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
index 9177cfa8665..98a71f7f131 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash02
 {
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000021C
 }
-.mresource public FSharpSignatureDataB.Hash02
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash02
 {
-  // Offset: 0x00000228 Length: 0x0000010B
-}
-.mresource public FSharpOptimizationDataB.Hash02
-{
-  // Offset: 0x00000338 Length: 0x00000006
+  // Offset: 0x00000220 Length: 0x0000010B
 }
 .module Hash02.dll
-// MVID: {5E1730AF-9642-796E-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-796E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F70000
+// Image base: 0x09610000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
index a461beef699..474d7c5a102 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Hash03
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000021C
 }
-.mresource public FSharpSignatureDataB.Hash03
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash03
 {
   // Offset: 0x00000220 Length: 0x000000B0
 }
 .module Hash03.dll
-// MVID: {5E1730AF-9642-788D-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-788D-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04DA0000
+// Image base: 0x06F30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
index 1e845677fc7..2141a337ca5 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,12 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
+}
+.assembly extern netstandard
+{
+  .publickeytoken = (CC 7B 13 FF CD 2D DD 51 )                         // .{...-.Q
+  .ver 2:0:0:0
 }
 .assembly Hash04
 {
@@ -31,22 +36,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000021C
 }
-.mresource public FSharpSignatureDataB.Hash04
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash04
 {
   // Offset: 0x00000220 Length: 0x000000B0
 }
 .module Hash04.dll
-// MVID: {5E1730AF-9642-7838-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-7838-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070E0000
+// Image base: 0x06790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
index d7f94e86198..eaeede41b36 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash05
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Hash05
 {
-  // Offset: 0x000006D8 Length: 0x0000007E
+  // Offset: 0x000006D8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Hash05
 {
-  // Offset: 0x00000760 Length: 0x000003B1
-}
-.mresource public FSharpOptimizationDataB.Hash05
-{
-  // Offset: 0x00000B18 Length: 0x00000057
+  // Offset: 0x000006E0 Length: 0x000003B1
 }
 .module Hash05.dll
-// MVID: {5E1730AF-9642-7857-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-7857-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06520000
+// Image base: 0x07220000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
index 43217dbd501..57cb6d3dc74 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash06
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Hash06
 {
-  // Offset: 0x000006D8 Length: 0x0000007E
+  // Offset: 0x000006D8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Hash06
 {
-  // Offset: 0x00000760 Length: 0x000003B2
-}
-.mresource public FSharpOptimizationDataB.Hash06
-{
-  // Offset: 0x00000B18 Length: 0x00000057
+  // Offset: 0x000006E0 Length: 0x000003B2
 }
 .module Hash06.dll
-// MVID: {5E1730AF-9642-78F2-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-78F2-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05800000
+// Image base: 0x09150000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
index 0f180e46b95..d242f694522 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash07
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000216
 }
-.mresource public FSharpSignatureDataB.Hash07
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash07
 {
-  // Offset: 0x00000228 Length: 0x000000AA
+  // Offset: 0x00000220 Length: 0x000000AA
 }
 .module Hash07.dll
-// MVID: {5E1730AF-9642-7811-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-7811-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04FE0000
+// Image base: 0x07330000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
index f4bec6fd3d1..dd9a84ace05 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash08
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Hash08
 {
-  // Offset: 0x000006C8 Length: 0x0000007D
+  // Offset: 0x000006C8 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Hash08
 {
-  // Offset: 0x00000750 Length: 0x000003B3
-}
-.mresource public FSharpOptimizationDataB.Hash08
-{
-  // Offset: 0x00000B08 Length: 0x00000057
+  // Offset: 0x000006D0 Length: 0x000003B3
 }
 .module Hash08.dll
-// MVID: {5E1730AF-9642-77BC-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-77BC-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x04E60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
index d0b2ac38926..ae8871f1827 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash09
 {
@@ -33,24 +33,24 @@
 }
 .mresource public FSharpSignatureDataB.Hash09
 {
-  // Offset: 0x00000888 Length: 0x000000A8
+  // Offset: 0x00000888 Length: 0x00000013
 }
 .mresource public FSharpOptimizationData.Hash09
 {
-  // Offset: 0x00000938 Length: 0x00000680
+  // Offset: 0x000008A0 Length: 0x00000680
 }
 .mresource public FSharpOptimizationDataB.Hash09
 {
-  // Offset: 0x00000FC0 Length: 0x000000B8
+  // Offset: 0x00000F28 Length: 0x00000014
 }
 .module Hash09.dll
-// MVID: {5E1730AF-9642-77DB-A745-0383AF30175E}
+// MVID: {5F972DF5-9642-77DB-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05650000
+// Image base: 0x07090000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
index 715ff21fe3f..f5b8e0f56a2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash10
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000215
 }
-.mresource public FSharpSignatureDataB.Hash10
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash10
 {
-  // Offset: 0x00000228 Length: 0x000000A9
+  // Offset: 0x00000220 Length: 0x000000A9
 }
 .module Hash10.dll
-// MVID: {5E1730AF-9661-78B4-A745-0383AF30175E}
+// MVID: {5F972DF5-9661-78B4-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07020000
+// Image base: 0x06FA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
index 439d78276c7..fa463d9760d 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash11
 {
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000215
 }
-.mresource public FSharpSignatureDataB.Hash11
-{
-  // Offset: 0x00000220 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.Hash11
 {
-  // Offset: 0x00000228 Length: 0x000000A9
+  // Offset: 0x00000220 Length: 0x000000A9
 }
 .module Hash11.dll
-// MVID: {5E1730AF-9661-78D3-A745-0383AF30175E}
+// MVID: {5F972DF5-9661-78D3-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F40000
+// Image base: 0x09360000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
index c68d74528d6..8d5dada4db0 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Hash12
 {
@@ -33,24 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.Hash12
 {
-  // Offset: 0x00000A90 Length: 0x000000FA
+  // Offset: 0x00000A90 Length: 0x00000004
 }
 .mresource public FSharpOptimizationData.Hash12
 {
-  // Offset: 0x00000B90 Length: 0x00000585
-}
-.mresource public FSharpOptimizationDataB.Hash12
-{
-  // Offset: 0x00001120 Length: 0x000000AE
+  // Offset: 0x00000A98 Length: 0x00000585
 }
 .module Hash12.dll
-// MVID: {5E1730AF-9661-796E-A745-0383AF30175E}
+// MVID: {5F972DF5-9661-796E-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x065B0000
+// Image base: 0x06AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
index 0e031b8b9cf..622c3adbaa4 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Match01
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureDataB.Match01
 {
-  // Offset: 0x000006F0 Length: 0x00000086
+  // Offset: 0x000006F0 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.Match01
 {
-  // Offset: 0x00000780 Length: 0x000003B7
-}
-.mresource public FSharpOptimizationDataB.Match01
-{
-  // Offset: 0x00000B40 Length: 0x0000005F
+  // Offset: 0x000006F8 Length: 0x000003B7
 }
 .module Match01.dll
-// MVID: {5E1730AF-FAFE-C8E4-A745-0383AF30175E}
+// MVID: {5F972DF5-FAFE-C8E4-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05060000
+// Image base: 0x072A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
index 8d0a08e9e5d..6618f57ab26 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly Match02
 {
@@ -29,24 +29,24 @@
 }
 .mresource public FSharpSignatureDataB.Match02
 {
-  // Offset: 0x00000488 Length: 0x00000035
+  // Offset: 0x00000488 Length: 0x00000008
 }
 .mresource public FSharpOptimizationData.Match02
 {
-  // Offset: 0x000004C8 Length: 0x000002EE
+  // Offset: 0x00000498 Length: 0x000002EE
 }
 .mresource public FSharpOptimizationDataB.Match02
 {
-  // Offset: 0x000007C0 Length: 0x0000004C
+  // Offset: 0x00000790 Length: 0x0000000C
 }
 .module Match02.dll
-// MVID: {5E1730AF-6125-4D81-A745-0383AF30175E}
+// MVID: {5F972DF5-6125-4D81-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056F0000
+// Image base: 0x06930000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
index 0c6d1abf883..ec61a550856 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.7.3081.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 4:7:0:0
+  .ver 5:0:0:0
 }
 .assembly StructUnion01
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureDataB.StructUnion01
 {
-  // Offset: 0x00000880 Length: 0x000000B0
+  // Offset: 0x00000880 Length: 0x00000002
 }
 .mresource public FSharpOptimizationData.StructUnion01
 {
-  // Offset: 0x00000938 Length: 0x00000421
-}
-.mresource public FSharpOptimizationDataB.StructUnion01
-{
-  // Offset: 0x00000D60 Length: 0x00000067
+  // Offset: 0x00000888 Length: 0x00000421
 }
 .module StructUnion01.dll
-// MVID: {5E1730AF-D3E9-6B24-A745-0383AF30175E}
+// MVID: {5F972DF5-D3E9-6B24-A745-0383F52D975F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07190000
+// Image base: 0x07350000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================

From f0fe75952e5cd69e8ab94ac853c8ce1989623ae6 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 27 Oct 2020 12:28:20 +0000
Subject: [PATCH 035/112] fix tests

---
 src/fsharp/TypedTreeOps.fs | 2 +-
 tests/fsharp/tests.fs      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index fab366cca56..81b1b3765c1 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -3500,7 +3500,7 @@ module DebugPrint =
         match nullness.Evaluate() with
         | NullnessInfo.WithNull -> coreL ^^ wordL (tagText "?")
         | NullnessInfo.WithoutNull -> coreL
-        | NullnessInfo.AmbivalentToNull -> coreL ^^ wordL (tagText "%")
+        | NullnessInfo.AmbivalentToNull -> coreL //^^ wordL (tagText "%")
 
     and auxTypeWrapL env isAtomic ty = 
         let wrap x = bracketIfL isAtomic x in // wrap iff require atomic expr 
diff --git a/tests/fsharp/tests.fs b/tests/fsharp/tests.fs
index 9ce9201058e..e592e642a8c 100644
--- a/tests/fsharp/tests.fs
+++ b/tests/fsharp/tests.fs
@@ -269,7 +269,7 @@ module CoreTests =
 
         use testOkFile = fileguard cfg "test.ok"
 
-        fsc cfg "%s -o:test-no-checknulls.exe -g --define:NO_CHECKNULLS" cfg.fsc_flags ["test.fsx"]
+        fsc cfg "%s -o:test-no-checknulls.exe -g --langversion:preview --define:NO_CHECKNULLS" cfg.fsc_flags ["test.fsx"]
 
         exec cfg ("." ++ "test-no-checknulls.exe") ""
 

From a297f3368ee111c7265ea052fb6b53205d40dad6 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 27 Oct 2020 15:20:58 +0000
Subject: [PATCH 036/112] lose new files and reduce diff

---
 src/fsharp/FSharp.Core/reflect.fsi            |   20 +-
 src/fsharp/FindUnsolved.fs                    |    2 +-
 src/fsharp/IlxGen.fs                          |   42 +-
 src/utils/reshapedmsbuild.fs                  |  890 -----
 .../SurfaceArea.net40.fs                      | 2942 -----------------
 5 files changed, 32 insertions(+), 3864 deletions(-)
 delete mode 100644 src/utils/reshapedmsbuild.fs
 delete mode 100644 tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs

diff --git a/src/fsharp/FSharp.Core/reflect.fsi b/src/fsharp/FSharp.Core/reflect.fsi
index 9c9de1f1eef..a0487cb27b7 100644
--- a/src/fsharp/FSharp.Core/reflect.fsi
+++ b/src/fsharp/FSharp.Core/reflect.fsi
@@ -61,7 +61,7 @@ type FSharpValue =
     /// Thrown when the input is not a record value.
     /// The field from the record.
     static member GetRecordField:  record:obj * info:PropertyInfo -> obj
-
+    
     /// Precompute a function for reading a particular field from a record.
     /// Assumes the given type is a RecordType with a field of the given name. 
     /// If not,  is raised during pre-computation.
@@ -165,7 +165,7 @@ type FSharpValue =
     ///
     /// The description of the union case and its fields.
     static member GetUnionFields:  value:obj * unionType:Type * ?bindingFlags:BindingFlags -> UnionCaseInfo * obj []
-
+    
     /// Assumes the given type is a union type. 
     /// If not,  is raised during pre-computation.
     ///
@@ -256,8 +256,8 @@ type FSharpValue =
     /// Thrown when the input is not a tuple value.
     ///
     /// An array of the fields from the given tuple.
-    static member GetTupleFields: tuple:obj -> obj[]
-
+    static member GetTupleFields: tuple:obj -> obj []
+    
     /// Precompute a function for reading the values of a particular tuple type
     ///
     /// Assumes the given type is a TupleType.
@@ -269,7 +269,7 @@ type FSharpValue =
     ///
     /// A function to read values of the given tuple type.
     static member PreComputeTupleReader           : tupleType:Type -> (obj -> obj[])
-
+    
     /// Gets information that indicates how to read a field of a tuple
     ///
     /// The input tuple type.
@@ -459,7 +459,7 @@ module FSharpReflectionExtensions =
         /// Thrown when the input type is not a record type.
         ///
         /// The created record.
-        static member MakeRecord: recordType:Type * values:obj[] * ?allowAccessToPrivateRepresentation : bool -> obj
+        static member MakeRecord: recordType:Type * values:obj [] * ?allowAccessToPrivateRepresentation : bool -> obj
 
         /// Reads all the fields from a record value.
         ///
@@ -512,7 +512,7 @@ module FSharpReflectionExtensions =
         ///
         /// A ConstructorInfo for the given record type.
         static member PreComputeRecordConstructorInfo: recordType:Type * ?allowAccessToPrivateRepresentation : bool-> ConstructorInfo
-
+    
         /// Create a union case value.
         ///
         /// The description of the union case to create.
@@ -520,7 +520,7 @@ module FSharpReflectionExtensions =
         /// Optional flag that denotes accessibility of the private representation.    
         ///
         /// The constructed union case.
-        static member MakeUnion: unionCase:UnionCaseInfo * args:obj[] * ?allowAccessToPrivateRepresentation : bool-> obj
+        static member MakeUnion: unionCase:UnionCaseInfo * args:obj [] * ?allowAccessToPrivateRepresentation : bool-> obj
 
         /// Identify the union case and its fields for an object
         ///
@@ -537,8 +537,8 @@ module FSharpReflectionExtensions =
         /// Thrown when the input type is not a union case value.
         ///
         /// The description of the union case and its fields.
-        static member GetUnionFields:  value:obj * unionType:Type * ?allowAccessToPrivateRepresentation : bool -> UnionCaseInfo * obj[]
-
+        static member GetUnionFields:  value:obj * unionType:Type * ?allowAccessToPrivateRepresentation : bool -> UnionCaseInfo * obj []
+    
         /// Assumes the given type is a union type. 
         /// If not,  is raised during pre-computation.
         ///
diff --git a/src/fsharp/FindUnsolved.fs b/src/fsharp/FindUnsolved.fs
index b5ceed12c2c..1212f0ffa42 100644
--- a/src/fsharp/FindUnsolved.fs
+++ b/src/fsharp/FindUnsolved.fs
@@ -77,7 +77,7 @@ let rec accExpr   (cenv:cenv) (env:env) expr =
         accExprs cenv env argsl
 
     | Expr.Lambda (_, _ctorThisValOpt, _baseValOpt, argvs, _body, m, rty) -> 
-        let topValInfo = ValReprInfo ([],[argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)],ValReprInfo.unnamedRetVal) 
+        let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) 
         let ty = mkMultiLambdaTy cenv.g m argvs rty 
         accLambdas cenv env topValInfo expr ty
 
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index d3fe1d4019e..323a580f6b5 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -6433,9 +6433,9 @@ and GenBindingRhs cenv cgbuf eenv sp (vspec: Val) e =
         | Expr.TyLambda (_, tyargs, body, _, ttype) when
             (
                 tyargs |> List.forall (fun tp -> tp.IsErased) &&
-                (match StorageForVal g vspec.Range vspec eenv with Local _ -> true | _ -> false) && 
-                (isLocalTypeFunc || 
-                    (match ttype with 
+                (match StorageForVal g vspec.Range vspec eenv with Local _ -> true | _ -> false) &&
+                (isLocalTypeFunc ||
+                    (match ttype with
                      TType_var (typar, _) -> match typar.Solution with Some (TType_app (t, _, _))-> t.IsStructOrEnumTycon | _ -> false
                      | _ -> false))
             ) ->
@@ -7184,7 +7184,7 @@ and GenAbstractBinding cenv eenv tref (vref: ValRef) =
         [], [], []
 
 /// Generate a ToString method that calls 'sprintf "%A"'
-and GenToStringMethod cenv eenv ilThisTy m = 
+and GenToStringMethod cenv eenv ilThisTy m =
     let g = cenv.g
     [ match (eenv.valsInScope.TryFind g.sprintf_vref.Deref,
              eenv.valsInScope.TryFind g.new_format_vref.Deref) with
@@ -7196,18 +7196,18 @@ and GenToStringMethod cenv eenv ilThisTy m =
                                                [// 'T -> string'
                                                funcTy
                                                // rest follow from 'StringFormat'
-                                               GenUnitTy cenv eenv m  
-                                               g.ilg.typ_String 
-                                               g.ilg.typ_String 
+                                               GenUnitTy cenv eenv m
+                                               g.ilg.typ_String
+                                               g.ilg.typ_String
                                                ilThisTy], [])
                // Instantiate with our own type
                let sprintfMethSpec = mkILMethSpec(sprintfMethSpec.MethodRef, AsObject, [], [funcTy])
                // Here's the body of the method. Call printf, then invoke the function it returns
                let callInstrs = EraseClosures.mkCallFunc g.ilxPubCloEnv (fun _ -> 0us) eenv.tyenv.Count Normalcall (Apps_app(ilThisTy, Apps_done g.ilg.typ_String))
-               let mdef = 
+               let mdef =
                    mkILNonGenericVirtualMethod ("ToString", ILMemberAccess.Public, [],
                         mkILReturn g.ilg.typ_String,
-                        mkMethodBody (true, [], 2, nonBranchingInstrsToCode 
+                        mkMethodBody (true, [], 2, nonBranchingInstrsToCode
                                 ([ // load the hardwired format string
                                     yield I_ldstr "%+A"
                                     // make the printf format object
@@ -7344,7 +7344,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
         let ilDebugDisplayAttributes =
             [ yield! GenAttrs cenv eenv debugDisplayAttrs
               if generateDebugDisplayAttribute then
-                  yield g.mkDebuggerDisplayAttribute ("{" + debugDisplayMethodName + "(),nq}")  ]
+                  yield g.mkDebuggerDisplayAttribute ("{" + debugDisplayMethodName + "(),nq}") ]
 
         let ilCustomAttrs =
           [ yield! defaultMemberAttrs
@@ -7376,7 +7376,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                 tycon.AllFieldsArray |> Array.forall (fun f -> f.IsStatic)
 
             isEmptyStruct && cenv.opts.workAroundReflectionEmitBugs && not tycon.TyparsNoRange.IsEmpty
-
+    
         // Compute a bunch of useful things for each field
         let isCLIMutable = (TryFindFSharpBoolAttribute g g.attrib_CLIMutableAttribute tycon.Attribs = Some true)
         let fieldSummaries =
@@ -7421,9 +7421,9 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                         if useGenuineField then yield! fspec.PropertyAttribs
                         yield! fspec.FieldAttribs ]
 
-
+                        
                   let ilNotSerialized = HasFSharpAttributeOpt g g.attrib_NonSerializedAttribute attribs
-
+              
                   let fattribs =
                       attribs
                       // Do not generate FieldOffset as a true CLI custom attribute, since it is implied by other corresponding CLI metadata
@@ -7437,7 +7437,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                   // AND the field is not mutable (because we can take the address of a mutable field).
                   // Otherwise fields are always accessed via their property getters/setters
                   let isFieldHidden = isPropHidden || (not useGenuineField && not isFSharpMutable)
-
+              
                   let extraAttribs =
                      match tyconRepr with
                      | TRecdRepr _ when not useGenuineField -> [ g.DebuggerBrowsableNeverAttribute ] // hide fields in records in debug display
@@ -7465,8 +7465,8 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
 
                if requiresExtraField then
                    yield mkILInstanceField("__dummy", g.ilg.typ_Int32, None, ILMemberAccess.Assembly) ]
-
-        // Generate property definitions for the fields compiled as properties 
+     
+        // Generate property definitions for the fields compiled as properties
         let ilPropertyDefsForFields =
              [ for (i, (useGenuineField, _, isFSharpMutable, isStatic, propAttribs, ilPropType, _, fspec)) in Seq.indexed fieldSummaries do
                  if not useGenuineField then
@@ -7527,7 +7527,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                                                       [// 'T -> string'
                                                        funcTy
                                                        // rest follow from 'StringFormat'
-                                                       GenUnitTy cenv eenv m 
+                                                       GenUnitTy cenv eenv m
                                                        g.ilg.typ_String
                                                        g.ilg.typ_String
                                                        g.ilg.typ_String], [])
@@ -7589,7 +7589,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                  // Records that are value types do not create a default constructor with CLIMutable or ComVisible
                  if not isStructRecord && (isCLIMutable || (TryFindFSharpBoolAttribute g g.attrib_ComVisibleAttribute tycon.Attribs = Some true)) then
                      yield mkILSimpleStorageCtor(None, Some g.ilg.typ_Object.TypeSpec, ilThisTy, [], [], reprAccess)
-
+             
                  if not (tycon.HasMember g "ToString" []) then
                     yield! GenToStringMethod cenv eenv ilThisTy m
 
@@ -7618,7 +7618,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
         let ilProperties = mkILProperties (ilPropertyDefsForFields @ abstractPropDefs)
         let ilEvents = mkILEvents abstractEventDefs
         let ilFields = mkILFields ilFieldDefs
-
+    
         let tdef, tdefDiscards =
            let isSerializable = (TryFindFSharpBoolAttribute g g.attrib_AutoSerializableAttribute tycon.Attribs <> Some false)
 
@@ -7675,7 +7675,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
 
                let tdLayout, tdEncoding =
                     match TryFindFSharpAttribute g g.attrib_StructLayoutAttribute tycon.Attribs with
-                    | Some (Attrib(_, _, [ AttribInt32Arg(layoutKind) ], namedArgs, _, _, _)) ->
+                    | Some (Attrib(_, _, [ AttribInt32Arg layoutKind ], namedArgs, _, _, _)) ->
                         let decoder = AttributeDecoder namedArgs
                         let ilPack = decoder.FindInt32 "Pack" 0x0
                         let ilSize = decoder.FindInt32 "Size" 0x0
@@ -7862,7 +7862,7 @@ and GenExnDef cenv mgbuf eenv m (exnc: Tycon) =
              |> List.unzip4
 
         let ilCtorDef =
-            mkILSimpleStorageCtorWithParamNames(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], ChooseParamNames fieldNamesAndTypes, reprAccess) 
+            mkILSimpleStorageCtorWithParamNames(None, Some g.iltyp_Exception.TypeSpec, ilThisTy, [], ChooseParamNames fieldNamesAndTypes, reprAccess)
 
         // In compiled code, all exception types get a parameterless constructor for use with XML serialization
         // This does default-initialization of all fields
diff --git a/src/utils/reshapedmsbuild.fs b/src/utils/reshapedmsbuild.fs
deleted file mode 100644
index d97d6825032..00000000000
--- a/src/utils/reshapedmsbuild.fs
+++ /dev/null
@@ -1,890 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-namespace Microsoft.Build.Tasks
-namespace Microsoft.Build.Utilities
-namespace Microsoft.Build.Framework
-namespace Microsoft.Build.BuildEngine
-
-#if FX_RESHAPED_MSBUILD
-
-namespace Microsoft.Build.Framework
-open System.Collections
-
-type ITaskItem =
-    abstract member ItemSpec : string with get, set
-    abstract member MetadataNames : ICollection with get
-    abstract member MetadataCount : int with get
-
-    abstract member GetMetadata : string -> string
-    abstract member SetMetadata : string*string -> unit
-    abstract member RemoveMetadata : string -> unit
-    abstract member CopyMetadataTo : ITaskItem -> unit
-    abstract member CloneCustomMetadata : IDictionary
-
-module Utilities =
-    open Microsoft.Build.Framework
-    open System
-    open System.Collections
-    open System.Reflection
-
-    type System.Object with
-        member this.GetPropertyValue(propName) = this.GetType().GetProperty(propName, BindingFlags.Public).GetValue(this, null)
-        member this.SetPropertyValue(propName, propValue) = this.GetType().GetProperty(propName, BindingFlags.Public).SetValue(this, propValue, null)
-        member this.GetMethod(methodName, argTypes) = this.GetType().GetMethod(methodName, argTypes, [||])
-
-    type TaskItem (itemSpec:string) =
-        let assembly = Assembly.Load(new AssemblyName("Microsoft.Build.Utilities.Core, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"))
-        let buildUtilitiesTaskType = assembly.GetType("Microsoft.Build.Utilities.Task")
-        let instance = Activator.CreateInstance(buildUtilitiesTaskType, [|itemSpec|])
-
-        interface ITaskItem with
-            member this.ItemSpec
-                with get () :string = (instance.GetPropertyValue("ItemSpec") :?> string)
-                and set (value:string) =  (instance.SetPropertyValue("ItemSpec", value)); ()
-            member this.MetadataNames
-                with get () :ICollection = (instance.GetPropertyValue("MetadataNames") :?> ICollection)
-            member this.MetadataCount
-                with get () :int = (instance.GetPropertyValue("MetadataCount") :?> int)
-            member this.CopyMetadataTo(iTaskItem) =
-                let m = buildUtilitiesTaskType.GetMethod("CopyMetadataTo", [| typeof |])
-                m.Invoke(instance, [|iTaskItem :>obj|]) |> ignore
-            member this.CloneCustomMetadata =
-                let m = buildUtilitiesTaskType.GetMethod("CloneCustomMetadata", [||])
-                (m.Invoke(instance,[||])) :?>IDictionary
-            member this.GetMetadata(metadataName) =
-                let m = buildUtilitiesTaskType.GetMethod("GetMetadata", [|typeof|])
-                (m.Invoke(instance,[|metadataName|])) :?>string
-            member this.RemoveMetadata(metadataName) =
-                let m = buildUtilitiesTaskType.GetMethod("RemoveMetadata", [|typeof|])
-                (m.Invoke(instance,[|metadataName|])) :?>string |>ignore
-            member this.SetMetadata(metadataName, metadataValue) =
-                let m = buildUtilitiesTaskType.GetMethod("SetMetadata", [|typeof;typeof|])
-                (m.Invoke(instance,[|metadataName; metadataValue|])) |>ignore
-
-namespace FSharp.Compiler
-open System
-open System.Collections
-open System.Collections.Concurrent
-open System.IO
-open System.Linq
-open System.Runtime.Versioning
-open FSComp
-open Microsoft.Win32
-open Microsoft.Build.Framework.Utilities
-
-module internal MsBuildAdapters = 
-
-    /// 
-    /// Used to specify the targeted version of the .NET Framework for some methods of ToolLocationHelper.  This is meant to mimic
-    /// the official version here: https://source.dot.net/#q=TargetDotNetFrameworkVersion.
-    /// 
-    type public TargetDotNetFrameworkVersion =
-    | Version11 = 0
-    | Version20 = 1
-    | Version30 = 2
-    | Version35 = 3
-    | Version40 = 4
-    | Version45 = 5
-    | Version451 = 6
-    | Version46 = 7
-    | Version461 = 8
-    | Version452 = 9
-    | Version462 = 10
-    | Version47 = 11
-    | Version471 = 12
-    | Version472 = 13
-    | VersionLatest = 13  //TargetDotNetFrameworkVersion.Version472
-
-    /// 
-    /// Used to specify the targeted bitness of the .NET Framework for some methods of ToolLocationHelper
-    /// 
-    type DotNetFrameworkArchitecture =
-    | Current = 0                                   // Indicates the .NET Framework that is currently being run under
-    | Bitness32 = 1                                 // Indicates the 32-bit .NET Framework
-    | Bitness64 = 2                                 // Indicates the 64-bit .NET Framework
-
-module internal ToolLocationHelper =
-    open Microsoft.Build.Framework
-    open System.Linq
-    open System.Reflection
-    open MsBuildAdapters
-
-    let dotNetFrameworkIdentifier = ".NETFramework"
-
-    // .net versions.
-    let dotNetFrameworkVersion11  = Version(1, 1)
-    let dotNetFrameworkVersion20  = Version(2, 0)
-    let dotNetFrameworkVersion30  = Version(3, 0)
-    let dotNetFrameworkVersion35  = Version(3, 5)
-    let dotNetFrameworkVersion40  = Version(4, 0)
-    let dotNetFrameworkVersion45  = Version(4, 5)
-    let dotNetFrameworkVersion451 = Version(4, 5, 1)
-    let dotNetFrameworkVersion452 = Version(4, 5, 2)
-    let dotNetFrameworkVersion46  = Version(4, 6)
-    let dotNetFrameworkVersion461 = Version(4, 6, 1)
-    let dotNetFrameworkVersion462 = Version(4, 6, 2)
-    let dotNetFrameworkVersion47  = Version(4, 7)
-    let dotNetFrameworkVersion471 = Version(4, 7, 1)
-    let dotNetFrameworkVersion472 = Version(4, 7, 2)
-
-    // visual studio versions.
-    let visualStudioVersion100 = new Version(10, 0);
-    let visualStudioVersion110 = new Version(11, 0);
-    let visualStudioVersion120 = new Version(12, 0);
-    let visualStudioVersion140 = new Version(14, 0);
-    let visualStudioVersion150 = new Version(15, 0);
-
-    // keep this up-to-date; always point to the latest visual studio version.
-    let visualStudioVersionLatest = visualStudioVersion150;
-
-    let dotNetFrameworkRegistryPath = "SOFTWARE\\Microsoft\\.NETFramework";
-    let dotNetFrameworkSetupRegistryPath = "SOFTWARE\\Microsoft\\NET Framework Setup\\NDP";
-    let dotNetFrameworkSetupRegistryInstalledName = "Install";
-
-    let fullDotNetFrameworkRegistryKey = "HKEY_LOCAL_MACHINE\\" + dotNetFrameworkRegistryPath;
-    let dotNetFrameworkAssemblyFoldersRegistryPath = dotNetFrameworkRegistryPath + "\\AssemblyFolders";
-    let referenceAssembliesRegistryValueName = "All Assemblies In";
-
-    let dotNetFrameworkSdkInstallKeyValueV11 = "SDKInstallRootv1.1";
-    let dotNetFrameworkVersionFolderPrefixV11 = "v1.1"; // v1.1 is for Everett.
-    let dotNetFrameworkVersionV11 = "v1.1.4322";       // full Everett version to pass to NativeMethodsShared.GetRequestedRuntimeInfo().
-    let dotNetFrameworkRegistryKeyV11 = dotNetFrameworkSetupRegistryPath + "\\" + dotNetFrameworkVersionV11;
-
-    let dotNetFrameworkSdkInstallKeyValueV20 = "SDKInstallRootv2.0";
-    let dotNetFrameworkVersionFolderPrefixV20 = "v2.0"; // v2.0 is for Whidbey.
-    let dotNetFrameworkVersionV20 = "v2.0.50727"; // full Whidbey version to pass to NativeMethodsShared.GetRequestedRuntimeInfo().
-    let dotNetFrameworkRegistryKeyV20 = dotNetFrameworkSetupRegistryPath + "\\" + dotNetFrameworkVersionV20;
-
-    let dotNetFrameworkVersionFolderPrefixV30 = "v3.0"; // v3.0 is for WinFx.
-    let dotNetFrameworkVersionV30 = "v3.0"; // full WinFx version to pass to NativeMethodsShared.GetRequestedRuntimeInfo().
-    let dotNetFrameworkAssemblyFoldersRegistryKeyV30 = dotNetFrameworkAssemblyFoldersRegistryPath + "\\" + dotNetFrameworkVersionFolderPrefixV30;
-    let dotNetFrameworkRegistryKeyV30 = dotNetFrameworkSetupRegistryPath + "\\" + dotNetFrameworkVersionFolderPrefixV30 + "\\Setup";
-
-    let fallbackDotNetFrameworkSdkRegistryInstallPath = "SOFTWARE\\Microsoft\\Microsoft SDKs\\Windows";
-    let fallbackDotNetFrameworkSdkInstallKeyValue = "CurrentInstallFolder";
-
-    let dotNetFrameworkSdkRegistryPathForV35ToolsOnWinSDK70A = @"SOFTWARE\Microsoft\Microsoft SDKs\Windows\v7.0A\WinSDK-NetFx35Tools-x86";
-    let fullDotNetFrameworkSdkRegistryPathForV35ToolsOnWinSDK70A = "HKEY_LOCAL_MACHINE\\" + dotNetFrameworkSdkRegistryPathForV35ToolsOnWinSDK70A;
-
-    let dotNetFrameworkSdkRegistryPathForV35ToolsOnManagedToolsSDK80A = @"SOFTWARE\Microsoft\Microsoft SDKs\Windows\v8.0A\WinSDK-NetFx35Tools-x86";
-    let fullDotNetFrameworkSdkRegistryPathForV35ToolsOnManagedToolsSDK80A = "HKEY_LOCAL_MACHINE\\" + dotNetFrameworkSdkRegistryPathForV35ToolsOnManagedToolsSDK80A;
-
-    let dotNetFrameworkVersionFolderPrefixV35 = "v3.5"; // v3.5 is for Orcas.
-    let dotNetFrameworkRegistryKeyV35 = dotNetFrameworkSetupRegistryPath + "\\" + dotNetFrameworkVersionFolderPrefixV35;
-
-    let fullDotNetFrameworkSdkRegistryKeyV35OnVS10 = fullDotNetFrameworkSdkRegistryPathForV35ToolsOnWinSDK70A;
-    let fullDotNetFrameworkSdkRegistryKeyV35OnVS11 = fullDotNetFrameworkSdkRegistryPathForV35ToolsOnManagedToolsSDK80A;
-
-    let dotNetFrameworkVersionFolderPrefixV40 = "v4.0";
-    let ToolsVersionsRegistryPath = @"SOFTWARE\Microsoft\MSBuild\ToolsVersions";       // Path to the ToolsVersion definitions in the registry
-
-
-    let programFiles = Environment.GetEnvironmentVariable("ProgramFiles")
-
-    let programFiles32 =
-        // On a 64 bit machine we always want to use the program files x86.  If we are running as a 64 bit process then this variable will be set correctly
-        // If we are on a 32 bit machine or running as a 32 bit process then this variable will be null and the programFiles variable will be correct.
-        let programFilesX86 = Environment.GetEnvironmentVariable("ProgramFiles(x86)")
-        if programFilesX86 = null then 
-            programFiles 
-        else 
-            programFilesX86
-
-    let programFilesX64 =
-        if String.Equals(programFiles, programFiles32) then
-            // either we're in a 32-bit window, or we're on a 32-bit machine.  
-            // if we're on a 32-bit machine, ProgramW6432 won't exist
-            // if we're on a 64-bit machine, ProgramW6432 will point to the correct Program Files. 
-            Environment.GetEnvironmentVariable("ProgramW6432");
-        else
-            // 64-bit window on a 64-bit machine; %ProgramFiles% points to the 64-bit 
-            // Program Files already. 
-            programFiles;
-
-    let getArgumentException version =
-        let _, msg = SR.toolLocationHelperUnsupportedFrameworkVersion(version.ToString())
-        new ArgumentException(msg)
-
-    let TargetDotNetFrameworkVersionToSystemVersion version =
-        match version with
-        | TargetDotNetFrameworkVersion.Version11 -> dotNetFrameworkVersion11
-        | TargetDotNetFrameworkVersion.Version20 -> dotNetFrameworkVersion20
-        | TargetDotNetFrameworkVersion.Version30 -> dotNetFrameworkVersion30
-        | TargetDotNetFrameworkVersion.Version35 -> dotNetFrameworkVersion35
-        | TargetDotNetFrameworkVersion.Version40 -> dotNetFrameworkVersion40
-        | TargetDotNetFrameworkVersion.Version45 -> dotNetFrameworkVersion45
-        | TargetDotNetFrameworkVersion.Version451 -> dotNetFrameworkVersion451
-        | TargetDotNetFrameworkVersion.Version452 -> dotNetFrameworkVersion452
-        | TargetDotNetFrameworkVersion.Version46 -> dotNetFrameworkVersion46
-        | TargetDotNetFrameworkVersion.Version461 -> dotNetFrameworkVersion461
-        | TargetDotNetFrameworkVersion.Version462 -> dotNetFrameworkVersion462
-        | TargetDotNetFrameworkVersion.Version47 -> dotNetFrameworkVersion47
-        | TargetDotNetFrameworkVersion.Version471 -> dotNetFrameworkVersion471
-        | TargetDotNetFrameworkVersion.Version472 -> dotNetFrameworkVersion472
-        | _ -> raise (getArgumentException version)
-
-    let complusInstallRoot = Environment.GetEnvironmentVariable("COMPLUS_INSTALLROOT")
-    let complusVersion = Environment.GetEnvironmentVariable("COMPLUS_VERSION")
-
-    type DotNetFrameworkSpec (version, dotNetFrameworkRegistryKey, dotNetFrameworkSetupRegistryInstalledName, dotNetFrameworkVersionFolderPrefix, dotNetFrameworkSdkRegistryToolsKey, dotNetFrameworkSdkRegistryInstallationFolderName, hasMSBuild, _vsVersion) =
-
-        let _HKLM = "HKEY_LOCAL_MACHINE"
-        let _microsoftSDKsRegistryKey = @"SOFTWARE\Microsoft\Microsoft SDKs"
-        let dotNetFrameworkFolderPrefix = dotNetFrameworkVersionFolderPrefix
-        let frameworkName = FrameworkName(dotNetFrameworkIdentifier, version)
-
-#if !FX_NO_WIN_REGISTRY
-        let findRegistryValueUnderKey registryBaseKeyName registryKeyName registryView =
-         try
-            use baseKey = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine, registryView)
-            use subKey = baseKey.OpenSubKey(registryBaseKeyName)
-            match subKey with
-            | null -> None
-            | _ as x -> 
-                let keyValue = x.GetValue(registryKeyName)
-                match keyValue with
-                | null -> None
-                | _ as x -> Some (x.ToString())
-         with _ -> None
-#endif
-
-        let findRegistryValueUnderKey registryBaseKeyName registryKeyName =
-#if FX_NO_WIN_REGISTRY
-            ignore registryBaseKeyName 
-            ignore registryKeyName 
-            None
-#else
-            findRegistryValueUnderKey registryBaseKeyName registryKeyName RegistryView.Default
-#endif
-        let CheckForFrameworkInstallation registryEntryToCheckInstall registryValueToCheckInstall =
-            // Complus is not set we need to make sure the framework we are targeting is installed. Check the registry key before trying to find the directory.
-            // If complus is set then we will return that directory as the framework directory, there is no need to check the registry value for the framework and it may not even be installed.
-
-            if (String.IsNullOrEmpty(complusInstallRoot) && String.IsNullOrEmpty(complusVersion)) then
-
-                // If the registry entry is 1 then the framework is installed. Go ahead and find the directory. If it is not 1 then the framework is not installed, return null
-
-                match findRegistryValueUnderKey registryEntryToCheckInstall registryValueToCheckInstall with
-                | None -> false
-                | Some x -> if String.Compare("1", x, StringComparison.OrdinalIgnoreCase) = 0 then true else false
-
-            else true
-
-        let PickDirectoryFromInstallRoot prefix (installRoot:string)  arch =
-            let searchPattern = prefix + "*"
-            let calculatePath =
-                let bitness s = if arch = DotNetFrameworkArchitecture.Bitness64 then s + @"64\" else s + @"\"
-                let trim = if installRoot.EndsWith(@"\") then installRoot.Substring(0, installRoot.Length - 1) else installRoot
-                let i64 = trim.IndexOf("Framework64", StringComparison.OrdinalIgnoreCase)
-                if i64 = -1 then bitness trim else bitness (trim.Substring(0, i64 + 9))
-
-            if Directory.Exists(calculatePath) then
-                let directories = Directory.GetDirectories(calculatePath, searchPattern) |> Array.sort
-                if directories.Length = 0 then None
-                else
-                    // We don't care which one we choose, but we want to be predictible.
-                    // The intention here is to choose the alphabetical maximum.
-                    let mutable max = directories |> Array.last
-                    Some max
-            else
-                None
-
-        let FindDotNetFrameworkPath prefix registryEntryToCheckInstall registryValueToCheckInstall arch =
-            // If the COMPLUS variables are set, they override everything -- that's the directory we want.
-            if String.IsNullOrEmpty(complusInstallRoot) || String.IsNullOrEmpty(complusVersion) then
-                // We haven't managed to use exact methods to locate the FX, Since we run on coreclr 
-                // we can't guess where by using the currently executing runtime
-                let installRootFromReg = findRegistryValueUnderKey registryEntryToCheckInstall registryValueToCheckInstall
-                match installRootFromReg with
-                | None -> None
-                | Some x -> PickDirectoryFromInstallRoot prefix x arch
-            else 
-                Some (Path.Combine(complusInstallRoot, complusVersion))
-
-
-        /// 
-        /// Take the parts of the Target framework moniker and formulate the reference assembly path based on the the following pattern:
-        /// For a framework and version:
-        ///     $(TargetFrameworkRootPath)\$(TargetFrameworkIdentifier)\$(TargetFrameworkVersion)
-        /// For a subtype:
-        ///     $(TargetFrameworkRootPath)\$(TargetFrameworkIdentifier)\$(TargetFrameworkVersion)\SubType\$(TargetFrameworkSubType)
-        /// e.g.NET Framework v4.0 would locate its reference assemblies in:
-        ///     \Program Files\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0
-        /// e.g.Silverlight v2.0 would locate its reference assemblies in:
-        ///     \Program Files\Reference Assemblies\Microsoft\Framework\Silverlight\v2.0
-        /// e.g.NET Compact Framework v3.5, subtype PocketPC would locate its reference assemblies in:
-        ///     \Program Files\Reference Assemblies\Microsoft\Framework\.NETCompactFramework\v3.5\SubType\PocketPC
-        /// 
-        /// The path to the reference assembly location
-        let GenerateReferenceAssemblyPath targetFrameworkRootPath (frameworkName:FrameworkName) =
-            match targetFrameworkRootPath with
-            | Some x ->
-                try
-                    let basePath = Path.Combine(x, frameworkName.Identifier, "v" + frameworkName.Version.ToString())
-                    let withProfile root =
-                        if not (String.IsNullOrEmpty(frameworkName.Profile)) then
-                            Path.Combine(root, "Profile", frameworkName.Profile)
-                        else root
-                    Some (Path.GetFullPath(withProfile basePath) + @"\")
-                with _ ->
-                    // The compiler does not see the massage above an as exception;
-                    None
-            | _ -> None
-
-
-        /// 
-        /// Generate the path to the program files reference assembly location by taking in the program files special folder and then 
-        /// using that path to generate the path to the reference assemblies location.
-        /// 
-        let generateProgramFilesReferenceAssemblyRoot =
-            try
-                Some(Path.GetFullPath( Path.Combine(programFiles32, "Reference Assemblies\\Microsoft\\Framework") ))
-            with _ ->
-                None
-
-        let pathToDotNetFrameworkReferenceAssemblies =
-            match GenerateReferenceAssemblyPath generateProgramFilesReferenceAssemblyRoot frameworkName with
-            | Some x when Directory.Exists(x) -> x + @"\"
-            | _ -> ""
-
-
-        member this.Version = version
-        member this.dotNetFrameworkRegistryKey = dotNetFrameworkRegistryKey
-        member this.dotNetFrameworkSetupRegistryInstalledName = dotNetFrameworkSetupRegistryInstalledName
-        member this.dotNetFrameworkSdkRegistryToolsKey = dotNetFrameworkSdkRegistryToolsKey
-        member this.DotNetFrameworkSdkRegistryInstallationFolderName = dotNetFrameworkSdkRegistryInstallationFolderName
-        member this.HasMSBuild = hasMSBuild
-
-        member this.pathsToDotNetFramework = new ConcurrentDictionary()
-        member this.pathsToDotNetFrameworkSdkTools = new ConcurrentDictionary()
-        member this.pathToWindowsSdk = "Todo:   Review dow we really need this"
-
-//            /// 
-//            /// Gets the full registry key of this .net framework Sdk for the given visual studio version.
-//            /// i.e. "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Microsoft SDKs\Windows\v8.0A\WinSDK-NetFx40Tools-x86" for .net v4.5 on VS11.
-//            /// 
-//            public virtual string GetDotNetFrameworkSdkRootRegistryKey(VisualStudioSpec visualStudioSpec)
-//            {
-//                return string.Join(@"\", HKLM, MicrosoftSDKsRegistryKey, visualStudioSpec.DotNetFrameworkSdkRegistryKey, this.dotNetFrameworkSdkRegistryToolsKey);
-//            }
-
-        // Doesn't need to be virtual @@@@@
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
-        abstract member GetPathToDotNetFramework: DotNetFrameworkArchitecture -> string
-#else
-        abstract member GetPathToDotNetFramework: DotNetFrameworkArchitecture -> string?
-#endif
-        default this.GetPathToDotNetFramework arch =
-            match this.pathsToDotNetFramework.TryGetValue arch with
-            | true, x -> x
-            | _ ->
-                if not (CheckForFrameworkInstallation this.dotNetFrameworkRegistryKey this.dotNetFrameworkSetupRegistryInstalledName) then null
-                else
-                    // We're not installed and we haven't found this framework path yet -- so find it!
-                    let fwp:string option = (FindDotNetFrameworkPath dotNetFrameworkFolderPrefix dotNetFrameworkRegistryKey this.dotNetFrameworkSetupRegistryInstalledName arch)
-                    match fwp with
-                    | Some x ->
-                        // For .net frameworks that should have msbuild.exe is it there
-                        if hasMSBuild && not (File.Exists(Path.Combine(x, "msbuild.exe"))) then null
-                        else this.pathsToDotNetFramework.[arch] <- x; x
-                    | _ -> null
-
-        // Doesn't need to be virtual @@@@@
-        /// 
-        /// Gets the full path of reference assemblies folder.
-        /// i.e. "C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.5\" for .net v4.5.
-        /// 
-        abstract member GetPathToDotNetFrameworkReferenceAssemblies: string
-        default this.GetPathToDotNetFrameworkReferenceAssemblies = pathToDotNetFrameworkReferenceAssemblies
-
-//            /// 
-//            /// Gets the full path of .net framework sdk tools for the given visual studio version.
-//            /// i.e. "C:\Program Files (x86)\Microsoft SDKs\Windows\v8.0A\bin\NETFX 4.0 Tools\" for .net v4.5 on VS11.
-//            /// 
-//            public virtual string GetPathToDotNetFrameworkSdkTools(VisualStudioSpec visualStudioSpec)
-//            {
-//                string cachedPath;
-//                if (this.pathsToDotNetFrameworkSdkTools.TryGetValue(visualStudioSpec.Version, out cachedPath))
-//                {
-//                    return cachedPath;
-//                }
-//
-//                string registryPath = string.Join(@"\", MicrosoftSDKsRegistryKey, visualStudioSpec.DotNetFrameworkSdkRegistryKey, this.dotNetFrameworkSdkRegistryToolsKey);
-//
-//                // For the Dev10 SDK, we check the registry that corresponds to the current process' bitness, rather than
-//                // always the 32-bit one the way we do for Dev11 and onward, since that's what we did in Dev10 as well.
-//                // As of Dev11, the SDK reg keys are installed in the 32-bit registry. 
-//                RegistryView registryView = visualStudioSpec.Version == visualStudioVersion100 ? RegistryView.Default : RegistryView.Registry32;
-//
-//                string generatedPathToDotNetFrameworkSdkTools = FindRegistryValueUnderKey(
-//                    registryPath,
-//                    this.dotNetFrameworkSdkRegistryInstallationFolderName,
-//                    registryView);
-//
-//                if (string.IsNullOrEmpty(generatedPathToDotNetFrameworkSdkTools))
-//                {
-//                    // Fallback mechanisms.
-//
-//                    // Try to find explicit fallback rule.
-//                    // i.e. v4.5.1 on VS12 fallbacks to v4.5 on VS12.
-//                    bool foundExplicitRule = false;
-//                    for (int i = 0; i < s_explicitFallbackRulesForPathToDotNetFrameworkSdkTools.GetLength(0); ++i)
-//                    {
-//                        var trigger = s_explicitFallbackRulesForPathToDotNetFrameworkSdkTools[i, 0];
-//                        if (trigger.Item1 == this.version && trigger.Item2 == visualStudioSpec.Version)
-//                        {
-//                            foundExplicitRule = true;
-//                            var fallback = s_explicitFallbackRulesForPathToDotNetFrameworkSdkTools[i, 1];
-//                            generatedPathToDotNetFrameworkSdkTools = FallbackToPathToDotNetFrameworkSdkToolsInPreviousVersion(fallback.Item1, fallback.Item2);
-//                            break;
-//                        }
-//                    }
-//
-//                    // Otherwise, fallback to previous VS.
-//                    // i.e. fallback to v110 if the current visual studio version is v120.
-//                    if (!foundExplicitRule)
-//                    {
-//                        int index = Array.IndexOf(s_visualStudioSpecs, visualStudioSpec);
-//                        if (index > 0)
-//                        {
-//                            // The items in the array "visualStudioSpecs" must be ordered by version. That would allow us to fallback to the previous visual studio version easily.
-//                            VisualStudioSpec fallbackVisualStudioSpec = s_visualStudioSpecs[index - 1];
-//                            generatedPathToDotNetFrameworkSdkTools = FallbackToPathToDotNetFrameworkSdkToolsInPreviousVersion(this.version, fallbackVisualStudioSpec.Version);
-//                        }
-//                    }
-//                }
-//
-//                if (string.IsNullOrEmpty(generatedPathToDotNetFrameworkSdkTools))
-//                {
-//                    // Fallback to "default" ultimately.
-//                    generatedPathToDotNetFrameworkSdkTools = FallbackToDefaultPathToDotNetFrameworkSdkTools(this.version);
-//                }
-//
-//                if (!string.IsNullOrEmpty(generatedPathToDotNetFrameworkSdkTools))
-//                {
-//                    this.pathsToDotNetFrameworkSdkTools[visualStudioSpec.Version] = generatedPathToDotNetFrameworkSdkTools;
-//                }
-//
-//                return generatedPathToDotNetFrameworkSdkTools;
-//            }
-//
-//            /// 
-//            /// Gets the full path of .net framework sdk.
-//            /// i.e. "C:\Program Files (x86)\Microsoft SDKs\Windows\v8.0A\" for .net v4.5 on VS11.
-//            /// 
-//            public virtual string GetPathToDotNetFrameworkSdk(VisualStudioSpec visualStudioSpec)
-//            {
-//                string pathToBinRoot = this.GetPathToDotNetFrameworkSdkTools(visualStudioSpec);
-//                pathToBinRoot = RemoveDirectories(pathToBinRoot, 2);
-//                return pathToBinRoot;
-//            }
-//
-//            /// 
-//            /// Gets the full path of reference assemblies folder.
-//            /// i.e. "C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.5\" for .net v4.5.
-//            /// 
-//            public virtual string GetPathToDotNetFrameworkReferenceAssemblies()
-//            {
-//                if (this.pathToDotNetFrameworkReferenceAssemblies == null)
-//                {
-//                    // when a user requests the 40 reference assembly path we don't need to read the redist list because we will not be chaining so we may as well just
-//                    // generate the path and save us some time.
-//                    string referencePath = GenerateReferenceAssemblyPath(FrameworkLocationHelper.programFilesReferenceAssemblyLocation, this.FrameworkName);
-//                    if (Directory.Exists(referencePath))
-//                    {
-//                        this.pathToDotNetFrameworkReferenceAssemblies = FileUtilities.EnsureTrailingSlash(referencePath);
-//                    }//                }
-//
-//                return this.pathToDotNetFrameworkReferenceAssemblies;
-//            }
-//
-//            /// 
-//            /// Gets the full path of the corresponding windows sdk shipped with this .net framework.
-//            /// i.e. "C:\Program Files (x86)\Windows Kits\8.0\" for v8.0 (shipped with .net v4.5 and VS11).
-//            /// 
-//            public virtual string GetPathToWindowsSdk()
-//            {
-//                if (this.pathToWindowsSdk == null)
-//                {
-//                    ErrorUtilities.VerifyThrowArgument(this.visualStudioVersion != null, "FrameworkLocationHelper.UnsupportedFrameworkVersionForWindowsSdk", this.version);
-//
-//                    var visualStudioSpec = GetVisualStudioSpec(this.visualStudioVersion);
-//
-//                    if (string.IsNullOrEmpty(visualStudioSpec.WindowsSdkRegistryKey) || string.IsNullOrEmpty(visualStudioSpec.WindowsSdkRegistryInstallationFolderName))
-//                    {
-//                        ErrorUtilities.ThrowArgument("FrameworkLocationHelper.UnsupportedFrameworkVersionForWindowsSdk", this.version);
-//                    }
-//
-//                    string registryPath = string.Join(@"\", MicrosoftSDKsRegistryKey, "Windows", visualStudioSpec.WindowsSdkRegistryKey);
-//
-//                    // As of Dev11, the SDK reg keys are installed in the 32-bit registry. 
-//                    this.pathToWindowsSdk = FindRegistryValueUnderKey(
-//                        registryPath,
-//                        visualStudioSpec.WindowsSdkRegistryInstallationFolderName,
-//                        RegistryView.Registry32);
-//                }
-//
-//                return this.pathToWindowsSdk;
-//            }
-//
-//            protected static string FallbackToPathToDotNetFrameworkSdkToolsInPreviousVersion(Version dotNetFrameworkVersion, Version visualStudioVersion)
-//            {
-//                VisualStudioSpec visualStudioSpec;
-//                DotNetFrameworkSpec dotNetFrameworkSpec;
-//                if (s_visualStudioSpecDict.TryGetValue(visualStudioVersion, out visualStudioSpec)
-//                    && s_dotNetFrameworkSpecDict.TryGetValue(dotNetFrameworkVersion, out dotNetFrameworkSpec)
-//                    && visualStudioSpec.SupportedDotNetFrameworkVersions.Contains(dotNetFrameworkVersion))
-//                {
-//                    return dotNetFrameworkSpec.GetPathToDotNetFrameworkSdkTools(visualStudioSpec);
-//                }
-//
-//                return null;
-//            }
-//
-//            protected static string FallbackToDefaultPathToDotNetFrameworkSdkTools(Version dotNetFrameworkVersion)
-//            {
-//                if (dotNetFrameworkVersion.Major == 4)
-//                {
-//                    return FrameworkLocationHelper.PathToV4ToolsInFallbackDotNetFrameworkSdk;
-//                }
-//
-//                if (dotNetFrameworkVersion == dotNetFrameworkVersion35)
-//                {
-//                    return FrameworkLocationHelper.PathToV35ToolsInFallbackDotNetFrameworkSdk;
-//                }
-//
-//                return null;
-//            }
-//        }
-
-    type DotNetFrameworkSpecLegacy (version,
-                                    dotNetFrameworkRegistryKey,
-                                    dotNetFrameworkSetupRegistryInstalledName,
-                                    dotNetFrameworkVersionFolderPrefix,
-                                    dotNetFrameworkSdkRegistryToolsKey,
-                                    dotNetFrameworkSdkRegistryInstallationFolderName,
-                                    hasMSBuild, 
-                                    vsBuild) =
-        inherit DotNetFrameworkSpec (version,
-                                     dotNetFrameworkRegistryKey,
-                                     dotNetFrameworkSetupRegistryInstalledName,
-                                     dotNetFrameworkVersionFolderPrefix,
-                                     dotNetFrameworkSdkRegistryToolsKey,
-                                     dotNetFrameworkSdkRegistryInstallationFolderName,
-                                     hasMSBuild, 
-                                     vsBuild)
-
-    type DotNetFrameworkSpecV3 (version,
-                                dotNetFrameworkRegistryKey,
-                                dotNetFrameworkSetupRegistryInstalledName,
-                                dotNetFrameworkVersionFolderPrefix,
-                                dotNetFrameworkSdkRegistryToolsKey,
-                                dotNetFrameworkSdkRegistryInstallationFolderName,
-                                hasMSBuild, 
-                                vsBuild) =
-        inherit DotNetFrameworkSpec(version,
-                                    dotNetFrameworkRegistryKey,
-                                    dotNetFrameworkSetupRegistryInstalledName,
-                                    dotNetFrameworkVersionFolderPrefix,
-                                    dotNetFrameworkSdkRegistryToolsKey,
-                                    dotNetFrameworkSdkRegistryInstallationFolderName,
-                                    hasMSBuild, 
-                                    vsBuild)
-
-
-//        {
-//            private string _pathToDotNetFrameworkSdkTools;
-//
-//            public DotNetFrameworkSpecLegacy(
-//                Version version,
-//                string dotNetFrameworkRegistryKey,
-//                string dotNetFrameworkSetupRegistryInstalledName,
-//                string dotNetFrameworkVersionFolderPrefix,
-//                string dotNetFrameworkSdkRegistryInstallationFolderName,
-//                bool hasMSBuild)
-//                : base(version,
-//                      dotNetFrameworkRegistryKey,
-//                      dotNetFrameworkSetupRegistryInstalledName,
-//                      dotNetFrameworkVersionFolderPrefix,
-//                      null,
-//                      dotNetFrameworkSdkRegistryInstallationFolderName,
-//                      hasMSBuild)
-//            {
-//            }
-//
-//            /// 
-//            /// Gets the full registry key of this .net framework Sdk for the given visual studio version.
-//            /// i.e. "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\.NETFramework" for v1.1 and v2.0.
-//            /// 
-//            public override string GetDotNetFrameworkSdkRootRegistryKey(VisualStudioSpec visualStudioSpec)
-//            {
-//                return FrameworkLocationHelper.fullDotNetFrameworkRegistryKey;
-//            }
-//
-//            /// 
-//            /// Gets the full path of .net framework sdk tools for the given visual studio version.
-//            /// 
-//            public override string GetPathToDotNetFrameworkSdkTools(VisualStudioSpec visualStudioSpec)
-//            {
-//                if (_pathToDotNetFrameworkSdkTools == null)
-//                {
-//                    _pathToDotNetFrameworkSdkTools = FindRegistryValueUnderKey(
-//                        dotNetFrameworkRegistryPath,
-//                        this.dotNetFrameworkSdkRegistryInstallationFolderName);
-//                }
-//
-//                return _pathToDotNetFrameworkSdkTools;
-//            }
-//
-//            /// 
-//            /// Gets the full path of .net framework sdk, which is the full path of .net framework sdk tools for v1.1 and v2.0.
-//            /// 
-//            public override string GetPathToDotNetFrameworkSdk(VisualStudioSpec visualStudioSpec)
-//            {
-//                return this.GetPathToDotNetFrameworkSdkTools(visualStudioSpec);
-//            }
-//
-//            /// 
-//            /// Gets the full path of reference assemblies folder, which is the full path of .net framework for v1.1 and v2.0.
-//            /// 
-//            public override string GetPathToDotNetFrameworkReferenceAssemblies()
-//            {
-//                return this.GetPathToDotNetFramework(DotNetFrameworkArchitecture.Current);
-//            }
-//        }
-//
-//        /// 
-//        /// Specialized implementation for legacy .net framework v3.0 and v3.5.
-//        /// 
-//        private class DotNetFrameworkSpecV3 : DotNetFrameworkSpec
-//        {
-//            public DotNetFrameworkSpecV3(
-//                Version version,
-//                string dotNetFrameworkRegistryKey,
-//                string dotNetFrameworkSetupRegistryInstalledName,
-//                string dotNetFrameworkVersionFolderPrefix,
-//                string dotNetFrameworkSdkRegistryToolsKey,
-//                string dotNetFrameworkSdkRegistryInstallationFolderName,
-//                bool hasMSBuild)
-//                : base(version,
-//                      dotNetFrameworkRegistryKey,
-//                      dotNetFrameworkSetupRegistryInstalledName,
-//                      dotNetFrameworkVersionFolderPrefix,
-//                      dotNetFrameworkSdkRegistryToolsKey,
-//                      dotNetFrameworkSdkRegistryInstallationFolderName,
-//                      hasMSBuild)
-//            {
-//            }
-//
-//            /// 
-//            /// Gets the full path of .net framework sdk.
-//            /// i.e. "C:\Program Files (x86)\Microsoft SDKs\Windows\v7.0A\" for .net v3.5 on VS11.
-//            /// 
-//            public override string GetPathToDotNetFrameworkSdk(VisualStudioSpec visualStudioSpec)
-//            {
-//                string pathToBinRoot = this.GetPathToDotNetFrameworkSdkTools(visualStudioSpec);
-//                pathToBinRoot = RemoveDirectories(pathToBinRoot, 1);
-//                return pathToBinRoot;
-//            }
-//
-//            /// 
-//            /// Gets the full path of reference assemblies folder.
-//            /// i.e. "C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\v3.5\" for v3.5.
-//            /// 
-//            public override string GetPathToDotNetFrameworkReferenceAssemblies()
-//            {
-//                if (this.pathToDotNetFrameworkReferenceAssemblies == null)
-//                {
-//                    this.pathToDotNetFrameworkReferenceAssemblies = FindRegistryValueUnderKey(
-//                        dotNetFrameworkAssemblyFoldersRegistryPath + "\\" + this.dotNetFrameworkFolderPrefix,
-//                        referenceAssembliesRegistryValueName);
-//
-//                    if (this.pathToDotNetFrameworkReferenceAssemblies == null)
-//                    {
-//                        this.pathToDotNetFrameworkReferenceAssemblies = GenerateReferenceAssemblyDirectory(dotNetFrameworkFolderPrefix);
-//                    }
-//                }
-//
-//                return this.pathToDotNetFrameworkReferenceAssemblies;
-//            }
-//        }
-//
-
-    let CreateDotNetFrameworkSpecForV4 version visualStudioVersion =
-        new DotNetFrameworkSpec(
-            version,
-            dotNetFrameworkSetupRegistryPath + "\\v4\\Full",
-            "Install",
-            "v4.0",
-            "WinSDK-NetFx40Tools-x86",
-            "InstallationFolder",
-            true,
-            Some visualStudioVersion)
-
-    let dotNetFrameworkSpecDict = 
-        let array = [|
-            new DotNetFrameworkSpecLegacy(dotNetFrameworkVersion11,                             // v1.1
-                dotNetFrameworkRegistryKeyV11,
-                dotNetFrameworkSetupRegistryInstalledName,
-                dotNetFrameworkVersionFolderPrefixV11,
-                dotNetFrameworkSdkInstallKeyValueV11,
-                "",
-                false,
-                None) :> DotNetFrameworkSpec
-            new DotNetFrameworkSpecLegacy(                                                      // v2.0
-                dotNetFrameworkVersion20,
-                dotNetFrameworkRegistryKeyV20,
-                dotNetFrameworkSetupRegistryInstalledName,
-                dotNetFrameworkVersionFolderPrefixV20,
-                dotNetFrameworkSdkInstallKeyValueV20,
-                "",
-                true,
-                None) :> DotNetFrameworkSpec
-            new DotNetFrameworkSpecV3(                                                          // v3.0
-                dotNetFrameworkVersion30,
-                dotNetFrameworkRegistryKeyV30,
-                "InstallSuccess",
-                dotNetFrameworkVersionFolderPrefixV30,
-                "",
-                "",
-                false,
-                None) :> DotNetFrameworkSpec
-            new DotNetFrameworkSpecV3(                                                          // v3.5
-                dotNetFrameworkVersion35,
-                dotNetFrameworkRegistryKeyV35,
-                dotNetFrameworkSetupRegistryInstalledName,
-                dotNetFrameworkVersionFolderPrefixV35,
-                "WinSDK-NetFx35Tools-x86",
-                "InstallationFolder",
-                true,
-                None) :> DotNetFrameworkSpec
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion40  visualStudioVersion100     // v4.0
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion45  visualStudioVersion110     // v4.5
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion451 visualStudioVersion120     // v4.5.1
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion452 visualStudioVersion150     // v4.5.2
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion46  visualStudioVersion140     // v4.6
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion461 visualStudioVersion150     // v4.6.1
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion462 visualStudioVersion150     // v4.6.2
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion47  visualStudioVersion150     // v4.7
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion471 visualStudioVersion150     // v4.7.1
-            CreateDotNetFrameworkSpecForV4 dotNetFrameworkVersion472 visualStudioVersion150     // v4.7.2
-        |]
-        array.ToDictionary(fun spec -> spec.Version)
-
-    let getDotNetFrameworkSpec version =
-        match dotNetFrameworkSpecDict.TryGetValue version with
-        | true, x -> x
-        | _ -> raise (getArgumentException version)
-
-    // Get a fully qualified path to the framework's root directory. 
-//    let GetPathToDotNetFramework version architecture =
-//        let frameworkVersion = TargetDotNetFrameworkVersionToSystemVersion version
-//        (getDotNetFrameworkSpec frameworkVersion).GetPathToDotNetFramework(architecture)
-
-
-    // Get a fully qualified path to the frameworks root directory.
-    let GetPathToDotNetFramework version =
-//        GetPathToDotNetFramework version DotNetFrameworkArchitecture.Current
-        let frameworkVersion = TargetDotNetFrameworkVersionToSystemVersion version
-        (getDotNetFrameworkSpec frameworkVersion).GetPathToDotNetFramework(DotNetFrameworkArchitecture.Current)
-
-    /// 
-    /// Returns the path to the reference assemblies location for the given framework version.
-    /// 
-    /// Version of the targeted .NET Framework
-    /// Path string.
-    let GetPathToDotNetFrameworkReferenceAssemblies version =
-        let frameworkVersion = TargetDotNetFrameworkVersionToSystemVersion version
-        (getDotNetFrameworkSpec frameworkVersion).GetPathToDotNetFrameworkReferenceAssemblies
-
-    type IBuildEngine =
-        abstract member BuildProjectFile : string*string[]*IDictionary*IDictionary -> bool
-        abstract member LogCustomEvent : (*CustomBuildEventArgs*) obj -> unit
-        abstract member LogErrorEvent : (*BuildErrorEventArgs*) obj -> unit
-        abstract member LogMessageEvent : (*BuildMessageEventArgs*) obj -> unit
-        abstract member LogWarningEvent : (*BuildMessageEventArgs*) obj -> unit
-
-        // Properties
-        abstract member ColumnNumberOfTaskNode : int with get
-        abstract member ContinueOnError : bool with get
-        abstract member LineNumberOfTaskNode : int with get
-        abstract member ProjectFileOfTaskNode : string with get
-
-//    let getPropertyValue instance propName =
-//        instance.GetType().GetProperty(propName, BindingFlags.Public).GetValue(instance, null)
-//
-//    let setPropertyValue instance propName propValue=
-//        instance.GetType().GetPropserty(propName, BindingFlags.Public).SetValue(instance, propValue, null)
-
-    type ResolveAssemblyReference () =
-        let assembly = Assembly.Load(new AssemblyName("Microsoft.Build.Tasks.v4.0, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"))
-        let resolveAssemblyReferenceType = assembly.GetType("Microsoft.Build.Tasks.ResolveAssemblyReference")
-        let instance = Activator.CreateInstance(resolveAssemblyReferenceType)
-
-        member this.BuildEngine
-            with get ():IBuildEngine = (instance.GetPropertyValue("BuildEngine") :?> IBuildEngine)
-            and set (value:IBuildEngine) = (instance.SetPropertyValue("BuildEngine", value)); ()
-
-        member this.TargetFrameworkDirectories
-            with get ():string[] = (instance.GetPropertyValue("TargetFrameworkDirectories") :?> string[])
-            and set (value:string[]) = (instance.SetPropertyValue("TargetFrameworkDirectories", value)); ()
-
-        member this.FindRelatedFiles
-            with get () :bool = (instance.GetPropertyValue("FindRelatedFiles") :?> bool)
-            and set (value:bool) = (instance.SetPropertyValue("FindRelatedFiles", value)); ()
-
-        member this.FindDependencies
-            with get ():bool = (instance.GetPropertyValue("FindDependencies") :?> bool)
-            and set (value:bool) = (instance.SetPropertyValue("FindDependencies", value)); ()
-
-        member this.FindSatellites
-            with get ():bool = (instance.GetPropertyValue("FindSatellites") :?> bool)
-            and set (value:bool) = (instance.SetPropertyValue("FindSatellites", value)); ()
-
-        member this.FindSerializationAssemblies
-            with get ():bool = (instance.GetPropertyValue("FindSerializationAssemblies") :?> bool)
-            and set (value:bool) = (instance.SetPropertyValue("FindSerializationAssemblies", value)); ()
-
-        member this.TargetedRuntimeVersion
-            with get ():string = (instance.GetPropertyValue("TargetedRuntimeVersion") :?> string)
-            and set (value:string) = (instance.SetPropertyValue("TargetedRuntimeVersion", value)); ()
-
-        member this.TargetProcessorArchitecture
-            with get ():string = (instance.GetPropertyValue("TargetProcessorArchitecture") :?> string)
-            and set (value:string) = (instance.SetPropertyValue("TargetProcessorArchitecture", value)); ()
-
-        member this.CopyLocalDependenciesWhenParentReferenceInGac
-            with get ():bool = (instance.GetPropertyValue("CopyLocalDependenciesWhenParentReferenceInGac") :?> bool)
-            and set (value:bool) = (instance.SetPropertyValue("CopyLocalDependenciesWhenParentReferenceInGac", value)); ()
-
-        member this.AllowedAssemblyExtensions
-            with get () :string[] = (instance.GetPropertyValue("AllowedAssemblyExtensions") :?> string[])
-            and set (value:string[]) =  (instance.SetPropertyValue("AllowedAssemblyExtensions", value)); ()
-
-        member this.Assemblies
-            with get ():ITaskItem[] = (instance.GetPropertyValue("Assemblies") :?> ITaskItem[])
-            and set (value:ITaskItem[]) = (instance.SetPropertyValue("Assemblies", value)); ()
-
-        member this.CopyLocalFiles = (instance.GetPropertyValue("CopyLocalFiles") :?> ITaskItem[])
-
-        member this.RelatedFiles = (instance.GetPropertyValue("RelatedFiles") :?> ITaskItem[])
-
-        member this.ResolvedFiles = (instance.GetPropertyValue("ResolvedFiles") :?> ITaskItem[])
-
-        member this.ResolvedDependencyFiles = (instance.GetPropertyValue("ResolvedDependencyFiles") :?> ITaskItem[])
-
-        member this.SatelliteFiles = (instance.GetPropertyValue("SatelliteFiles") :?> ITaskItem[])
-
-        member this.ScatterFiles = (instance.GetPropertyValue("ScatterFiles") :?> ITaskItem[])
-
-        member this.SuggestedRedirects = (instance.GetPropertyValue("SuggestedRedirects") :?> ITaskItem[])
-
-        member this.SearchPaths
-            with get () :string[] = (instance.GetPropertyValue("SearchPaths") :?> string[])
-            and set (value:string[]) =  (instance.SetPropertyValue("SearchPaths", value)); ()
-
-        member this.Execute () =
-            let m = instance.GetType().GetMethod("Execute", [| |])
-            m.Invoke(instance, [||]) :?> bool
-
-#endif
diff --git a/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs b/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
deleted file mode 100644
index 7334c52edee..00000000000
--- a/tests/FSharp.Core.UnitTests/SurfaceArea.net40.fs
+++ /dev/null
@@ -1,2942 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-namespace FSharp.Core.UnitTests.SurfaceArea
-
-open NUnit.Framework
-open FSharp.Core.UnitTests.LibraryTestFx
-
-type SurfaceAreaTest() =
-    []
-    member this.VerifyArea() =
-        let expected = @"
-Microsoft.FSharp.Collections.Array2DModule: Int32 Base1[T](T[,])
-Microsoft.FSharp.Collections.Array2DModule: Int32 Base2[T](T[,])
-Microsoft.FSharp.Collections.Array2DModule: Int32 Length1[T](T[,])
-Microsoft.FSharp.Collections.Array2DModule: Int32 Length2[T](T[,])
-Microsoft.FSharp.Collections.Array2DModule: T Get[T](T[,], Int32, Int32)
-Microsoft.FSharp.Collections.Array2DModule: TResult[,] MapIndexed[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]]], T[,])
-Microsoft.FSharp.Collections.Array2DModule: TResult[,] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[,])
-Microsoft.FSharp.Collections.Array2DModule: T[,] Copy[T](T[,])
-Microsoft.FSharp.Collections.Array2DModule: T[,] CreateBased[T](Int32, Int32, Int32, Int32, T)
-Microsoft.FSharp.Collections.Array2DModule: T[,] Create[T](Int32, Int32, T)
-Microsoft.FSharp.Collections.Array2DModule: T[,] InitializeBased[T](Int32, Int32, Int32, Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]])
-Microsoft.FSharp.Collections.Array2DModule: T[,] Initialize[T](Int32, Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]])
-Microsoft.FSharp.Collections.Array2DModule: T[,] Rebase[T](T[,])
-Microsoft.FSharp.Collections.Array2DModule: T[,] ZeroCreateBased[T](Int32, Int32, Int32, Int32)
-Microsoft.FSharp.Collections.Array2DModule: T[,] ZeroCreate[T](Int32, Int32)
-Microsoft.FSharp.Collections.Array2DModule: Void CopyTo[T](T[,], Int32, Int32, T[,], Int32, Int32, Int32, Int32)
-Microsoft.FSharp.Collections.Array2DModule: Void IterateIndexed[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]]], T[,])
-Microsoft.FSharp.Collections.Array2DModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], T[,])
-Microsoft.FSharp.Collections.Array2DModule: Void Set[T](T[,], Int32, Int32, T)
-Microsoft.FSharp.Collections.Array3DModule: Int32 Length1[T](T[,,])
-Microsoft.FSharp.Collections.Array3DModule: Int32 Length2[T](T[,,])
-Microsoft.FSharp.Collections.Array3DModule: Int32 Length3[T](T[,,])
-Microsoft.FSharp.Collections.Array3DModule: T Get[T](T[,,], Int32, Int32, Int32)
-Microsoft.FSharp.Collections.Array3DModule: TResult[,,] MapIndexed[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]]]], T[,,])
-Microsoft.FSharp.Collections.Array3DModule: TResult[,,] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[,,])
-Microsoft.FSharp.Collections.Array3DModule: T[,,] Create[T](Int32, Int32, Int32, T)
-Microsoft.FSharp.Collections.Array3DModule: T[,,] Initialize[T](Int32, Int32, Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]]])
-Microsoft.FSharp.Collections.Array3DModule: T[,,] ZeroCreate[T](Int32, Int32, Int32)
-Microsoft.FSharp.Collections.Array3DModule: Void IterateIndexed[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]]]], T[,,])
-Microsoft.FSharp.Collections.Array3DModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], T[,,])
-Microsoft.FSharp.Collections.Array3DModule: Void Set[T](T[,,], Int32, Int32, Int32, T)
-Microsoft.FSharp.Collections.Array4DModule: Int32 Length1[T](T[,,,])
-Microsoft.FSharp.Collections.Array4DModule: Int32 Length2[T](T[,,,])
-Microsoft.FSharp.Collections.Array4DModule: Int32 Length3[T](T[,,,])
-Microsoft.FSharp.Collections.Array4DModule: Int32 Length4[T](T[,,,])
-Microsoft.FSharp.Collections.Array4DModule: T Get[T](T[,,,], Int32, Int32, Int32, Int32)
-Microsoft.FSharp.Collections.Array4DModule: T[,,,] Create[T](Int32, Int32, Int32, Int32, T)
-Microsoft.FSharp.Collections.Array4DModule: T[,,,] Initialize[T](Int32, Int32, Int32, Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]]]])
-Microsoft.FSharp.Collections.Array4DModule: T[,,,] ZeroCreate[T](Int32, Int32, Int32, Int32)
-Microsoft.FSharp.Collections.Array4DModule: Void Set[T](T[,,,], Int32, Int32, Int32, Int32, T)
-Microsoft.FSharp.Collections.ArrayModule+Parallel: System.Tuple`2[T[],T[]] Partition[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: TResult[] Choose[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], T[])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: TResult[] Collect[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult[]], T[])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: TResult[] MapIndexed[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], T[])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: TResult[] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: T[] Initialize[T](Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: Void IterateIndexed[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]], T[])
-Microsoft.FSharp.Collections.ArrayModule+Parallel: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], T[])
-Microsoft.FSharp.Collections.ArrayModule: Boolean Contains[T](T, T[])
-Microsoft.FSharp.Collections.ArrayModule: Boolean Exists2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,System.Boolean]], T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: Boolean Exists[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Boolean ForAll2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,System.Boolean]], T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: Boolean ForAll[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Boolean IsEmpty[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: Int32 CompareWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], T[], T[])
-Microsoft.FSharp.Collections.ArrayModule: Int32 FindIndexBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Int32 FindIndex[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Int32 Length[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Collections.ArrayModule+Parallel
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Collections.FSharpList`1[T] ToList[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] TryFindIndexBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] TryFindIndex[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] TryPick[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryExactlyOne[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFindBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFind[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryHead[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryItem[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryLast[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Collections.Generic.IEnumerable`1[T] ToSeq[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[System.Int32,T][] Indexed[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[T,T][] Pairwise[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[T1,T2][] AllPairs[T1,T2](T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[T1,T2][] Zip[T1,T2](T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[T1[],T2[]] Unzip[T1,T2](System.Tuple`2[T1,T2][])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[TKey,System.Int32][] CountBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[TKey,T[]][] GroupBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[TResult[],TState] MapFoldBack[T,TState,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,System.Tuple`2[TResult,TState]]], T[], TState)
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[TResult[],TState] MapFold[T,TState,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Tuple`2[TResult,TState]]], TState, T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[T[],T[]] Partition[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`2[T[],T[]] SplitAt[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`3[T1,T2,T3][] Zip3[T1,T2,T3](T1[], T2[], T3[])
-Microsoft.FSharp.Collections.ArrayModule: System.Tuple`3[T1[],T2[],T3[]] Unzip3[T1,T2,T3](System.Tuple`3[T1,T2,T3][])
-Microsoft.FSharp.Collections.ArrayModule: T Average[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T ExactlyOne[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T FindBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Find[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Get[T](T[], Int32)
-Microsoft.FSharp.Collections.ArrayModule: T Head[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T Item[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: T Last[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T MaxBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Max[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T MinBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Min[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T ReduceBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Reduce[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Sum[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult AverageBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult Pick[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult SumBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] Choose[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] Collect[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult[]], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] Map2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]], T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] Map3[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]], T1[], T2[], T3[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] MapIndexed2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]]], T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] MapIndexed[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult[] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule: TState Fold2[T1,T2,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TState]]], TState, T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: TState FoldBack2[T1,T2,TState](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]]], T1[], T2[], TState)
-Microsoft.FSharp.Collections.ArrayModule: TState FoldBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], T[], TState)
-Microsoft.FSharp.Collections.ArrayModule: TState Fold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, T[])
-Microsoft.FSharp.Collections.ArrayModule: TState[] ScanBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], T[], TState)
-Microsoft.FSharp.Collections.ArrayModule: TState[] Scan[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Append[T](T[], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Concat[T](System.Collections.Generic.IEnumerable`1[T[]])
-Microsoft.FSharp.Collections.ArrayModule: T[] Copy[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Create[T](Int32, T)
-Microsoft.FSharp.Collections.ArrayModule: T[] DistinctBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Distinct[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Empty[T]()
-Microsoft.FSharp.Collections.ArrayModule: T[] Except[T](System.Collections.Generic.IEnumerable`1[T], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] GetSubArray[T](T[], Int32, Int32)
-Microsoft.FSharp.Collections.ArrayModule: T[] Initialize[T](Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T])
-Microsoft.FSharp.Collections.ArrayModule: T[] OfList[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ArrayModule: T[] OfSeq[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.ArrayModule: T[] Permute[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.Int32], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Replicate[T](Int32, T)
-Microsoft.FSharp.Collections.ArrayModule: T[] Reverse[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Singleton[T](T)
-Microsoft.FSharp.Collections.ArrayModule: T[] SkipWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Skip[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] SortByDescending[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] SortBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] SortDescending[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] SortWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Sort[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Tail[T](T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] TakeWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Take[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Truncate[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] Unfold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[T,TState]]], TState)
-Microsoft.FSharp.Collections.ArrayModule: T[] Where[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], T[])
-Microsoft.FSharp.Collections.ArrayModule: T[] ZeroCreate[T](Int32)
-Microsoft.FSharp.Collections.ArrayModule: T[][] ChunkBySize[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: T[][] SplitInto[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: T[][] Transpose[T](System.Collections.Generic.IEnumerable`1[T[]])
-Microsoft.FSharp.Collections.ArrayModule: T[][] Windowed[T](Int32, T[])
-Microsoft.FSharp.Collections.ArrayModule: Void CopyTo[T](T[], Int32, T[], Int32, Int32)
-Microsoft.FSharp.Collections.ArrayModule: Void Fill[T](T[], Int32, Int32, T)
-Microsoft.FSharp.Collections.ArrayModule: Void Iterate2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]], T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: Void IterateIndexed2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]]], T1[], T2[])
-Microsoft.FSharp.Collections.ArrayModule: Void IterateIndexed[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]], T[])
-Microsoft.FSharp.Collections.ArrayModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], T[])
-Microsoft.FSharp.Collections.ArrayModule: Void Set[T](T[], Int32, T)
-Microsoft.FSharp.Collections.ArrayModule: Void SortInPlaceBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], T[])
-Microsoft.FSharp.Collections.ArrayModule: Void SortInPlaceWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], T[])
-Microsoft.FSharp.Collections.ArrayModule: Void SortInPlace[T](T[])
-Microsoft.FSharp.Collections.ComparisonIdentity: System.Collections.Generic.IComparer`1[T] FromFunction[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]])
-Microsoft.FSharp.Collections.ComparisonIdentity: System.Collections.Generic.IComparer`1[T] NonStructural[T]()
-Microsoft.FSharp.Collections.ComparisonIdentity: System.Collections.Generic.IComparer`1[T] Structural[T]()
-Microsoft.FSharp.Collections.FSharpList`1+Tags[T]: Int32 Cons
-Microsoft.FSharp.Collections.FSharpList`1+Tags[T]: Int32 Empty
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean Equals(Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean Equals(System.Object)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean IsCons
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean IsEmpty
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean get_IsCons()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Boolean get_IsEmpty()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 CompareTo(Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 GetHashCode()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 GetReverseIndex(Int32, Int32)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 Length
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 Tag
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 get_Length()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Int32 get_Tag()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1+Tags[T]
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] Cons(T, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] Empty
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] GetSlice(Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] Tail
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] TailOrNull
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] get_Empty()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] get_Tail()
-Microsoft.FSharp.Collections.FSharpList`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] get_TailOrNull()
-Microsoft.FSharp.Collections.FSharpList`1[T]: System.String ToString()
-Microsoft.FSharp.Collections.FSharpList`1[T]: T Head
-Microsoft.FSharp.Collections.FSharpList`1[T]: T HeadOrDefault
-Microsoft.FSharp.Collections.FSharpList`1[T]: T Item [Int32]
-Microsoft.FSharp.Collections.FSharpList`1[T]: T get_Head()
-Microsoft.FSharp.Collections.FSharpList`1[T]: T get_HeadOrDefault()
-Microsoft.FSharp.Collections.FSharpList`1[T]: T get_Item(Int32)
-Microsoft.FSharp.Collections.FSharpList`1[T]: Void .ctor(T, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Boolean ContainsKey(TKey)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Boolean Equals(System.Object)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Boolean IsEmpty
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Boolean TryGetValue(TKey, TValue ByRef)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Boolean get_IsEmpty()
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Int32 Count
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Int32 GetHashCode()
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Int32 get_Count()
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue] Add(TKey, TValue)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue] Remove(TKey)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Microsoft.FSharp.Core.FSharpOption`1[TValue] TryFind(TKey)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: System.String ToString()
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: TValue Item [TKey]
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: TValue get_Item(TKey)
-Microsoft.FSharp.Collections.FSharpMap`2[TKey,TValue]: Void .ctor(System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,TValue]])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean Contains(T)
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean Equals(System.Object)
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean IsEmpty
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean IsProperSubsetOf(Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean IsProperSupersetOf(Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean IsSubsetOf(Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean IsSupersetOf(Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Boolean get_IsEmpty()
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Int32 Count
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Int32 GetHashCode()
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Int32 get_Count()
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Microsoft.FSharp.Collections.FSharpSet`1[T] Add(T)
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Microsoft.FSharp.Collections.FSharpSet`1[T] Remove(T)
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Microsoft.FSharp.Collections.FSharpSet`1[T] op_Addition(Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Microsoft.FSharp.Collections.FSharpSet`1[T] op_Subtraction(Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.FSharpSet`1[T]: System.String ToString()
-Microsoft.FSharp.Collections.FSharpSet`1[T]: T MaximumElement
-Microsoft.FSharp.Collections.FSharpSet`1[T]: T MinimumElement
-Microsoft.FSharp.Collections.FSharpSet`1[T]: T get_MaximumElement()
-Microsoft.FSharp.Collections.FSharpSet`1[T]: T get_MinimumElement()
-Microsoft.FSharp.Collections.FSharpSet`1[T]: Void .ctor(System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.HashIdentity: System.Collections.Generic.IEqualityComparer`1[T] FromFunctions[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]])
-Microsoft.FSharp.Collections.HashIdentity: System.Collections.Generic.IEqualityComparer`1[T] LimitedStructural[T](Int32)
-Microsoft.FSharp.Collections.HashIdentity: System.Collections.Generic.IEqualityComparer`1[T] NonStructural[T]()
-Microsoft.FSharp.Collections.HashIdentity: System.Collections.Generic.IEqualityComparer`1[T] Reference[T]()
-Microsoft.FSharp.Collections.HashIdentity: System.Collections.Generic.IEqualityComparer`1[T] Structural[T]()
-Microsoft.FSharp.Collections.ListModule: Boolean Contains[T](T, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Boolean Exists2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,System.Boolean]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Boolean Exists[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Boolean ForAll2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,System.Boolean]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Boolean ForAll[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Boolean IsEmpty[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Int32 CompareWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], Microsoft.FSharp.Collections.FSharpList`1[T], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Int32 FindIndexBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Int32 FindIndex[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Int32 Length[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[T]] ChunkBySize[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[T]] SplitInto[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[T]] Transpose[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Collections.FSharpList`1[T]])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[T]] Windowed[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Int32,T]] Indexed[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[T,T]] Pairwise[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[T1,T2]] AllPairs[T1,T2](Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[T1,T2]] Zip[T1,T2](Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[TKey,Microsoft.FSharp.Collections.FSharpList`1[T]]] GroupBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[TKey,System.Int32]] CountBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[T1,T2,T3]] Zip3[T1,T2,T3](Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2], Microsoft.FSharp.Collections.FSharpList`1[T3])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] Choose[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] Collect[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Collections.FSharpList`1[TResult]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] Map2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] Map3[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2], Microsoft.FSharp.Collections.FSharpList`1[T3])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] MapIndexed2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] MapIndexed[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TResult] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TState] ScanBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], Microsoft.FSharp.Collections.FSharpList`1[T], TState)
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[TState] Scan[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Append[T](Microsoft.FSharp.Collections.FSharpList`1[T], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Concat[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Collections.FSharpList`1[T]])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] DistinctBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Distinct[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Empty[T]()
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Except[T](System.Collections.Generic.IEnumerable`1[T], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Initialize[T](Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] OfArray[T](T[])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] OfSeq[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Permute[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.Int32], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Replicate[T](Int32, T)
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Reverse[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Singleton[T](T)
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] SkipWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Skip[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] SortByDescending[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] SortBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] SortDescending[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] SortWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Sort[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Tail[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] TakeWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Take[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Truncate[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Unfold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[T,TState]]], TState)
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Collections.FSharpList`1[T] Where[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] TryFindIndexBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] TryFindIndex[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] TryPick[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryExactlyOne[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFindBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFind[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryHead[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryItem[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryLast[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: System.Collections.Generic.IEnumerable`1[T] ToSeq[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[T1],Microsoft.FSharp.Collections.FSharpList`1[T2]] Unzip[T1,T2](Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[T1,T2]])
-Microsoft.FSharp.Collections.ListModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[TResult],TState] MapFoldBack[T,TState,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,System.Tuple`2[TResult,TState]]], Microsoft.FSharp.Collections.FSharpList`1[T], TState)
-Microsoft.FSharp.Collections.ListModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[TResult],TState] MapFold[T,TState,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Tuple`2[TResult,TState]]], TState, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[T],Microsoft.FSharp.Collections.FSharpList`1[T]] Partition[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[T],Microsoft.FSharp.Collections.FSharpList`1[T]] SplitAt[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: System.Tuple`3[Microsoft.FSharp.Collections.FSharpList`1[T1],Microsoft.FSharp.Collections.FSharpList`1[T2],Microsoft.FSharp.Collections.FSharpList`1[T3]] Unzip3[T1,T2,T3](Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[T1,T2,T3]])
-Microsoft.FSharp.Collections.ListModule: T Average[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T ExactlyOne[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T FindBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Find[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Get[T](Microsoft.FSharp.Collections.FSharpList`1[T], Int32)
-Microsoft.FSharp.Collections.ListModule: T Head[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Item[T](Int32, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Last[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T MaxBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Max[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T MinBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Min[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T ReduceBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Reduce[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Sum[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: TResult AverageBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: TResult Pick[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: TResult SumBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: TState Fold2[T1,T2,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TState]]], TState, Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: TState FoldBack2[T1,T2,TState](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2], TState)
-Microsoft.FSharp.Collections.ListModule: TState FoldBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], Microsoft.FSharp.Collections.FSharpList`1[T], TState)
-Microsoft.FSharp.Collections.ListModule: TState Fold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T[] ToArray[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Void Iterate2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Void IterateIndexed2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]]], Microsoft.FSharp.Collections.FSharpList`1[T1], Microsoft.FSharp.Collections.FSharpList`1[T2])
-Microsoft.FSharp.Collections.ListModule: Void IterateIndexed[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.MapModule: Boolean ContainsKey[TKey,T](TKey, Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Boolean Exists[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Boolean ForAll[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Boolean IsEmpty[TKey,T](Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Int32 Count[TKey,T](Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[TKey,T]] ToList[TKey,T](Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,TResult] Map[TKey,T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] Add[TKey,T](TKey, T, Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] Empty[TKey,T]()
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] Filter[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] OfArray[TKey,T](System.Tuple`2[TKey,T][])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] OfList[TKey,T](Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[TKey,T]])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] OfSeq[TKey,T](System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,T]])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Collections.FSharpMap`2[TKey,T] Remove[TKey,T](TKey, Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Core.FSharpOption`1[TKey] TryFindKey[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] TryPick[TKey,T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFind[TKey,T](TKey, Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,T]] ToSeq[TKey,T](Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpMap`2[TKey,T],Microsoft.FSharp.Collections.FSharpMap`2[TKey,T]] Partition[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: System.Tuple`2[TKey,T][] ToArray[TKey,T](Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: T Find[TKey,T](TKey, Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: TKey FindKey[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: TResult Pick[TKey,T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: TState FoldBack[TKey,T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T], TState)
-Microsoft.FSharp.Collections.MapModule: TState Fold[TKey,T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]]], TState, Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.MapModule: Void Iterate[TKey,T](Microsoft.FSharp.Core.FSharpFunc`2[TKey,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]], Microsoft.FSharp.Collections.FSharpMap`2[TKey,T])
-Microsoft.FSharp.Collections.SeqModule: Boolean Contains[T](T, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Boolean Exists2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,System.Boolean]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: Boolean Exists[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Boolean ForAll2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,System.Boolean]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: Boolean ForAll[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Boolean IsEmpty[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Int32 CompareWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], System.Collections.Generic.IEnumerable`1[T], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Int32 FindIndexBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Int32 FindIndex[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Int32 Length[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Collections.FSharpList`1[T] ToList[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] TryFindIndexBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] TryFindIndex[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] TryPick[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryExactlyOne[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFindBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryFind[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryHead[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryItem[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Microsoft.FSharp.Core.FSharpOption`1[T] TryLast[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Collections.Generic.IEnumerable`1[T]] Transpose[TCollection,T](System.Collections.Generic.IEnumerable`1[TCollection])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.Int32,T]] Indexed[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[T,T]] Pairwise[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[T1,T2]] AllPairs[T1,T2](System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[T1,T2]] Zip[T1,T2](System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,System.Collections.Generic.IEnumerable`1[T]]] GroupBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,System.Int32]] CountBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[System.Tuple`3[T1,T2,T3]] Zip3[T1,T2,T3](System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2], System.Collections.Generic.IEnumerable`1[T3])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] Choose[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] Collect[T,TCollection,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TCollection], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] Map2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] Map3[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2], System.Collections.Generic.IEnumerable`1[T3])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] MapIndexed2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] MapIndexed[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TResult] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TState] ScanBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], System.Collections.Generic.IEnumerable`1[T], TState)
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[TState] Scan[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T[]] ChunkBySize[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T[]] SplitInto[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T[]] Windowed[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Append[T](System.Collections.Generic.IEnumerable`1[T], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Cache[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Cast[T](System.Collections.IEnumerable)
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Concat[TCollection,T](System.Collections.Generic.IEnumerable`1[TCollection])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Delay[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,System.Collections.Generic.IEnumerable`1[T]])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] DistinctBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Distinct[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Empty[T]()
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Except[T](System.Collections.Generic.IEnumerable`1[T], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] InitializeInfinite[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Initialize[T](Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] OfArray[T](T[])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] OfList[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Permute[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.Int32], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] ReadOnly[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Replicate[T](Int32, T)
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Reverse[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Singleton[T](T)
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] SkipWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Skip[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] SortByDescending[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] SortBy[T,TKey](Microsoft.FSharp.Core.FSharpFunc`2[T,TKey], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] SortDescending[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] SortWith[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Sort[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Tail[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] TakeWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Take[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Truncate[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Unfold[TState,T](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[T,TState]]], TState)
-Microsoft.FSharp.Collections.SeqModule: System.Collections.Generic.IEnumerable`1[T] Where[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: System.Tuple`2[System.Collections.Generic.IEnumerable`1[TResult],TState] MapFoldBack[T,TState,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,System.Tuple`2[TResult,TState]]], System.Collections.Generic.IEnumerable`1[T], TState)
-Microsoft.FSharp.Collections.SeqModule: System.Tuple`2[System.Collections.Generic.IEnumerable`1[TResult],TState] MapFold[T,TState,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Tuple`2[TResult,TState]]], TState, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Average[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T ExactlyOne[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T FindBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Find[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Get[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Head[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Item[T](Int32, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Last[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T MaxBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Max[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T MinBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Min[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T ReduceBack[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Reduce[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Sum[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: TResult AverageBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: TResult Pick[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: TResult SumBy[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: TState Fold2[T1,T2,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TState]]], TState, System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: TState FoldBack2[T1,T2,TState](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2], TState)
-Microsoft.FSharp.Collections.SeqModule: TState FoldBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], System.Collections.Generic.IEnumerable`1[T], TState)
-Microsoft.FSharp.Collections.SeqModule: TState Fold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T[] ToArray[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Void Iterate2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: Void IterateIndexed2[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]]], System.Collections.Generic.IEnumerable`1[T1], System.Collections.Generic.IEnumerable`1[T2])
-Microsoft.FSharp.Collections.SeqModule: Void IterateIndexed[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean Contains[T](T, Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean Exists[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean ForAll[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean IsEmpty[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean IsProperSubset[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean IsProperSuperset[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean IsSubset[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Boolean IsSuperset[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Int32 Count[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpList`1[T] ToList[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[TResult] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Add[T](T, Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Difference[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Empty[T]()
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] IntersectMany[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Collections.FSharpSet`1[T]])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Intersect[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] OfArray[T](T[])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] OfList[T](Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] OfSeq[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Remove[T](T, Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Singleton[T](T)
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] UnionMany[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Collections.FSharpSet`1[T]])
-Microsoft.FSharp.Collections.SetModule: Microsoft.FSharp.Collections.FSharpSet`1[T] Union[T](Microsoft.FSharp.Collections.FSharpSet`1[T], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: System.Collections.Generic.IEnumerable`1[T] ToSeq[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: System.Tuple`2[Microsoft.FSharp.Collections.FSharpSet`1[T],Microsoft.FSharp.Collections.FSharpSet`1[T]] Partition[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: T MaxElement[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: T MinElement[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: TState FoldBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], Microsoft.FSharp.Collections.FSharpSet`1[T], TState)
-Microsoft.FSharp.Collections.SetModule: TState Fold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: T[] ToArray[T](Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Collections.SetModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Collections.FSharpSet`1[T])
-Microsoft.FSharp.Control.AsyncActivation`1[T]: Boolean IsCancellationRequested
-Microsoft.FSharp.Control.AsyncActivation`1[T]: Boolean get_IsCancellationRequested()
-Microsoft.FSharp.Control.AsyncActivation`1[T]: Microsoft.FSharp.Control.AsyncReturn OnCancellation()
-Microsoft.FSharp.Control.AsyncActivation`1[T]: Microsoft.FSharp.Control.AsyncReturn OnSuccess(T)
-Microsoft.FSharp.Control.AsyncActivation`1[T]: Void OnExceptionRaised()
-Microsoft.FSharp.Control.AsyncPrimitives: Microsoft.FSharp.Control.AsyncReturn Bind[T,TResult](Microsoft.FSharp.Control.AsyncActivation`1[T], Microsoft.FSharp.Control.FSharpAsync`1[TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.AsyncPrimitives: Microsoft.FSharp.Control.AsyncReturn CallThenInvoke[T,TResult](Microsoft.FSharp.Control.AsyncActivation`1[T], TResult, Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.AsyncPrimitives: Microsoft.FSharp.Control.AsyncReturn Invoke[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Control.AsyncActivation`1[T])
-Microsoft.FSharp.Control.AsyncPrimitives: Microsoft.FSharp.Control.AsyncReturn TryFinally[T](Microsoft.FSharp.Control.AsyncActivation`1[T], Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.AsyncPrimitives: Microsoft.FSharp.Control.AsyncReturn TryWith[T](Microsoft.FSharp.Control.AsyncActivation`1[T], Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[System.Exception,Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Control.FSharpAsync`1[T]]])
-Microsoft.FSharp.Control.AsyncPrimitives: Microsoft.FSharp.Control.FSharpAsync`1[T] MakeAsync[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.AsyncActivation`1[T],Microsoft.FSharp.Control.AsyncReturn])
-Microsoft.FSharp.Control.CommonExtensions: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] AsyncWrite(System.IO.Stream, Byte[], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.CommonExtensions: Microsoft.FSharp.Control.FSharpAsync`1[System.Byte[]] AsyncReadBytes(System.IO.Stream, Int32)
-Microsoft.FSharp.Control.CommonExtensions: Microsoft.FSharp.Control.FSharpAsync`1[System.Int32] AsyncRead(System.IO.Stream, Byte[], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.CommonExtensions: System.IDisposable SubscribeToObservable[T](System.IObservable`1[T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.CommonExtensions: Void AddToObservable[T](System.IObservable`1[T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.EventModule: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[T,T]],System.Tuple`2[T,T]] Pairwise[TDel,T](Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[TResult],TResult] Choose[T,TResult,TDel](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[TResult],TResult] Map[T,TResult,TDel](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[TResult],TResult] Scan[TResult,T,TDel](Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], TResult, Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[T],T] Filter[T,TDel](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[T],T] Merge[TDel1,T,TDel2](Microsoft.FSharp.Control.IEvent`2[TDel1,T], Microsoft.FSharp.Control.IEvent`2[TDel2,T])
-Microsoft.FSharp.Control.EventModule: System.Tuple`2[Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[TResult1],TResult1],Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[TResult2],TResult2]] Split[T,TResult1,TResult2,TDel](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpChoice`2[TResult1,TResult2]], Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: System.Tuple`2[Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[T],T],Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[T],T]] Partition[T,TDel](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.EventModule: Void Add[T,TDel](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Control.IEvent`2[TDel,T])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Control.FSharpAsync`1[T]] StartChild[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpChoice`2[T,System.Exception]] Catch[T](Microsoft.FSharp.Control.FSharpAsync`1[T])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpOption`1[T]] Choice[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpOption`1[T]]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] AwaitTask(System.Threading.Tasks.Task)
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] Ignore[T](Microsoft.FSharp.Control.FSharpAsync`1[T])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] Sleep(Int32)
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] Sleep(System.TimeSpan)
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] SwitchToContext(System.Threading.SynchronizationContext)
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] SwitchToNewThread()
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] SwitchToThreadPool()
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[System.Boolean] AwaitIAsyncResult(System.IAsyncResult, Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[System.Boolean] AwaitWaitHandle(System.Threading.WaitHandle, Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[System.IDisposable] OnCancel(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[System.Threading.CancellationToken] CancellationToken
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[System.Threading.CancellationToken] get_CancellationToken()
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[System.Threading.Tasks.Task`1[T]] StartChildAsTask[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.Tasks.TaskCreationOptions])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T[]] Parallel[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T[]] Parallel[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Control.FSharpAsync`1[T]], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T[]] Sequential[T](System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] AwaitEvent[TDel,T](Microsoft.FSharp.Control.IEvent`2[TDel,T], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] AwaitTask[T](System.Threading.Tasks.Task`1[T])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] FromBeginEnd[TArg1,TArg2,TArg3,T](TArg1, TArg2, TArg3, Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`5[TArg1,TArg2,TArg3,System.AsyncCallback,System.Object],System.IAsyncResult], Microsoft.FSharp.Core.FSharpFunc`2[System.IAsyncResult,T], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] FromBeginEnd[TArg1,TArg2,T](TArg1, TArg2, Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`4[TArg1,TArg2,System.AsyncCallback,System.Object],System.IAsyncResult], Microsoft.FSharp.Core.FSharpFunc`2[System.IAsyncResult,T], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] FromBeginEnd[TArg1,T](TArg1, Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`3[TArg1,System.AsyncCallback,System.Object],System.IAsyncResult], Microsoft.FSharp.Core.FSharpFunc`2[System.IAsyncResult,T], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] FromBeginEnd[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`2[System.AsyncCallback,System.Object],System.IAsyncResult], Microsoft.FSharp.Core.FSharpFunc`2[System.IAsyncResult,T], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit]])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] FromContinuations[T](Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`3[Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit],Microsoft.FSharp.Core.FSharpFunc`2[System.Exception,Microsoft.FSharp.Core.Unit],Microsoft.FSharp.Core.FSharpFunc`2[System.OperationCanceledException,Microsoft.FSharp.Core.Unit]],Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.FSharpAsync: Microsoft.FSharp.Control.FSharpAsync`1[T] TryCancelled[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[System.OperationCanceledException,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.FSharpAsync: System.Threading.CancellationToken DefaultCancellationToken
-Microsoft.FSharp.Control.FSharpAsync: System.Threading.CancellationToken get_DefaultCancellationToken()
-Microsoft.FSharp.Control.FSharpAsync: System.Threading.Tasks.Task`1[T] StartAsTask[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.Tasks.TaskCreationOptions], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpAsync: System.Threading.Tasks.Task`1[T] StartImmediateAsTask[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpAsync: System.Tuple`3[Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`3[TArg,System.AsyncCallback,System.Object],System.IAsyncResult],Microsoft.FSharp.Core.FSharpFunc`2[System.IAsyncResult,T],Microsoft.FSharp.Core.FSharpFunc`2[System.IAsyncResult,Microsoft.FSharp.Core.Unit]] AsBeginEnd[TArg,T](Microsoft.FSharp.Core.FSharpFunc`2[TArg,Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.FSharpAsync: T RunSynchronously[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpAsync: Void CancelDefaultToken()
-Microsoft.FSharp.Control.FSharpAsync: Void Start(Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpAsync: Void StartImmediate(Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpAsync: Void StartWithContinuations[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpFunc`2[System.Exception,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpFunc`2[System.OperationCanceledException,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] For[T](System.Collections.Generic.IEnumerable`1[T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit]])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] While(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,System.Boolean], Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] Zero()
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[TResult] Bind[T,TResult](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Control.FSharpAsync`1[TResult]])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[TResult] Using[T,TResult](T, Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Control.FSharpAsync`1[TResult]])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[T] Combine[T](Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Control.FSharpAsync`1[T])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[T] Delay[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[T] ReturnFrom[T](Microsoft.FSharp.Control.FSharpAsync`1[T])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[T] Return[T](T)
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[T] TryFinally[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Control.FSharpAsyncBuilder: Microsoft.FSharp.Control.FSharpAsync`1[T] TryWith[T](Microsoft.FSharp.Control.FSharpAsync`1[T], Microsoft.FSharp.Core.FSharpFunc`2[System.Exception,Microsoft.FSharp.Control.FSharpAsync`1[T]])
-Microsoft.FSharp.Control.FSharpAsyncReplyChannel`1[TReply]: Void Reply(TReply)
-Microsoft.FSharp.Control.FSharpDelegateEvent`1[TDelegate]: Microsoft.FSharp.Control.IDelegateEvent`1[TDelegate] Publish
-Microsoft.FSharp.Control.FSharpDelegateEvent`1[TDelegate]: Microsoft.FSharp.Control.IDelegateEvent`1[TDelegate] get_Publish()
-Microsoft.FSharp.Control.FSharpDelegateEvent`1[TDelegate]: Void .ctor()
-Microsoft.FSharp.Control.FSharpDelegateEvent`1[TDelegate]: Void Trigger(System.Object[])
-Microsoft.FSharp.Control.FSharpEvent`1[T]: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[T],T] Publish
-Microsoft.FSharp.Control.FSharpEvent`1[T]: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[T],T] get_Publish()
-Microsoft.FSharp.Control.FSharpEvent`1[T]: Void .ctor()
-Microsoft.FSharp.Control.FSharpEvent`1[T]: Void Trigger(T)
-Microsoft.FSharp.Control.FSharpEvent`2[TDelegate,TArgs]: Microsoft.FSharp.Control.IEvent`2[TDelegate,TArgs] Publish
-Microsoft.FSharp.Control.FSharpEvent`2[TDelegate,TArgs]: Microsoft.FSharp.Control.IEvent`2[TDelegate,TArgs] get_Publish()
-Microsoft.FSharp.Control.FSharpEvent`2[TDelegate,TArgs]: Void .ctor()
-Microsoft.FSharp.Control.FSharpEvent`2[TDelegate,TArgs]: Void Trigger(System.Object, TArgs)
-Microsoft.FSharp.Control.FSharpHandler`1[T]: System.IAsyncResult BeginInvoke(System.Object, T, System.AsyncCallback, System.Object)
-Microsoft.FSharp.Control.FSharpHandler`1[T]: Void .ctor(System.Object, IntPtr)
-Microsoft.FSharp.Control.FSharpHandler`1[T]: Void EndInvoke(System.IAsyncResult)
-Microsoft.FSharp.Control.FSharpHandler`1[T]: Void Invoke(System.Object, T)
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Int32 CurrentQueueLength
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Int32 DefaultTimeout
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Int32 get_CurrentQueueLength()
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Int32 get_DefaultTimeout()
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpOption`1[TMsg]] TryReceive(Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpOption`1[TReply]] PostAndTryAsyncReply[TReply](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.FSharpAsyncReplyChannel`1[TReply],TMsg], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpOption`1[T]] TryScan[T](Microsoft.FSharp.Core.FSharpFunc`2[TMsg,Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Control.FSharpAsync`1[T]]], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpAsync`1[TMsg] Receive(Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpAsync`1[TReply] PostAndAsyncReply[TReply](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.FSharpAsyncReplyChannel`1[TReply],TMsg], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpAsync`1[T] Scan[T](Microsoft.FSharp.Core.FSharpFunc`2[TMsg,Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Control.FSharpAsync`1[T]]], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpHandler`1[System.Exception] Error
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg] Start(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg],Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit]], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Microsoft.FSharp.Core.FSharpOption`1[TReply] TryPostAndReply[TReply](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.FSharpAsyncReplyChannel`1[TReply],TMsg], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: TReply PostAndReply[TReply](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.FSharpAsyncReplyChannel`1[TReply],TMsg], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Void .ctor(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg],Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit]], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Void Post(TMsg)
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Void Start()
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Void add_Error(Microsoft.FSharp.Control.FSharpHandler`1[System.Exception])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Void remove_Error(Microsoft.FSharp.Control.FSharpHandler`1[System.Exception])
-Microsoft.FSharp.Control.FSharpMailboxProcessor`1[TMsg]: Void set_DefaultTimeout(Int32)
-Microsoft.FSharp.Control.IDelegateEvent`1[TDelegate]: Void AddHandler(TDelegate)
-Microsoft.FSharp.Control.IDelegateEvent`1[TDelegate]: Void RemoveHandler(TDelegate)
-Microsoft.FSharp.Control.LazyExtensions: System.Lazy`1[T] CreateFromValue[T](T)
-Microsoft.FSharp.Control.LazyExtensions: System.Lazy`1[T] Create[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T])
-Microsoft.FSharp.Control.LazyExtensions: T Force[T](System.Lazy`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IDisposable Subscribe[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IObservable`1[System.Tuple`2[T,T]] Pairwise[T](System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IObservable`1[TResult] Choose[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IObservable`1[TResult] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IObservable`1[TResult] Scan[TResult,T](Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]], TResult, System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IObservable`1[T] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.IObservable`1[T] Merge[T](System.IObservable`1[T], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.Tuple`2[System.IObservable`1[TResult1],System.IObservable`1[TResult2]] Split[T,TResult1,TResult2](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpChoice`2[TResult1,TResult2]], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: System.Tuple`2[System.IObservable`1[T],System.IObservable`1[T]] Partition[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], System.IObservable`1[T])
-Microsoft.FSharp.Control.ObservableModule: Void Add[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], System.IObservable`1[T])
-Microsoft.FSharp.Control.WebExtensions: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] AsyncDownloadFile(System.Net.WebClient, System.Uri, System.String)
-Microsoft.FSharp.Control.WebExtensions: Microsoft.FSharp.Control.FSharpAsync`1[System.Byte[]] AsyncDownloadData(System.Net.WebClient, System.Uri)
-Microsoft.FSharp.Control.WebExtensions: Microsoft.FSharp.Control.FSharpAsync`1[System.Net.WebResponse] AsyncGetResponse(System.Net.WebRequest)
-Microsoft.FSharp.Control.WebExtensions: Microsoft.FSharp.Control.FSharpAsync`1[System.String] AsyncDownloadString(System.Net.WebClient, System.Uri)
-Microsoft.FSharp.Core.AbstractClassAttribute: Void .ctor()
-Microsoft.FSharp.Core.AllowNullLiteralAttribute: Boolean Value
-Microsoft.FSharp.Core.AllowNullLiteralAttribute: Boolean get_Value()
-Microsoft.FSharp.Core.AllowNullLiteralAttribute: Void .ctor()
-Microsoft.FSharp.Core.AllowNullLiteralAttribute: Void .ctor(Boolean)
-Microsoft.FSharp.Core.AutoOpenAttribute: System.String Path
-Microsoft.FSharp.Core.AutoOpenAttribute: System.String get_Path()
-Microsoft.FSharp.Core.AutoOpenAttribute: Void .ctor()
-Microsoft.FSharp.Core.AutoOpenAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.AutoSerializableAttribute: Boolean Value
-Microsoft.FSharp.Core.AutoSerializableAttribute: Boolean get_Value()
-Microsoft.FSharp.Core.AutoSerializableAttribute: Void .ctor(Boolean)
-Microsoft.FSharp.Core.ByRefKinds: Microsoft.FSharp.Core.ByRefKinds+In
-Microsoft.FSharp.Core.ByRefKinds: Microsoft.FSharp.Core.ByRefKinds+InOut
-Microsoft.FSharp.Core.ByRefKinds: Microsoft.FSharp.Core.ByRefKinds+Out
-Microsoft.FSharp.Core.CLIEventAttribute: Void .ctor()
-Microsoft.FSharp.Core.CLIMutableAttribute: Void .ctor()
-Microsoft.FSharp.Core.ClassAttribute: Void .ctor()
-Microsoft.FSharp.Core.ComparisonConditionalOnAttribute: Void .ctor()
-Microsoft.FSharp.Core.CompilationArgumentCountsAttribute: System.Collections.Generic.IEnumerable`1[System.Int32] Counts
-Microsoft.FSharp.Core.CompilationArgumentCountsAttribute: System.Collections.Generic.IEnumerable`1[System.Int32] get_Counts()
-Microsoft.FSharp.Core.CompilationArgumentCountsAttribute: Void .ctor(Int32[])
-Microsoft.FSharp.Core.CompilationMappingAttribute: Int32 SequenceNumber
-Microsoft.FSharp.Core.CompilationMappingAttribute: Int32 VariantNumber
-Microsoft.FSharp.Core.CompilationMappingAttribute: Int32 get_SequenceNumber()
-Microsoft.FSharp.Core.CompilationMappingAttribute: Int32 get_VariantNumber()
-Microsoft.FSharp.Core.CompilationMappingAttribute: Microsoft.FSharp.Core.SourceConstructFlags SourceConstructFlags
-Microsoft.FSharp.Core.CompilationMappingAttribute: Microsoft.FSharp.Core.SourceConstructFlags get_SourceConstructFlags()
-Microsoft.FSharp.Core.CompilationMappingAttribute: System.String ResourceName
-Microsoft.FSharp.Core.CompilationMappingAttribute: System.String get_ResourceName()
-Microsoft.FSharp.Core.CompilationMappingAttribute: System.Type[] TypeDefinitions
-Microsoft.FSharp.Core.CompilationMappingAttribute: System.Type[] get_TypeDefinitions()
-Microsoft.FSharp.Core.CompilationMappingAttribute: Void .ctor(Microsoft.FSharp.Core.SourceConstructFlags)
-Microsoft.FSharp.Core.CompilationMappingAttribute: Void .ctor(Microsoft.FSharp.Core.SourceConstructFlags, Int32)
-Microsoft.FSharp.Core.CompilationMappingAttribute: Void .ctor(Microsoft.FSharp.Core.SourceConstructFlags, Int32, Int32)
-Microsoft.FSharp.Core.CompilationMappingAttribute: Void .ctor(System.String, System.Type[])
-Microsoft.FSharp.Core.CompilationRepresentationAttribute: Microsoft.FSharp.Core.CompilationRepresentationFlags Flags
-Microsoft.FSharp.Core.CompilationRepresentationAttribute: Microsoft.FSharp.Core.CompilationRepresentationFlags get_Flags()
-Microsoft.FSharp.Core.CompilationRepresentationAttribute: Void .ctor(Microsoft.FSharp.Core.CompilationRepresentationFlags)
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Int32 value__
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Microsoft.FSharp.Core.CompilationRepresentationFlags Event
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Microsoft.FSharp.Core.CompilationRepresentationFlags Instance
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Microsoft.FSharp.Core.CompilationRepresentationFlags ModuleSuffix
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Microsoft.FSharp.Core.CompilationRepresentationFlags None
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Microsoft.FSharp.Core.CompilationRepresentationFlags Static
-Microsoft.FSharp.Core.CompilationRepresentationFlags: Microsoft.FSharp.Core.CompilationRepresentationFlags UseNullAsTrueValue
-Microsoft.FSharp.Core.CompilationSourceNameAttribute: System.String SourceName
-Microsoft.FSharp.Core.CompilationSourceNameAttribute: System.String get_SourceName()
-Microsoft.FSharp.Core.CompilationSourceNameAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.CompiledNameAttribute: System.String CompiledName
-Microsoft.FSharp.Core.CompiledNameAttribute: System.String get_CompiledName()
-Microsoft.FSharp.Core.CompiledNameAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.CompilerMessageAttribute: Boolean IsError
-Microsoft.FSharp.Core.CompilerMessageAttribute: Boolean IsHidden
-Microsoft.FSharp.Core.CompilerMessageAttribute: Boolean get_IsError()
-Microsoft.FSharp.Core.CompilerMessageAttribute: Boolean get_IsHidden()
-Microsoft.FSharp.Core.CompilerMessageAttribute: Int32 MessageNumber
-Microsoft.FSharp.Core.CompilerMessageAttribute: Int32 get_MessageNumber()
-Microsoft.FSharp.Core.CompilerMessageAttribute: System.String Message
-Microsoft.FSharp.Core.CompilerMessageAttribute: System.String get_Message()
-Microsoft.FSharp.Core.CompilerMessageAttribute: Void .ctor(System.String, Int32)
-Microsoft.FSharp.Core.CompilerMessageAttribute: Void set_IsError(Boolean)
-Microsoft.FSharp.Core.CompilerMessageAttribute: Void set_IsHidden(Boolean)
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: Boolean CheckClose
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: Boolean get_CheckClose()
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: Int32 GenerateNext(System.Collections.Generic.IEnumerable`1[T] ByRef)
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: System.Collections.Generic.IEnumerator`1[T] GetFreshEnumerator()
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: T LastGenerated
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: T get_LastGenerated()
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: Void .ctor()
-Microsoft.FSharp.Core.CompilerServices.GeneratedSequenceBase`1[T]: Void Close()
-Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace: Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace[] GetNestedNamespaces()
-Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace: System.String NamespaceName
-Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace: System.String get_NamespaceName()
-Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace: System.Type ResolveTypeName(System.String)
-Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace: System.Type[] GetTypes()
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider2: System.Reflection.MethodBase ApplyStaticArgumentsForMethod(System.Reflection.MethodBase, System.String, System.Object[])
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider2: System.Reflection.ParameterInfo[] GetStaticParametersForMethod(System.Reflection.MethodBase)
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: Byte[] GetGeneratedAssemblyContents(System.Reflection.Assembly)
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: Microsoft.FSharp.Core.CompilerServices.IProvidedNamespace[] GetNamespaces()
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: Microsoft.FSharp.Quotations.FSharpExpr GetInvokerExpression(System.Reflection.MethodBase, Microsoft.FSharp.Quotations.FSharpExpr[])
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: System.EventHandler Invalidate
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: System.Reflection.ParameterInfo[] GetStaticParameters(System.Type)
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: System.Type ApplyStaticArguments(System.Type, System.String[], System.Object[])
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: Void add_Invalidate(System.EventHandler)
-Microsoft.FSharp.Core.CompilerServices.ITypeProvider: Void remove_Invalidate(System.EventHandler)
-Microsoft.FSharp.Core.CompilerServices.RuntimeHelpers: Microsoft.FSharp.Control.IEvent`2[TDelegate,TArgs] CreateEvent[TDelegate,TArgs](Microsoft.FSharp.Core.FSharpFunc`2[TDelegate,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpFunc`2[TDelegate,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.FSharpFunc`2[System.Object,Microsoft.FSharp.Core.FSharpFunc`2[TArgs,Microsoft.FSharp.Core.Unit]],TDelegate])
-Microsoft.FSharp.Core.CompilerServices.RuntimeHelpers: System.Collections.Generic.IEnumerable`1[TResult] EnumerateFromFunctions[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult])
-Microsoft.FSharp.Core.CompilerServices.RuntimeHelpers: System.Collections.Generic.IEnumerable`1[TResult] EnumerateUsing[T,TCollection,TResult](T, Microsoft.FSharp.Core.FSharpFunc`2[T,TCollection])
-Microsoft.FSharp.Core.CompilerServices.RuntimeHelpers: System.Collections.Generic.IEnumerable`1[T] EnumerateThenFinally[T](System.Collections.Generic.IEnumerable`1[T], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.CompilerServices.RuntimeHelpers: System.Collections.Generic.IEnumerable`1[T] EnumerateWhile[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,System.Boolean], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Core.CompilerServices.TypeProviderAssemblyAttribute: System.String AssemblyName
-Microsoft.FSharp.Core.CompilerServices.TypeProviderAssemblyAttribute: System.String get_AssemblyName()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderAssemblyAttribute: Void .ctor()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderAssemblyAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderAttribute: Void .ctor()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Boolean IsHostedExecution
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Boolean IsInvalidationSupported
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Boolean SystemRuntimeContainsType(System.String)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Boolean get_IsHostedExecution()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Boolean get_IsInvalidationSupported()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String ResolutionFolder
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String RuntimeAssembly
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String TemporaryFolder
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String get_ResolutionFolder()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String get_RuntimeAssembly()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String get_TemporaryFolder()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String[] ReferencedAssemblies
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.String[] get_ReferencedAssemblies()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.Version SystemRuntimeAssemblyVersion
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: System.Version get_SystemRuntimeAssemblyVersion()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void .ctor(Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.Boolean])
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_IsHostedExecution(Boolean)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_IsInvalidationSupported(Boolean)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_ReferencedAssemblies(System.String[])
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_ResolutionFolder(System.String)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_RuntimeAssembly(System.String)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_SystemRuntimeAssemblyVersion(System.Version)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderConfig: Void set_TemporaryFolder(System.String)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Int32 Column
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Int32 Line
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Int32 get_Column()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Int32 get_Line()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: System.String FilePath
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: System.String get_FilePath()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Void .ctor()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Void set_Column(Int32)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Void set_FilePath(System.String)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderDefinitionLocationAttribute: Void set_Line(Int32)
-Microsoft.FSharp.Core.CompilerServices.TypeProviderEditorHideMethodsAttribute: Void .ctor()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderTypeAttributes: Int32 value__
-Microsoft.FSharp.Core.CompilerServices.TypeProviderTypeAttributes: Microsoft.FSharp.Core.CompilerServices.TypeProviderTypeAttributes IsErased
-Microsoft.FSharp.Core.CompilerServices.TypeProviderTypeAttributes: Microsoft.FSharp.Core.CompilerServices.TypeProviderTypeAttributes SuppressRelocate
-Microsoft.FSharp.Core.CompilerServices.TypeProviderXmlDocAttribute: System.String CommentText
-Microsoft.FSharp.Core.CompilerServices.TypeProviderXmlDocAttribute: System.String get_CommentText()
-Microsoft.FSharp.Core.CompilerServices.TypeProviderXmlDocAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.CustomComparisonAttribute: Void .ctor()
-Microsoft.FSharp.Core.CustomEqualityAttribute: Void .ctor()
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean AllowIntoPattern
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean IsLikeGroupJoin
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean IsLikeJoin
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean IsLikeZip
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean MaintainsVariableSpace
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean MaintainsVariableSpaceUsingBind
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean get_AllowIntoPattern()
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean get_IsLikeGroupJoin()
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean get_IsLikeJoin()
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean get_IsLikeZip()
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean get_MaintainsVariableSpace()
-Microsoft.FSharp.Core.CustomOperationAttribute: Boolean get_MaintainsVariableSpaceUsingBind()
-Microsoft.FSharp.Core.CustomOperationAttribute: System.String JoinConditionWord
-Microsoft.FSharp.Core.CustomOperationAttribute: System.String Name
-Microsoft.FSharp.Core.CustomOperationAttribute: System.String get_JoinConditionWord()
-Microsoft.FSharp.Core.CustomOperationAttribute: System.String get_Name()
-Microsoft.FSharp.Core.CustomOperationAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_AllowIntoPattern(Boolean)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_IsLikeGroupJoin(Boolean)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_IsLikeJoin(Boolean)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_IsLikeZip(Boolean)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_JoinConditionWord(System.String)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_MaintainsVariableSpace(Boolean)
-Microsoft.FSharp.Core.CustomOperationAttribute: Void set_MaintainsVariableSpaceUsingBind(Boolean)
-Microsoft.FSharp.Core.DefaultAugmentationAttribute: Boolean Value
-Microsoft.FSharp.Core.DefaultAugmentationAttribute: Boolean get_Value()
-Microsoft.FSharp.Core.DefaultAugmentationAttribute: Void .ctor(Boolean)
-Microsoft.FSharp.Core.DefaultValueAttribute: Boolean Check
-Microsoft.FSharp.Core.DefaultValueAttribute: Boolean get_Check()
-Microsoft.FSharp.Core.DefaultValueAttribute: Void .ctor()
-Microsoft.FSharp.Core.DefaultValueAttribute: Void .ctor(Boolean)
-Microsoft.FSharp.Core.EntryPointAttribute: Void .ctor()
-Microsoft.FSharp.Core.EqualityConditionalOnAttribute: Void .ctor()
-Microsoft.FSharp.Core.ExperimentalAttribute: System.String Message
-Microsoft.FSharp.Core.ExperimentalAttribute: System.String get_Message()
-Microsoft.FSharp.Core.ExperimentalAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.ExtraTopLevelOperators+Checked: Byte ToByte[T](T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators+Checked: SByte ToSByte[T](T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Byte ToByte[T](T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Double ToDouble[T](T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Microsoft.FSharp.Collections.FSharpSet`1[T] CreateSet[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Microsoft.FSharp.Control.FSharpAsyncBuilder DefaultAsyncBuilder
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Microsoft.FSharp.Control.FSharpAsyncBuilder get_DefaultAsyncBuilder()
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Microsoft.FSharp.Core.ExtraTopLevelOperators+Checked
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Microsoft.FSharp.Linq.QueryBuilder get_query()
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Microsoft.FSharp.Linq.QueryBuilder query
-Microsoft.FSharp.Core.ExtraTopLevelOperators: SByte ToSByte[T](T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Single ToSingle[T](T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: System.Collections.Generic.IDictionary`2[TKey,TValue] CreateDictionary[TKey,TValue](System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,TValue]])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: System.Collections.Generic.IReadOnlyDictionary`2[TKey,TValue] CreateReadOnlyDictionary[TKey,TValue](System.Collections.Generic.IEnumerable`1[System.Tuple`2[TKey,TValue]])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T LazyPattern[T](System.Lazy`1[T])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatLineToError[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatLineToTextWriter[T](System.IO.TextWriter, Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatLine[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatToError[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatToStringThenFail[T,TResult](Microsoft.FSharp.Core.PrintfFormat`4[T,Microsoft.FSharp.Core.Unit,System.String,TResult])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatToString[T](Microsoft.FSharp.Core.PrintfFormat`4[T,Microsoft.FSharp.Core.Unit,System.String,System.String])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormatToTextWriter[T](System.IO.TextWriter, Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T PrintFormat[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T SpliceExpression[T](Microsoft.FSharp.Quotations.FSharpExpr`1[T])
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T SpliceUntypedExpression[T](Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: T[,] CreateArray2D[?,T](System.Collections.Generic.IEnumerable`1[?])
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`2[T1,T2])
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean IsChoice1Of2
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean IsChoice2Of2
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean get_IsChoice1Of2()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Boolean get_IsChoice2Of2()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`2[T1,T2])
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: T1 Item
-Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]: T1 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`2[T1,T2])
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean IsChoice1Of2
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean IsChoice2Of2
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean get_IsChoice1Of2()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Boolean get_IsChoice2Of2()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`2[T1,T2])
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: T2 Item
-Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]: T2 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`2+Tags[T1,T2]: Int32 Choice1Of2
-Microsoft.FSharp.Core.FSharpChoice`2+Tags[T1,T2]: Int32 Choice2Of2
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`2[T1,T2])
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean IsChoice1Of2
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean IsChoice2Of2
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean get_IsChoice1Of2()
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Boolean get_IsChoice2Of2()
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`2[T1,T2])
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Microsoft.FSharp.Core.FSharpChoice`2+Choice1Of2[T1,T2]
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Microsoft.FSharp.Core.FSharpChoice`2+Choice2Of2[T1,T2]
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Microsoft.FSharp.Core.FSharpChoice`2+Tags[T1,T2]
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Microsoft.FSharp.Core.FSharpChoice`2[T1,T2] NewChoice1Of2(T1)
-Microsoft.FSharp.Core.FSharpChoice`2[T1,T2]: Microsoft.FSharp.Core.FSharpChoice`2[T1,T2] NewChoice2Of2(T2)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean IsChoice1Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean IsChoice2Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean IsChoice3Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean get_IsChoice1Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean get_IsChoice2Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Boolean get_IsChoice3Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: T1 Item
-Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]: T1 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean IsChoice1Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean IsChoice2Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean IsChoice3Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean get_IsChoice1Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean get_IsChoice2Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Boolean get_IsChoice3Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: T2 Item
-Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]: T2 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean IsChoice1Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean IsChoice2Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean IsChoice3Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean get_IsChoice1Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean get_IsChoice2Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Boolean get_IsChoice3Of3()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: T3 Item
-Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]: T3 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`3+Tags[T1,T2,T3]: Int32 Choice1Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Tags[T1,T2,T3]: Int32 Choice2Of3
-Microsoft.FSharp.Core.FSharpChoice`3+Tags[T1,T2,T3]: Int32 Choice3Of3
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean IsChoice1Of3
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean IsChoice2Of3
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean IsChoice3Of3
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean get_IsChoice1Of3()
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean get_IsChoice2Of3()
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Boolean get_IsChoice3Of3()
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3])
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3+Choice1Of3[T1,T2,T3]
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3+Choice2Of3[T1,T2,T3]
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3+Choice3Of3[T1,T2,T3]
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3+Tags[T1,T2,T3]
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3] NewChoice1Of3(T1)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3] NewChoice2Of3(T2)
-Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3]: Microsoft.FSharp.Core.FSharpChoice`3[T1,T2,T3] NewChoice3Of3(T3)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean IsChoice1Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean IsChoice2Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean IsChoice3Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean IsChoice4Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean get_IsChoice1Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean get_IsChoice2Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean get_IsChoice3Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Boolean get_IsChoice4Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: T1 Item
-Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]: T1 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean IsChoice1Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean IsChoice2Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean IsChoice3Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean IsChoice4Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean get_IsChoice1Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean get_IsChoice2Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean get_IsChoice3Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Boolean get_IsChoice4Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: T2 Item
-Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]: T2 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean IsChoice1Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean IsChoice2Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean IsChoice3Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean IsChoice4Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean get_IsChoice1Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean get_IsChoice2Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean get_IsChoice3Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Boolean get_IsChoice4Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: T3 Item
-Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]: T3 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean IsChoice1Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean IsChoice2Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean IsChoice3Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean IsChoice4Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean get_IsChoice1Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean get_IsChoice2Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean get_IsChoice3Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Boolean get_IsChoice4Of4()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: T4 Item
-Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]: T4 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`4+Tags[T1,T2,T3,T4]: Int32 Choice1Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Tags[T1,T2,T3,T4]: Int32 Choice2Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Tags[T1,T2,T3,T4]: Int32 Choice3Of4
-Microsoft.FSharp.Core.FSharpChoice`4+Tags[T1,T2,T3,T4]: Int32 Choice4Of4
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean IsChoice1Of4
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean IsChoice2Of4
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean IsChoice3Of4
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean IsChoice4Of4
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean get_IsChoice1Of4()
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean get_IsChoice2Of4()
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean get_IsChoice3Of4()
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Boolean get_IsChoice4Of4()
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4+Choice1Of4[T1,T2,T3,T4]
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4+Choice2Of4[T1,T2,T3,T4]
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4+Choice3Of4[T1,T2,T3,T4]
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4+Choice4Of4[T1,T2,T3,T4]
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4+Tags[T1,T2,T3,T4]
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4] NewChoice1Of4(T1)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4] NewChoice2Of4(T2)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4] NewChoice3Of4(T3)
-Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4]: Microsoft.FSharp.Core.FSharpChoice`4[T1,T2,T3,T4] NewChoice4Of4(T4)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean IsChoice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean IsChoice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean IsChoice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean IsChoice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean IsChoice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice1Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice2Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice3Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice4Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice5Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: T1 Item
-Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]: T1 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean IsChoice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean IsChoice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean IsChoice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean IsChoice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean IsChoice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice1Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice2Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice3Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice4Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice5Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: T2 Item
-Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]: T2 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean IsChoice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean IsChoice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean IsChoice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean IsChoice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean IsChoice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice1Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice2Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice3Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice4Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice5Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: T3 Item
-Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]: T3 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean IsChoice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean IsChoice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean IsChoice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean IsChoice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean IsChoice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice1Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice2Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice3Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice4Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice5Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: T4 Item
-Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]: T4 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean IsChoice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean IsChoice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean IsChoice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean IsChoice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean IsChoice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice1Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice2Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice3Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice4Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Boolean get_IsChoice5Of5()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: T5 Item
-Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]: T5 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`5+Tags[T1,T2,T3,T4,T5]: Int32 Choice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Tags[T1,T2,T3,T4,T5]: Int32 Choice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Tags[T1,T2,T3,T4,T5]: Int32 Choice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Tags[T1,T2,T3,T4,T5]: Int32 Choice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5+Tags[T1,T2,T3,T4,T5]: Int32 Choice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean IsChoice1Of5
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean IsChoice2Of5
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean IsChoice3Of5
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean IsChoice4Of5
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean IsChoice5Of5
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean get_IsChoice1Of5()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean get_IsChoice2Of5()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean get_IsChoice3Of5()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean get_IsChoice4Of5()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Boolean get_IsChoice5Of5()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5+Choice1Of5[T1,T2,T3,T4,T5]
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5+Choice2Of5[T1,T2,T3,T4,T5]
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5+Choice3Of5[T1,T2,T3,T4,T5]
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5+Choice4Of5[T1,T2,T3,T4,T5]
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5+Choice5Of5[T1,T2,T3,T4,T5]
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5+Tags[T1,T2,T3,T4,T5]
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5] NewChoice1Of5(T1)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5] NewChoice2Of5(T2)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5] NewChoice3Of5(T3)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5] NewChoice4Of5(T4)
-Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5]: Microsoft.FSharp.Core.FSharpChoice`5[T1,T2,T3,T4,T5] NewChoice5Of5(T5)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: T1 Item
-Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]: T1 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: T2 Item
-Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]: T2 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: T3 Item
-Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]: T3 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: T4 Item
-Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]: T4 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: T5 Item
-Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]: T5 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: T6 Item
-Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]: T6 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]: Int32 Choice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]: Int32 Choice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]: Int32 Choice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]: Int32 Choice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]: Int32 Choice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]: Int32 Choice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice1Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice2Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice3Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice4Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice5Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean IsChoice6Of6
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice1Of6()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice2Of6()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice3Of6()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice4Of6()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice5Of6()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Boolean get_IsChoice6Of6()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6])
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Choice1Of6[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Choice2Of6[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Choice3Of6[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Choice4Of6[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Choice5Of6[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Choice6Of6[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6+Tags[T1,T2,T3,T4,T5,T6]
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6] NewChoice1Of6(T1)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6] NewChoice2Of6(T2)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6] NewChoice3Of6(T3)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6] NewChoice4Of6(T4)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6] NewChoice5Of6(T5)
-Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6]: Microsoft.FSharp.Core.FSharpChoice`6[T1,T2,T3,T4,T5,T6] NewChoice6Of6(T6)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: T1 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]: T1 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: T2 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]: T2 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: T3 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]: T3 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: T4 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]: T4 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: T5 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]: T5 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: T6 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]: T6 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: T7 Item
-Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]: T7 get_Item()
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]: Int32 Choice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice1Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice2Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice3Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice4Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice5Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice6Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean IsChoice7Of7
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice1Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice2Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice3Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice4Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice5Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice6Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Boolean get_IsChoice7Of7()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7])
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 Tag
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice1Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice2Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice3Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice4Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice5Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice6Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Choice7Of7[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7+Tags[T1,T2,T3,T4,T5,T6,T7]
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice1Of7(T1)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice2Of7(T2)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice3Of7(T3)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice4Of7(T4)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice5Of7(T5)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice6Of7(T6)
-Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7]: Microsoft.FSharp.Core.FSharpChoice`7[T1,T2,T3,T4,T5,T6,T7] NewChoice7Of7(T7)
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: Microsoft.FSharp.Core.FSharpFunc`2[T,TResult] FromConverter(System.Converter`2[T,TResult])
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: Microsoft.FSharp.Core.FSharpFunc`2[T,TResult] op_Implicit(System.Converter`2[T,TResult])
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: System.Converter`2[T,TResult] ToConverter(Microsoft.FSharp.Core.FSharpFunc`2[T,TResult])
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: System.Converter`2[T,TResult] op_Implicit(Microsoft.FSharp.Core.FSharpFunc`2[T,TResult])
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: TResult Invoke(T)
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: V InvokeFast[V](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,V]], T, TResult)
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: Void .ctor()
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: W InvokeFast[V,W](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[V,W]]], T, TResult, V)
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: X InvokeFast[V,W,X](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[V,Microsoft.FSharp.Core.FSharpFunc`2[W,X]]]], T, TResult, V, W)
-Microsoft.FSharp.Core.FSharpFunc`2[T,TResult]: Y InvokeFast[V,W,X,Y](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[V,Microsoft.FSharp.Core.FSharpFunc`2[W,Microsoft.FSharp.Core.FSharpFunc`2[X,Y]]]]], T, TResult, V, W, X)
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Int32 Major
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Int32 Minor
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Int32 Release
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Int32 get_Major()
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Int32 get_Minor()
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Int32 get_Release()
-Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute: Void .ctor(Int32, Int32, Int32)
-Microsoft.FSharp.Core.FSharpOption`1+Tags[T]: Int32 None
-Microsoft.FSharp.Core.FSharpOption`1+Tags[T]: Int32 Some
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean Equals(Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean IsNone
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean IsSome
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean get_IsNone(Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.FSharpOption`1[T]: Boolean get_IsSome(Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.FSharpOption`1[T]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.FSharpOption`1[T]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpOption`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpOption`1[T]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpOption`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpOption`1[T]: Int32 GetTag(Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.FSharpOption`1[T]: Microsoft.FSharp.Core.FSharpOption`1+Tags[T]
-Microsoft.FSharp.Core.FSharpOption`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] None
-Microsoft.FSharp.Core.FSharpOption`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] Some(T)
-Microsoft.FSharp.Core.FSharpOption`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] get_None()
-Microsoft.FSharp.Core.FSharpOption`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] op_Implicit(T)
-Microsoft.FSharp.Core.FSharpOption`1[T]: System.String ToString()
-Microsoft.FSharp.Core.FSharpOption`1[T]: T Value
-Microsoft.FSharp.Core.FSharpOption`1[T]: T get_Value()
-Microsoft.FSharp.Core.FSharpOption`1[T]: Void .ctor(T)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Boolean Equals(Microsoft.FSharp.Core.FSharpRef`1[T])
-Microsoft.FSharp.Core.FSharpRef`1[T]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpRef`1[T])
-Microsoft.FSharp.Core.FSharpRef`1[T]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpRef`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpRef`1[T]: T Value
-Microsoft.FSharp.Core.FSharpRef`1[T]: T contents
-Microsoft.FSharp.Core.FSharpRef`1[T]: T contents@
-Microsoft.FSharp.Core.FSharpRef`1[T]: T get_Value()
-Microsoft.FSharp.Core.FSharpRef`1[T]: T get_contents()
-Microsoft.FSharp.Core.FSharpRef`1[T]: Void .ctor(T)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Void set_Value(T)
-Microsoft.FSharp.Core.FSharpRef`1[T]: Void set_contents(T)
-Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 Error
-Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]: Int32 Ok
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean IsError
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean IsOk
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean get_IsError()
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Boolean get_IsOk()
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpResult`2[T,TError])
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 Tag
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2+Tags[T,TError]
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2[T,TError] NewError(TError)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: Microsoft.FSharp.Core.FSharpResult`2[T,TError] NewOk(T)
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: T ResultValue
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: T get_ResultValue()
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: TError ErrorValue
-Microsoft.FSharp.Core.FSharpResult`2[T,TError]: TError get_ErrorValue()
-Microsoft.FSharp.Core.FSharpTypeFunc: System.Object Specialize[T]()
-Microsoft.FSharp.Core.FSharpTypeFunc: Void .ctor()
-Microsoft.FSharp.Core.FSharpValueOption`1+Tags[T]: Int32 ValueNone
-Microsoft.FSharp.Core.FSharpValueOption`1+Tags[T]: Int32 ValueSome
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean Equals(Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean IsNone
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean IsSome
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean IsValueNone
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean IsValueSome
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean get_IsNone()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean get_IsSome()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean get_IsValueNone()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Boolean get_IsValueSome()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 CompareTo(Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 CompareTo(System.Object)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 GetHashCode()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 Tag
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Int32 get_Tag()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1+Tags[T]
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] NewValueSome(T)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] None
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] Some(T)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] ValueNone
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] get_None()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] get_ValueNone()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: Microsoft.FSharp.Core.FSharpValueOption`1[T] op_Implicit(T)
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: System.String ToString()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: T Item
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: T Value
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: T get_Item()
-Microsoft.FSharp.Core.FSharpValueOption`1[T]: T get_Value()
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit] FromAction(System.Action)
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T] FromFunc[T](System.Func`1[T])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit] FromAction[T](System.Action`1[T])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit] ToFSharpFunc[T](System.Action`1[T])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T,TResult] FromFunc[T,TResult](System.Func`2[T,TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T,TResult] ToFSharpFunc[T,TResult](System.Converter`2[T,TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,Microsoft.FSharp.Core.FSharpFunc`2[T5,Microsoft.FSharp.Core.Unit]]]]] FromAction[T1,T2,T3,T4,T5](System.Action`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,Microsoft.FSharp.Core.FSharpFunc`2[T5,TResult]]]]] FromFunc[T1,T2,T3,T4,T5,TResult](System.Func`6[T1,T2,T3,T4,T5,TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,Microsoft.FSharp.Core.FSharpFunc`2[T5,TResult]]]]] FuncFromTupled[T1,T2,T3,T4,T5,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`5[T1,T2,T3,T4,T5],TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,Microsoft.FSharp.Core.Unit]]]] FromAction[T1,T2,T3,T4](System.Action`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,TResult]]]] FromFunc[T1,T2,T3,T4,TResult](System.Func`5[T1,T2,T3,T4,TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,TResult]]]] FuncFromTupled[T1,T2,T3,T4,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`4[T1,T2,T3,T4],TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.Unit]]] FromAction[T1,T2,T3](System.Action`3[T1,T2,T3])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]] FromFunc[T1,T2,T3,TResult](System.Func`4[T1,T2,T3,TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]] FuncFromTupled[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`3[T1,T2,T3],TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.Unit]] FromAction[T1,T2](System.Action`2[T1,T2])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]] FromFunc[T1,T2,TResult](System.Func`3[T1,T2,TResult])
-Microsoft.FSharp.Core.FuncConvert: Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]] FuncFromTupled[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`2[T1,T2],TResult])
-Microsoft.FSharp.Core.GeneralizableValueAttribute: Void .ctor()
-Microsoft.FSharp.Core.InterfaceAttribute: Void .ctor()
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String AddressOpNotFirstClassString
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String InputArrayEmptyString
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String InputMustBeNonNegativeString
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String InputSequenceEmptyString
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String NoNegateMinValueString
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String get_AddressOpNotFirstClassString()
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String get_InputArrayEmptyString()
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String get_InputMustBeNonNegativeString()
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String get_InputSequenceEmptyString()
-Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings: System.String get_NoNegateMinValueString()
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean FastEqualsTuple2[T1,T2](System.Collections.IEqualityComparer, System.Tuple`2[T1,T2], System.Tuple`2[T1,T2])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean FastEqualsTuple3[T1,T2,T3](System.Collections.IEqualityComparer, System.Tuple`3[T1,T2,T3], System.Tuple`3[T1,T2,T3])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean FastEqualsTuple4[T1,T2,T3,T4](System.Collections.IEqualityComparer, System.Tuple`4[T1,T2,T3,T4], System.Tuple`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean FastEqualsTuple5[T1,T2,T3,T4,T5](System.Collections.IEqualityComparer, System.Tuple`5[T1,T2,T3,T4,T5], System.Tuple`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericEqualityERIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericEqualityIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericEqualityWithComparerIntrinsic[T](System.Collections.IEqualityComparer, T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericGreaterOrEqualIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericGreaterThanIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericLessOrEqualIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean GenericLessThanIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Boolean PhysicalEqualityIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastCompareTuple2[T1,T2](System.Collections.IComparer, System.Tuple`2[T1,T2], System.Tuple`2[T1,T2])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastCompareTuple3[T1,T2,T3](System.Collections.IComparer, System.Tuple`3[T1,T2,T3], System.Tuple`3[T1,T2,T3])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastCompareTuple4[T1,T2,T3,T4](System.Collections.IComparer, System.Tuple`4[T1,T2,T3,T4], System.Tuple`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastCompareTuple5[T1,T2,T3,T4,T5](System.Collections.IComparer, System.Tuple`5[T1,T2,T3,T4,T5], System.Tuple`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastHashTuple2[T1,T2](System.Collections.IEqualityComparer, System.Tuple`2[T1,T2])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastHashTuple3[T1,T2,T3](System.Collections.IEqualityComparer, System.Tuple`3[T1,T2,T3])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastHashTuple4[T1,T2,T3,T4](System.Collections.IEqualityComparer, System.Tuple`4[T1,T2,T3,T4])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 FastHashTuple5[T1,T2,T3,T4,T5](System.Collections.IEqualityComparer, System.Tuple`5[T1,T2,T3,T4,T5])
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 GenericComparisonIntrinsic[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 GenericComparisonWithComparerIntrinsic[T](System.Collections.IComparer, T, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 GenericHashIntrinsic[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 GenericHashWithComparerIntrinsic[T](System.Collections.IEqualityComparer, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 LimitedGenericHashIntrinsic[T](Int32, T)
-Microsoft.FSharp.Core.LanguagePrimitives+HashCompare: Int32 PhysicalHashIntrinsic[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Boolean TypeTestFast[T](System.Object)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Boolean TypeTestGeneric[T](System.Object)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Char GetString(System.String, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: System.Decimal MakeDecimal(Int32, Int32, Int32, Boolean, Byte)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T CheckThis[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T CreateInstance[T]()
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T GetArray2D[T](T[,], Int32, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T GetArray3D[T](T[,,], Int32, Int32, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T GetArray4D[T](T[,,,], Int32, Int32, Int32, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T GetArray[T](T[], Int32)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T UnboxFast[T](System.Object)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: T UnboxGeneric[T](System.Object)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void Dispose[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void FailInit()
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void FailStaticInit()
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void SetArray2D[T](T[,], Int32, Int32, T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void SetArray3D[T](T[,,], Int32, Int32, Int32, T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void SetArray4D[T](T[,,,], Int32, Int32, Int32, Int32, T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions: Void SetArray[T](T[], Int32, T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators: Boolean Or(Boolean, Boolean)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators: Boolean op_Amp(Boolean, Boolean)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators: Boolean op_BooleanAnd(Boolean, Boolean)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators: Boolean op_BooleanOr(Boolean, Boolean)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators: IntPtr op_IntegerAddressOf[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators: T& op_AddressOf[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericEqualityER[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericEqualityWithComparer[T](System.Collections.IEqualityComparer, T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericEquality[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericGreaterOrEqual[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericGreaterThan[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericLessOrEqual[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean GenericLessThan[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Boolean PhysicalEquality[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Double FloatWithMeasure(Double)
-Microsoft.FSharp.Core.LanguagePrimitives: Int16 Int16WithMeasure(Int16)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 GenericComparisonWithComparer[T](System.Collections.IComparer, T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 GenericComparison[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 GenericHashWithComparer[T](System.Collections.IEqualityComparer, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 GenericHash[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 GenericLimitedHash[T](Int32, T)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 Int32WithMeasure(Int32)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 ParseInt32(System.String)
-Microsoft.FSharp.Core.LanguagePrimitives: Int32 PhysicalHash[T](T)
-Microsoft.FSharp.Core.LanguagePrimitives: Int64 Int64WithMeasure(Int64)
-Microsoft.FSharp.Core.LanguagePrimitives: Int64 ParseInt64(System.String)
-Microsoft.FSharp.Core.LanguagePrimitives: Microsoft.FSharp.Core.LanguagePrimitives+ErrorStrings
-Microsoft.FSharp.Core.LanguagePrimitives: Microsoft.FSharp.Core.LanguagePrimitives+HashCompare
-Microsoft.FSharp.Core.LanguagePrimitives: Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicFunctions
-Microsoft.FSharp.Core.LanguagePrimitives: Microsoft.FSharp.Core.LanguagePrimitives+IntrinsicOperators
-Microsoft.FSharp.Core.LanguagePrimitives: SByte SByteWithMeasure(SByte)
-Microsoft.FSharp.Core.LanguagePrimitives: Single Float32WithMeasure(Single)
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.Generic.IComparer`1[T] FastGenericComparerFromTable[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.Generic.IComparer`1[T] FastGenericComparer[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.Generic.IEqualityComparer`1[T] FastGenericEqualityComparerFromTable[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.Generic.IEqualityComparer`1[T] FastGenericEqualityComparer[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.Generic.IEqualityComparer`1[T] FastLimitedGenericEqualityComparer[T](Int32)
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.IComparer GenericComparer
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.IComparer get_GenericComparer()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.IEqualityComparer GenericEqualityComparer
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.IEqualityComparer GenericEqualityERComparer
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.IEqualityComparer get_GenericEqualityComparer()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Collections.IEqualityComparer get_GenericEqualityERComparer()
-Microsoft.FSharp.Core.LanguagePrimitives: System.Decimal DecimalWithMeasure(System.Decimal)
-Microsoft.FSharp.Core.LanguagePrimitives: T DivideByIntDynamic[T](T, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives: T DivideByInt[T](T, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives: T EnumToValue[TEnum,T](TEnum)
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericMaximum[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericMinimum[T](T, T)
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericOneDynamic[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericOne[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericZeroDynamic[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericZero[T]()
-Microsoft.FSharp.Core.LanguagePrimitives: TEnum EnumOfValue[T,TEnum](T)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult AdditionDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult CheckedAdditionDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult CheckedMultiplyDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult MultiplyDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: UInt32 ParseUInt32(System.String)
-Microsoft.FSharp.Core.LanguagePrimitives: UInt64 ParseUInt64(System.String)
-Microsoft.FSharp.Core.LiteralAttribute: Void .ctor()
-Microsoft.FSharp.Core.MatchFailureException: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.MatchFailureException: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.MatchFailureException: Int32 Data1
-Microsoft.FSharp.Core.MatchFailureException: Int32 Data2
-Microsoft.FSharp.Core.MatchFailureException: Int32 GetHashCode()
-Microsoft.FSharp.Core.MatchFailureException: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.FSharp.Core.MatchFailureException: Int32 get_Data1()
-Microsoft.FSharp.Core.MatchFailureException: Int32 get_Data2()
-Microsoft.FSharp.Core.MatchFailureException: System.String Data0
-Microsoft.FSharp.Core.MatchFailureException: System.String Message
-Microsoft.FSharp.Core.MatchFailureException: System.String get_Data0()
-Microsoft.FSharp.Core.MatchFailureException: System.String get_Message()
-Microsoft.FSharp.Core.MatchFailureException: Void .ctor()
-Microsoft.FSharp.Core.MatchFailureException: Void .ctor(System.String, Int32, Int32)
-Microsoft.FSharp.Core.MeasureAnnotatedAbbreviationAttribute: Void .ctor()
-Microsoft.FSharp.Core.MeasureAttribute: Void .ctor()
-Microsoft.FSharp.Core.NoComparisonAttribute: Void .ctor()
-Microsoft.FSharp.Core.NoDynamicInvocationAttribute: Void .ctor()
-Microsoft.FSharp.Core.NoEqualityAttribute: Void .ctor()
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: System.Object FromInt64Dynamic(Int64)
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: System.Object FromStringDynamic(System.String)
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: T FromInt32[T](Int32)
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: T FromInt64[T](Int64)
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: T FromOne[T]()
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: T FromString[T](System.String)
-Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI: T FromZero[T]()
-Microsoft.FSharp.Core.NumericLiterals: Microsoft.FSharp.Core.NumericLiterals+NumericLiteralI
-Microsoft.FSharp.Core.Operators+ArrayExtensions: Int32 String.GetReverseIndex(System.String, Int32, Int32)
-Microsoft.FSharp.Core.Operators+ArrayExtensions: Int32 [,,,]`1.GetReverseIndex[T](T[,,,], Int32, Int32)
-Microsoft.FSharp.Core.Operators+ArrayExtensions: Int32 [,,]`1.GetReverseIndex[T](T[,,], Int32, Int32)
-Microsoft.FSharp.Core.Operators+ArrayExtensions: Int32 [,]`1.GetReverseIndex[T](T[,], Int32, Int32)
-Microsoft.FSharp.Core.Operators+ArrayExtensions: Int32 []`1.GetReverseIndex[T](T[], Int32, Int32)
-Microsoft.FSharp.Core.Operators+Checked: Byte ToByte[T](T)
-Microsoft.FSharp.Core.Operators+Checked: Char ToChar[T](T)
-Microsoft.FSharp.Core.Operators+Checked: Int16 ToInt16[T](T)
-Microsoft.FSharp.Core.Operators+Checked: Int32 ToInt32[T](T)
-Microsoft.FSharp.Core.Operators+Checked: Int32 ToInt[T](T)
-Microsoft.FSharp.Core.Operators+Checked: Int64 ToInt64[T](T)
-Microsoft.FSharp.Core.Operators+Checked: IntPtr ToIntPtr[T](T)
-Microsoft.FSharp.Core.Operators+Checked: SByte ToSByte[T](T)
-Microsoft.FSharp.Core.Operators+Checked: T op_UnaryNegation[T](T)
-Microsoft.FSharp.Core.Operators+Checked: T3 op_Addition[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators+Checked: T3 op_Multiply[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators+Checked: T3 op_Subtraction[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators+Checked: UInt16 ToUInt16[T](T)
-Microsoft.FSharp.Core.Operators+Checked: UInt32 ToUInt32[T](T)
-Microsoft.FSharp.Core.Operators+Checked: UInt64 ToUInt64[T](T)
-Microsoft.FSharp.Core.Operators+Checked: UIntPtr ToUIntPtr[T](T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_Equality[T](T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_GreaterThanOrEqual[T,TResult](T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_GreaterThan[T,TResult](T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_Inequality[T](T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_LessThanOrEqual[T,TResult](T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_LessThan[T,TResult](T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Int32 Compare[T](T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Int32 Hash[T](T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: T Max[T](T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: T Min[T](T, T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Byte PowByte(Byte, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Double PowDouble(Double, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Int16 PowInt16(Int16, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Int32 PowInt32(Int32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Int32 SignDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Int64 PowInt64(Int64, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: IntPtr PowIntPtr(IntPtr, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: SByte PowSByte(SByte, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Single PowSingle(Single, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Byte] RangeByte(Byte, Byte, Byte)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Char] RangeChar(Char, Char)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Double] RangeDouble(Double, Double, Double)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Int16] RangeInt16(Int16, Int16, Int16)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Int32] RangeInt32(Int32, Int32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Int64] RangeInt64(Int64, Int64, Int64)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.IntPtr] RangeIntPtr(IntPtr, IntPtr, IntPtr)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.SByte] RangeSByte(SByte, SByte, SByte)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.Single] RangeSingle(Single, Single, Single)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.UInt16] RangeUInt16(UInt16, UInt16, UInt16)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.UInt32] RangeUInt32(UInt32, UInt32, UInt32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.UInt64] RangeUInt64(UInt64, UInt64, UInt64)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[System.UIntPtr] RangeUIntPtr(UIntPtr, UIntPtr, UIntPtr)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[T] RangeGeneric[T](T, Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Collections.Generic.IEnumerable`1[T] RangeStepGeneric[TStep,T](TStep, Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TStep,T]], T, TStep, T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.Decimal PowDecimal(System.Decimal, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: System.String GetStringSlice(System.String, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T AbsDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T AcosDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T AsinDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T AtanDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T CeilingDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T CosDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T CoshDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T ExpDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T FloorDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T Log10Dynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T LogDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T PowDynamic[T,TResult](T, TResult)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T PowGeneric[T](T, Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T RoundDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T SinDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T SinhDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T TanDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T TanhDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T TruncateDynamic[T](T)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T2 Atan2Dynamic[T1,T2](T1, T1)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T2 SqrtDynamic[T1,T2](T1)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,,,] GetArraySlice4D[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,,] GetArraySlice3D[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice3DFixedSingle1[T](T[,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice3DFixedSingle2[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice3DFixedSingle3[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice3DFixedDouble1[T](T[,,], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice3DFixedDouble2[T](T[,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice3DFixedDouble3[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice2D[T](T[,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice2DFixed1[T](T[,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice2DFixed2[T](T[,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice[T](T[], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: UInt16 PowUInt16(UInt16, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: UInt32 PowUInt32(UInt32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: UInt64 PowUInt64(UInt64, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: UIntPtr PowUIntPtr(UIntPtr, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice2DFixed1[T](T[,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice2DFixed2[T](T[,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice2D[T](T[,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3D[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3DFixedDouble1[T](T[,,], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3DFixedDouble2[T](T[,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3DFixedDouble3[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3DFixedSingle1[T](T[,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3DFixedSingle2[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice3DFixedSingle3[T](T[,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4D[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,,,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,,] GetArraySlice4DFixedSingle1[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,,] GetArraySlice4DFixedSingle2[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,,] GetArraySlice4DFixedSingle3[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,,] GetArraySlice4DFixedSingle4[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice4DFixedDouble1[T](T[,,,], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice4DFixedDouble2[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice4DFixedDouble3[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice4DFixedDouble4[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice4DFixedDouble5[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[,] GetArraySlice4DFixedDouble6[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice4DFixedTriple1[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice4DFixedTriple2[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice4DFixedTriple3[T](T[,,,], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32)
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: T[] GetArraySlice4DFixedTriple4[T](T[,,,], Int32, Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedDouble1[T](T[,,,], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedDouble2[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedDouble3[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedDouble4[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedDouble5[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedDouble6[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, T[,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedSingle1[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedSingle2[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedSingle3[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[,,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedSingle4[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[,,])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedTriple1[T](T[,,,], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, Int32, T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedTriple2[T](T[,,,], Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, Int32, T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedTriple3[T](T[,,,], Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Int32, T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice4DFixedTriple4[T](T[,,,], Int32, Int32, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[])
-Microsoft.FSharp.Core.Operators+OperatorIntrinsics: Void SetArraySlice[T](T[], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Int32], T[])
-Microsoft.FSharp.Core.Operators+Unchecked: Boolean Equals[T](T, T)
-Microsoft.FSharp.Core.Operators+Unchecked: Int32 Compare[T](T, T)
-Microsoft.FSharp.Core.Operators+Unchecked: Int32 Hash[T](T)
-Microsoft.FSharp.Core.Operators+Unchecked: T DefaultOf[T]()
-Microsoft.FSharp.Core.Operators+Unchecked: T Unbox[T](System.Object)
-Microsoft.FSharp.Core.Operators: Boolean IsNull[T](T)
-Microsoft.FSharp.Core.Operators: Boolean Not(Boolean)
-Microsoft.FSharp.Core.Operators: Boolean IsNullV[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpChoice`2[Microsoft.FSharp.Core.Unit,T] NullMatchPattern[T](T)
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpChoice`2[Microsoft.FSharp.Core.Unit,T] NullValueMatchPattern[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: System.Nullable`1[T] NullV[T]()
-Microsoft.FSharp.Core.Operators: System.Nullable`1[T] WithNullV[T](T)
-Microsoft.FSharp.Core.Operators: T DefaultIfNone[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.Operators: T DefaultIfNullV[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: T DefaultIfNull[T](T, T)
-Microsoft.FSharp.Core.Operators: T NonNullQuickPattern[T](T)
-Microsoft.FSharp.Core.Operators: T NonNullV[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: T NonNullQuickValuePattern[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.Operators: T NonNull[T](T)
-Microsoft.FSharp.Core.Operators: T NullArgCheck[T](System.String, T)
-Microsoft.FSharp.Core.Operators: T WithNull[T](T)
-Microsoft.FSharp.Core.Operators: Boolean op_Equality[T](T, T)
-Microsoft.FSharp.Core.Operators: Boolean op_GreaterThanOrEqual[T](T, T)
-Microsoft.FSharp.Core.Operators: Boolean op_GreaterThan[T](T, T)
-Microsoft.FSharp.Core.Operators: Boolean op_Inequality[T](T, T)
-Microsoft.FSharp.Core.Operators: Boolean op_LessThanOrEqual[T](T, T)
-Microsoft.FSharp.Core.Operators: Boolean op_LessThan[T](T, T)
-Microsoft.FSharp.Core.Operators: Byte ToByte[T](T)
-Microsoft.FSharp.Core.Operators: Char ToChar[T](T)
-Microsoft.FSharp.Core.Operators: Double Infinity
-Microsoft.FSharp.Core.Operators: Double NaN
-Microsoft.FSharp.Core.Operators: Double ToDouble[T](T)
-Microsoft.FSharp.Core.Operators: Double get_Infinity()
-Microsoft.FSharp.Core.Operators: Double get_NaN()
-Microsoft.FSharp.Core.Operators: Int16 ToInt16[T](T)
-Microsoft.FSharp.Core.Operators: Int32 Compare[T](T, T)
-Microsoft.FSharp.Core.Operators: Int32 Hash[T](T)
-Microsoft.FSharp.Core.Operators: Int32 Sign[T](T)
-Microsoft.FSharp.Core.Operators: Int32 SizeOf[T]()
-Microsoft.FSharp.Core.Operators: Int32 ToInt32[T](T)
-Microsoft.FSharp.Core.Operators: Int32 ToInt[T](T)
-Microsoft.FSharp.Core.Operators: UInt32 ToUInt[T](T)
-Microsoft.FSharp.Core.Operators: Int32 limitedHash[T](Int32, T)
-Microsoft.FSharp.Core.Operators: Int64 ToInt64[T](T)
-Microsoft.FSharp.Core.Operators: IntPtr ToIntPtr[T](T)
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Collections.FSharpList`1[T] op_Append[T](Microsoft.FSharp.Collections.FSharpList`1[T], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpFunc`2[T1,T3] op_ComposeLeft[T2,T3,T1](Microsoft.FSharp.Core.FSharpFunc`2[T2,T3], Microsoft.FSharp.Core.FSharpFunc`2[T1,T2])
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpFunc`2[T1,T3] op_ComposeRight[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,T2], Microsoft.FSharp.Core.FSharpFunc`2[T2,T3])
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpOption`1[System.String] FailurePattern(System.Exception)
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpOption`1[T] TryUnbox[T](System.Object)
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.FSharpRef`1[T] Ref[T](T)
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.Operators+ArrayExtensions
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.Operators+Checked
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.Operators+NonStructuralComparison
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.Operators+OperatorIntrinsics
-Microsoft.FSharp.Core.Operators: Microsoft.FSharp.Core.Operators+Unchecked
-Microsoft.FSharp.Core.Operators: SByte ToSByte[T](T)
-Microsoft.FSharp.Core.Operators: Single InfinitySingle
-Microsoft.FSharp.Core.Operators: Single NaNSingle
-Microsoft.FSharp.Core.Operators: Single ToSingle[T](T)
-Microsoft.FSharp.Core.Operators: Single get_InfinitySingle()
-Microsoft.FSharp.Core.Operators: Single get_NaNSingle()
-Microsoft.FSharp.Core.Operators: System.Collections.Generic.IEnumerable`1[T] CreateSequence[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Core.Operators: System.Collections.Generic.IEnumerable`1[T] op_RangeStep[T,TStep](T, TStep, T)
-Microsoft.FSharp.Core.Operators: System.Collections.Generic.IEnumerable`1[T] op_Range[T](T, T)
-Microsoft.FSharp.Core.Operators: System.Decimal ToDecimal[T](T)
-Microsoft.FSharp.Core.Operators: System.Exception Failure(System.String)
-Microsoft.FSharp.Core.Operators: System.IO.TextReader ConsoleIn[T]()
-Microsoft.FSharp.Core.Operators: System.IO.TextWriter ConsoleError[T]()
-Microsoft.FSharp.Core.Operators: System.IO.TextWriter ConsoleOut[T]()
-Microsoft.FSharp.Core.Operators: System.Object Box[T](T)
-Microsoft.FSharp.Core.Operators: System.String NameOf[T](T)
-Microsoft.FSharp.Core.Operators: System.String ToString[T](T)
-Microsoft.FSharp.Core.Operators: System.String op_Concatenate(System.String, System.String)
-Microsoft.FSharp.Core.Operators: System.Tuple`2[TKey,TValue] KeyValuePattern[TKey,TValue](System.Collections.Generic.KeyValuePair`2[TKey,TValue])
-Microsoft.FSharp.Core.Operators: System.Type TypeDefOf[T]()
-Microsoft.FSharp.Core.Operators: System.Type TypeOf[T]()
-Microsoft.FSharp.Core.Operators: T Abs[T](T)
-Microsoft.FSharp.Core.Operators: T Acos[T](T)
-Microsoft.FSharp.Core.Operators: T Asin[T](T)
-Microsoft.FSharp.Core.Operators: T Atan[T](T)
-Microsoft.FSharp.Core.Operators: T Ceiling[T](T)
-Microsoft.FSharp.Core.Operators: T Cos[T](T)
-Microsoft.FSharp.Core.Operators: T Cosh[T](T)
-Microsoft.FSharp.Core.Operators: T DefaultArg[T](Microsoft.FSharp.Core.FSharpOption`1[T], T)
-Microsoft.FSharp.Core.Operators: T DefaultValueArg[T](Microsoft.FSharp.Core.FSharpValueOption`1[T], T)
-Microsoft.FSharp.Core.Operators: T Exit[T](Int32)
-Microsoft.FSharp.Core.Operators: T Exp[T](T)
-Microsoft.FSharp.Core.Operators: T FailWith[T](System.String)
-Microsoft.FSharp.Core.Operators: T Floor[T](T)
-Microsoft.FSharp.Core.Operators: T Identity[T](T)
-Microsoft.FSharp.Core.Operators: T InvalidArg[T](System.String, System.String)
-Microsoft.FSharp.Core.Operators: T InvalidOp[T](System.String)
-Microsoft.FSharp.Core.Operators: T Lock[TLock,T](TLock, Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T])
-Microsoft.FSharp.Core.Operators: T Log10[T](T)
-Microsoft.FSharp.Core.Operators: T Log[T](T)
-Microsoft.FSharp.Core.Operators: T Max[T](T, T)
-Microsoft.FSharp.Core.Operators: T Min[T](T, T)
-Microsoft.FSharp.Core.Operators: T NullArg[T](System.String)
-Microsoft.FSharp.Core.Operators: T PowInteger[T](T, Int32)
-Microsoft.FSharp.Core.Operators: T Raise[T](System.Exception)
-Microsoft.FSharp.Core.Operators: T Reraise[T]()
-Microsoft.FSharp.Core.Operators: T Rethrow[T]()
-Microsoft.FSharp.Core.Operators: T Round[T](T)
-Microsoft.FSharp.Core.Operators: T Sin[T](T)
-Microsoft.FSharp.Core.Operators: T Sinh[T](T)
-Microsoft.FSharp.Core.Operators: T Tan[T](T)
-Microsoft.FSharp.Core.Operators: T Tanh[T](T)
-Microsoft.FSharp.Core.Operators: T Truncate[T](T)
-Microsoft.FSharp.Core.Operators: T Unbox[T](System.Object)
-Microsoft.FSharp.Core.Operators: T op_BitwiseAnd[T](T, T)
-Microsoft.FSharp.Core.Operators: T op_BitwiseOr[T](T, T)
-Microsoft.FSharp.Core.Operators: T op_Dereference[T](Microsoft.FSharp.Core.FSharpRef`1[T])
-Microsoft.FSharp.Core.Operators: T op_ExclusiveOr[T](T, T)
-Microsoft.FSharp.Core.Operators: T op_Exponentiation[T,TResult](T, TResult)
-Microsoft.FSharp.Core.Operators: T op_LeftShift[T](T, Int32)
-Microsoft.FSharp.Core.Operators: T op_LogicalNot[T](T)
-Microsoft.FSharp.Core.Operators: T op_RightShift[T](T, Int32)
-Microsoft.FSharp.Core.Operators: T op_UnaryNegation[T](T)
-Microsoft.FSharp.Core.Operators: T op_UnaryPlus[T](T)
-Microsoft.FSharp.Core.Operators: T1 Fst[T1,T2](System.Tuple`2[T1,T2])
-Microsoft.FSharp.Core.Operators: T2 Atan2[T1,T2](T1, T1)
-Microsoft.FSharp.Core.Operators: T2 Snd[T1,T2](System.Tuple`2[T1,T2])
-Microsoft.FSharp.Core.Operators: T3 op_Addition[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Division[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Modulus[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Multiply[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Subtraction[T1,T2,T3](T1, T2)
-Microsoft.FSharp.Core.Operators: TResult Sqrt[T,TResult](T)
-Microsoft.FSharp.Core.Operators: TResult ToEnum[TResult](Int32)
-Microsoft.FSharp.Core.Operators: TResult Using[T,TResult](T, Microsoft.FSharp.Core.FSharpFunc`2[T,TResult])
-Microsoft.FSharp.Core.Operators: TResult op_PipeLeft2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]], T1, T2)
-Microsoft.FSharp.Core.Operators: TResult op_PipeLeft3[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]], T1, T2, T3)
-Microsoft.FSharp.Core.Operators: TResult op_PipeLeft[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T)
-Microsoft.FSharp.Core.Operators: TResult op_PipeRight2[T1,T2,TResult](T1, T2, Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]])
-Microsoft.FSharp.Core.Operators: TResult op_PipeRight3[T1,T2,T3,TResult](T1, T2, T3, Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]])
-Microsoft.FSharp.Core.Operators: TResult op_PipeRight[T1,TResult](T1, Microsoft.FSharp.Core.FSharpFunc`2[T1,TResult])
-Microsoft.FSharp.Core.Operators: UInt16 ToUInt16[T](T)
-Microsoft.FSharp.Core.Operators: UInt32 ToUInt32[T](T)
-Microsoft.FSharp.Core.Operators: UInt64 ToUInt64[T](T)
-Microsoft.FSharp.Core.Operators: UIntPtr ToUIntPtr[T](T)
-Microsoft.FSharp.Core.Operators: Void Decrement(Microsoft.FSharp.Core.FSharpRef`1[System.Int32])
-Microsoft.FSharp.Core.Operators: Void Ignore[T](T)
-Microsoft.FSharp.Core.Operators: Void Increment(Microsoft.FSharp.Core.FSharpRef`1[System.Int32])
-Microsoft.FSharp.Core.Operators: Void op_ColonEquals[T](Microsoft.FSharp.Core.FSharpRef`1[T], T)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`3[T1,T2,TResult]: FSharpFunc`3 Adapt(Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]])
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`3[T1,T2,TResult]: Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult] Invoke(T1)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`3[T1,T2,TResult]: TResult Invoke(T1, T2)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`3[T1,T2,TResult]: Void .ctor()
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`4[T1,T2,T3,TResult]: FSharpFunc`4 Adapt(Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]])
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`4[T1,T2,T3,TResult]: Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]] Invoke(T1)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`4[T1,T2,T3,TResult]: TResult Invoke(T1, T2, T3)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`4[T1,T2,T3,TResult]: Void .ctor()
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`5[T1,T2,T3,T4,TResult]: FSharpFunc`5 Adapt(Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,TResult]]]])
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`5[T1,T2,T3,T4,TResult]: Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,TResult]]] Invoke(T1)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`5[T1,T2,T3,T4,TResult]: TResult Invoke(T1, T2, T3, T4)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`5[T1,T2,T3,T4,TResult]: Void .ctor()
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`6[T1,T2,T3,T4,T5,TResult]: FSharpFunc`6 Adapt(Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,Microsoft.FSharp.Core.FSharpFunc`2[T5,TResult]]]]])
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`6[T1,T2,T3,T4,T5,TResult]: Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,Microsoft.FSharp.Core.FSharpFunc`2[T4,Microsoft.FSharp.Core.FSharpFunc`2[T5,TResult]]]] Invoke(T1)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`6[T1,T2,T3,T4,T5,TResult]: TResult Invoke(T1, T2, T3, T4, T5)
-Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`6[T1,T2,T3,T4,T5,TResult]: Void .ctor()
-Microsoft.FSharp.Core.OptimizedClosures: Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`3[T1,T2,TResult]
-Microsoft.FSharp.Core.OptimizedClosures: Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`4[T1,T2,T3,TResult]
-Microsoft.FSharp.Core.OptimizedClosures: Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`5[T1,T2,T3,T4,TResult]
-Microsoft.FSharp.Core.OptimizedClosures: Microsoft.FSharp.Core.OptimizedClosures+FSharpFunc`6[T1,T2,T3,T4,T5,TResult]
-Microsoft.FSharp.Core.OptionModule: Boolean Contains[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Boolean Exists[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Boolean ForAll[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Boolean IsNone[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Boolean IsSome[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Int32 Count[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Collections.FSharpList`1[T] ToList[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] Bind[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpOption`1[TResult]], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] Map2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]], Microsoft.FSharp.Core.FSharpOption`1[T1], Microsoft.FSharp.Core.FSharpOption`1[T2])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] Map3[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]], Microsoft.FSharp.Core.FSharpOption`1[T1], Microsoft.FSharp.Core.FSharpOption`1[T2], Microsoft.FSharp.Core.FSharpOption`1[T3])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[TResult] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[T] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[T] Flatten[T](Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpOption`1[T]])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[T] OfNullable[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[T] OfObj[T](T)
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[T] OrElseWith[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.FSharpOption`1[T]], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Microsoft.FSharp.Core.FSharpOption`1[T] OrElse[T](Microsoft.FSharp.Core.FSharpOption`1[T], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: System.Nullable`1[T] ToNullable[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: T DefaultValue[T](T, Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: T DefaultWith[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: T GetValue[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: T ToObj[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: TState FoldBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], Microsoft.FSharp.Core.FSharpOption`1[T], TState)
-Microsoft.FSharp.Core.OptionModule: TState Fold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: T[] ToArray[T](Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionModule: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpOption`1[T])
-Microsoft.FSharp.Core.OptionalArgumentAttribute: Void .ctor()
-Microsoft.FSharp.Core.PrintfFormat`4[TPrinter,TState,TResidue,TResult]: System.String ToString()
-Microsoft.FSharp.Core.PrintfFormat`4[TPrinter,TState,TResidue,TResult]: System.String Value
-Microsoft.FSharp.Core.PrintfFormat`4[TPrinter,TState,TResidue,TResult]: System.String get_Value()
-Microsoft.FSharp.Core.PrintfFormat`4[TPrinter,TState,TResidue,TResult]: Void .ctor(System.String)
-Microsoft.FSharp.Core.PrintfFormat`5[TPrinter,TState,TResidue,TResult,TTuple]: System.String ToString()
-Microsoft.FSharp.Core.PrintfFormat`5[TPrinter,TState,TResidue,TResult,TTuple]: System.String Value
-Microsoft.FSharp.Core.PrintfFormat`5[TPrinter,TState,TResidue,TResult,TTuple]: System.String get_Value()
-Microsoft.FSharp.Core.PrintfFormat`5[TPrinter,TState,TResidue,TResult,TTuple]: Void .ctor(System.String)
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatLineToError[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatLineToTextWriter[T](System.IO.TextWriter, Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatLine[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatThen[TResult,T](Microsoft.FSharp.Core.FSharpFunc`2[System.String,TResult], Microsoft.FSharp.Core.PrintfFormat`4[T,Microsoft.FSharp.Core.Unit,System.String,TResult])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToError[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToStringBuilderThen[TResult,T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], System.Text.StringBuilder, Microsoft.FSharp.Core.PrintfFormat`4[T,System.Text.StringBuilder,Microsoft.FSharp.Core.Unit,TResult])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToStringBuilder[T](System.Text.StringBuilder, Microsoft.FSharp.Core.PrintfFormat`4[T,System.Text.StringBuilder,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToStringThenFail[T,TResult](Microsoft.FSharp.Core.PrintfFormat`4[T,Microsoft.FSharp.Core.Unit,System.String,TResult])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToStringThen[TResult,T](Microsoft.FSharp.Core.FSharpFunc`2[System.String,TResult], Microsoft.FSharp.Core.PrintfFormat`4[T,Microsoft.FSharp.Core.Unit,System.String,TResult])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToStringThen[T](Microsoft.FSharp.Core.PrintfFormat`4[T,Microsoft.FSharp.Core.Unit,System.String,System.String])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToTextWriterThen[TResult,T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], System.IO.TextWriter, Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,TResult])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormatToTextWriter[T](System.IO.TextWriter, Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.PrintfModule: T PrintFormat[T](Microsoft.FSharp.Core.PrintfFormat`4[T,System.IO.TextWriter,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit])
-Microsoft.FSharp.Core.ProjectionParameterAttribute: Void .ctor()
-Microsoft.FSharp.Core.ReferenceEqualityAttribute: Void .ctor()
-Microsoft.FSharp.Core.ReflectedDefinitionAttribute: Boolean IncludeValue
-Microsoft.FSharp.Core.ReflectedDefinitionAttribute: Boolean get_IncludeValue()
-Microsoft.FSharp.Core.ReflectedDefinitionAttribute: Void .ctor()
-Microsoft.FSharp.Core.ReflectedDefinitionAttribute: Void .ctor(Boolean)
-Microsoft.FSharp.Core.RequireQualifiedAccessAttribute: Void .ctor()
-Microsoft.FSharp.Core.RequiresExplicitTypeArgumentsAttribute: Void .ctor()
-Microsoft.FSharp.Core.ResultModule: Microsoft.FSharp.Core.FSharpResult`2[T,TResult] MapError[TError,TResult,T](Microsoft.FSharp.Core.FSharpFunc`2[TError,TResult], Microsoft.FSharp.Core.FSharpResult`2[T,TError])
-Microsoft.FSharp.Core.ResultModule: Microsoft.FSharp.Core.FSharpResult`2[TResult,TError] Bind[T,TResult,TError](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpResult`2[TResult,TError]], Microsoft.FSharp.Core.FSharpResult`2[T,TError])
-Microsoft.FSharp.Core.ResultModule: Microsoft.FSharp.Core.FSharpResult`2[TResult,TError] Map[T,TResult,TError](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Core.FSharpResult`2[T,TError])
-Microsoft.FSharp.Core.SealedAttribute: Boolean Value
-Microsoft.FSharp.Core.SealedAttribute: Boolean get_Value()
-Microsoft.FSharp.Core.SealedAttribute: Void .ctor()
-Microsoft.FSharp.Core.SealedAttribute: Void .ctor(Boolean)
-Microsoft.FSharp.Core.SourceConstructFlags: Int32 value__
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags Closure
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags Exception
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags Field
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags KindMask
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags Module
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags NonPublicRepresentation
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags None
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags ObjectType
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags RecordType
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags SumType
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags UnionCase
-Microsoft.FSharp.Core.SourceConstructFlags: Microsoft.FSharp.Core.SourceConstructFlags Value
-Microsoft.FSharp.Core.StringModule: Boolean Exists(Microsoft.FSharp.Core.FSharpFunc`2[System.Char,System.Boolean], System.String)
-Microsoft.FSharp.Core.StringModule: Boolean ForAll(Microsoft.FSharp.Core.FSharpFunc`2[System.Char,System.Boolean], System.String)
-Microsoft.FSharp.Core.StringModule: Int32 Length(System.String)
-Microsoft.FSharp.Core.StringModule: System.String Collect(Microsoft.FSharp.Core.FSharpFunc`2[System.Char,System.String], System.String)
-Microsoft.FSharp.Core.StringModule: System.String Concat(System.String, System.Collections.Generic.IEnumerable`1[System.String])
-Microsoft.FSharp.Core.StringModule: System.String Filter(Microsoft.FSharp.Core.FSharpFunc`2[System.Char,System.Boolean], System.String)
-Microsoft.FSharp.Core.StringModule: System.String Initialize(Int32, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String])
-Microsoft.FSharp.Core.StringModule: System.String Map(Microsoft.FSharp.Core.FSharpFunc`2[System.Char,System.Char], System.String)
-Microsoft.FSharp.Core.StringModule: System.String MapIndexed(Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Char,System.Char]], System.String)
-Microsoft.FSharp.Core.StringModule: System.String Replicate(Int32, System.String)
-Microsoft.FSharp.Core.StringModule: Void Iterate(Microsoft.FSharp.Core.FSharpFunc`2[System.Char,Microsoft.FSharp.Core.Unit], System.String)
-Microsoft.FSharp.Core.StringModule: Void IterateIndexed(Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Char,Microsoft.FSharp.Core.Unit]], System.String)
-Microsoft.FSharp.Core.StructAttribute: Void .ctor()
-Microsoft.FSharp.Core.StructuralComparisonAttribute: Void .ctor()
-Microsoft.FSharp.Core.StructuralEqualityAttribute: Void .ctor()
-Microsoft.FSharp.Core.StructuredFormatDisplayAttribute: System.String Value
-Microsoft.FSharp.Core.StructuredFormatDisplayAttribute: System.String get_Value()
-Microsoft.FSharp.Core.StructuredFormatDisplayAttribute: Void .ctor(System.String)
-Microsoft.FSharp.Core.Unit: Boolean Equals(System.Object)
-Microsoft.FSharp.Core.Unit: Int32 GetHashCode()
-Microsoft.FSharp.Core.UnverifiableAttribute: Void .ctor()
-Microsoft.FSharp.Core.ValueOption: Boolean Contains[T](T, Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Boolean Exists[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Boolean ForAll[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Boolean IsNone[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Boolean IsSome[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Int32 Count[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Collections.FSharpList`1[T] ToList[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[TResult] Bind[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpValueOption`1[TResult]], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[TResult] Map2[T1,T2,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,TResult]], Microsoft.FSharp.Core.FSharpValueOption`1[T1], Microsoft.FSharp.Core.FSharpValueOption`1[T2])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[TResult] Map3[T1,T2,T3,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,Microsoft.FSharp.Core.FSharpFunc`2[T3,TResult]]], Microsoft.FSharp.Core.FSharpValueOption`1[T1], Microsoft.FSharp.Core.FSharpValueOption`1[T2], Microsoft.FSharp.Core.FSharpValueOption`1[T3])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[TResult] Map[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[T] Filter[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[T] Flatten[T](Microsoft.FSharp.Core.FSharpValueOption`1[Microsoft.FSharp.Core.FSharpValueOption`1[T]])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[T] OfNullable[T](System.Nullable`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[T] OfObj[T](T)
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[T] OrElseWith[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.FSharpValueOption`1[T]], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Microsoft.FSharp.Core.FSharpValueOption`1[T] OrElse[T](Microsoft.FSharp.Core.FSharpValueOption`1[T], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: System.Nullable`1[T] ToNullable[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: T DefaultValue[T](T, Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: T DefaultWith[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: T GetValue[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: T ToObj[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: TState FoldBack[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TState,TState]], Microsoft.FSharp.Core.FSharpValueOption`1[T], TState)
-Microsoft.FSharp.Core.ValueOption: TState Fold[T,TState](Microsoft.FSharp.Core.FSharpFunc`2[TState,Microsoft.FSharp.Core.FSharpFunc`2[T,TState]], TState, Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: T[] ToArray[T](Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.ValueOption: Void Iterate[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpValueOption`1[T])
-Microsoft.FSharp.Core.VolatileFieldAttribute: Void .ctor()
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Byte] ToByte[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Byte] ToUInt8[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Char] ToChar[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Decimal] ToDecimal[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Double] ToDouble[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Double] ToFloat[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int16] ToInt16[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int32] ToInt32[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int32] ToInt[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int64] ToInt64[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.IntPtr] ToIntPtr[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.SByte] ToInt8[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.SByte] ToSByte[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Single] ToFloat32[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Single] ToSingle[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt16] ToUInt16[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt32] ToUInt32[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt32] ToUInt[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt64] ToUInt64[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UIntPtr] ToUIntPtr[T](System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[TResult] ToEnum[TResult](System.Nullable`1[System.Int32])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_EqualsQmark[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_GreaterEqualsQmark[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_GreaterQmark[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_LessEqualsQmark[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_LessGreaterQmark[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_LessQmark[T](T, System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkEqualsQmark[T](System.Nullable`1[T], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkEquals[T](System.Nullable`1[T], T)
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkGreaterEqualsQmark[T](System.Nullable`1[T], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkGreaterEquals[T](System.Nullable`1[T], T)
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkGreaterQmark[T](System.Nullable`1[T], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkGreater[T](System.Nullable`1[T], T)
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkLessEqualsQmark[T](System.Nullable`1[T], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkLessEquals[T](System.Nullable`1[T], T)
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkLessGreaterQmark[T](System.Nullable`1[T], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkLessGreater[T](System.Nullable`1[T], T)
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkLessQmark[T](System.Nullable`1[T], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: Boolean op_QmarkLess[T](System.Nullable`1[T], T)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_DivideQmark[T1,T2,T3](T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_MinusQmark[T1,T2,T3](T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_MultiplyQmark[T1,T2,T3](T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_PercentQmark[T1,T2,T3](T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_PlusQmark[T1,T2,T3](T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkDivideQmark[T1,T2,T3](System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkDivide[T1,T2,T3](System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMinusQmark[T1,T2,T3](System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMinus[T1,T2,T3](System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMultiplyQmark[T1,T2,T3](System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMultiply[T1,T2,T3](System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPercentQmark[T1,T2,T3](System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPercent[T1,T2,T3](System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPlusQmark[T1,T2,T3](System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPlus[T1,T2,T3](System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.QueryBuilder: Boolean All[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean])
-Microsoft.FSharp.Linq.QueryBuilder: Boolean Contains[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], T)
-Microsoft.FSharp.Linq.QueryBuilder: Boolean Exists[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean])
-Microsoft.FSharp.Linq.QueryBuilder: Int32 Count[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[System.Linq.IGrouping`2[TKey,TValue],Q] GroupValBy[T,TKey,TValue,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue], Microsoft.FSharp.Core.FSharpFunc`2[T,TKey])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[System.Linq.IGrouping`2[TKey,T],Q] GroupBy[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TKey])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Distinct[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] SkipWhile[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Skip[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Int32)
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] SortByDescending[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TKey])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] SortByNullableDescending[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TKey]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] SortByNullable[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TKey]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] SortBy[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TKey])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Source[T,Q](System.Linq.IQueryable`1[T])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] TakeWhile[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Take[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Int32)
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] ThenByDescending[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TKey])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] ThenByNullableDescending[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TKey]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] ThenByNullable[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TKey]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] ThenBy[T,Q,TKey](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TKey])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Where[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] YieldFrom[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Yield[T,Q](T)
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,Q] Zero[T,Q]()
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[T,System.Collections.IEnumerable] Source[T](System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[TResult,Q] For[T,Q,TResult,Q2](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Linq.QuerySource`2[TResult,Q2]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[TResult,Q] GroupJoin[TOuter,Q,TInner,TKey,TResult](Microsoft.FSharp.Linq.QuerySource`2[TOuter,Q], Microsoft.FSharp.Linq.QuerySource`2[TInner,Q], Microsoft.FSharp.Core.FSharpFunc`2[TOuter,TKey], Microsoft.FSharp.Core.FSharpFunc`2[TInner,TKey], Microsoft.FSharp.Core.FSharpFunc`2[TOuter,Microsoft.FSharp.Core.FSharpFunc`2[System.Collections.Generic.IEnumerable`1[TInner],TResult]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[TResult,Q] Join[TOuter,Q,TInner,TKey,TResult](Microsoft.FSharp.Linq.QuerySource`2[TOuter,Q], Microsoft.FSharp.Linq.QuerySource`2[TInner,Q], Microsoft.FSharp.Core.FSharpFunc`2[TOuter,TKey], Microsoft.FSharp.Core.FSharpFunc`2[TInner,TKey], Microsoft.FSharp.Core.FSharpFunc`2[TOuter,Microsoft.FSharp.Core.FSharpFunc`2[TInner,TResult]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[TResult,Q] LeftOuterJoin[TOuter,Q,TInner,TKey,TResult](Microsoft.FSharp.Linq.QuerySource`2[TOuter,Q], Microsoft.FSharp.Linq.QuerySource`2[TInner,Q], Microsoft.FSharp.Core.FSharpFunc`2[TOuter,TKey], Microsoft.FSharp.Core.FSharpFunc`2[TInner,TKey], Microsoft.FSharp.Core.FSharpFunc`2[TOuter,Microsoft.FSharp.Core.FSharpFunc`2[System.Collections.Generic.IEnumerable`1[TInner],TResult]])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Linq.QuerySource`2[TResult,Q] Select[T,Q,TResult](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult])
-Microsoft.FSharp.Linq.QueryBuilder: Microsoft.FSharp.Quotations.FSharpExpr`1[T] Quote[T](Microsoft.FSharp.Quotations.FSharpExpr`1[T])
-Microsoft.FSharp.Linq.QueryBuilder: System.Linq.IQueryable`1[T] Run[T](Microsoft.FSharp.Quotations.FSharpExpr`1[Microsoft.FSharp.Linq.QuerySource`2[T,System.Linq.IQueryable]])
-Microsoft.FSharp.Linq.QueryBuilder: System.Nullable`1[TValue] AverageByNullable[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TValue]])
-Microsoft.FSharp.Linq.QueryBuilder: System.Nullable`1[TValue] MaxByNullable[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TValue]])
-Microsoft.FSharp.Linq.QueryBuilder: System.Nullable`1[TValue] MinByNullable[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TValue]])
-Microsoft.FSharp.Linq.QueryBuilder: System.Nullable`1[TValue] SumByNullable[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TValue]])
-Microsoft.FSharp.Linq.QueryBuilder: T ExactlyOneOrDefault[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: T ExactlyOne[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: T Find[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean])
-Microsoft.FSharp.Linq.QueryBuilder: T HeadOrDefault[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: T Head[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: T LastOrDefault[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: T Last[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q])
-Microsoft.FSharp.Linq.QueryBuilder: T Nth[T,Q](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Int32)
-Microsoft.FSharp.Linq.QueryBuilder: TValue AverageBy[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue])
-Microsoft.FSharp.Linq.QueryBuilder: TValue MaxBy[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue])
-Microsoft.FSharp.Linq.QueryBuilder: TValue MinBy[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue])
-Microsoft.FSharp.Linq.QueryBuilder: TValue SumBy[T,Q,TValue](Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue])
-Microsoft.FSharp.Linq.QueryBuilder: Void .ctor()
-Microsoft.FSharp.Linq.QueryRunExtensions.HighPriority: System.Collections.Generic.IEnumerable`1[T] RunQueryAsEnumerable[T](Microsoft.FSharp.Linq.QueryBuilder, Microsoft.FSharp.Quotations.FSharpExpr`1[Microsoft.FSharp.Linq.QuerySource`2[T,System.Collections.IEnumerable]])
-Microsoft.FSharp.Linq.QueryRunExtensions.LowPriority: T RunQueryAsValue[T](Microsoft.FSharp.Linq.QueryBuilder, Microsoft.FSharp.Quotations.FSharpExpr`1[T])
-Microsoft.FSharp.Linq.QuerySource`2[T,Q]: System.Collections.Generic.IEnumerable`1[T] Source
-Microsoft.FSharp.Linq.QuerySource`2[T,Q]: System.Collections.Generic.IEnumerable`1[T] get_Source()
-Microsoft.FSharp.Linq.QuerySource`2[T,Q]: Void .ctor(System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`1[T1]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`1[T1]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`1[T1]: Void .ctor(T1)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`2[T1,T2]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`2[T1,T2]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`2[T1,T2]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`2[T1,T2]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`2[T1,T2]: Void .ctor(T1, T2)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: T3 Item3
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: T3 get_Item3()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`3[T1,T2,T3]: Void .ctor(T1, T2, T3)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T3 Item3
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T3 get_Item3()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T4 Item4
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: T4 get_Item4()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`4[T1,T2,T3,T4]: Void .ctor(T1, T2, T3, T4)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T3 Item3
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T3 get_Item3()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T4 Item4
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T4 get_Item4()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T5 Item5
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: T5 get_Item5()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`5[T1,T2,T3,T4,T5]: Void .ctor(T1, T2, T3, T4, T5)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T3 Item3
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T3 get_Item3()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T4 Item4
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T4 get_Item4()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T5 Item5
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T5 get_Item5()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T6 Item6
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: T6 get_Item6()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`6[T1,T2,T3,T4,T5,T6]: Void .ctor(T1, T2, T3, T4, T5, T6)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T3 Item3
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T3 get_Item3()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T4 Item4
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T4 get_Item4()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T5 Item5
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T5 get_Item5()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T6 Item6
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T6 get_Item6()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T7 Item7
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: T7 get_Item7()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`7[T1,T2,T3,T4,T5,T6,T7]: Void .ctor(T1, T2, T3, T4, T5, T6, T7)
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T1 Item1
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T1 get_Item1()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T2 Item2
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T2 get_Item2()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T3 Item3
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T3 get_Item3()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T4 Item4
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T4 get_Item4()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T5 Item5
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T5 get_Item5()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T6 Item6
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T6 get_Item6()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T7 Item7
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T7 get_Item7()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T8 Item8
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: T8 get_Item8()
-Microsoft.FSharp.Linq.RuntimeHelpers.AnonymousObject`8[T1,T2,T3,T4,T5,T6,T7,T8]: Void .ctor(T1, T2, T3, T4, T5, T6, T7, T8)
-Microsoft.FSharp.Linq.RuntimeHelpers.Grouping`2[K,T]: Void .ctor(K, System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: Microsoft.FSharp.Quotations.FSharpExpr SubstHelperRaw(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpVar[], System.Object[])
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: Microsoft.FSharp.Quotations.FSharpExpr`1[T] SubstHelper[T](Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpVar[], System.Object[])
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: System.Linq.Expressions.Expression QuotationToExpression(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: System.Linq.Expressions.Expression`1[T] ImplicitExpressionConversionHelper[T](T)
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: System.Linq.Expressions.Expression`1[T] QuotationToLambdaExpression[T](Microsoft.FSharp.Quotations.FSharpExpr`1[T])
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: System.Object EvaluateQuotation(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: T MemberInitializationHelper[T](T)
-Microsoft.FSharp.Linq.RuntimeHelpers.LeafExpressionConverter: T NewAnonymousObjectHelper[T](T)
-Microsoft.FSharp.NativeInterop.NativePtrModule: IntPtr AddPointerInlined[T](IntPtr, Int32)
-Microsoft.FSharp.NativeInterop.NativePtrModule: IntPtr OfNativeIntInlined[T](IntPtr)
-Microsoft.FSharp.NativeInterop.NativePtrModule: IntPtr OfVoidPtrInlined[T](Void*)
-Microsoft.FSharp.NativeInterop.NativePtrModule: IntPtr StackAllocate[T](Int32)
-Microsoft.FSharp.NativeInterop.NativePtrModule: IntPtr ToNativeIntInlined[T](IntPtr)
-Microsoft.FSharp.NativeInterop.NativePtrModule: T GetPointerInlined[T](IntPtr, Int32)
-Microsoft.FSharp.NativeInterop.NativePtrModule: T ReadPointerInlined[T](IntPtr)
-Microsoft.FSharp.NativeInterop.NativePtrModule: T& ToByRefInlined[T](IntPtr)
-Microsoft.FSharp.NativeInterop.NativePtrModule: Void SetPointerInlined[T](IntPtr, Int32, T)
-Microsoft.FSharp.NativeInterop.NativePtrModule: Void WritePointerInlined[T](IntPtr, T)
-Microsoft.FSharp.NativeInterop.NativePtrModule: Void* ToVoidPtrInlined[T](IntPtr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],Microsoft.FSharp.Collections.FSharpList`1[System.Type],Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]]] SpecificCallPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] UnitPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] MethodWithReflectedDefinitionPattern(System.Reflection.MethodBase)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] PropertyGetterWithReflectedDefinitionPattern(System.Reflection.PropertyInfo)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] PropertySetterWithReflectedDefinitionPattern(System.Reflection.PropertyInfo)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Boolean] BoolPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Byte] BytePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Char] CharPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Decimal] DecimalPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Double] DoublePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int16] Int16Pattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] Int32Pattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Int64] Int64Pattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.SByte] SBytePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Single] SinglePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.String] StringPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpVar]],Microsoft.FSharp.Quotations.FSharpExpr]] LambdasPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]]] ApplicationsPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] AndAlsoPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] OrElsePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.UInt16] UInt16Pattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.UInt32] UInt32Pattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.DerivedPatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.UInt64] UInt64Pattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.ExprShapeModule: Microsoft.FSharp.Core.FSharpChoice`3[Microsoft.FSharp.Quotations.FSharpVar,System.Tuple`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr],System.Tuple`2[System.Object,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] ShapePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.ExprShapeModule: Microsoft.FSharp.Quotations.FSharpExpr RebuildShapeCombination(System.Object, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Boolean Equals(System.Object)
-Microsoft.FSharp.Quotations.FSharpExpr: Int32 GetHashCode()
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr] CustomAttributes
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr] get_CustomAttributes()
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] TryGetReflectedDefinition(System.Reflection.MethodBase)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr AddressOf(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr AddressSet(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Application(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Applications(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Call(Microsoft.FSharp.Quotations.FSharpExpr, System.Reflection.MethodInfo, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Call(System.Reflection.MethodInfo, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Coerce(Microsoft.FSharp.Quotations.FSharpExpr, System.Type)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr DefaultValue(System.Type)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Deserialize(System.Type, Microsoft.FSharp.Collections.FSharpList`1[System.Type], Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr], Byte[])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Deserialize40(System.Type, System.Type[], System.Type[], Microsoft.FSharp.Quotations.FSharpExpr[], Byte[])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr FieldGet(Microsoft.FSharp.Quotations.FSharpExpr, System.Reflection.FieldInfo)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr FieldGet(System.Reflection.FieldInfo)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr FieldSet(Microsoft.FSharp.Quotations.FSharpExpr, System.Reflection.FieldInfo, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr FieldSet(System.Reflection.FieldInfo, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr ForIntegerRangeLoop(Microsoft.FSharp.Quotations.FSharpVar, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr IfThenElse(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Lambda(Microsoft.FSharp.Quotations.FSharpVar, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Let(Microsoft.FSharp.Quotations.FSharpVar, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr LetRecursive(Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr]], Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewArray(System.Type, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewDelegate(System.Type, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpVar], Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewObject(System.Reflection.ConstructorInfo, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewRecord(System.Type, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewStructTuple(System.Reflection.Assembly, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewTuple(Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr NewUnionCase(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr PropertyGet(Microsoft.FSharp.Quotations.FSharpExpr, System.Reflection.PropertyInfo, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr PropertyGet(System.Reflection.PropertyInfo, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr PropertySet(Microsoft.FSharp.Quotations.FSharpExpr, System.Reflection.PropertyInfo, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr PropertySet(System.Reflection.PropertyInfo, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Quote(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr QuoteRaw(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr QuoteTyped(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Sequential(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Substitute(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr TryFinally(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr TryWith(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpVar, Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpVar, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr TupleGet(Microsoft.FSharp.Quotations.FSharpExpr, Int32)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr TypeTest(Microsoft.FSharp.Quotations.FSharpExpr, System.Type)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr UnionCaseTest(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Reflection.UnionCaseInfo)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Value(System.Object, System.Type)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr ValueWithName(System.Object, System.Type, System.String)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr ValueWithName[T](T, System.String)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Value[T](T)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr Var(Microsoft.FSharp.Quotations.FSharpVar)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr VarSet(Microsoft.FSharp.Quotations.FSharpVar, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr WhileLoop(Microsoft.FSharp.Quotations.FSharpExpr, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr WithValue(System.Object, System.Type, Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr`1[T] Cast[T](Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr`1[T] GlobalVar[T](System.String)
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr`1[T] WithValue[T](T, Microsoft.FSharp.Quotations.FSharpExpr`1[T])
-Microsoft.FSharp.Quotations.FSharpExpr: System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Quotations.FSharpVar] GetFreeVars()
-Microsoft.FSharp.Quotations.FSharpExpr: System.String ToString()
-Microsoft.FSharp.Quotations.FSharpExpr: System.String ToString(Boolean)
-Microsoft.FSharp.Quotations.FSharpExpr: System.Type Type
-Microsoft.FSharp.Quotations.FSharpExpr: System.Type get_Type()
-Microsoft.FSharp.Quotations.FSharpExpr: Void RegisterReflectedDefinitions(System.Reflection.Assembly, System.String, Byte[])
-Microsoft.FSharp.Quotations.FSharpExpr: Void RegisterReflectedDefinitions(System.Reflection.Assembly, System.String, Byte[], System.Type[])
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Boolean Equals(System.Object)
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Int32 GetHashCode()
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr] CustomAttributes
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr] get_CustomAttributes()
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Microsoft.FSharp.Quotations.FSharpExpr Raw
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Microsoft.FSharp.Quotations.FSharpExpr Substitute(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr]])
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: Microsoft.FSharp.Quotations.FSharpExpr get_Raw()
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: System.Collections.Generic.IEnumerable`1[Microsoft.FSharp.Quotations.FSharpVar] GetFreeVars()
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: System.String ToString()
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: System.String ToString(Boolean)
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: System.Type Type
-Microsoft.FSharp.Quotations.FSharpExpr`1[T]: System.Type get_Type()
-Microsoft.FSharp.Quotations.FSharpVar: Boolean Equals(System.Object)
-Microsoft.FSharp.Quotations.FSharpVar: Boolean IsMutable
-Microsoft.FSharp.Quotations.FSharpVar: Boolean get_IsMutable()
-Microsoft.FSharp.Quotations.FSharpVar: Int32 GetHashCode()
-Microsoft.FSharp.Quotations.FSharpVar: Microsoft.FSharp.Quotations.FSharpVar Global(System.String, System.Type)
-Microsoft.FSharp.Quotations.FSharpVar: System.String Name
-Microsoft.FSharp.Quotations.FSharpVar: System.String ToString()
-Microsoft.FSharp.Quotations.FSharpVar: System.String get_Name()
-Microsoft.FSharp.Quotations.FSharpVar: System.Type Type
-Microsoft.FSharp.Quotations.FSharpVar: System.Type get_Type()
-Microsoft.FSharp.Quotations.FSharpVar: Void .ctor(System.String, System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]] NewStructTuplePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]] NewTuplePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] AddressOfPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] QuotePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] QuoteRawPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr] QuoteTypedPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpVar] VarPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr]],Microsoft.FSharp.Quotations.FSharpExpr]] LetRecursivePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],System.Reflection.FieldInfo]] FieldGetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] AddressSetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] ApplicationPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] SequentialPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] TryFinallyPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] WhileLoopPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Reflection.UnionCaseInfo]] UnionCaseTestPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,System.Int32]] TupleGetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,System.Type]] CoercePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpExpr,System.Type]] TypeTestPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr]] LambdaPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr]] VarSetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Reflection.UnionCaseInfo,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] NewUnionCasePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Object,System.Type]] ValuePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Reflection.ConstructorInfo,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] NewObjectPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Type,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] NewArrayPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Type,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] NewRecordPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],System.Reflection.FieldInfo,Microsoft.FSharp.Quotations.FSharpExpr]] FieldSetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],System.Reflection.MethodInfo,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] CallPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],System.Reflection.PropertyInfo,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] PropertyGetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] IfThenElsePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] LetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[System.Object,System.Type,Microsoft.FSharp.Quotations.FSharpExpr]] WithValuePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[System.Object,System.Type,System.String]] ValueWithNamePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[System.Type,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpVar],Microsoft.FSharp.Quotations.FSharpExpr]] NewDelegatePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],System.Reflection.PropertyInfo,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr],Microsoft.FSharp.Quotations.FSharpExpr]] PropertySetPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpExpr]] ForIntegerRangeLoopPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr,Microsoft.FSharp.Quotations.FSharpVar,Microsoft.FSharp.Quotations.FSharpExpr]] TryWithPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Type] DefaultValuePattern(Microsoft.FSharp.Quotations.FSharpExpr)
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Boolean FSharpType.IsExceptionRepresentation.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Boolean FSharpType.IsRecord.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Boolean FSharpType.IsUnion.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Int32] FSharpValue.PreComputeUnionTagReader.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object[]] FSharpValue.PreComputeRecordReader.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object[]] FSharpValue.PreComputeUnionReader.Static(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Microsoft.FSharp.Core.FSharpFunc`2[System.Object[],System.Object] FSharpValue.PreComputeRecordConstructor.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Microsoft.FSharp.Core.FSharpFunc`2[System.Object[],System.Object] FSharpValue.PreComputeUnionConstructor.Static(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: Microsoft.FSharp.Reflection.UnionCaseInfo[] FSharpType.GetUnionCases.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Object FSharpValue.MakeRecord.Static(System.Type, System.Object[], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Object FSharpValue.MakeUnion.Static(Microsoft.FSharp.Reflection.UnionCaseInfo, System.Object[], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Object[] FSharpValue.GetExceptionFields.Static(System.Object, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Object[] FSharpValue.GetRecordFields.Static(System.Object, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Reflection.ConstructorInfo FSharpValue.PreComputeRecordConstructorInfo.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Reflection.MemberInfo FSharpValue.PreComputeUnionTagMemberInfo.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Reflection.MethodInfo FSharpValue.PreComputeUnionConstructorInfo.Static(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Reflection.PropertyInfo[] FSharpType.GetExceptionFields.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Reflection.PropertyInfo[] FSharpType.GetRecordFields.Static(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpReflectionExtensions: System.Tuple`2[Microsoft.FSharp.Reflection.UnionCaseInfo,System.Object[]] FSharpValue.GetUnionFields.Static(System.Object, System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-Microsoft.FSharp.Reflection.FSharpType: Boolean IsExceptionRepresentation(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpType: Boolean IsFunction(System.Type)
-Microsoft.FSharp.Reflection.FSharpType: Boolean IsModule(System.Type)
-Microsoft.FSharp.Reflection.FSharpType: Boolean IsRecord(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpType: Boolean IsTuple(System.Type)
-Microsoft.FSharp.Reflection.FSharpType: Boolean IsUnion(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpType: Microsoft.FSharp.Reflection.UnionCaseInfo[] GetUnionCases(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpType: System.Reflection.PropertyInfo[] GetExceptionFields(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpType: System.Reflection.PropertyInfo[] GetRecordFields(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpType: System.Tuple`2[System.Type,System.Type] GetFunctionElements(System.Type)
-Microsoft.FSharp.Reflection.FSharpType: System.Type MakeFunctionType(System.Type, System.Type)
-Microsoft.FSharp.Reflection.FSharpType: System.Type MakeStructTupleType(System.Reflection.Assembly, System.Type[])
-Microsoft.FSharp.Reflection.FSharpType: System.Type MakeTupleType(System.Reflection.Assembly, System.Type[])
-Microsoft.FSharp.Reflection.FSharpType: System.Type MakeTupleType(System.Type[])
-Microsoft.FSharp.Reflection.FSharpType: System.Type[] GetTupleElements(System.Type)
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Int32] PreComputeUnionTagReader(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object[]] PreComputeRecordReader(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object[]] PreComputeTupleReader(System.Type)
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object[]] PreComputeUnionReader(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object] PreComputeRecordFieldReader(System.Reflection.PropertyInfo)
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object[],System.Object] PreComputeRecordConstructor(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object[],System.Object] PreComputeTupleConstructor(System.Type)
-Microsoft.FSharp.Reflection.FSharpValue: Microsoft.FSharp.Core.FSharpFunc`2[System.Object[],System.Object] PreComputeUnionConstructor(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Object GetRecordField(System.Object, System.Reflection.PropertyInfo)
-Microsoft.FSharp.Reflection.FSharpValue: System.Object GetTupleField(System.Object, Int32)
-Microsoft.FSharp.Reflection.FSharpValue: System.Object MakeFunction(System.Type, Microsoft.FSharp.Core.FSharpFunc`2[System.Object,System.Object])
-Microsoft.FSharp.Reflection.FSharpValue: System.Object MakeRecord(System.Type, System.Object[], Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Object MakeTuple(System.Object[], System.Type)
-Microsoft.FSharp.Reflection.FSharpValue: System.Object MakeUnion(Microsoft.FSharp.Reflection.UnionCaseInfo, System.Object[], Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Object[] GetExceptionFields(System.Object, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Object[] GetRecordFields(System.Object, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Object[] GetTupleFields(System.Object)
-Microsoft.FSharp.Reflection.FSharpValue: System.Reflection.ConstructorInfo PreComputeRecordConstructorInfo(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Reflection.MemberInfo PreComputeUnionTagMemberInfo(System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Reflection.MethodInfo PreComputeUnionConstructorInfo(Microsoft.FSharp.Reflection.UnionCaseInfo, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Tuple`2[Microsoft.FSharp.Reflection.UnionCaseInfo,System.Object[]] GetUnionFields(System.Object, System.Type, Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.BindingFlags])
-Microsoft.FSharp.Reflection.FSharpValue: System.Tuple`2[System.Reflection.ConstructorInfo,Microsoft.FSharp.Core.FSharpOption`1[System.Type]] PreComputeTupleConstructorInfo(System.Type)
-Microsoft.FSharp.Reflection.FSharpValue: System.Tuple`2[System.Reflection.PropertyInfo,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Type,System.Int32]]] PreComputeTuplePropertyInfo(System.Type, Int32)
-Microsoft.FSharp.Reflection.UnionCaseInfo: Boolean Equals(System.Object)
-Microsoft.FSharp.Reflection.UnionCaseInfo: Int32 GetHashCode()
-Microsoft.FSharp.Reflection.UnionCaseInfo: Int32 Tag
-Microsoft.FSharp.Reflection.UnionCaseInfo: Int32 get_Tag()
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.Collections.Generic.IList`1[System.Reflection.CustomAttributeData] GetCustomAttributesData()
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.Object[] GetCustomAttributes()
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.Object[] GetCustomAttributes(System.Type)
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.Reflection.PropertyInfo[] GetFields()
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.String Name
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.String ToString()
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.String get_Name()
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.Type DeclaringType
-Microsoft.FSharp.Reflection.UnionCaseInfo: System.Type get_DeclaringType()
-Microsoft.FSharp.Collections.ArrayModule: T Average$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T[])
-Microsoft.FSharp.Collections.ArrayModule: T Sum$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult AverageBy$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[TResult,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ArrayModule: TResult SumBy$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[TResult,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T[])
-Microsoft.FSharp.Collections.ComparisonIdentity: System.Collections.Generic.IComparer`1[T] NonStructural$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]])
-Microsoft.FSharp.Collections.HashIdentity: System.Collections.Generic.IEqualityComparer`1[T] NonStructural$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]])
-Microsoft.FSharp.Collections.ListModule: T Average$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: T Sum$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: TResult AverageBy$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[TResult,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.ListModule: TResult SumBy$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[TResult,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], Microsoft.FSharp.Collections.FSharpList`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Average$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: T Sum$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: TResult AverageBy$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[TResult,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Collections.SeqModule: TResult SumBy$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TResult], Microsoft.FSharp.Core.FSharpFunc`2[TResult,Microsoft.FSharp.Core.FSharpFunc`2[TResult,TResult]], Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], System.Collections.Generic.IEnumerable`1[T])
-Microsoft.FSharp.Core.ExtraTopLevelOperators+Checked: Byte ToByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Byte], T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators+Checked: SByte ToSByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.SByte], T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Byte ToByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Byte], T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Double ToDouble$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Double], T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: SByte ToSByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.SByte], T)
-Microsoft.FSharp.Core.ExtraTopLevelOperators: Single ToSingle$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Single], T)
-Microsoft.FSharp.Core.LanguagePrimitives: T DivideByInt$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]], T, Int32)
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericOne$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T])
-Microsoft.FSharp.Core.LanguagePrimitives: T GenericZero$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T])
-Microsoft.FSharp.Core.LanguagePrimitives: TResult CheckedSubtractionDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult CheckedUnaryNegationDynamic[T,TResult](T)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult DivisionDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult ModulusDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult BitwiseAndDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult ExclusiveOrDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult BitwiseOrDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult EqualityDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult ExplicitDynamic[T,TResult](T)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult GreaterThanDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult GreaterThanOrEqualDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult InequalityDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult LeftShiftDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult LessThanDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult LessThanOrEqualDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult LogicalNotDynamic[T,TResult](T)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult RightShiftDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult SubtractionDynamic[T1,T2,TResult](T1, T2)
-Microsoft.FSharp.Core.LanguagePrimitives: TResult UnaryNegationDynamic[T,TResult](T)
-Microsoft.FSharp.Core.Operators+Checked: Byte ToByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Byte], T)
-Microsoft.FSharp.Core.Operators+Checked: Char ToChar$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Char], T)
-Microsoft.FSharp.Core.Operators+Checked: Int16 ToInt16$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int16], T)
-Microsoft.FSharp.Core.Operators+Checked: Int32 ToInt32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], T)
-Microsoft.FSharp.Core.Operators+Checked: Int32 ToInt$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], T)
-Microsoft.FSharp.Core.Operators+Checked: Int64 ToInt64$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int64], T)
-Microsoft.FSharp.Core.Operators+Checked: IntPtr ToIntPtr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.IntPtr], T)
-Microsoft.FSharp.Core.Operators+Checked: SByte ToSByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.SByte], T)
-Microsoft.FSharp.Core.Operators+Checked: T op_UnaryNegation$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators+Checked: T3 op_Addition$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators+Checked: T3 op_Multiply$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators+Checked: T3 op_Subtraction$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators+Checked: UInt16 ToUInt16$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt16], T)
-Microsoft.FSharp.Core.Operators+Checked: UInt32 ToUInt32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt32], T)
-Microsoft.FSharp.Core.Operators+Checked: UInt64 ToUInt64$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt64], T)
-Microsoft.FSharp.Core.Operators+Checked: UIntPtr ToUIntPtr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UIntPtr], T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_Equality$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_GreaterThanOrEqual$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,System.Boolean]], T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_GreaterThan$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,System.Boolean]], T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_Inequality$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_LessThanOrEqual$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,System.Boolean]], T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Boolean op_LessThan$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,System.Boolean]], T, TResult)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: Int32 Compare$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: T Max$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], T, T)
-Microsoft.FSharp.Core.Operators+NonStructuralComparison: T Min$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,System.Boolean]], T, T)
-Microsoft.FSharp.Core.Operators: Byte ToByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Byte], T)
-Microsoft.FSharp.Core.Operators: Char ToChar$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Char], T)
-Microsoft.FSharp.Core.Operators: Double ToDouble$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Double], T)
-Microsoft.FSharp.Core.Operators: Int16 ToInt16$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int16], T)
-Microsoft.FSharp.Core.Operators: Int32 Sign$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], T)
-Microsoft.FSharp.Core.Operators: Int32 ToInt32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], T)
-Microsoft.FSharp.Core.Operators: Int32 ToInt$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], T)
-Microsoft.FSharp.Core.Operators: Int64 ToInt64$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int64], T)
-Microsoft.FSharp.Core.Operators: IntPtr ToIntPtr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.IntPtr], T)
-Microsoft.FSharp.Core.Operators: SByte ToSByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.SByte], T)
-Microsoft.FSharp.Core.Operators: Single ToSingle$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Single], T)
-Microsoft.FSharp.Core.Operators: System.Collections.Generic.IEnumerable`1[T] op_RangeStep$W[T,TStep](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TStep], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TStep,T]], T, TStep, T)
-Microsoft.FSharp.Core.Operators: System.Collections.Generic.IEnumerable`1[T] op_Range$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, T)
-Microsoft.FSharp.Core.Operators: System.Decimal ToDecimal$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Decimal], T)
-Microsoft.FSharp.Core.Operators: T Abs$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Acos$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Asin$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Atan$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Ceiling$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Cos$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Cosh$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Exp$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Floor$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Log10$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Log$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T PowInteger$W[T](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,T], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, Int32)
-Microsoft.FSharp.Core.Operators: T Round$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Sin$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Sinh$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Tan$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Tanh$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T Truncate$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T op_BitwiseAnd$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, T)
-Microsoft.FSharp.Core.Operators: T op_BitwiseOr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, T)
-Microsoft.FSharp.Core.Operators: T op_ExclusiveOr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[T,T]], T, T)
-Microsoft.FSharp.Core.Operators: T op_Exponentiation$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[TResult,T]], T, TResult)
-Microsoft.FSharp.Core.Operators: T op_LeftShift$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]], T, Int32)
-Microsoft.FSharp.Core.Operators: T op_LogicalNot$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T op_RightShift$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,T]], T, Int32)
-Microsoft.FSharp.Core.Operators: T op_UnaryNegation$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T op_UnaryPlus$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,T], T)
-Microsoft.FSharp.Core.Operators: T2 Atan2$W[T1,T2](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T1,T2]], T1, T1)
-Microsoft.FSharp.Core.Operators: T3 op_Addition$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Division$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Modulus$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Multiply$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators: T3 op_Subtraction$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, T2)
-Microsoft.FSharp.Core.Operators: TResult Sqrt$W[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult], T)
-Microsoft.FSharp.Core.Operators: UInt32 ToUInt$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt32], T)
-Microsoft.FSharp.Core.Operators: UInt16 ToUInt16$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt16], T)
-Microsoft.FSharp.Core.Operators: UInt32 ToUInt32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt32], T)
-Microsoft.FSharp.Core.Operators: UInt64 ToUInt64$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt64], T)
-Microsoft.FSharp.Core.Operators: UIntPtr ToUIntPtr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UIntPtr], T)
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Byte] ToByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Byte], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Byte] ToUInt8$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Byte], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Char] ToChar$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Char], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Decimal] ToDecimal$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Decimal], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Double] ToDouble$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Double], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Double] ToFloat$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Double], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int16] ToInt16$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int16], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int32] ToInt32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int32] ToInt$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int32], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Int64] ToInt64$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Int64], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.IntPtr] ToIntPtr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.IntPtr], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.SByte] ToInt8$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.SByte], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.SByte] ToSByte$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.SByte], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Single] ToFloat32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Single], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.Single] ToSingle$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.Single], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt16] ToUInt16$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt16], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt32] ToUInt32$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt32], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt32] ToUInt$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt32], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UInt64] ToUInt64$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UInt64], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableModule: System.Nullable`1[System.UIntPtr] ToUIntPtr$W[T](Microsoft.FSharp.Core.FSharpFunc`2[T,System.UIntPtr], System.Nullable`1[T])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_DivideQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_MinusQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_MultiplyQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_PercentQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_PlusQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], T1, System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkDivideQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkDivide$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMinusQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMinus$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMultiplyQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkMultiply$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPercentQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPercent$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPlusQmark$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], System.Nullable`1[T2])
-Microsoft.FSharp.Linq.NullableOperators: System.Nullable`1[T3] op_QmarkPlus$W[T1,T2,T3](Microsoft.FSharp.Core.FSharpFunc`2[T1,Microsoft.FSharp.Core.FSharpFunc`2[T2,T3]], System.Nullable`1[T1], T2)
-Microsoft.FSharp.Linq.QueryBuilder: System.Nullable`1[TValue] AverageByNullable$W[T,Q,TValue](Microsoft.FSharp.Core.FSharpFunc`2[TValue,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,TValue]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TValue], Microsoft.FSharp.Core.FSharpFunc`2[TValue,Microsoft.FSharp.Core.FSharpFunc`2[TValue,TValue]], Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TValue]])
-Microsoft.FSharp.Linq.QueryBuilder: System.Nullable`1[TValue] SumByNullable$W[T,Q,TValue](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TValue], Microsoft.FSharp.Core.FSharpFunc`2[TValue,Microsoft.FSharp.Core.FSharpFunc`2[TValue,TValue]], Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,System.Nullable`1[TValue]])
-Microsoft.FSharp.Linq.QueryBuilder: TValue AverageBy$W[T,Q,TValue](Microsoft.FSharp.Core.FSharpFunc`2[TValue,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,TValue]], Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TValue], Microsoft.FSharp.Core.FSharpFunc`2[TValue,Microsoft.FSharp.Core.FSharpFunc`2[TValue,TValue]], Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue])
-Microsoft.FSharp.Linq.QueryBuilder: TValue SumBy$W[T,Q,TValue](Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,TValue], Microsoft.FSharp.Core.FSharpFunc`2[TValue,Microsoft.FSharp.Core.FSharpFunc`2[TValue,TValue]], Microsoft.FSharp.Linq.QuerySource`2[T,Q], Microsoft.FSharp.Core.FSharpFunc`2[T,TValue])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr CallWithWitnesses(Microsoft.FSharp.Quotations.FSharpExpr, System.Reflection.MethodInfo, System.Reflection.MethodInfo, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr], Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.FSharpExpr: Microsoft.FSharp.Quotations.FSharpExpr CallWithWitnesses(System.Reflection.MethodInfo, System.Reflection.MethodInfo, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr], Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr])
-Microsoft.FSharp.Quotations.PatternsModule: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Quotations.FSharpExpr],System.Reflection.MethodInfo,System.Reflection.MethodInfo,Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr],Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Quotations.FSharpExpr]]] CallWithWitnessesPattern(Microsoft.FSharp.Quotations.FSharpExpr)
-"
-#if DEBUG
-        let expected =
-            expected +
-            @"Microsoft.FSharp.Core.Operators: System.RuntimeMethodHandle MethodHandleOf[T,TResult](Microsoft.FSharp.Core.FSharpFunc`2[T,TResult])"
-#endif
-#if CROSS_PLATFORM_COMPILER
-        ()
-        // disabled because of slight order and GetMember discrepencies
-#else
-        SurfaceArea.verify expected "net40" (System.IO.Path.Combine(__SOURCE_DIRECTORY__,__SOURCE_FILE__))
-#endif

From f1eafbdebd76a6acd4dd75189b638d4aad62c95f Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 27 Oct 2020 15:35:53 +0000
Subject: [PATCH 037/112] reduce diff

---
 src/fsharp/InfoReader.fs                     |  2 +-
 src/fsharp/InnerLambdasToTopLevelFuncs.fs    | 10 +--
 src/fsharp/LanguageFeatures.fs               |  2 +-
 src/fsharp/LegacyHostedCompilerForTesting.fs |  2 +-
 src/fsharp/NameResolution.fs                 | 10 +--
 src/fsharp/Optimizer.fs                      | 12 ++-
 src/fsharp/PatternMatchCompilation.fs        |  3 +-
 src/fsharp/PostInferenceChecks.fs            |  2 +-
 src/fsharp/QuotationTranslator.fs            | 90 +++++++++-----------
 9 files changed, 61 insertions(+), 72 deletions(-)

diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index d4ed2b9f1e0..9df7d24c2b4 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -884,7 +884,7 @@ let GetSigOfFunctionForDelegate (infoReader: InfoReader) delty m ad =
     let delRetTy = invokeMethInfo.GetFSharpReturnTy(amap, m, minst)
     CheckMethInfoAttributes g m None invokeMethInfo |> CommitOperationResult
     let fty = mkIteratedFunTy g fsharpViewOfDelArgTys delRetTy
-    SigOfFunctionForDelegate(invokeMethInfo,compiledViewOfDelArgTys, delRetTy, fty)
+    SigOfFunctionForDelegate(invokeMethInfo, compiledViewOfDelArgTys, delRetTy, fty)
 
 /// Try and interpret a delegate type as a "standard" .NET delegate type associated with an event, with a "sender" parameter.
 let TryDestStandardDelegateType (infoReader: InfoReader) m ad delTy =
diff --git a/src/fsharp/InnerLambdasToTopLevelFuncs.fs b/src/fsharp/InnerLambdasToTopLevelFuncs.fs
index 9b6c2ede534..e713608feb2 100644
--- a/src/fsharp/InnerLambdasToTopLevelFuncs.fs
+++ b/src/fsharp/InnerLambdasToTopLevelFuncs.fs
@@ -996,7 +996,7 @@ module Pass4_RewriteAssembly =
             (* REVIEW: is this mutation really, really necessary? *)
             (* Why are we applying TLR if the thing already has an arity? *)
             let fOrig = setValHasNoArity fOrig
-            let fBind = 
+            let fBind =
                mkMultiLambdaBind penv.g fOrig letSeqPtOpt m tps vss
                    (mkApps penv.g
                             ((exprForVal m fHat, fHat.Type),
@@ -1013,15 +1013,15 @@ module Pass4_RewriteAssembly =
             let vssTake, vssDrop = List.splitAt wf vss
             // put the variables back on
             let b, rty = mkMultiLambdasCore penv.g b.Range vssDrop (b, rty)
-            // fHat, args 
+            // fHat, args
             let m = fHat.Range
             // Add the type variables to the front
             let fHat_tps  = envp.ep_etps @ tps
             // Add the 'aenv' and original taken variables to the front
             let fHat_args = List.map List.singleton envp.ep_aenvs @ vssTake
-            let fHat_body = mkLetsFromBindings m envp.ep_unpack b        
-            let fHat_body = mkLetsFromBindings m shortRecBinds fHat_body  // bind "f" if have short recursive calls (somewhere) 
-            // fHat binding, f rebinding 
+            let fHat_body = mkLetsFromBindings m envp.ep_unpack b
+            let fHat_body = mkLetsFromBindings m shortRecBinds  fHat_body  // bind "f" if have short recursive calls (somewhere)
+            // fHat binding, f rebinding
             let fHatBind   = mkMultiLambdaBind penv.g fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body,rty)
             fHatBind
         let rebinds = binds |> List.map fRebinding
diff --git a/src/fsharp/LanguageFeatures.fs b/src/fsharp/LanguageFeatures.fs
index 83415117680..abe5206326b 100644
--- a/src/fsharp/LanguageFeatures.fs
+++ b/src/fsharp/LanguageFeatures.fs
@@ -76,7 +76,7 @@ type LanguageVersion (specifiedVersionAsString) =
             LanguageFeature.NameOf, previewVersion
             LanguageFeature.StringInterpolation, previewVersion
             LanguageFeature.OverloadsForCustomOperations, previewVersion
-            LanguageFeature.NullnessChecking, previewVersion // TODO: currently always on because requires FSharp.Core build
+            LanguageFeature.NullnessChecking, previewVersion
         ]
 
     let specified =
diff --git a/src/fsharp/LegacyHostedCompilerForTesting.fs b/src/fsharp/LegacyHostedCompilerForTesting.fs
index c28fc91a3e1..04538d5e6fc 100644
--- a/src/fsharp/LegacyHostedCompilerForTesting.fs
+++ b/src/fsharp/LegacyHostedCompilerForTesting.fs
@@ -135,7 +135,7 @@ type internal FscCompiler(legacyReferenceResolver) =
         fun arg -> regex.IsMatch(arg)
 
     /// do compilation as if args was argv to fsc.exe
-    member this.Compile(args : string[]) =
+    member this.Compile(args : string array) =
         // args.[0] is later discarded, assuming it is just the path to fsc.
         // compensate for this in case caller didn't know
         let args =
diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs
index b4e9eb19b08..4d004ed378f 100644
--- a/src/fsharp/NameResolution.fs
+++ b/src/fsharp/NameResolution.fs
@@ -1237,10 +1237,10 @@ and private AddPartsOfTyconRefToNameEnv bulkAddMode ownDefinition (g: TcGlobals)
             // This may explore into an unreferenced assembly if the name
             // is a type abbreviation. If it does, assume the name does not
             // have a constructor.
-            let mayHaveConstruction = 
-                protectAssemblyExploration 
-                    false 
-                    (fun () -> 
+            let mayHaveConstruction =
+                protectAssemblyExploration
+                    false
+                    (fun () ->
                         let ty = generalizedTyconRef g tcref
                         isClassTy g ty || isStructTy g ty)
 
@@ -4516,7 +4516,7 @@ and ResolvePartialLongIdentToClassOrRecdFieldsImpl (ncenv: NameResolver) (nenv:
        let recdFields =
            nenv.eFieldLabels
            |> Seq.collect (fun (KeyValue(_, v)) -> v)
-           |> Seq.map (fun fref -> 
+           |> Seq.map (fun fref ->
                 let typeInsts = fref.TyconRef.TyparsNoRange |> List.map mkTyparTy
                 Item.RecdField(RecdFieldInfo(typeInsts, fref)))
            |> List.ofSeq
diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs
index 900a2fdb919..15a67fa32a7 100644
--- a/src/fsharp/Optimizer.fs
+++ b/src/fsharp/Optimizer.fs
@@ -1835,7 +1835,7 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                     match reqdResultInfo, exprIsEnumerableInfo with 
                     | Some _, Some _ | None, None -> resultExpr // the expression is a QuerySource, the result is a QuerySource, nothing to do
                     | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable cenv.g expr.Range resultElemTy (TType_app(cenv.g.tcref_System_Collections_IEnumerable, [], g.knownWithoutNull)) resultExpr
-                    | None, Some (resultElemTy, qTy)  ->  mkCallNewQuerySource cenv.g expr.Range resultElemTy qTy resultExpr 
+                    | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource cenv.g expr.Range resultElemTy qTy resultExpr 
                 Some resultExprAfterConvertToResultTy
             | None -> 
                 None
@@ -1872,11 +1872,10 @@ let IsILMethodRefSystemStringConcatArray (mref: ILMethodRef) =
     
 /// Optimize/analyze an expression
 let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
-    let g = cenv.g
 
     // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need
     // complete inference types.
-    let expr = NormalizeAndAdjustPossibleSubsumptionExprs g expr
+    let expr = NormalizeAndAdjustPossibleSubsumptionExprs cenv.g expr
 
     let expr = stripExpr expr
 
@@ -1929,8 +1928,8 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
         let ty = mkForallTyIfNeeded tps rty
         OptimizeLambdas None cenv env topValInfo expr ty
 
-    | Expr.TyChoose _  -> 
-        OptimizeExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr)
+    | Expr.TyChoose _ -> 
+        OptimizeExpr cenv env (TypeRelations.ChooseTyparSolutionsForFreeChoiceTypars cenv.g cenv.amap expr)
 
     | Expr.Match (spMatch, exprm, dtree, targets, m, ty) -> 
         OptimizeMatch cenv env (spMatch, exprm, dtree, targets, m, ty)
@@ -3198,7 +3197,6 @@ and OptimizeSwitchFallback cenv env (eR, einfo, cases, dflt, m) =
 
 and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
     try 
-        let g = cenv.g
         
         // The aim here is to stop method splitting for direct-self-tailcalls. We do more than that: if an expression
         // occurs in the body of recursively defined values RVS, then we refuse to split
@@ -3260,7 +3258,7 @@ and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
                     if mbrTyconRef.TryDeref.IsSome then
                         // Check if this is a subtype of MarshalByRefObject
                         assert (cenv.g.system_MarshalByRefObject_ty.IsSome)
-                        ExistsSameHeadTypeInHierarchy cenv.g cenv.amap vref.Range (generalizedTyconRef g tcref) cenv.g.system_MarshalByRefObject_ty.Value
+                        ExistsSameHeadTypeInHierarchy cenv.g cenv.amap vref.Range (generalizedTyconRef cenv.g tcref) cenv.g.system_MarshalByRefObject_ty.Value
                     else 
                         false
                 | ParentNone -> false) ||
diff --git a/src/fsharp/PatternMatchCompilation.fs b/src/fsharp/PatternMatchCompilation.fs
index ae9f50f3ab7..e4c00821c56 100644
--- a/src/fsharp/PatternMatchCompilation.fs
+++ b/src/fsharp/PatternMatchCompilation.fs
@@ -571,7 +571,8 @@ let (|ConstNeedsDefaultCase|_|) c =
 ///     switches, string switches and floating point switches are treated in the
 ///     same way as DecisionTreeTest.IsInst.
 let rec BuildSwitch inpExprOpt g expr edges dflt m =
-    match edges, dflt with 
+    if verbose then dprintf "--> BuildSwitch@%a, #edges = %A, dflt.IsSome = %A\n" outputRange m (List.length edges) (Option.isSome dflt)
+    match edges, dflt with
     | [], None      -> failwith "internal error: no edges and no default"
     | [], Some dflt -> dflt      (* NOTE: first time around, edges<>[] *)
 
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index e1f9ac7d2e4..b729e532ede 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -1137,7 +1137,7 @@ and CheckExpr (cenv: cenv) (env: env) origExpr (context: PermitByRefExpr) : Limi
             CheckCall cenv env m returnTy argsl contexts context
 
     | Expr.Lambda (_, _ctorThisValOpt, _baseValOpt, argvs, _, m, rty) -> 
-        let topValInfo = ValReprInfo ([],[argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)],ValReprInfo.unnamedRetVal) 
+        let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) 
         let ty = mkMultiLambdaTy cenv.g m argvs rty
         CheckLambdas false None cenv env false topValInfo false expr m ty PermitByRefExpr.Yes
 
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index 47ced009fe2..06977a96e1c 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -620,7 +620,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
             let propRetTypeR = ConvType cenv env m fspec.FormalType
             let callArgR = ConvExpr cenv env obj
             let exnTypeR = ConvType cenv env m (generalizedTyconRef g tcref)
-            QP.mkPropGet( (parentTyconR, fspec.Name,propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)])
+            QP.mkPropGet( (parentTyconR, fspec.Name, propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)])
 
         | TOp.Coerce, [tgtTy;srcTy], [x]  ->
             let xR = ConvExpr cenv env x
@@ -697,19 +697,16 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
         | TOp.UInt16s arr, [], [] ->
             ConvExpr cenv env (Expr.Op (TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m))
 
-        | TOp.UInt16s arr, [], [] -> 
-              ConvExpr cenv env (Expr.Op(TOp.Array, [g.uint16_ty], List.ofArray (Array.map (mkUInt16 g m) arr), m))
-              
         | TOp.UnionCaseProof _, _, [e] ->
             ConvExpr cenv env e  // Note: we erase the union case proof conversions when converting to quotations
 
         | TOp.UnionCaseTagGet _tycr, _tinst, [_cx] ->
             wfail(Error(FSComp.SR.crefQuotationsCantFetchUnionIndexes(), m))
 
-        | TOp.UnionCaseFieldSet (_c, _i), _tinst, [_cx; _x] ->
+        | TOp.UnionCaseFieldSet (_c, _i), _tinst, [_cx;_x] ->
             wfail(Error(FSComp.SR.crefQuotationsCantSetUnionFields(), m))
 
-        | TOp.ExnFieldSet(_tcref, _i), [], [_ex; _x] ->
+        | TOp.ExnFieldSet (_tcref, _i), [], [_ex;_x] ->
             wfail(Error(FSComp.SR.crefQuotationsCantSetExceptionFields(), m))
 
         | TOp.RefAddrGet _, _, _ ->
@@ -749,8 +746,8 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
                 | Some expr ->
                     ConvExpr cenv env expr             
 
-        | _ -> 
-            wfail(InternalError( "Unexpected expression shape",m))
+        | _ ->
+            wfail(InternalError( "Unexpected expression shape", m))
 
     | Expr.WitnessArg (traitInfo, m) ->
         ConvWitnessInfo cenv env m traitInfo
@@ -824,9 +821,10 @@ and ConvLValueExpr cenv env expr =
     EmitDebugInfoIfNecessary cenv env expr.Range (ConvLValueExprCore cenv env expr)
 
 // This function has to undo the work of mkExprAddrOfExpr 
-and ConvLValueExprCore cenv env expr = 
-    match expr with 
-    | Expr.Op(op, tyargs, args, m) -> 
+// This function has to undo the work of mkExprAddrOfExpr
+and ConvLValueExprCore cenv env expr =
+    match expr with
+    | Expr.Op (op, tyargs, args, m) ->
         match op, args, tyargs  with
         | TOp.LValueOp (LAddrOf _, vref), _, _ -> ConvValRef false cenv env m vref []
         | TOp.ValFieldGetAddr (rfref, _), _, _ -> ConvClassOrRecdFieldGet cenv env m rfref tyargs args
@@ -930,10 +928,10 @@ and ConvValRef holeOk cenv env m (vref: ValRef) tyargs =
 and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs =
     let g = cenv.g
     let v = vref.Deref
-    if env.isinstVals.ContainsVal v then 
+    if env.isinstVals.ContainsVal v then
         let (ty, e) = env.isinstVals.[v]
         ConvExpr cenv env (mkCallUnbox g m ty e)
-    elif env.substVals.ContainsVal v then 
+    elif env.substVals.ContainsVal v then
         let e = env.substVals.[v]
         ConvExpr cenv env e
     elif env.vs.ContainsVal v then
@@ -958,13 +956,12 @@ and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs =
             ConvModuleValueApp cenv env m vref tyargs witnessArgs [] 
 
 and ConvUnionCaseRef cenv (ucref: UnionCaseRef) m =
-    let g = cenv.g
     let ucgtypR = ConvTyconRef cenv ucref.TyconRef m
-    let nm = 
-        if g.unionCaseRefEq ucref g.cons_ucref then "Cons"
-        elif g.unionCaseRefEq ucref g.nil_ucref then "Empty"
-        else ucref.CaseName 
-    (ucgtypR, nm) 
+    let nm =
+        if cenv.g.unionCaseRefEq ucref cenv.g.cons_ucref then "Cons"
+        elif cenv.g.unionCaseRefEq ucref cenv.g.nil_ucref then "Empty"
+        else ucref.CaseName
+    (ucgtypR, nm)
 
 and ConvRecdFieldRef cenv (rfref: RecdFieldRef) m =
     let typR = ConvTyconRef cenv rfref.TyconRef m
@@ -1024,8 +1021,7 @@ and ConvTypes cenv env m tys =
     List.map (ConvType cenv env m) (FilterMeasureTyargs tys)
 
 and ConvConst cenv env m c ty =
-    let g = cenv.g
-    match TryEliminateDesugaredConstants g m c with 
+    match TryEliminateDesugaredConstants cenv.g m c with
     | Some e -> ConvExpr cenv env e
     | None ->
         let tyR = ConvType cenv env m ty
@@ -1044,21 +1040,20 @@ and ConvConst cenv env m c ty =
         | Const.String  s ->  QP.mkString (s, tyR)
         | Const.Char    c ->  QP.mkChar (c, tyR)
         | Const.Unit      ->  QP.mkUnit()
-        | Const.Zero      ->  
-            if isRefTy g ty then 
+        | Const.Zero      ->
+            if isRefTy cenv.g ty then
                 QP.mkNull tyR
             else
                 QP.mkDefaultValue tyR
         | _ ->
             wfail(Error (FSComp.SR.crefQuotationsCantContainThisConstant(), m))
 
-and ConvDecisionTree cenv env tgs typR x = 
-    let g = cenv.g
-    match x with 
-    | TDSwitch(e1, csl, dfltOpt, m) -> 
-        let acc = 
-            match dfltOpt with 
-            | Some d -> ConvDecisionTree cenv env tgs typR d 
+and ConvDecisionTree cenv env tgs typR x =
+    match x with
+    | TDSwitch(e1, csl, dfltOpt, m) ->
+        let acc =
+            match dfltOpt with
+            | Some d -> ConvDecisionTree cenv env tgs typR d
             | None -> wfail(Error(FSComp.SR.crefQuotationsCantContainThisPatternMatch(), m))
 
         let converted =
@@ -1080,10 +1075,10 @@ and ConvDecisionTree cenv env tgs typR x =
                       // Note, reverse the branches
                       QP.mkCond (e1R, acc, ConvDecisionTree cenv env tgs typR dtree)
 
-                  | DecisionTreeTest.Const c -> 
-                      let ty = tyOfExpr g e1
-                      let eq = mkCallEqualsOperator g m ty e1 (Expr.Const (c, m, ty))
-                      let eqR = ConvExpr cenv env eq 
+                  | DecisionTreeTest.Const c ->
+                      let ty = tyOfExpr cenv.g e1
+                      let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (c, m, ty))
+                      let eqR = ConvExpr cenv env eq
                       QP.mkCond (eqR, ConvDecisionTree cenv env tgs typR dtree, acc)
 
                   | DecisionTreeTest.IsNull ->
@@ -1096,9 +1091,9 @@ and ConvDecisionTree cenv env tgs typR x =
                           // note: reverse the branches - a null test is a failure of an isinst test
                           QP.mkCond (QP.mkTypeTest (tyR, eR), acc, ConvDecisionTree cenv env tgs typR dtree)
                       | _ -> 
-                          let ty = tyOfExpr g e1
-                          let eq = mkCallEqualsOperator g m ty e1 (Expr.Const (Const.Zero, m, ty))
-                          let eqR = ConvExpr cenv env eq 
+                          let ty = tyOfExpr cenv.g e1
+                          let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (Const.Zero, m, ty))
+                          let eqR = ConvExpr cenv env eq
                           QP.mkCond (eqR, ConvDecisionTree cenv env tgs typR dtree, acc)
 
                   | DecisionTreeTest.IsInst (_srcty, tgty) ->
@@ -1133,15 +1128,12 @@ and ConvDecisionTree cenv env tgs typR x =
 
 // Check if this is an provider-generated assembly that will be statically linked
 and IsILTypeRefStaticLinkLocal cenv m (tr: ILTypeRef) =
-#if NO_EXTENSIONTYPING
-        ignore m; ignore cenv; ignore tr
-        false
-#else
-        let g = cenv.g
-        match tr.Scope with 
-        | ILScopeRef.Assembly aref 
-            when not g.isInteractive &&
-                 aref.Name <> g.ilg.primaryAssemblyName && // optimization to avoid this check in the common case
+        ignore cenv; ignore m
+        match tr.Scope with
+#if !NO_EXTENSIONTYPING
+        | ILScopeRef.Assembly aref
+            when not cenv.g.isInteractive &&
+                 aref.Name <> cenv.g.ilg.primaryAssemblyName && // optimization to avoid this check in the common case
 
                  // Explanation: This represents an unchecked invariant in the hosted compiler: that any operations
                  // which import types (and resolve assemblies from the tcImports tables) happen on the compilation thread.
@@ -1151,8 +1143,8 @@ and IsILTypeRefStaticLinkLocal cenv m (tr: ILTypeRef) =
                   | ResolvedCcu ccu -> ccu.IsProviderGenerated
                   | UnresolvedCcu _ -> false)
             -> true
-        | _ -> false
 #endif
+        | _ -> false
 
 // Adjust for static linking information, then convert
 and ConvILTypeRefUnadjusted cenv m (tr: ILTypeRef) =
@@ -1183,9 +1175,7 @@ and ConvILTypeRef cenv (tr: ILTypeRef) =
 
         QP.Named(tr.BasicQualifiedName, assemblyRef)
   
-and ConvVoidType cenv m = 
-    let g = cenv.g
-    QP.mkILNamedTy(ConvTyconRef cenv g.system_Void_tcref m, [])
+and ConvVoidType cenv m = QP.mkILNamedTy(ConvTyconRef cenv cenv.g.system_Void_tcref m, [])
 
 and ConvILType cenv env m ty =
     match ty with

From 28bb9a6344408d2ab67f7c87dd187c416ee6d6ed Mon Sep 17 00:00:00 2001
From: KevinRansom 
Date: Thu, 12 Nov 2020 12:32:43 -0800
Subject: [PATCH 038/112] temp

---
 .../NativeDllResolveHandler.fs                |  2 +
 src/fsharp/xlf/FSComp.txt.ja.xlf              | 60 +++++++++++++++++++
 2 files changed, 62 insertions(+)

diff --git a/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs b/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs
index b9ec2ec9d3c..02a73003e45 100644
--- a/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs
+++ b/src/fsharp/Microsoft.DotNet.DependencyManager/NativeDllResolveHandler.fs
@@ -115,6 +115,8 @@ type NativeDllResolveHandler (nativeProbingRoots: NativeResolutionProbe option)
         if isRunningOnCoreClr then
             Some (new NativeDllResolveHandlerCoreClr(nativeProbingRoots) :> IDisposable)
         else
+#else
+            ignore nativeProbingRoots
 #endif
             None
 
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index 8742a693fd5..ed6617e41ff 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -17,11 +17,21 @@
         機能 '{0}' を使用するには、言語バージョン {1} 以上の F# ライブラリが必要です。
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         Available overloads:\n{0}
         使用可能なオーバーロード:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         ジェネリック コンストラクトでは、ジェネリック型パラメーターが構造体または参照型として認識されている必要があります。型の注釈の追加を検討してください。
@@ -52,6 +62,11 @@
         既知の型パラメーター: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         インデックス {0} の引数が一致しません
@@ -62,6 +77,21 @@
         引数 '{0}' が一致しません
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         依存関係がないか、または読み込めなかったため、型プロバイダーのデザイナー アセンブリ '{0}' をフォルダー '{1}' から読み込めませんでした。型プロバイダーのデザイナー アセンブリのすべての依存関係は、そのアセンブリと同じフォルダーに配置されている必要があります。次の例外が報告されました: {2} - {3}
@@ -77,6 +107,11 @@
         アセンブリ属性 '{0}' は、デザイナー アセンブリ '{1}' を参照していますが、これは読み込むことができないか、存在していません。報告された例外: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         applicative computation expressions
         適用できる計算式
@@ -122,6 +157,11 @@
         Null 許容のオプションの相互運用
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         オープン型宣言
@@ -232,6 +272,11 @@
         オフセット {0} で始まるリソース ヘッダーの形式に誤りがあります。
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         言語バージョンで許可された値を表示し、'最新' や 'プレビュー' などの言語バージョンを指定する
@@ -352,6 +397,11 @@
         A default implementation of this interface has already been added because the explicit implementation of the interface was not specified at the definition of the type
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         Byref types are not allowed in an open type declaration.
         Byref 型は、オープン型宣言では使用できません。
@@ -382,6 +432,11 @@
         リテラルとしてマークされた値に '{0}' を割り当てることはできません
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         Recursive bindings that include member specifications can only occur as a direct augmentation of a type
         Recursive bindings that include member specifications can only occur as a direct augmentation of a type
@@ -392,6 +447,11 @@
         'let! ... and! ...' コンストラクトは、コンピュテーション式ビルダーが '{0}' メソッドまたは適切な 'MergeSource' および 'Bind' メソッドのいずれかを定義している場合にのみ使用できます
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         補間された文字列が無効です。{0}

From 4057fe556fcf98db1b92d27d751032511012ace3 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 7 Dec 2020 15:45:38 +0000
Subject: [PATCH 039/112] merge main

---
 src/fsharp/NicePrint.fs    | 2 +-
 tests/service/ExprTests.fs | 6 ------
 2 files changed, 1 insertion(+), 7 deletions(-)

diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs
index f796d472655..7ba04c3eb96 100755
--- a/src/fsharp/NicePrint.fs
+++ b/src/fsharp/NicePrint.fs
@@ -71,7 +71,7 @@ module internal PrintUtilities =
             elif xref.IsTypeAbbrev then
                 let ty = xref.TypeAbbrev.Value
                 match stripTyEqns denv.g ty with
-                | TType_app(tcref, _) when tcref.IsStructOrEnumTycon ->
+                | TType_app(tcref, _, _) when tcref.IsStructOrEnumTycon ->
                     tagStruct name
                 | _ ->
                     tagAlias name
diff --git a/tests/service/ExprTests.fs b/tests/service/ExprTests.fs
index f0a4e06a3b3..6be5e04fe79 100644
--- a/tests/service/ExprTests.fs
+++ b/tests/service/ExprTests.fs
@@ -2792,19 +2792,13 @@ let ``Test Operator Declarations for String`` () =
         // the definition of these operators has changed slightly in latest FSharp.Core
         [], "let testStringToSingleOperator(e1) = Single.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (52,47--52,57)"
         [], "let testStringToDoubleOperator(e1) = Double.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (53,47--53,55)"
-<<<<<<< HEAD
 #else
         [FC47; FC50], "let testStringToSingleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> Microsoft.FSharp.Core.exn) else ()); Single.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (52,47--52,57)"
         [FC47; FC50], "let testStringToDoubleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> Microsoft.FSharp.Core.exn) else ()); Double.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (53,47--53,55)"
 #endif
-        [], "let testStringToDecimalOperator(e1) = Decimal.Parse (e1,167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (54,47--54,57)";
-        [], "let testStringToCharOperator(e1) = Char.Parse (e1) @ (55,47--55,54)";
-        [FC47; FC50], "let testStringToStringOperator(e1) = e1 @ (56,54--56,56)"
-=======
         [], "let testStringToDecimalOperator(e1) = Decimal.Parse (e1,167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (54,47--54,57)"
         [], "let testStringToCharOperator(e1) = Char.Parse (e1) @ (55,47--55,54)"
         [FC47; FC50], """let testStringToStringOperator(e1) = (if String.Equals (e1,dflt) then "" else e1) @ (56,47--56,56)"""
->>>>>>> 512b1de3705a344df610dd9013532111724287e5
       ]
 
     testOperators "String" "string" excludedTests expectedUnoptimized expectedOptimized

From f6f77929a5182232ea47560fd0b036abc113e9e8 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Dec 2020 14:18:22 +0000
Subject: [PATCH 040/112] fix test

---
 tests/service/ExprTests.fs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/service/ExprTests.fs b/tests/service/ExprTests.fs
index 6be5e04fe79..7785017ed1b 100644
--- a/tests/service/ExprTests.fs
+++ b/tests/service/ExprTests.fs
@@ -2793,8 +2793,8 @@ let ``Test Operator Declarations for String`` () =
         [], "let testStringToSingleOperator(e1) = Single.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (52,47--52,57)"
         [], "let testStringToDoubleOperator(e1) = Double.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (53,47--53,55)"
 #else
-        [FC47; FC50], "let testStringToSingleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> Microsoft.FSharp.Core.exn) else ()); Single.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (52,47--52,57)"
-        [FC47; FC50], "let testStringToDoubleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> Microsoft.FSharp.Core.exn) else ()); Double.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (53,47--53,55)"
+        [FC47; FC50], "let testStringToSingleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> System.Exception) else ()); Single.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (52,47--52,57)"
+        [FC47; FC50], "let testStringToDoubleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> System.Exception) else ()); Double.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (53,47--53,55)"
 #endif
         [], "let testStringToDecimalOperator(e1) = Decimal.Parse (e1,167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (54,47--54,57)"
         [], "let testStringToCharOperator(e1) = Char.Parse (e1) @ (55,47--55,54)"

From 513b596a9ad258f3ae61fe7a10db3dbe6c0a7d15 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 10 Dec 2020 19:12:12 +0000
Subject: [PATCH 041/112] fix up tests

---
 .../Compiler/Regressions/NullableOptionalRegressionTests.fs  | 5 +++--
 .../CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl   | 4 ++++
 .../CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl    | 4 ++++
 3 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs b/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs
index 93970223ce5..7e2f3b9ff17 100644
--- a/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs
+++ b/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs
@@ -5,10 +5,11 @@ namespace FSharp.Compiler.UnitTests
 open NUnit.Framework
 open FSharp.Test.Utilities.Compiler
 
-[]
+[]
 module NullableOptionalRegressionTests =
 
-    []
+    //Disabled, see RFC for nullable
+    //[]
     let ``Should compile with generic overloaded nullable methods``() =
         Fsx """
 open System
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
index 479455bcd34..a1f0545d40f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
@@ -31,6 +31,10 @@
 {
   // Offset: 0x00000000 Length: 0x0000030C
 }
+.mresource public FSharpSignatureDataB.SteppingMatch09
+{
+  // Offset: 0x00000218 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.SteppingMatch09
 {
   // Offset: 0x00000310 Length: 0x000000EB
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
index c222b9759e1..a531be419d8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
@@ -31,6 +31,10 @@
 {
   // Offset: 0x00000000 Length: 0x0000033A
 }
+.mresource public FSharpSignatureDataB.TestFunction23
+{
+  // Offset: 0x00000218 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.TestFunction23
 {
   // Offset: 0x00000340 Length: 0x000000E3

From ea679ed7e3e082954779285fe7c14f1765d40a9f Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 13 Dec 2020 19:27:08 +0000
Subject: [PATCH 042/112] fix build

---
 src/fsharp/ConstraintSolver.fs |  2 +-
 src/fsharp/TypedTreeBasics.fsi | 18 +++++++++++++++++-
 src/fsharp/TypedTreeOps.fsi    |  4 ----
 src/fsharp/TypedTreePickle.fs  |  1 -
 src/fsharp/lib.fsi             |  8 ++++----
 5 files changed, 22 insertions(+), 11 deletions(-)

diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 49775d10740..7fc40aed165 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -1124,7 +1124,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
         // Unifying 'T1? and 'T2? 
         | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull ->
             SolveTyparEqualsType csenv ndeep m2 trace sty1 (replaceNullnessOfTy g.knownWithoutNull sty2) 
-        //// Unifying 'T1 % and 'T2 % 
+        // // Unifying 'T1 % and 'T2 % 
         //| ValueSome NullnessInfo.AmbivalentToNull, ValueSome NullnessInfo.AmbivalentToNull ->
         //    SolveTyparEqualsType csenv ndeep m2 trace sty1 (replaceNullnessOfTy g.knownWithoutNull sty2) 
         | _ -> 
diff --git a/src/fsharp/TypedTreeBasics.fsi b/src/fsharp/TypedTreeBasics.fsi
index 1a79098d0a8..b07a005fc60 100644
--- a/src/fsharp/TypedTreeBasics.fsi
+++ b/src/fsharp/TypedTreeBasics.fsi
@@ -118,6 +118,20 @@ val ccuOfValRef: vref:ValRef -> CcuThunk option
 
 val ccuOfTyconRef: eref:EntityRef -> CcuThunk option
 
+val NewNullnessVar: unit -> Nullness
+
+val KnownAmbivalentToNull: Nullness
+
+val KnownWithNull: Nullness
+
+val KnownWithoutNull: Nullness
+
+val combineNullness: Nullness -> Nullness -> Nullness
+
+val tryAddNullnessToTy: Nullness -> TType -> TType option
+
+val addNullnessToTy: Nullness -> TType -> TType
+
 val mkTyparTy: tp:Typar -> TType
 
 val copyTypar: tp:Typar -> Typar
@@ -128,7 +142,9 @@ val tryShortcutSolvedUnitPar: canShortcut:bool -> r:Typar -> Measure
 
 val stripUnitEqnsAux: canShortcut:bool -> unt:Measure -> Measure
 
-val stripTyparEqnsAux: canShortcut:bool -> ty:TType -> TType
+val stripTyparEqnsAux: nullness0: Nullness -> canShortcut:bool -> ty:TType -> TType
+
+val replaceNullnessOfTy: nullness: Nullness -> ty:TType -> TType
 
 val stripTyparEqns: ty:TType -> TType
 
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index 5b922c60c05..2086af1441b 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -69,10 +69,6 @@ val valsOfBinds : Bindings -> Vals
 /// Look for a use of an F# value, possibly including application of a generic thing to a set of type arguments
 val (|ExprValWithPossibleTypeInst|_|) : Expr -> (ValRef * ValUseFlag * TType list * range) option
 
-//val combineNullness: Nullness -> Nullness -> Nullness
-//val tryAddNullnessToTy: Nullness -> TType -> TType option
-//val addNullnessToTy: Nullness -> TType -> TType
-
 //-------------------------------------------------------------------------
 // Build decision trees imperatively
 //------------------------------------------------------------------------- 
diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index ddbccc21700..ac8938e2384 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -26,7 +26,6 @@ open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TcGlobals
 open FSharp.Compiler.XmlDoc
 
-
 let verbose = false
 
 let ffailwith fileName str =
diff --git a/src/fsharp/lib.fsi b/src/fsharp/lib.fsi
index d7957a1a304..28ee095a8f8 100644
--- a/src/fsharp/lib.fsi
+++ b/src/fsharp/lib.fsi
@@ -218,17 +218,17 @@ val nullableSlotEmpty: unit -> 'T
 val nullableSlotFull: x:'a -> 'a
 
 /// Caches, mainly for free variables
-type cache<'T> = { mutable cacheVal: NonNullSlot<'T> }
+type cache<'T  when 'T : not struct> = { mutable cacheVal: NonNullSlot<'T> }
 
-val newCache: unit -> cache<'a>
+val newCache: unit -> cache<'a>  when 'a : not struct
 
-val inline cached: cache:cache<'a> -> resF:(unit -> 'a) -> 'a
+val inline cached: cache:cache<'a> -> resF:(unit -> 'a) -> 'a  when 'a : not struct
 
 val inline cacheOptByref: cache:byref<'T option> -> f:(unit -> 'T) -> 'T
 
 val inline cacheOptRef: cache:'a option ref -> f:(unit -> 'a) -> 'a
 
-val inline tryGetCacheValue: cache:cache<'a> -> NonNullSlot<'a> voption
+val inline tryGetCacheValue: cache:cache<'a> -> NonNullSlot<'a> voption  when 'a : not struct
 
 module AsyncUtil =
 

From 4f35d4b5f1a039236eab5b8a05e9d365bfc05092 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sun, 13 Dec 2020 19:28:50 +0000
Subject: [PATCH 043/112] fix build

---
 src/fsharp/lib.fsi | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/fsharp/lib.fsi b/src/fsharp/lib.fsi
index 28ee095a8f8..4d39dffd746 100644
--- a/src/fsharp/lib.fsi
+++ b/src/fsharp/lib.fsi
@@ -211,11 +211,11 @@ type Graph<'Data,'Id when 'Id: comparison> =
 /// This is an unsafe trick, as it relies on the fact that the type of values
 /// being placed into the slot never utilizes "null" as a representation. To be used with
 /// with care.
-type NonNullSlot<'T> = 'T
+type NonNullSlot<'T  when 'T : not struct> = 'T
 
-val nullableSlotEmpty: unit -> 'T
+val nullableSlotEmpty: unit -> NonNullSlot<'T>
 
-val nullableSlotFull: x:'a -> 'a
+val nullableSlotFull: x:'a -> NonNullSlot<'a>
 
 /// Caches, mainly for free variables
 type cache<'T  when 'T : not struct> = { mutable cacheVal: NonNullSlot<'T> }

From 0746c5e26cda2ee34dbb94c9939434844071a495 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 21 Dec 2020 17:21:45 +0000
Subject: [PATCH 044/112] integrate main

---
 src/fsharp/utils/FileSystem.fs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/fsharp/utils/FileSystem.fs b/src/fsharp/utils/FileSystem.fs
index 38b574c653e..4d005facd29 100644
--- a/src/fsharp/utils/FileSystem.fs
+++ b/src/fsharp/utils/FileSystem.fs
@@ -55,6 +55,11 @@ type IFileSystem =
 
 []
 module FileSystemAutoOpens =
+    #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+    // Shim to match nullness checking library support in preview
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+    #endif
+
     type DefaultFileSystem() =
         interface IFileSystem with
 
@@ -79,7 +84,6 @@ module FileSystemAutoOpens =
             member __.IsInvalidPathShim(path: string) = 
 #if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
                 let isInvalidPath(p: string) = 
-                    String.IsNullOrEmpty p || p.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 #else
                 let isInvalidPath(p: string?) = 
 #endif

From e0b6bc0b31c267d45268a30bf316400cbe9fee01 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 21 Dec 2020 18:41:42 +0000
Subject: [PATCH 045/112] fix baseline

---
 .../SurfaceArea.netstandard.fs                | 231 +++++++++++++++++-
 1 file changed, 230 insertions(+), 1 deletion(-)

diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index f8478356981..b0a5fd9619b 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -25647,5 +25647,234 @@ Microsoft.DotNet.DependencyManager.ResolvingErrorReport: System.IAsyncResult Beg
 Microsoft.DotNet.DependencyManager.ResolvingErrorReport: Void .ctor(System.Object, IntPtr)
 Microsoft.DotNet.DependencyManager.ResolvingErrorReport: Void EndInvoke(System.IAsyncResult)
 Microsoft.DotNet.DependencyManager.ResolvingErrorReport: Void Invoke(Microsoft.DotNet.DependencyManager.ErrorReportType, Int32, System.String)
-"
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsAnon
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsAnonRecd
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsApp
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsArray
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsFun
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsHashConstraint
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsLongIdent
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsLongIdentApp
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsMeasureDivide
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsMeasurePower
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsParen
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstant
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantExpr
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantNamed
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsTuple
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsVar
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsWithGlobalConstraints
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsAnon()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsAnonRecd()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsApp()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsArray()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsFun()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsHashConstraint()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsLongIdent()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsLongIdentApp()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsMeasureDivide()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsMeasurePower()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsParen()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstant()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantExpr()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantNamed()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsTuple()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsVar()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsWithGlobalConstraints()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Int32 Tag
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Int32 get_Tag()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: System.String ToString()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range Range
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range get_Range()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range get_range()
+FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range range
+FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 StaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 WithNull
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsAnon
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsAnonRecd
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsApp
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsArray
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsFun
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsHashConstraint
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsLongIdent
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsLongIdentApp
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsMeasureDivide
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsMeasurePower
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsParen
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstant
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantExpr
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantNamed
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsTuple
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsVar
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsWithGlobalConstraints
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean ambivalent
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsAnon()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsAnonRecd()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsApp()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsArray()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsFun()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsHashConstraint()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsLongIdent()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsLongIdentApp()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsMeasureDivide()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsMeasurePower()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsParen()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstant()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantExpr()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantNamed()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsTuple()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsVar()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsWithGlobalConstraints()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_ambivalent()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Int32 Tag
+FSharp.Compiler.SyntaxTree+SynType+WithNull: Int32 get_Tag()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: SynType get_innerType()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: SynType innerType
+FSharp.Compiler.SyntaxTree+SynType+WithNull: System.String ToString()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range Range
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range get_Range()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range get_range()
+FSharp.Compiler.SyntaxTree+SynType+WithNull: range range
+FSharp.Compiler.SyntaxTree+SynType: Boolean IsStaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType: Boolean IsWithNull
+FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsWithNull()
+FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull
+FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+WithNull
+FSharp.Compiler.SyntaxTree+SynType: SynType NewStaticConstantNull(range)
+FSharp.Compiler.SyntaxTree+SynType: SynType NewWithNull(SynType, Boolean, range)
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparDefaultsToType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsComparable
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsDelegate
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsEnum
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsEquatable
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsReferenceType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsUnmanaged
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsValueType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSubtypeOfType
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSupportsMember
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparDefaultsToType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsComparable()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsDelegate()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsEnum()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsEquatable()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsReferenceType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsUnmanaged()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsValueType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSubtypeOfType()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSupportsMember()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Int32 Tag
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Int32 get_Tag()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: SynTypar genericName
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: SynTypar get_genericName()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: System.String ToString()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: range get_range()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: range range
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull
+FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparNotSupportsNull(SynTypar, range)"
         SurfaceArea.verify expected "netstandard" (System.IO.Path.Combine(__SOURCE_DIRECTORY__,__SOURCE_FILE__))
\ No newline at end of file

From d8934360698566387376e49a4caaff8df9b43a43 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 4 Feb 2021 17:03:49 +0000
Subject: [PATCH 046/112] update baselines

---
 .../SurfaceArea.netstandard.fs                | 22529 +---------------
 .../Navigation/NavigableSymbolsService.fs     |     2 +-
 2 files changed, 35 insertions(+), 22496 deletions(-)

diff --git a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
index fc3408c8750..53eda4d2f34 100644
--- a/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
+++ b/tests/FSharp.Compiler.Service.Tests/SurfaceArea.netstandard.fs
@@ -1616,7 +1616,7 @@ FSharp.Compiler.DependencyManager.AssemblyResolutionProbe: System.Collections.Ge
 FSharp.Compiler.DependencyManager.AssemblyResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
 FSharp.Compiler.DependencyManager.AssemblyResolutionProbe: Void .ctor(System.Object, IntPtr)
 FSharp.Compiler.DependencyManager.AssemblyResolveHandler
-FSharp.Compiler.DependencyManager.AssemblyResolveHandler: Void .ctor(FSharp.Compiler.DependencyManager.AssemblyResolutionProbe)
+FSharp.Compiler.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.DependencyManager.AssemblyResolutionProbe])
 FSharp.Compiler.DependencyManager.DependencyProvider
 FSharp.Compiler.DependencyManager.DependencyProvider: FSharp.Compiler.DependencyManager.IDependencyManagerProvider TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, FSharp.Compiler.DependencyManager.ResolvingErrorReport, System.String)
 FSharp.Compiler.DependencyManager.DependencyProvider: FSharp.Compiler.DependencyManager.IResolveDependenciesResult Resolve(FSharp.Compiler.DependencyManager.IDependencyManagerProvider, System.String, System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.String,System.String]], FSharp.Compiler.DependencyManager.ResolvingErrorReport, System.String, System.String, System.String, System.String, System.String, Int32)
@@ -1671,7 +1671,7 @@ FSharp.Compiler.DependencyManager.IResolveDependenciesResult: System.String[] St
 FSharp.Compiler.DependencyManager.IResolveDependenciesResult: System.String[] get_StdError()
 FSharp.Compiler.DependencyManager.IResolveDependenciesResult: System.String[] get_StdOut()
 FSharp.Compiler.DependencyManager.NativeDllResolveHandler
-FSharp.Compiler.DependencyManager.NativeDllResolveHandler: Void .ctor(FSharp.Compiler.DependencyManager.NativeResolutionProbe)
+FSharp.Compiler.DependencyManager.NativeDllResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.DependencyManager.NativeResolutionProbe])
 FSharp.Compiler.DependencyManager.NativeResolutionProbe
 FSharp.Compiler.DependencyManager.NativeResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] EndInvoke(System.IAsyncResult)
 FSharp.Compiler.DependencyManager.NativeResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] Invoke()
@@ -1683,8 +1683,8 @@ FSharp.Compiler.DependencyManager.ResolvingErrorReport: Void .ctor(System.Object
 FSharp.Compiler.DependencyManager.ResolvingErrorReport: Void EndInvoke(System.IAsyncResult)
 FSharp.Compiler.DependencyManager.ResolvingErrorReport: Void Invoke(FSharp.Compiler.DependencyManager.ErrorReportType, Int32, System.String)
 FSharp.Compiler.Diagnostics.CompilerDiagnostics
-FSharp.Compiler.Diagnostics.CompilerDiagnostics: System.String GetErrorMessage(FSharp.Compiler.Diagnostics.FSharpDiagnosticKind)
 FSharp.Compiler.Diagnostics.CompilerDiagnostics: System.Collections.Generic.IEnumerable`1[System.String] GetSuggestedNames(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.FSharpFunc`2[System.String,Microsoft.FSharp.Core.Unit],Microsoft.FSharp.Core.Unit], System.String)
+FSharp.Compiler.Diagnostics.CompilerDiagnostics: System.String GetErrorMessage(FSharp.Compiler.Diagnostics.FSharpDiagnosticKind)
 FSharp.Compiler.Diagnostics.FSharpDiagnostic
 FSharp.Compiler.Diagnostics.FSharpDiagnostic: FSharp.Compiler.Diagnostics.FSharpDiagnosticSeverity Severity
 FSharp.Compiler.Diagnostics.FSharpDiagnostic: FSharp.Compiler.Diagnostics.FSharpDiagnosticSeverity get_Severity()
@@ -3617,21812 +3617,6 @@ FSharp.Compiler.Interactive.Shell: FSharp.Compiler.Interactive.Shell+FsiEvaluati
 FSharp.Compiler.Interactive.Shell: FSharp.Compiler.Interactive.Shell+FsiEvaluationSessionHostConfig
 FSharp.Compiler.Interactive.Shell: FSharp.Compiler.Interactive.Shell+FsiValue
 FSharp.Compiler.Interactive.Shell: FSharp.Compiler.Interactive.Shell+Settings
-<<<<<<< HEAD
-FSharp.Compiler.PartialLongName: Boolean Equals(FSharp.Compiler.PartialLongName)
-FSharp.Compiler.PartialLongName: Boolean Equals(System.Object)
-FSharp.Compiler.PartialLongName: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.PartialLongName: FSharp.Compiler.PartialLongName Empty(Int32)
-FSharp.Compiler.PartialLongName: Int32 CompareTo(FSharp.Compiler.PartialLongName)
-FSharp.Compiler.PartialLongName: Int32 CompareTo(System.Object)
-FSharp.Compiler.PartialLongName: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.PartialLongName: Int32 EndColumn
-FSharp.Compiler.PartialLongName: Int32 GetHashCode()
-FSharp.Compiler.PartialLongName: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.PartialLongName: Int32 get_EndColumn()
-FSharp.Compiler.PartialLongName: Microsoft.FSharp.Collections.FSharpList`1[System.String] QualifyingIdents
-FSharp.Compiler.PartialLongName: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_QualifyingIdents()
-FSharp.Compiler.PartialLongName: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] LastDotPos
-FSharp.Compiler.PartialLongName: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] get_LastDotPos()
-FSharp.Compiler.PartialLongName: System.String PartialIdent
-FSharp.Compiler.PartialLongName: System.String ToString()
-FSharp.Compiler.PartialLongName: System.String get_PartialIdent()
-FSharp.Compiler.PartialLongName: Void .ctor(Microsoft.FSharp.Collections.FSharpList`1[System.String], System.String, Int32, Microsoft.FSharp.Core.FSharpOption`1[System.Int32])
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: ActivePatternInfo NewAPInfo(Boolean, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,FSharp.Compiler.Range+range]], range)
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean Equals(ActivePatternInfo)
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean Equals(System.Object)
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean IsTotal
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean Item1
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean get_IsTotal()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Boolean get_Item1()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Int32 GetHashCode()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Int32 Tag
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Int32 get_Tag()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Microsoft.FSharp.Collections.FSharpList`1[System.String] ActiveTags
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_ActiveTags()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,FSharp.Compiler.Range+range]] ActiveTagsWithRanges
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,FSharp.Compiler.Range+range]] Item2
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,FSharp.Compiler.Range+range]] get_ActiveTagsWithRanges()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,FSharp.Compiler.Range+range]] get_Item2()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: System.String ToString()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: range Item3
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: range Range
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: range get_Item3()
-FSharp.Compiler.PrettyNaming+ActivePatternInfo: range get_Range()
-FSharp.Compiler.PrettyNaming+CustomOperations: System.String Into
-FSharp.Compiler.PrettyNaming+FSharpLib: Microsoft.FSharp.Collections.FSharpList`1[System.String] CorePath
-FSharp.Compiler.PrettyNaming+FSharpLib: Microsoft.FSharp.Collections.FSharpList`1[System.String] RootPath
-FSharp.Compiler.PrettyNaming+FSharpLib: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_CorePath()
-FSharp.Compiler.PrettyNaming+FSharpLib: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_RootPath()
-FSharp.Compiler.PrettyNaming+FSharpLib: System.String Core
-FSharp.Compiler.PrettyNaming+FSharpLib: System.String Root
-FSharp.Compiler.PrettyNaming+FSharpLib: System.String get_Core()
-FSharp.Compiler.PrettyNaming+FSharpLib: System.String get_Root()
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: Boolean Equals(System.Object)
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: Int32 GetHashCode()
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: System.String Data0
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: System.String get_Data0()
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: Void .ctor()
-FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg: Void .ctor(System.String)
-FSharp.Compiler.PrettyNaming+NameArityPair: Boolean Equals(NameArityPair)
-FSharp.Compiler.PrettyNaming+NameArityPair: Boolean Equals(System.Object)
-FSharp.Compiler.PrettyNaming+NameArityPair: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 CompareTo(NameArityPair)
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 CompareTo(System.Object)
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 GetHashCode()
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 Item2
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 Tag
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 get_Item2()
-FSharp.Compiler.PrettyNaming+NameArityPair: Int32 get_Tag()
-FSharp.Compiler.PrettyNaming+NameArityPair: NameArityPair NewNameArityPair(System.String, Int32)
-FSharp.Compiler.PrettyNaming+NameArityPair: System.String Item1
-FSharp.Compiler.PrettyNaming+NameArityPair: System.String ToString()
-FSharp.Compiler.PrettyNaming+NameArityPair: System.String get_Item1()
-FSharp.Compiler.PrettyNaming: Boolean IsActivePatternName(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsCompilerGeneratedName(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsIdentifierFirstCharacter(Char)
-FSharp.Compiler.PrettyNaming: Boolean IsIdentifierPartCharacter(Char)
-FSharp.Compiler.PrettyNaming: Boolean IsLongIdentifierPartCharacter(Char)
-FSharp.Compiler.PrettyNaming: Boolean IsMangledOpName(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsOperatorName(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsOperatorOrBacktickedName(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsPrefixOperator(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsPunctuation(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsTernaryOperator(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsValidPrefixOperatorDefinitionName(System.String)
-FSharp.Compiler.PrettyNaming: Boolean IsValidPrefixOperatorUse(System.String)
-FSharp.Compiler.PrettyNaming: Boolean isTildeOnlyString(System.String)
-FSharp.Compiler.PrettyNaming: Char[] IllegalCharactersInTypeAndNamespaceNames
-FSharp.Compiler.PrettyNaming: Char[] get_IllegalCharactersInTypeAndNamespaceNames()
-FSharp.Compiler.PrettyNaming: FSharp.Compiler.PrettyNaming+ActivePatternInfo
-FSharp.Compiler.PrettyNaming: FSharp.Compiler.PrettyNaming+CustomOperations
-FSharp.Compiler.PrettyNaming: FSharp.Compiler.PrettyNaming+FSharpLib
-FSharp.Compiler.PrettyNaming: FSharp.Compiler.PrettyNaming+InvalidMangledStaticArg
-FSharp.Compiler.PrettyNaming: FSharp.Compiler.PrettyNaming+NameArityPair
-FSharp.Compiler.PrettyNaming: FSharp.Compiler.TextLayout.Layout DemangleOperatorNameAsLayout[?](Microsoft.FSharp.Core.FSharpFunc`2[System.String,?], System.String)
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Collections.FSharpList`1[System.String] SplitNamesForILPath(System.String)
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpChoice`6[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.Unit] |Control|Equality|Relational|Indexer|FixedTypes|Other|(System.String)
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String]] get_mkUnionCaseFieldName()
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String]] mkUnionCaseFieldName
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String] get_mkExceptionFieldName()
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String] mkExceptionFieldName
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.Boolean] IsInfixOperator
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.Boolean] get_IsInfixOperator()
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.String] CompileOpName
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.String] DecompileOpName
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.String] get_CompileOpName()
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpFunc`2[System.String,System.String] get_DecompileOpName()
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.PrettyNaming+ActivePatternInfo] ActivePatternInfoOfValName(System.String, range)
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryChopPropertyName(System.String)
-FSharp.Compiler.PrettyNaming: Microsoft.FSharp.Core.FSharpValueOption`1[System.Int32] TryDemangleGenericNameAndPos(System.String)
-FSharp.Compiler.PrettyNaming: NameArityPair DecodeGenericTypeName(System.String)
-FSharp.Compiler.PrettyNaming: NameArityPair DecodeGenericTypeNameWithPos(Int32, System.String)
-FSharp.Compiler.PrettyNaming: System.String ChopPropertyName(System.String)
-FSharp.Compiler.PrettyNaming: System.String CompilerGeneratedName(System.String)
-FSharp.Compiler.PrettyNaming: System.String CompilerGeneratedNameSuffix(System.String, System.String)
-FSharp.Compiler.PrettyNaming: System.String DemangleGenericTypeName(System.String)
-FSharp.Compiler.PrettyNaming: System.String DemangleGenericTypeNameWithPos(Int32, System.String)
-FSharp.Compiler.PrettyNaming: System.String DemangleOperatorName(System.String)
-FSharp.Compiler.PrettyNaming: System.String ExtraWitnessMethodName(System.String)
-FSharp.Compiler.PrettyNaming: System.String FSharpModuleSuffix
-FSharp.Compiler.PrettyNaming: System.String FSharpOptimizationDataResourceName
-FSharp.Compiler.PrettyNaming: System.String FSharpOptimizationDataResourceName2
-FSharp.Compiler.PrettyNaming: System.String FSharpSignatureDataResourceName
-FSharp.Compiler.PrettyNaming: System.String FSharpSignatureDataResourceName2
-FSharp.Compiler.PrettyNaming: System.String FsiDynamicModulePrefix
-FSharp.Compiler.PrettyNaming: System.String GetBasicNameOfPossibleCompilerGeneratedName(System.String)
-FSharp.Compiler.PrettyNaming: System.String MangledGlobalName
-FSharp.Compiler.PrettyNaming: System.String computeMangledNameWithoutDefaultArgValues[a](System.String, a[], System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.String]][])
-FSharp.Compiler.PrettyNaming: System.String get_FSharpOptimizationDataResourceName()
-FSharp.Compiler.PrettyNaming: System.String get_FSharpOptimizationDataResourceName2()
-FSharp.Compiler.PrettyNaming: System.String get_FSharpSignatureDataResourceName()
-FSharp.Compiler.PrettyNaming: System.String get_FSharpSignatureDataResourceName2()
-FSharp.Compiler.PrettyNaming: System.String get_FsiDynamicModulePrefix()
-FSharp.Compiler.PrettyNaming: System.String get_opNameCons()
-FSharp.Compiler.PrettyNaming: System.String get_opNameEquals()
-FSharp.Compiler.PrettyNaming: System.String get_opNameEqualsNullable()
-FSharp.Compiler.PrettyNaming: System.String get_opNameNil()
-FSharp.Compiler.PrettyNaming: System.String get_opNameNullableEquals()
-FSharp.Compiler.PrettyNaming: System.String get_opNameNullableEqualsNullable()
-FSharp.Compiler.PrettyNaming: System.String get_outArgCompilerGeneratedName()
-FSharp.Compiler.PrettyNaming: System.String get_unassignedTyparName()
-FSharp.Compiler.PrettyNaming: System.String mangleProvidedTypeName(System.String, System.Tuple`2[System.String,System.String][])
-FSharp.Compiler.PrettyNaming: System.String opNameCons
-FSharp.Compiler.PrettyNaming: System.String opNameEquals
-FSharp.Compiler.PrettyNaming: System.String opNameEqualsNullable
-FSharp.Compiler.PrettyNaming: System.String opNameNil
-FSharp.Compiler.PrettyNaming: System.String opNameNullableEquals
-FSharp.Compiler.PrettyNaming: System.String opNameNullableEqualsNullable
-FSharp.Compiler.PrettyNaming: System.String opNamePrefix
-FSharp.Compiler.PrettyNaming: System.String outArgCompilerGeneratedName
-FSharp.Compiler.PrettyNaming: System.String parenGet
-FSharp.Compiler.PrettyNaming: System.String parenSet
-FSharp.Compiler.PrettyNaming: System.String qmark
-FSharp.Compiler.PrettyNaming: System.String qmarkSet
-FSharp.Compiler.PrettyNaming: System.String unassignedTyparName
-FSharp.Compiler.PrettyNaming: System.Tuple`2[System.String,System.Tuple`2[System.String,System.String][]] demangleProvidedTypeName(System.String)
-FSharp.Compiler.PrettyNaming: System.String FSharpOptimizationDataResourceNameB
-FSharp.Compiler.PrettyNaming: System.String FSharpSignatureDataResourceNameB
-FSharp.Compiler.PrettyNaming: System.String get_FSharpOptimizationDataResourceNameB()
-FSharp.Compiler.PrettyNaming: System.String get_FSharpSignatureDataResourceNameB()
-FSharp.Compiler.QuickParse: Boolean TestMemberOrOverrideDeclaration(FSharp.Compiler.SourceCodeServices.FSharpTokenInfo[])
-FSharp.Compiler.QuickParse: FSharp.Compiler.PartialLongName GetPartialLongNameEx(System.String, Int32)
-FSharp.Compiler.QuickParse: Int32 CorrectIdentifierToken(System.String, Int32)
-FSharp.Compiler.QuickParse: Int32 MagicalAdjustmentConstant
-FSharp.Compiler.QuickParse: Int32 get_MagicalAdjustmentConstant()
-FSharp.Compiler.QuickParse: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[System.String,System.Int32,System.Boolean]] GetCompleteIdentifierIsland(Boolean, System.String, Int32)
-FSharp.Compiler.QuickParse: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],System.String] GetPartialLongName(System.String, Int32)
-FSharp.Compiler.Range: range mkFirstLineOfFile(System.String)
-FSharp.Compiler.Range+Line: Int32 fromZ(Int32)
-FSharp.Compiler.Range+Line: Int32 toZ(Int32)
-FSharp.Compiler.Range+Pos: System.Tuple`2[System.Int32,System.Int32] toZ(pos)
-FSharp.Compiler.Range+Pos: pos fromZ(Int32, Int32)
-FSharp.Compiler.Range+Range: System.Collections.Generic.IEqualityComparer`1[FSharp.Compiler.Range+range] comparer
-FSharp.Compiler.Range+Range: System.Collections.Generic.IEqualityComparer`1[FSharp.Compiler.Range+range] get_comparer()
-FSharp.Compiler.Range+Range: System.Tuple`2[System.String,System.Tuple`2[System.Tuple`2[System.Int32,System.Int32],System.Tuple`2[System.Int32,System.Int32]]] toFileZ(range)
-FSharp.Compiler.Range+Range: System.Tuple`2[System.Tuple`2[System.Int32,System.Int32],System.Tuple`2[System.Int32,System.Int32]] toZ(range)
-FSharp.Compiler.Range+pos: Boolean Equals(System.Object)
-FSharp.Compiler.Range+pos: Int32 Column
-FSharp.Compiler.Range+pos: Int32 EncodingSize
-FSharp.Compiler.Range+pos: Int32 GetHashCode()
-FSharp.Compiler.Range+pos: Int32 Line
-FSharp.Compiler.Range+pos: Int32 get_Column()
-FSharp.Compiler.Range+pos: Int32 get_EncodingSize()
-FSharp.Compiler.Range+pos: Int32 get_Line()
-FSharp.Compiler.Range+pos: Int64 Encoding
-FSharp.Compiler.Range+pos: Int64 get_Encoding()
-FSharp.Compiler.Range+pos: System.String ToString()
-FSharp.Compiler.Range+pos: pos Decode(Int64)
-FSharp.Compiler.Range+range: Boolean Equals(System.Object)
-FSharp.Compiler.Range+range: Boolean IsSynthetic
-FSharp.Compiler.Range+range: Boolean get_IsSynthetic()
-FSharp.Compiler.Range+range: Int32 EndColumn
-FSharp.Compiler.Range+range: Int32 EndLine
-FSharp.Compiler.Range+range: Int32 FileIndex
-FSharp.Compiler.Range+range: Int32 GetHashCode()
-FSharp.Compiler.Range+range: Int32 StartColumn
-FSharp.Compiler.Range+range: Int32 StartLine
-FSharp.Compiler.Range+range: Int32 get_EndColumn()
-FSharp.Compiler.Range+range: Int32 get_EndLine()
-FSharp.Compiler.Range+range: Int32 get_FileIndex()
-FSharp.Compiler.Range+range: Int32 get_StartColumn()
-FSharp.Compiler.Range+range: Int32 get_StartLine()
-FSharp.Compiler.Range+range: System.String FileName
-FSharp.Compiler.Range+range: System.String ToShortString()
-FSharp.Compiler.Range+range: System.String ToString()
-FSharp.Compiler.Range+range: System.String get_FileName()
-FSharp.Compiler.Range+range: pos End
-FSharp.Compiler.Range+range: pos Start
-FSharp.Compiler.Range+range: pos get_End()
-FSharp.Compiler.Range+range: pos get_Start()
-FSharp.Compiler.Range+range: range EndRange
-FSharp.Compiler.Range+range: range MakeSynthetic()
-FSharp.Compiler.Range+range: range StartRange
-FSharp.Compiler.Range+range: range Zero
-FSharp.Compiler.Range+range: range get_EndRange()
-FSharp.Compiler.Range+range: range get_StartRange()
-FSharp.Compiler.Range+range: range get_Zero()
-FSharp.Compiler.Range: Boolean equals(range, range)
-FSharp.Compiler.Range: Boolean posEq(pos, pos)
-FSharp.Compiler.Range: Boolean posGeq(pos, pos)
-FSharp.Compiler.Range: Boolean posGt(pos, pos)
-FSharp.Compiler.Range: Boolean posLt(pos, pos)
-FSharp.Compiler.Range: Boolean rangeBeforePos(range, pos)
-FSharp.Compiler.Range: Boolean rangeContainsPos(range, pos)
-FSharp.Compiler.Range: Boolean rangeContainsRange(range, range)
-FSharp.Compiler.Range: FSharp.Compiler.Range+Line
-FSharp.Compiler.Range: FSharp.Compiler.Range+Pos
-FSharp.Compiler.Range: FSharp.Compiler.Range+Range
-FSharp.Compiler.Range: FSharp.Compiler.Range+pos
-FSharp.Compiler.Range: FSharp.Compiler.Range+range
-FSharp.Compiler.Range: Int32 fileIndexOfFile(System.String)
-FSharp.Compiler.Range: System.Collections.Generic.IComparer`1[FSharp.Compiler.Range+pos] get_posOrder()
-FSharp.Compiler.Range: System.Collections.Generic.IComparer`1[FSharp.Compiler.Range+pos] posOrder
-FSharp.Compiler.Range: System.Collections.Generic.IComparer`1[FSharp.Compiler.Range+range] get_rangeOrder()
-FSharp.Compiler.Range: System.Collections.Generic.IComparer`1[FSharp.Compiler.Range+range] rangeOrder
-FSharp.Compiler.Range: System.String commandLineArgsFileName
-FSharp.Compiler.Range: System.String fileOfFileIndex(Int32)
-FSharp.Compiler.Range: System.String get_commandLineArgsFileName()
-FSharp.Compiler.Range: System.String get_startupFileName()
-FSharp.Compiler.Range: System.String get_unknownFileName()
-FSharp.Compiler.Range: System.String startupFileName
-FSharp.Compiler.Range: System.String stringOfPos(pos)
-FSharp.Compiler.Range: System.String stringOfRange(range)
-FSharp.Compiler.Range: System.String unknownFileName
-FSharp.Compiler.Range: Void outputPos(System.IO.TextWriter, pos)
-FSharp.Compiler.Range: Void outputRange(System.IO.TextWriter, range)
-FSharp.Compiler.Range: pos get_pos0()
-FSharp.Compiler.Range: pos mkPos(Int32, Int32)
-FSharp.Compiler.Range: pos pos0
-FSharp.Compiler.Range: range get_range0()
-FSharp.Compiler.Range: range get_rangeCmdArgs()
-FSharp.Compiler.Range: range get_rangeStartup()
-FSharp.Compiler.Range: range mkFileIndexRange(Int32, pos, pos)
-FSharp.Compiler.Range: range mkRange(System.String, pos, pos)
-FSharp.Compiler.Range: range range0
-FSharp.Compiler.Range: range rangeCmdArgs
-FSharp.Compiler.Range: range rangeN(System.String, Int32)
-FSharp.Compiler.Range: range rangeStartup
-FSharp.Compiler.Range: range trimRangeToLine(range)
-FSharp.Compiler.Range: range unionRanges(range, range)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean Equals(ResolutionEnvironment)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean Equals(System.Object)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean IsCompilationAndEvaluation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean IsEditingOrCompilation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean get_IsCompilationAndEvaluation()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean get_IsEditingOrCompilation()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean get_isEditing()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Boolean isEditing
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 CompareTo(ResolutionEnvironment)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 CompareTo(System.Object)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 GetHashCode()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 Tag
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: Int32 get_Tag()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation: System.String ToString()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+Tags: Int32 CompilationAndEvaluation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+Tags: Int32 EditingOrCompilation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean Equals(ResolutionEnvironment)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean Equals(System.Object)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean IsCompilationAndEvaluation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean IsEditingOrCompilation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean get_IsCompilationAndEvaluation()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Boolean get_IsEditingOrCompilation()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+EditingOrCompilation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: FSharp.Compiler.ReferenceResolver+ResolutionEnvironment+Tags
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 CompareTo(ResolutionEnvironment)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 CompareTo(System.Object)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 GetHashCode()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 Tag
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: Int32 get_Tag()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: ResolutionEnvironment CompilationAndEvaluation
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: ResolutionEnvironment NewEditingOrCompilation(Boolean)
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: ResolutionEnvironment get_CompilationAndEvaluation()
-FSharp.Compiler.ReferenceResolver+ResolutionEnvironment: System.String ToString()
-FSharp.Compiler.ReferenceResolver+ResolvedFile: Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`2[System.String,System.String],System.String] get_prepareToolTip()
-FSharp.Compiler.ReferenceResolver+ResolvedFile: Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`2[System.String,System.String],System.String] prepareToolTip
-FSharp.Compiler.ReferenceResolver+ResolvedFile: System.String ToString()
-FSharp.Compiler.ReferenceResolver+ResolvedFile: System.String baggage
-FSharp.Compiler.ReferenceResolver+ResolvedFile: System.String get_baggage()
-FSharp.Compiler.ReferenceResolver+ResolvedFile: System.String get_itemSpec()
-FSharp.Compiler.ReferenceResolver+ResolvedFile: System.String itemSpec
-FSharp.Compiler.ReferenceResolver+ResolvedFile: Void .ctor(System.String, Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`2[System.String,System.String],System.String], System.String)
-FSharp.Compiler.ReferenceResolver+Resolver: ResolvedFile[] Resolve(ResolutionEnvironment, System.Tuple`2[System.String,System.String][], System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], System.String, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], System.String, Microsoft.FSharp.Core.FSharpFunc`2[System.String,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpFunc`2[System.Boolean,Microsoft.FSharp.Core.FSharpFunc`2[System.String,Microsoft.FSharp.Core.FSharpFunc`2[System.String,Microsoft.FSharp.Core.Unit]]])
-FSharp.Compiler.ReferenceResolver+Resolver: System.String DotNetFrameworkReferenceAssembliesRootDirectory
-FSharp.Compiler.ReferenceResolver+Resolver: System.String HighestInstalledNetFrameworkVersion()
-FSharp.Compiler.ReferenceResolver+Resolver: System.String get_DotNetFrameworkReferenceAssembliesRootDirectory()
-FSharp.Compiler.ReferenceResolver: FSharp.Compiler.ReferenceResolver+ResolutionEnvironment
-FSharp.Compiler.ReferenceResolver: FSharp.Compiler.ReferenceResolver+ResolvedFile
-FSharp.Compiler.ReferenceResolver: FSharp.Compiler.ReferenceResolver+Resolver
-FSharp.Compiler.SourceCodeServices.AssemblyContentProvider: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AssemblySymbol] getAssemblyContent(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SourceCodeServices.IAssemblyContentCache,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AssemblySymbol]],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AssemblySymbol]], FSharp.Compiler.SourceCodeServices.AssemblyContentType, Microsoft.FSharp.Core.FSharpOption`1[System.String], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpAssembly])
-FSharp.Compiler.SourceCodeServices.AssemblyContentProvider: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AssemblySymbol] getAssemblySignatureContent(FSharp.Compiler.SourceCodeServices.AssemblyContentType, FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType+Tags: Int32 Full
-FSharp.Compiler.SourceCodeServices.AssemblyContentType+Tags: Int32 Public
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean Equals(FSharp.Compiler.SourceCodeServices.AssemblyContentType)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean IsFull
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean IsPublic
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean get_IsFull()
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Boolean get_IsPublic()
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: FSharp.Compiler.SourceCodeServices.AssemblyContentType Full
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: FSharp.Compiler.SourceCodeServices.AssemblyContentType Public
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: FSharp.Compiler.SourceCodeServices.AssemblyContentType get_Full()
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: FSharp.Compiler.SourceCodeServices.AssemblyContentType get_Public()
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: FSharp.Compiler.SourceCodeServices.AssemblyContentType+Tags
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.AssemblyContentType)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AssemblyContentType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: FSharp.Compiler.SourceCodeServices.FSharpSymbol Symbol
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: FSharp.Compiler.SourceCodeServices.FSharpSymbol get_Symbol()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol FSharpUnresolvedSymbol
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol get_FSharpUnresolvedSymbol()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SourceCodeServices.LookupType,FSharp.Compiler.SourceCodeServices.EntityKind] Kind
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SourceCodeServices.LookupType,FSharp.Compiler.SourceCodeServices.EntityKind] get_Kind()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] AutoOpenParent
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] Namespace
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] NearestRequireQualifiedAccessParent
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] TopRequireQualifiedAccessParent
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] get_AutoOpenParent()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] get_Namespace()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] get_NearestRequireQualifiedAccessParent()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] get_TopRequireQualifiedAccessParent()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: System.String FullName
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: System.String[] CleanedIdents
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: System.String[] get_CleanedIdents()
-FSharp.Compiler.SourceCodeServices.AssemblySymbol: Void .ctor(System.String, System.String[], Microsoft.FSharp.Core.FSharpOption`1[System.String[]], Microsoft.FSharp.Core.FSharpOption`1[System.String[]], Microsoft.FSharp.Core.FSharpOption`1[System.String[]], Microsoft.FSharp.Core.FSharpOption`1[System.String[]], FSharp.Compiler.SourceCodeServices.FSharpSymbol, Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SourceCodeServices.LookupType,FSharp.Compiler.SourceCodeServices.EntityKind], FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitBinding(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynBinding,Microsoft.FSharp.Core.FSharpOption`1[T]], SynBinding)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitComponentInfo(SynComponentInfo)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitExpr(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep], Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynExpr,Microsoft.FSharp.Core.FSharpOption`1[T]], Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynExpr,Microsoft.FSharp.Core.FSharpOption`1[T]], SynExpr)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitHashDirective(range)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitImplicitInherit(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynExpr,Microsoft.FSharp.Core.FSharpOption`1[T]], SynType, SynExpr, range)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitInheritSynMemberDefn(SynComponentInfo, SynTypeDefnKind, SynType, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn], range)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitInterfaceSynMemberDefnType(SynType)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitLetOrUse(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep], Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynBinding,Microsoft.FSharp.Core.FSharpOption`1[T]], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding], range)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitMatchClause(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynMatchClause,Microsoft.FSharp.Core.FSharpOption`1[T]], SynMatchClause)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitModuleDecl(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynModuleDecl,Microsoft.FSharp.Core.FSharpOption`1[T]], SynModuleDecl)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitModuleOrNamespace(SynModuleOrNamespace)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitPat(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynPat,Microsoft.FSharp.Core.FSharpOption`1[T]], SynPat)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitRecordField(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+LongIdentWithDots])
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitSimplePats(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynSimplePat])
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitType(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+SynType,Microsoft.FSharp.Core.FSharpOption`1[T]], SynType)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] VisitTypeAbbrev(SynType, range)
-FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]: Void .ctor()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: SynBinding Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: SynBinding get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: SynExpr Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: SynExpr get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: SynMatchClause Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: SynMatchClause get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: SynMemberDefn Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: SynMemberDefn get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: SynModuleDecl Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: SynModuleDecl get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: SynModuleOrNamespace Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: SynModuleOrNamespace get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 Binding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 Expr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 MatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 MemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 ModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags: Int32 TypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: SynTypeDefn Item
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: SynTypeDefn get_Item()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsBinding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsExpr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsMemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean IsTypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsBinding()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsExpr()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsMemberDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Boolean get_IsTypeDefn()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Binding
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Expr
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MatchClause
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+MemberDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Module
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+ModuleOrNamespace
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+Tags
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep+TypeDefn
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Int32 Tag
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: System.String ToString()
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewBinding(SynBinding)
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewExpr(SynExpr)
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewMatchClause(SynMatchClause)
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewMemberDefn(SynMemberDefn)
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewModule(SynModuleDecl)
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewModuleOrNamespace(SynModuleOrNamespace)
-FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep: TraverseStep NewTypeDefn(SynTypeDefn)
-FSharp.Compiler.SourceCodeServices.AstTraversal: Boolean rangeContainsPosEdgesExclusive(range, pos)
-FSharp.Compiler.SourceCodeServices.AstTraversal: Boolean rangeContainsPosLeftEdgeExclusiveAndRightEdgeInclusive(range, pos)
-FSharp.Compiler.SourceCodeServices.AstTraversal: Boolean rangeContainsPosLeftEdgeInclusive(range, pos)
-FSharp.Compiler.SourceCodeServices.AstTraversal: FSharp.Compiler.SourceCodeServices.AstTraversal+AstVisitorBase`1[T]
-FSharp.Compiler.SourceCodeServices.AstTraversal: FSharp.Compiler.SourceCodeServices.AstTraversal+TraverseStep
-FSharp.Compiler.SourceCodeServices.AstTraversal: Microsoft.FSharp.Core.FSharpOption`1[T] Traverse[T](pos, ParsedInput, AstVisitorBase`1)
-FSharp.Compiler.SourceCodeServices.AstTraversal: Microsoft.FSharp.Core.FSharpOption`1[a] pick[a](pos, range, System.Object, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Core.FSharpOption`1[a]]]])
-FSharp.Compiler.SourceCodeServices.AstTraversal: System.Tuple`2[b,Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,c]] dive[a,b,c](a, b, Microsoft.FSharp.Core.FSharpFunc`2[a,c])
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr] |AddressOf|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr] |Quote|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] |Value|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] |BaseValue|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] |DefaultValue|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] |ThisValue|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] |WitnessArg|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |AddressSet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |Sequential|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |TryFinally|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |WhileLoop|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpType]] |UnionCaseTag|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpExpr,Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue],FSharp.Compiler.SourceCodeServices.FSharpExpr]]]] |DecisionTree|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |Lambda|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |ValueSet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |Coerce|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |NewDelegate|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |TypeTest|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |NewAnonRecord|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |NewArray|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |NewRecord|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |NewTuple|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter],FSharp.Compiler.SourceCodeServices.FSharpExpr]] |TypeLambda|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,FSharp.Compiler.SourceCodeServices.FSharpExpr]],FSharp.Compiler.SourceCodeServices.FSharpExpr]] |LetRec|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Int32,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |DecisionTreeSuccess|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Object,FSharp.Compiler.SourceCodeServices.FSharpType]] |Const|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpExpr]] |Let|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |IfThenElse|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpUnionCase]] |UnionCaseTest|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpType,System.Int32]] |AnonRecordGet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpExpr,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |Application|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |NewObject|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpUnionCase,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |NewUnionCase|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpType,System.Int32,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |TupleGet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpField]] |FSharpFieldGet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpType,System.String]] |ILFieldGet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[System.String,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |ILAsm|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpExpr,System.Boolean]] |FastIntegerForLoop|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpUnionCase,FSharp.Compiler.SourceCodeServices.FSharpField]] |UnionCaseGet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpExpr,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride],Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride]]]]] |ObjectExpr|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpField,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |FSharpFieldSet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`4[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpType,System.String,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |ILFieldSet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |TryWith|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[FSharp.Compiler.SourceCodeServices.FSharpExpr,FSharp.Compiler.SourceCodeServices.FSharpType,FSharp.Compiler.SourceCodeServices.FSharpUnionCase,FSharp.Compiler.SourceCodeServices.FSharpField,FSharp.Compiler.SourceCodeServices.FSharpExpr]] |UnionCaseSet|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |Call|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`6[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],System.String,FSharp.Compiler.SyntaxTree+MemberFlags,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |TraitCall|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.BasicPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`6[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr],Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr]]] |CallWithWitnesses|_|(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.CompilerDiagnostics: System.String getErrorMessage(FSharp.Compiler.SourceCodeServices.DiagnosticKind)
-FSharp.Compiler.SourceCodeServices.CompilerEnvironment: Microsoft.FSharp.Core.FSharpOption`1[System.String] BinFolderOfDefaultFSharpCompiler(Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.CompilerEnvironmentModule: Boolean IsCheckerSupportedSubcategory(System.String)
-FSharp.Compiler.SourceCodeServices.CompilerEnvironmentModule: Microsoft.FSharp.Collections.FSharpList`1[System.String] DefaultReferencesForOrphanSources(Boolean)
-FSharp.Compiler.SourceCodeServices.CompilerEnvironmentModule: Microsoft.FSharp.Collections.FSharpList`1[System.String] GetCompilationDefinesForEditing(FSharp.Compiler.SourceCodeServices.FSharpParsingOptions)
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean Equals(FSharp.Compiler.SourceCodeServices.CompletionContext)
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsAttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsInherit
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsInvalid
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsOpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsPatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsRangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsAttributeApplication()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsInherit()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsInvalid()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsOpenDeclaration()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsParameterList()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsPatternType()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsRangeOperator()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: FSharp.Compiler.SourceCodeServices.InheritanceContext Item1
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: FSharp.Compiler.SourceCodeServices.InheritanceContext get_Item1()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Int32 Tag
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: System.String ToString()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]] Item2
-FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]] get_Item2()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean Equals(FSharp.Compiler.SourceCodeServices.CompletionContext)
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsAttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsInherit
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsInvalid
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsOpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsPatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsRangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsAttributeApplication()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsInherit()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsInvalid()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsOpenDeclaration()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsParameterList()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsPatternType()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsRangeOperator()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean get_isOpenType()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Boolean isOpenType
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Int32 Tag
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration: System.String ToString()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean Equals(FSharp.Compiler.SourceCodeServices.CompletionContext)
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsAttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsInherit
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsInvalid
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsOpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsPatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsRangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsAttributeApplication()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsInherit()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsInvalid()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsOpenDeclaration()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsParameterList()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsPatternType()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsRangeOperator()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Int32 Tag
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: System.Collections.Generic.HashSet`1[System.String] Item2
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: System.Collections.Generic.HashSet`1[System.String] get_Item2()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: System.String ToString()
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: pos Item1
-FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList: pos get_Item1()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean Equals(FSharp.Compiler.SourceCodeServices.CompletionContext)
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsAttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsInherit
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsInvalid
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsOpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsPatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsRangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsAttributeApplication()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsInherit()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsInvalid()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsOpenDeclaration()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsParameterList()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsPatternType()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsRangeOperator()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: FSharp.Compiler.SourceCodeServices.RecordContext Item
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: FSharp.Compiler.SourceCodeServices.RecordContext get_Item()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Int32 Tag
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField: System.String ToString()
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 AttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 Inherit
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 Invalid
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 OpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 ParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 PatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 RangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext+Tags: Int32 RecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean Equals(FSharp.Compiler.SourceCodeServices.CompletionContext)
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsAttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsInherit
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsInvalid
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsOpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsPatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsRangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsAttributeApplication()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsInherit()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsInvalid()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsOpenDeclaration()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsParameterList()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsPatternType()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsRangeOperator()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext AttributeApplication
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext Invalid
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext NewInherit(FSharp.Compiler.SourceCodeServices.InheritanceContext, System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]])
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext NewOpenDeclaration(Boolean)
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext NewParameterList(pos, System.Collections.Generic.HashSet`1[System.String])
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext NewRecordField(FSharp.Compiler.SourceCodeServices.RecordContext)
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext PatternType
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext RangeOperator
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext get_AttributeApplication()
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext get_Invalid()
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext get_PatternType()
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext get_RangeOperator()
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext+Inherit
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext+OpenDeclaration
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext+ParameterList
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext+RecordField
-FSharp.Compiler.SourceCodeServices.CompletionContext: FSharp.Compiler.SourceCodeServices.CompletionContext+Tags
-FSharp.Compiler.SourceCodeServices.CompletionContext: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.CompletionContext: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.CompletionContext: Int32 Tag
-FSharp.Compiler.SourceCodeServices.CompletionContext: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.CompletionContext: System.String ToString()
-FSharp.Compiler.SourceCodeServices.DebuggerEnvironment: System.Guid GetLanguageID()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean Equals(FSharp.Compiler.SourceCodeServices.DiagnosticKind)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean IsAddIndexerDot
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean IsReplaceWithSuggestion
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean get_IsAddIndexerDot()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Boolean get_IsReplaceWithSuggestion()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.DiagnosticKind)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 Tag
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: System.String ToString()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: System.String get_suggestion()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion: System.String suggestion
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+Tags: Int32 AddIndexerDot
-FSharp.Compiler.SourceCodeServices.DiagnosticKind+Tags: Int32 ReplaceWithSuggestion
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.DiagnosticKind)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean IsAddIndexerDot
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean IsReplaceWithSuggestion
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean get_IsAddIndexerDot()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Boolean get_IsReplaceWithSuggestion()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: FSharp.Compiler.SourceCodeServices.DiagnosticKind AddIndexerDot
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: FSharp.Compiler.SourceCodeServices.DiagnosticKind NewReplaceWithSuggestion(System.String)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: FSharp.Compiler.SourceCodeServices.DiagnosticKind get_AddIndexerDot()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: FSharp.Compiler.SourceCodeServices.DiagnosticKind+ReplaceWithSuggestion
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: FSharp.Compiler.SourceCodeServices.DiagnosticKind+Tags
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.DiagnosticKind)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.DiagnosticKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.Entity: Boolean Equals(FSharp.Compiler.SourceCodeServices.Entity)
-FSharp.Compiler.SourceCodeServices.Entity: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.Entity: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Entity: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.Entity)
-FSharp.Compiler.SourceCodeServices.Entity: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.Entity: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.Entity: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.Entity: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Entity: Microsoft.FSharp.Core.FSharpOption`1[System.String] Namespace
-FSharp.Compiler.SourceCodeServices.Entity: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_Namespace()
-FSharp.Compiler.SourceCodeServices.Entity: System.String FullRelativeName
-FSharp.Compiler.SourceCodeServices.Entity: System.String LastIdent
-FSharp.Compiler.SourceCodeServices.Entity: System.String Name
-FSharp.Compiler.SourceCodeServices.Entity: System.String Qualifier
-FSharp.Compiler.SourceCodeServices.Entity: System.String ToString()
-FSharp.Compiler.SourceCodeServices.Entity: System.String get_FullRelativeName()
-FSharp.Compiler.SourceCodeServices.Entity: System.String get_LastIdent()
-FSharp.Compiler.SourceCodeServices.Entity: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.Entity: System.String get_Qualifier()
-FSharp.Compiler.SourceCodeServices.Entity: Void .ctor(System.String, System.String, Microsoft.FSharp.Core.FSharpOption`1[System.String], System.String, System.String)
-FSharp.Compiler.SourceCodeServices.EntityCache: T Locking[T](Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SourceCodeServices.IAssemblyContentCache,T])
-FSharp.Compiler.SourceCodeServices.EntityCache: Void .ctor()
-FSharp.Compiler.SourceCodeServices.EntityCache: Void Clear()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean Equals(FSharp.Compiler.SourceCodeServices.EntityKind)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean IsAttribute
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean IsFunctionOrValue
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean IsType
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean get_IsAttribute()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean get_IsFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean get_isActivePattern()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Boolean isActivePattern
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.EntityKind)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 Tag
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue: System.String ToString()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean Equals(FSharp.Compiler.SourceCodeServices.EntityKind)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean IsAttribute
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean IsFunctionOrValue
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean IsType
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean get_IsAttribute()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean get_IsFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: FSharp.Compiler.SourceCodeServices.ModuleKind Item
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: FSharp.Compiler.SourceCodeServices.ModuleKind get_Item()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.EntityKind)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 Tag
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.EntityKind+Module: System.String ToString()
-FSharp.Compiler.SourceCodeServices.EntityKind+Tags: Int32 Attribute
-FSharp.Compiler.SourceCodeServices.EntityKind+Tags: Int32 FunctionOrValue
-FSharp.Compiler.SourceCodeServices.EntityKind+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.EntityKind+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.EntityKind)
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean IsAttribute
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean IsFunctionOrValue
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean IsType
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean get_IsAttribute()
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean get_IsFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.EntityKind: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind Attribute
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind NewFunctionOrValue(Boolean)
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind NewModule(FSharp.Compiler.SourceCodeServices.ModuleKind)
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind Type
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind get_Attribute()
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind get_Type()
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind+FunctionOrValue
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind+Module
-FSharp.Compiler.SourceCodeServices.EntityKind: FSharp.Compiler.SourceCodeServices.EntityKind+Tags
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.EntityKind)
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.EntityKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.EntityKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ErrorResolutionHints: System.Collections.Generic.IEnumerable`1[System.String] getSuggestedNames(Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.FSharpFunc`2[System.String,Microsoft.FSharp.Core.Unit],Microsoft.FSharp.Core.Unit], System.String)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean Equals(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean IsArray
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean IsPointer
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean IsType
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean IsTypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean get_IsArray()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean get_IsPointer()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Boolean get_IsTypeVar()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: FSharp.Compiler.SourceCodeServices.ExternalType get_inner()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: FSharp.Compiler.SourceCodeServices.ExternalType inner
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ExternalType+Array: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean Equals(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean IsArray
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean IsPointer
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean IsType
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean IsTypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean get_IsArray()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean get_IsPointer()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Boolean get_IsTypeVar()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: FSharp.Compiler.SourceCodeServices.ExternalType get_inner()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: FSharp.Compiler.SourceCodeServices.ExternalType inner
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ExternalType+Pointer: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ExternalType+Tags: Int32 Array
-FSharp.Compiler.SourceCodeServices.ExternalType+Tags: Int32 Pointer
-FSharp.Compiler.SourceCodeServices.ExternalType+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.ExternalType+Tags: Int32 TypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean Equals(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean IsArray
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean IsPointer
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean IsType
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean IsTypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean get_IsArray()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean get_IsPointer()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Boolean get_IsTypeVar()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ExternalType] genericArgs
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ExternalType] get_genericArgs()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: System.String fullName
-FSharp.Compiler.SourceCodeServices.ExternalType+Type: System.String get_fullName()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean Equals(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean IsArray
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean IsPointer
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean IsType
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean IsTypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean get_IsArray()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean get_IsPointer()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Boolean get_IsTypeVar()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: System.String get_typeName()
-FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar: System.String typeName
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean Equals(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean IsArray
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean IsPointer
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean IsType
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean IsTypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean get_IsArray()
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean get_IsPointer()
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.ExternalType: Boolean get_IsTypeVar()
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType NewArray(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType NewPointer(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType NewType(System.String, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ExternalType])
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType NewTypeVar(System.String)
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType+Array
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType+Pointer
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType+Tags
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType+Type
-FSharp.Compiler.SourceCodeServices.ExternalType: FSharp.Compiler.SourceCodeServices.ExternalType+TypeVar
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ExternalType: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ExternalType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Boolean IsInArg
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Boolean IsOptionalArg
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Boolean IsOutArg
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Boolean get_IsInArg()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Boolean get_IsOptionalArg()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Boolean get_IsOutArg()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: FSharp.Compiler.SourceCodeServices.FSharpType Type
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: FSharp.Compiler.SourceCodeServices.FSharpType get_Type()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Microsoft.FSharp.Core.FSharpOption`1[System.String] Name
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: FSharp.Compiler.SourceCodeServices.FSharpType AbstractReturnType
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: FSharp.Compiler.SourceCodeServices.FSharpType DeclaringType
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: FSharp.Compiler.SourceCodeServices.FSharpType get_AbstractReturnType()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: FSharp.Compiler.SourceCodeServices.FSharpType get_DeclaringType()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] DeclaringTypeGenericParameters
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] MethodGenericParameters
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] get_DeclaringTypeGenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] get_MethodGenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter]] AbstractArguments
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAbstractParameter]] get_AbstractArguments()
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean IsInternal
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean IsPrivate
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean IsProtected
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean IsPublic
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean get_IsInternal()
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean get_IsPrivate()
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean get_IsProtected()
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: Boolean get_IsPublic()
-FSharp.Compiler.SourceCodeServices.FSharpAccessibility: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup Group
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup get_Group()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Int32 Index
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Int32 get_Index()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.Collections.Generic.IList`1[System.String] ElaboratedXmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.Collections.Generic.IList`1[System.String] XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.Collections.Generic.IList`1[System.String] get_ElaboratedXmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.Collections.Generic.IList`1[System.String] get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String XmlDocSig
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: System.String get_XmlDocSig()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: Boolean IsTotal
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: Boolean get_IsTotal()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: FSharp.Compiler.SourceCodeServices.FSharpType OverallType
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: FSharp.Compiler.SourceCodeServices.FSharpType get_OverallType()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] DeclaringEntity
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_DeclaringEntity()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: Microsoft.FSharp.Core.FSharpOption`1[System.String] Name
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: System.Collections.Generic.IList`1[System.String] Names
-FSharp.Compiler.SourceCodeServices.FSharpActivePatternGroup: System.Collections.Generic.IList`1[System.String] get_Names()
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: Microsoft.FSharp.Collections.FSharpList`1[System.String] EnclosingCompiledTypeNames
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_EnclosingCompiledTypeNames()
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: System.String CompiledName
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: System.String get_CompiledName()
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: System.String[] SortedFieldNames
-FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails: System.String[] get_SortedFieldNames()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: Boolean IsProviderGenerated
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: Boolean get_IsProviderGenerated()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature Contents
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature get_Contents()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: Microsoft.FSharp.Core.FSharpOption`1[System.String] FileName
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_FileName()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String CodeLocation
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String QualifiedName
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String SimpleName
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String get_CodeLocation()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String get_QualifiedName()
-FSharp.Compiler.SourceCodeServices.FSharpAssembly: System.String get_SimpleName()
-FSharp.Compiler.SourceCodeServices.FSharpAssemblyContents: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents] ImplementationFiles
-FSharp.Compiler.SourceCodeServices.FSharpAssemblyContents: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents] get_ImplementationFiles()
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] FindEntityByPath(Microsoft.FSharp.Collections.FSharpList`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] TryGetEntities()
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] Entities
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_Entities()
-FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: Boolean IsUnresolved
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: Boolean get_IsUnresolved()
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: FSharp.Compiler.SourceCodeServices.FSharpEntity AttributeType
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: FSharp.Compiler.SourceCodeServices.FSharpEntity get_AttributeType()
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: System.Collections.Generic.IList`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,System.Object]] ConstructorArguments
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: System.Collections.Generic.IList`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpType,System.Object]] get_ConstructorArguments()
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: System.Collections.Generic.IList`1[System.Tuple`4[FSharp.Compiler.SourceCodeServices.FSharpType,System.String,System.Boolean,System.Object]] NamedArguments
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: System.Collections.Generic.IList`1[System.Tuple`4[FSharp.Compiler.SourceCodeServices.FSharpType,System.String,System.Boolean,System.Object]] get_NamedArguments()
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: System.String Format(FSharp.Compiler.SourceCodeServices.FSharpDisplayContext)
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: range Range
-FSharp.Compiler.SourceCodeServices.FSharpAttribute: range get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean IsAborted
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean IsSucceeded
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean get_IsAborted()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Boolean get_IsSucceeded()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults Item
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Tags: Int32 Aborted
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Tags: Int32 Succeeded
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean IsAborted
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean IsSucceeded
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean get_IsAborted()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Boolean get_IsSucceeded()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer Aborted
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer NewSucceeded(FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer get_Aborted()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Succeeded
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer+Tags
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Boolean HasFullTypeCheckInfo
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Boolean IsRelativeNameResolvableFromSymbol(pos, Microsoft.FSharp.Collections.FSharpList`1[System.String], FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Boolean get_HasFullTypeCheckInfo()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature PartialAssemblySignature
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature get_PartialAssemblySignature()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo GetDeclarationListInfo(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults], Int32, System.String, FSharp.Compiler.PartialLongName, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AssemblySymbol]]])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[] Errors
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[] get_Errors()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult GetDeclarationLocation(Int32, Int32, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpMethodGroup GetMethods(Int32, Int32, System.String, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[System.String]])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration[] OpenDeclarations
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration[] get_OpenDeclarations()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpProjectContext ProjectContext
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpProjectContext get_ProjectContext()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpSymbolUse[] GetUsesOfSymbolInFile(FSharp.Compiler.SourceCodeServices.FSharpSymbol, Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout] GetStructuredToolTipText(Int32, Int32, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], Int32)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String] GetToolTipText(Int32, Int32, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], Int32)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpSymbolUse]] GetDeclarationListSymbols(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults], Int32, System.String, FSharp.Compiler.PartialLongName, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.Unit,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.AssemblySymbol]]])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpDisplayContext] GetDisplayContextForPos(pos)
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents] ImplementationFile
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents] get_ImplementationFile()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpSymbolUse] GetSymbolUseAtLocation(Int32, Int32, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpSymbolUse]] GetMethodsAsSymbols(Int32, Int32, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: Microsoft.FSharp.Core.FSharpOption`1[System.String] GetF1Keyword(Int32, Int32, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.FSharpSymbolUse] GetAllUsesOfAllSymbolsInFile(Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: System.String[] DependencyFiles
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: System.String[] get_DependencyFiles()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: System.Tuple`2[FSharp.Compiler.Range+range,System.Int32][] GetFormatSpecifierLocationsAndArity()
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: System.ValueTuple`2[FSharp.Compiler.Range+range,FSharp.Compiler.SourceCodeServices.SemanticClassificationType][] GetSemanticClassification(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range])
-FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults: range[] GetFormatSpecifierLocations()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: Boolean HasCriticalErrors
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: Boolean get_HasCriticalErrors()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblyContents AssemblyContents
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblyContents GetOptimizedAssemblyContents()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblyContents get_AssemblyContents()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature AssemblySignature
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpAssemblySignature get_AssemblySignature()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[] Errors
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[] get_Errors()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpProjectContext ProjectContext
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpProjectContext get_ProjectContext()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpSymbolUse[] GetAllUsesOfAllSymbols(Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: FSharp.Compiler.SourceCodeServices.FSharpSymbolUse[] GetUsesOfSymbol(FSharp.Compiler.SourceCodeServices.FSharpSymbol, Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: System.String[] DependencyFiles
-FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults: System.String[] get_DependencyFiles()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Boolean ImplicitlyStartBackgroundWork
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Boolean get_ImplicitlyStartBackgroundWork()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: FSharp.Compiler.SourceCodeServices.FSharpChecker Create(Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.ReferenceResolver+Resolver], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`2[System.String,System.DateTime],Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[System.Object,System.IntPtr,System.Int32]]]], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: FSharp.Compiler.SourceCodeServices.FSharpChecker Instance
-FSharp.Compiler.SourceCodeServices.FSharpChecker: FSharp.Compiler.SourceCodeServices.FSharpChecker get_Instance()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: FSharp.Compiler.SourceCodeServices.FSharpProjectOptions GetProjectOptionsFromCommandLineArgs(System.String, System.String[], Microsoft.FSharp.Core.FSharpOption`1[System.DateTime], Microsoft.FSharp.Core.FSharpOption`1[System.Object])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: FSharp.Compiler.SourceCodeServices.FSharpTokenInfo[][] TokenizeFile(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 CurrentQueueLength
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 GlobalForegroundParseCountStatistic
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 GlobalForegroundTypeCheckCountStatistic
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 MaxMemory
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 PauseBeforeBackgroundWork
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 get_CurrentQueueLength()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 get_GlobalForegroundParseCountStatistic()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 get_GlobalForegroundTypeCheckCountStatistic()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 get_MaxMemory()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Int32 get_PauseBeforeBackgroundWork()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer] CheckFileInProject(FSharp.Compiler.SourceCodeServices.FSharpParseFileResults, System.String, Int32, FSharp.Compiler.Text.ISourceText, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpCheckProjectResults] ParseAndCheckProject(FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults] GetBackgroundParseResultsForFileInProject(System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults] ParseFile(System.String, FSharp.Compiler.Text.ISourceText, FSharp.Compiler.SourceCodeServices.FSharpParsingOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults] ParseFileInProject(System.String, System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults] ParseFileNoCache(System.String, FSharp.Compiler.Text.ISourceText, FSharp.Compiler.SourceCodeServices.FSharpParsingOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer]] CheckFileInProjectAllowingStaleCachedResults(FSharp.Compiler.SourceCodeServices.FSharpParseFileResults, System.String, Int32, System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Core.Unit] NotifyProjectCleaned(FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Collections.Generic.IEnumerable`1[FSharp.Compiler.Range+range]] FindBackgroundReferencesInFile(System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, FSharp.Compiler.SourceCodeServices.FSharpSymbol, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.Range+range,FSharp.Compiler.Range+range][]] MatchBraces(System.String, FSharp.Compiler.Text.ISourceText, FSharp.Compiler.SourceCodeServices.FSharpParsingOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.Range+range,FSharp.Compiler.Range+range][]] MatchBraces(System.String, System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[],System.Int32]] Compile(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedInput], System.String, System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[],System.Int32]] Compile(System.String[], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults,FSharp.Compiler.SourceCodeServices.FSharpCheckFileAnswer]] ParseAndCheckFileInProject(System.String, Int32, FSharp.Compiler.Text.ISourceText, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults,FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults]] GetBackgroundCheckResultsForFileInProject(System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpProjectOptions,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic]]] GetProjectOptionsFromScript(System.String, FSharp.Compiler.Text.ISourceText, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.DateTime], Microsoft.FSharp.Core.FSharpOption`1[System.String[]], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.Object], Microsoft.FSharp.Core.FSharpOption`1[System.Int64], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[],System.Int32,Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.Assembly]]] CompileToDynamicAssembly(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedInput], System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.IO.TextWriter,System.IO.TextWriter]], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[],System.Int32,Microsoft.FSharp.Core.FSharpOption`1[System.Reflection.Assembly]]] CompileToDynamicAssembly(System.String[], Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.IO.TextWriter,System.IO.TextWriter]], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.FSharpAsync`1[System.ValueTuple`2[FSharp.Compiler.Range+range,FSharp.Compiler.SourceCodeServices.SemanticClassificationType][]] GetBackgroundSemanticClassificationForFile(System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[Microsoft.FSharp.Core.Unit],Microsoft.FSharp.Core.Unit] MaxMemoryReached
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[Microsoft.FSharp.Core.Unit],Microsoft.FSharp.Core.Unit] get_MaxMemoryReached()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] BeforeBackgroundFileCheck
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] FileChecked
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] FileParsed
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] ProjectChecked
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] get_BeforeBackgroundFileCheck()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] get_FileChecked()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] get_FileParsed()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Control.IEvent`2[Microsoft.FSharp.Control.FSharpHandler`1[System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]],System.Tuple`2[System.String,Microsoft.FSharp.Core.FSharpOption`1[System.Object]]] get_ProjectChecked()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpParseFileResults,FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults,System.Int32]] TryGetRecentCheckResultsForFile(System.String, FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Text.ISourceText], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpParsingOptions,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic]] GetParsingOptionsFromCommandLineArgs(Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpParsingOptions,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic]] GetParsingOptionsFromCommandLineArgs(Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.Boolean])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpParsingOptions,Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpDiagnostic]] GetParsingOptionsFromProjectOptions(FSharp.Compiler.SourceCodeServices.FSharpProjectOptions)
-FSharp.Compiler.SourceCodeServices.FSharpChecker: System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpTokenInfo[],FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState] TokenizeLine(System.String, FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState)
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void CheckProjectInBackground(FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void ClearCache(System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.FSharpProjectOptions], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void ClearLanguageServiceRootCachesAndCollectAndFinalizeAllTransients()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void InvalidateAll()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void InvalidateConfiguration(FSharp.Compiler.SourceCodeServices.FSharpProjectOptions, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void StopBackgroundCompile()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void WaitForBackgroundCompile()
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void set_ImplicitlyStartBackgroundWork(Boolean)
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void set_MaxMemory(Int32)
-FSharp.Compiler.SourceCodeServices.FSharpChecker: Void set_PauseBeforeBackgroundWork(Int32)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsArgument
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsCustomOperation
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsOther
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsArgument()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsCustomOperation()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsOther()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean get_isExtension()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Boolean isExtension
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 Argument
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 CustomOperation
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 Event
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 Field
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 Method
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 Other
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags: Int32 Property
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsArgument
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsCustomOperation
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsOther
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsArgument()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsCustomOperation()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsOther()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind Argument
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind CustomOperation
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind Event
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind Field
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind NewMethod(Boolean)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind Other
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind Property
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_Argument()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_CustomOperation()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_Event()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_Field()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_Other()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_Property()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Method
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind+Tags
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: Boolean IsError
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: Boolean IsForType
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: Boolean get_IsError()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: Boolean get_IsForType()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo Empty
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo get_Empty()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem[] Items
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListInfo: FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem[] get_Items()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Boolean IsOwnMember
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Boolean IsResolved
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Boolean get_IsOwnMember()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Boolean get_IsResolved()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind Kind
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpCompletionItemKind get_Kind()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpGlyph Glyph
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Glyph()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout] StructuredDescriptionText
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout] get_StructuredDescriptionText()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String] DescriptionText
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String] get_DescriptionText()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Int32 MinorPriority
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Int32 get_MinorPriority()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout]] StructuredDescriptionTextAsync
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout]] get_StructuredDescriptionTextAsync()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String]] DescriptionTextAsync
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Control.FSharpAsync`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String]] get_DescriptionTextAsync()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpAccessibility] Accessibility
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpAccessibility] get_Accessibility()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Core.FSharpOption`1[System.String] NamespaceToOpen
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_NamespaceToOpen()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: System.String NameInCode
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpDeclarationListItem: System.String get_NameInCode()
-FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature: FSharp.Compiler.SourceCodeServices.FSharpType DelegateReturnType
-FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature: FSharp.Compiler.SourceCodeServices.FSharpType get_DelegateReturnType()
-FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature: System.Collections.Generic.IList`1[System.Tuple`2[Microsoft.FSharp.Core.FSharpOption`1[System.String],FSharp.Compiler.SourceCodeServices.FSharpType]] DelegateArguments
-FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature: System.Collections.Generic.IList`1[System.Tuple`2[Microsoft.FSharp.Core.FSharpOption`1[System.String],FSharp.Compiler.SourceCodeServices.FSharpType]] get_DelegateArguments()
-FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity Severity
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity get_Severity()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 EndColumn
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 EndLineAlternate
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 ErrorNumber
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 StartColumn
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 StartLineAlternate
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 get_EndColumn()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 get_EndLineAlternate()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 get_ErrorNumber()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 get_StartColumn()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: Int32 get_StartLineAlternate()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String FileName
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String Message
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String NewlineifyErrorString(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String NormalizeErrorString(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String Subcategory
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String get_FileName()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String get_Message()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: System.String get_Subcategory()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: pos End
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: pos Start
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: pos get_End()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: pos get_Start()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: range Range
-FSharp.Compiler.SourceCodeServices.FSharpDiagnostic: range get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Boolean GlobalWarnAsError
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Boolean get_GlobalWarnAsError()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions Default
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions get_Default()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 WarnLevel
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Int32 get_WarnLevel()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] WarnAsError
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] WarnAsWarn
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] WarnOff
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] WarnOn
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] get_WarnAsError()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] get_WarnAsWarn()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] get_WarnOff()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Int32] get_WarnOn()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions: Void .ctor(Int32, Boolean, Microsoft.FSharp.Collections.FSharpList`1[System.Int32], Microsoft.FSharp.Collections.FSharpList`1[System.Int32], Microsoft.FSharp.Collections.FSharpList`1[System.Int32], Microsoft.FSharp.Collections.FSharpList`1[System.Int32])
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity+Tags: Int32 Error
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity+Tags: Int32 Hidden
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity+Tags: Int32 Info
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity+Tags: Int32 Warning
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean IsError
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean IsHidden
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean IsInfo
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean IsWarning
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean get_IsError()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean get_IsHidden()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean get_IsInfo()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Boolean get_IsWarning()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity Error
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity Hidden
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity Info
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity Warning
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity get_Error()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity get_Hidden()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity get_Info()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity get_Warning()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity+Tags
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpDiagnosticSeverity: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpDisplayContext: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext Empty
-FSharp.Compiler.SourceCodeServices.FSharpDisplayContext: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext WithPrefixGenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpDisplayContext: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext WithShortTypeNames(Boolean)
-FSharp.Compiler.SourceCodeServices.FSharpDisplayContext: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext WithSuffixGenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpDisplayContext: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext get_Empty()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Class
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 DU
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Enum
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Exception
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Interface
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Namespace
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags: Int32 Record
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsClass
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsDU
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsEnum
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsException
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean IsRecord
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsClass()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsDU()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsEnum()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsException()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Boolean get_IsRecord()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Class
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind DU
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Enum
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Exception
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Interface
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Module
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Namespace
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind Record
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Class()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_DU()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Enum()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Exception()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Interface()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Module()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Namespace()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_Record()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind+Tags
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean HasAssemblyCodeRepresentation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean HasFSharpModuleSuffix
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsAbstractClass
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsArrayType
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsAttributeType
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsByRef
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsClass
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsDelegate
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsEnum
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsFSharp
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsFSharpAbbreviation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsFSharpExceptionDeclaration
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsFSharpModule
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsFSharpRecord
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsFSharpUnion
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsMeasure
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsOpaque
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsProvided
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsProvidedAndErased
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsProvidedAndGenerated
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsStaticInstantiation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsUnresolved
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean IsValueType
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean UsesPrefixDisplay
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_HasAssemblyCodeRepresentation()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_HasFSharpModuleSuffix()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsAbstractClass()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsArrayType()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsAttributeType()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsByRef()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsClass()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsDelegate()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsEnum()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsFSharp()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsFSharpAbbreviation()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsFSharpExceptionDeclaration()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsFSharpModule()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsFSharpRecord()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsFSharpUnion()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsMeasure()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsOpaque()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsProvided()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsProvidedAndErased()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsProvidedAndGenerated()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsStaticInstantiation()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsUnresolved()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_IsValueType()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Boolean get_UsesPrefixDisplay()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpAccessibility Accessibility
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpAccessibility RepresentationAccessibility
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpAccessibility get_Accessibility()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpAccessibility get_RepresentationAccessibility()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature FSharpDelegateSignature
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpDelegateSignature get_FSharpDelegateSignature()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpType AbbreviatedType
-FSharp.Compiler.SourceCodeServices.FSharpEntity: FSharp.Compiler.SourceCodeServices.FSharpType get_AbbreviatedType()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Int32 ArrayRank
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Int32 get_ArrayRank()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase] ActivePatternCases
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase] get_ActivePatternCases()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Collections.FSharpList`1[System.String] AllCompilationPaths
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_AllCompilationPaths()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] DeclaringEntity
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_DeclaringEntity()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] BaseType
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_BaseType()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] Namespace
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryFullName
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryGetFullCompiledName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryGetFullDisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryGetFullName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_Namespace()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_TryFullName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] GetPublicNestedEntities()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] NestedEntities
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_NestedEntities()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpField] FSharpFields
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpField] RecordFields
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpField] get_FSharpFields()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpField] get_RecordFields()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] GenericParameters
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] get_GenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] MembersFunctionsAndValues
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] MembersOrValues
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] TryGetMembersFunctionsAndValues()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] get_MembersFunctionsAndValues()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] get_MembersOrValues()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpStaticParameter] StaticParameters
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpStaticParameter] get_StaticParameters()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] AllInterfaces
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] DeclaredInterfaces
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_AllInterfaces()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_DeclaredInterfaces()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpUnionCase] UnionCases
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpUnionCase] get_UnionCases()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[System.String] ElaboratedXmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[System.String] XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[System.String] get_ElaboratedXmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.Collections.Generic.IList`1[System.String] get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String AccessPath
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String CompiledName
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String LogicalName
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String QualifiedName
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String XmlDocSig
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_AccessPath()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_CompiledName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_LogicalName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_QualifiedName()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: System.String get_XmlDocSig()
-FSharp.Compiler.SourceCodeServices.FSharpEntity: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpEntity: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpExpr: FSharp.Compiler.SourceCodeServices.FSharpType Type
-FSharp.Compiler.SourceCodeServices.FSharpExpr: FSharp.Compiler.SourceCodeServices.FSharpType get_Type()
-FSharp.Compiler.SourceCodeServices.FSharpExpr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr] ImmediateSubExpressions
-FSharp.Compiler.SourceCodeServices.FSharpExpr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpExpr] get_ImmediateSubExpressions()
-FSharp.Compiler.SourceCodeServices.FSharpExpr: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExpr: range Range
-FSharp.Compiler.SourceCodeServices.FSharpExpr: range get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ParamTypeSymbol] args
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ParamTypeSymbol] get_args()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: System.String get_typeName()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor: System.String typeName
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: System.String get_name()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: System.String get_typeName()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: System.String name
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event: System.String typeName
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: System.String get_name()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: System.String get_typeName()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: System.String name
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field: System.String typeName
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 genericArity
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Int32 get_genericArity()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ParamTypeSymbol] get_paramSyms()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ParamTypeSymbol] paramSyms
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: System.String get_name()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: System.String get_typeName()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: System.String name
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method: System.String typeName
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: System.String get_name()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: System.String get_typeName()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: System.String name
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property: System.String typeName
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags: Int32 Constructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags: Int32 Event
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags: Int32 Field
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags: Int32 Method
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags: Int32 Property
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: System.String fullName
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type: System.String get_fullName()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol NewConstructor(System.String, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ParamTypeSymbol])
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol NewEvent(System.String, System.String)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol NewField(System.String, System.String)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol NewMethod(System.String, System.String, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.ParamTypeSymbol], Int32)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol NewProperty(System.String, System.String)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol NewType(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Constructor
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Event
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Field
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Method
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Property
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Tags
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol+Type
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsAnonRecordField
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsCompilerGenerated
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsDefaultValue
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsLiteral
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsMutable
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsNameGenerated
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsStatic
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsUnionCaseField
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsUnresolved
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean IsVolatile
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsAnonRecordField()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsCompilerGenerated()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsDefaultValue()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsLiteral()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsMutable()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsNameGenerated()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsStatic()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsUnionCaseField()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsUnresolved()
-FSharp.Compiler.SourceCodeServices.FSharpField: Boolean get_IsVolatile()
-FSharp.Compiler.SourceCodeServices.FSharpField: FSharp.Compiler.SourceCodeServices.FSharpAccessibility Accessibility
-FSharp.Compiler.SourceCodeServices.FSharpField: FSharp.Compiler.SourceCodeServices.FSharpAccessibility get_Accessibility()
-FSharp.Compiler.SourceCodeServices.FSharpField: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpField: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpField: FSharp.Compiler.SourceCodeServices.FSharpType FieldType
-FSharp.Compiler.SourceCodeServices.FSharpField: FSharp.Compiler.SourceCodeServices.FSharpType get_FieldType()
-FSharp.Compiler.SourceCodeServices.FSharpField: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpField: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] DeclaringEntity
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_DeclaringEntity()
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpUnionCase] DeclaringUnionCase
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpUnionCase] get_DeclaringUnionCase()
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[System.Object] LiteralValue
-FSharp.Compiler.SourceCodeServices.FSharpField: Microsoft.FSharp.Core.FSharpOption`1[System.Object] get_LiteralValue()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] FieldAttributes
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] PropertyAttributes
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_FieldAttributes()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_PropertyAttributes()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[System.String] ElaboratedXmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[System.String] XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[System.String] get_ElaboratedXmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Collections.Generic.IList`1[System.String] get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String XmlDocSig
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.String get_XmlDocSig()
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails,FSharp.Compiler.SourceCodeServices.FSharpType[],System.Int32] AnonRecordFieldDetails
-FSharp.Compiler.SourceCodeServices.FSharpField: System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails,FSharp.Compiler.SourceCodeServices.FSharpType[],System.Int32] get_AnonRecordFieldDetails()
-FSharp.Compiler.SourceCodeServices.FSharpField: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpField: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpFileUtilities: Boolean isScriptFile(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean IsNoSourceCode
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean IsProvidedMember
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean IsProvidedType
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean IsUnknown
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean get_IsNoSourceCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean get_IsProvidedMember()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean get_IsProvidedType()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Boolean get_IsUnknown()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: System.String Item
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember: System.String get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean IsNoSourceCode
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean IsProvidedMember
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean IsProvidedType
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean IsUnknown
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean get_IsNoSourceCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean get_IsProvidedMember()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean get_IsProvidedType()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Boolean get_IsUnknown()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: System.String Item
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType: System.String get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Tags: Int32 NoSourceCode
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Tags: Int32 ProvidedMember
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Tags: Int32 ProvidedType
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Tags: Int32 Unknown
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean IsNoSourceCode
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean IsProvidedMember
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean IsProvidedType
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean IsUnknown
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean get_IsNoSourceCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean get_IsProvidedMember()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean get_IsProvidedType()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Boolean get_IsUnknown()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: System.String get_message()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown: System.String message
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean IsNoSourceCode
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean IsProvidedMember
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean IsProvidedType
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean IsUnknown
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean get_IsNoSourceCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean get_IsProvidedMember()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean get_IsProvidedType()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Boolean get_IsUnknown()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason NewProvidedMember(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason NewProvidedType(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason NewUnknown(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason NoSourceCode
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason get_NoSourceCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedMember
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+ProvidedType
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Tags
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason+Unknown
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean IsDeclFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean IsDeclNotFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean IsExternalDecl
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean get_IsDeclFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean get_IsDeclNotFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Boolean get_IsExternalDecl()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: range Item
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound: range get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean IsDeclFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean IsDeclNotFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean IsExternalDecl
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean get_IsDeclFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean get_IsDeclNotFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Boolean get_IsExternalDecl()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason Item
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean IsDeclFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean IsDeclNotFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean IsExternalDecl
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean get_IsDeclFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean get_IsDeclNotFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Boolean get_IsExternalDecl()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol externalSym
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol get_externalSym()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: System.String assembly
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl: System.String get_assembly()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+Tags: Int32 DeclFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+Tags: Int32 DeclNotFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+Tags: Int32 ExternalDecl
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean IsDeclFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean IsDeclNotFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean IsExternalDecl
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean get_IsDeclFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean get_IsDeclNotFound()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Boolean get_IsExternalDecl()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult NewDeclFound(range)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult NewDeclNotFound(FSharp.Compiler.SourceCodeServices.FSharpFindDeclFailureReason)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult NewExternalDecl(System.String, FSharp.Compiler.SourceCodeServices.FSharpExternalSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+DeclNotFound
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+ExternalDecl
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult+Tags
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpFindDeclResult: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean IsCompilerGenerated
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean IsMeasure
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean IsSolveAtCompileTime
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean get_IsCompilerGenerated()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean get_IsMeasure()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Boolean get_IsSolveAtCompileTime()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint] Constraints
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint] get_Constraints()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[System.String] ElaboratedXmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[System.String] XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[System.String] get_ElaboratedXmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.Collections.Generic.IList`1[System.String] get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameter: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsCoercesToConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsComparisonConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsDefaultsToConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsDelegateConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsEnumConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsEqualityConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsMemberConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsNonNullableValueTypeConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsReferenceTypeConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsRequiresDefaultConstructorConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsSimpleChoiceConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsSupportsNullConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean IsUnmanagedConstraint
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsCoercesToConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsComparisonConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsDefaultsToConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsDelegateConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsEnumConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsEqualityConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsMemberConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsNonNullableValueTypeConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsReferenceTypeConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsRequiresDefaultConstructorConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsSimpleChoiceConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsSupportsNullConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: Boolean get_IsUnmanagedConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint DefaultsToConstraintData
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint get_DefaultsToConstraintData()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint DelegateConstraintData
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint get_DelegateConstraintData()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint MemberConstraintData
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint get_MemberConstraintData()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpType CoercesToTarget
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpType EnumConstraintTarget
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpType get_CoercesToTarget()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: FSharp.Compiler.SourceCodeServices.FSharpType get_EnumConstraintTarget()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] SimpleChoices
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_SimpleChoices()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterConstraint: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint: FSharp.Compiler.SourceCodeServices.FSharpType DefaultsToTarget
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint: FSharp.Compiler.SourceCodeServices.FSharpType get_DefaultsToTarget()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint: Int32 DefaultsToPriority
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint: Int32 get_DefaultsToPriority()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDefaultsToConstraint: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint: FSharp.Compiler.SourceCodeServices.FSharpType DelegateReturnType
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint: FSharp.Compiler.SourceCodeServices.FSharpType DelegateTupledArgumentType
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint: FSharp.Compiler.SourceCodeServices.FSharpType get_DelegateReturnType()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint: FSharp.Compiler.SourceCodeServices.FSharpType get_DelegateTupledArgumentType()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterDelegateConstraint: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: Boolean MemberIsStatic
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: Boolean get_MemberIsStatic()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: FSharp.Compiler.SourceCodeServices.FSharpType MemberReturnType
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: FSharp.Compiler.SourceCodeServices.FSharpType get_MemberReturnType()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] MemberArgumentTypes
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] MemberSources
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_MemberArgumentTypes()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_MemberSources()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.String MemberName
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpGenericParameterMemberConstraint: System.String get_MemberName()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Class
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Constant
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Delegate
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Enum
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 EnumMember
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Error
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Event
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Exception
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 ExtensionMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Field
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Interface
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Method
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 NameSpace
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 OverridenMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Property
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Struct
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Typedef
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Union
-FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags: Int32 Variable
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpGlyph)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsClass
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsConstant
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsDelegate
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsEnum
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsEnumMember
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsError
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsException
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsExtensionMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsField
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsNameSpace
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsOverridenMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsStruct
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsTypedef
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsUnion
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean IsVariable
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsClass()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsConstant()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsDelegate()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsEnum()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsEnumMember()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsError()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsException()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsExtensionMethod()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsNameSpace()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsOverridenMethod()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsStruct()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsTypedef()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsUnion()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Boolean get_IsVariable()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Class
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Constant
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Delegate
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Enum
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph EnumMember
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Error
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Event
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Exception
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph ExtensionMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Field
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Interface
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Method
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Module
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph NameSpace
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph OverridenMethod
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Property
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Struct
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Type
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Typedef
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Union
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph Variable
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Class()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Constant()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Delegate()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Enum()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_EnumMember()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Error()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Event()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Exception()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_ExtensionMethod()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Field()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Interface()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Method()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Module()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_NameSpace()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_OverridenMethod()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Property()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Struct()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Type()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Typedef()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Union()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Variable()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: FSharp.Compiler.SourceCodeServices.FSharpGlyph+Tags
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpGlyph)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpGlyph: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: Boolean HasExplicitEntryPoint
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: Boolean IsScript
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: Boolean get_HasExplicitEntryPoint()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: Boolean get_IsScript()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration] Declarations
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration] get_Declarations()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: System.String FileName
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: System.String QualifiedName
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: System.String get_FileName()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileContents: System.String get_QualifiedName()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean IsEntity
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean IsInitAction
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean IsMemberOrFunctionOrValue
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean get_IsEntity()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean get_IsInitAction()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Boolean get_IsMemberOrFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: FSharp.Compiler.SourceCodeServices.FSharpEntity Item1
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: FSharp.Compiler.SourceCodeServices.FSharpEntity get_Item1()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration] Item2
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration] get_Item2()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean IsEntity
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean IsInitAction
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean IsMemberOrFunctionOrValue
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean get_IsEntity()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean get_IsInitAction()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Boolean get_IsMemberOrFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: FSharp.Compiler.SourceCodeServices.FSharpExpr Item
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: FSharp.Compiler.SourceCodeServices.FSharpExpr get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean IsEntity
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean IsInitAction
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean IsMemberOrFunctionOrValue
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean get_IsEntity()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean get_IsInitAction()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Boolean get_IsMemberOrFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpExpr Item3
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpExpr get_Item3()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue Item1
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue get_Item1()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue]] Item2
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue]] get_Item2()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Tags: Int32 Entity
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Tags: Int32 InitAction
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Tags: Int32 MemberOrFunctionOrValue
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean IsEntity
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean IsInitAction
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean IsMemberOrFunctionOrValue
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean get_IsEntity()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean get_IsInitAction()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Boolean get_IsMemberOrFunctionOrValue()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration NewEntity(FSharp.Compiler.SourceCodeServices.FSharpEntity, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration])
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration NewInitAction(FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration NewMemberOrFunctionOrValue(FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue, Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue]], FSharp.Compiler.SourceCodeServices.FSharpExpr)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Entity
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+InitAction
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+MemberOrFunctionOrValue
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration+Tags
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpImplementationFileDeclaration: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation+Tags: Int32 AggressiveInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation+Tags: Int32 AlwaysInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation+Tags: Int32 NeverInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation+Tags: Int32 OptionalInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation+Tags: Int32 PseudoValue
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean IsAggressiveInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean IsAlwaysInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean IsNeverInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean IsOptionalInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean IsPseudoValue
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean get_IsAggressiveInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean get_IsAlwaysInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean get_IsNeverInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean get_IsOptionalInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Boolean get_IsPseudoValue()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation AggressiveInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation AlwaysInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation NeverInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation OptionalInline
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation PseudoValue
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation get_AggressiveInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation get_AlwaysInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation get_NeverInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation get_OptionalInline()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation get_PseudoValue()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation+Tags
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpKeywords: Boolean DoesIdentifierNeedQuotation(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpKeywords: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,System.String]] KeywordsWithDescription
-FSharp.Compiler.SourceCodeServices.FSharpKeywords: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,System.String]] get_KeywordsWithDescription()
-FSharp.Compiler.SourceCodeServices.FSharpKeywords: System.String NormalizeIdentifierBackticks(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpKeywords: System.String QuoteIdentifierIfNeeded(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpLexer: Void Lex(FSharp.Compiler.Text.ISourceText, Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SourceCodeServices.FSharpToken,Microsoft.FSharp.Core.Unit], Microsoft.FSharp.Core.FSharpOption`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[System.String]], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpLexerFlags], Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpMap`2[System.String,System.String]], Microsoft.FSharp.Core.FSharpOption`1[System.Threading.CancellationToken])
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: FSharp.Compiler.SourceCodeServices.FSharpLexerFlags Compiling
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: FSharp.Compiler.SourceCodeServices.FSharpLexerFlags CompilingFSharpCore
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: FSharp.Compiler.SourceCodeServices.FSharpLexerFlags Default
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: FSharp.Compiler.SourceCodeServices.FSharpLexerFlags LightSyntaxOn
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: FSharp.Compiler.SourceCodeServices.FSharpLexerFlags SkipTrivia
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: FSharp.Compiler.SourceCodeServices.FSharpLexerFlags UseLexFilter
-FSharp.Compiler.SourceCodeServices.FSharpLexerFlags: Int32 value__
-FSharp.Compiler.SourceCodeServices.FSharpLineTokenizer: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState ColorStateOfLexState(FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState)
-FSharp.Compiler.SourceCodeServices.FSharpLineTokenizer: FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState LexStateOfColorState(FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState)
-FSharp.Compiler.SourceCodeServices.FSharpLineTokenizer: System.Tuple`2[Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpTokenInfo],FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState] ScanToken(FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState)
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean EventIsStandard
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean HasGetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean HasSetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsActivePattern
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsBaseValue
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsCompilerGenerated
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsConstructorThisValue
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsDispatchSlot
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsEventAddMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsEventRemoveMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsExplicitInterfaceImplementation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsExtensionMember
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsGetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsImplicitConstructor
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsInstanceMember
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsInstanceMemberInCompiledCode
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsMember
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsMemberThisValue
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsModuleValueOrMember
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsMutable
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsOverrideOrExplicitInterfaceImplementation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsOverrideOrExplicitMember
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsPropertyGetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsPropertySetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsSetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsTypeFunction
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsUnresolved
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsValCompiledAsMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean IsValue
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_EventIsStandard()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_HasGetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_HasSetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsActivePattern()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsBaseValue()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsCompilerGenerated()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsConstructorThisValue()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsDispatchSlot()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsEventAddMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsEventRemoveMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsExplicitInterfaceImplementation()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsExtensionMember()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsGetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsImplicitConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsInstanceMember()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsInstanceMemberInCompiledCode()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsMember()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsMemberThisValue()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsModuleValueOrMember()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsMutable()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsOverrideOrExplicitInterfaceImplementation()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsOverrideOrExplicitMember()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsPropertyGetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsPropertySetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsSetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsTypeFunction()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsUnresolved()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsValCompiledAsMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Boolean get_IsValue()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpAccessibility Accessibility
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpAccessibility get_Accessibility()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpEntity ApparentEnclosingEntity
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpEntity get_ApparentEnclosingEntity()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation InlineAnnotation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpInlineAnnotation get_InlineAnnotation()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue EventAddMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue EventRemoveMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue GetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue SetterMethod
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue get_EventAddMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue get_EventRemoveMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue get_GetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue get_SetterMethod()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpParameter ReturnParameter
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpParameter get_ReturnParameter()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpType EventDelegateType
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpType FullType
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpType get_EventDelegateType()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.SourceCodeServices.FSharpType get_FullType()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: FSharp.Compiler.TextLayout.Layout FormatLayout(FSharp.Compiler.SourceCodeServices.FSharpDisplayContext)
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] DeclaringEntity
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_DeclaringEntity()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] EventForFSharpProperty
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] get_EventForFSharpProperty()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] FullTypeSafe
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_FullTypeSafe()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue]] Overloads(Boolean)
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[System.Object] LiteralValue
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[System.Object] get_LiteralValue()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[System.String[]] TryGetFullCompiledOperatorNameIdents()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryGetFullDisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[System.String,System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]]] GetWitnessPassingInfo()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature] ImplementedAbstractSignatures
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature] get_ImplementedAbstractSignatures()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] GenericParameters
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] get_GenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]] CurriedParameterGroups
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]] get_CurriedParameterGroups()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[System.String] ElaboratedXmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[System.String] XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[System.String] get_ElaboratedXmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.Collections.Generic.IList`1[System.String] get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String CompiledName
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String LogicalName
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String XmlDocSig
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String get_CompiledName()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String get_LogicalName()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: System.String get_XmlDocSig()
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroup: FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem[] Methods
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroup: FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem[] get_Methods()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroup: System.String MethodName
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroup: System.String get_MethodName()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: Boolean HasParamArrayArg
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: Boolean HasParameters
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: Boolean get_HasParamArrayArg()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: Boolean get_HasParameters()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter[] Parameters
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter[] StaticParameters
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter[] get_Parameters()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter[] get_StaticParameters()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout] StructuredDescription
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout] get_StructuredDescription()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String] Description
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String] get_Description()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.TextLayout.Layout StructuredReturnTypeText
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: FSharp.Compiler.TextLayout.Layout get_StructuredReturnTypeText()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: System.String ReturnTypeText
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItem: System.String get_ReturnTypeText()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: Boolean IsOptional
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: Boolean get_IsOptional()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: FSharp.Compiler.TextLayout.Layout StructuredDisplay
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: FSharp.Compiler.TextLayout.Layout get_StructuredDisplay()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: System.String CanonicalTypeTextForSorting
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: System.String Display
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: System.String ParameterName
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: System.String get_CanonicalTypeTextForSorting()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: System.String get_Display()
-FSharp.Compiler.SourceCodeServices.FSharpMethodGroupItemParameter: System.String get_ParameterName()
-FSharp.Compiler.SourceCodeServices.FSharpNavigation: FSharp.Compiler.SourceCodeServices.FSharpNavigationItems getNavigation(ParsedInput)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: Boolean IsAbstract
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: Boolean IsSingleTopLevel
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: Boolean get_IsAbstract()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: Boolean get_IsSingleTopLevel()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind EnclosingEntityKind
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: FSharp.Compiler.SourceCodeServices.FSharpEnclosingEntityKind get_EnclosingEntityKind()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: FSharp.Compiler.SourceCodeServices.FSharpGlyph Glyph
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: FSharp.Compiler.SourceCodeServices.FSharpGlyph get_Glyph()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind Kind
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_Kind()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] Access
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_Access()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: System.String UniqueName
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: System.String get_UniqueName()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: range BodyRange
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: range Range
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: range get_BodyRange()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem: range get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 ExnDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 FieldDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 MethodDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 ModuleDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 ModuleFileDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 NamespaceDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 OtherDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 PropertyDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags: Int32 TypeDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsExnDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsFieldDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsMethodDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsModuleDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsModuleFileDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsNamespaceDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsOtherDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsPropertyDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean IsTypeDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsExnDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsFieldDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsMethodDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsModuleDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsModuleFileDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsNamespaceDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsOtherDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsPropertyDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Boolean get_IsTypeDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind ExnDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind FieldDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind MethodDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind ModuleDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind ModuleFileDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind NamespaceDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind OtherDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind PropertyDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind TypeDecl
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_ExnDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_FieldDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_MethodDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_ModuleDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_ModuleFileDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_NamespaceDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_OtherDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_PropertyDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind get_TypeDecl()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind+Tags
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItemKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationItems: FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration[] Declarations
-FSharp.Compiler.SourceCodeServices.FSharpNavigationItems: FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration[] get_Declarations()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem Declaration
-FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem get_Declaration()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem[] Nested
-FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration: FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem[] get_Nested()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpNavigationTopLevelDeclaration: Void .ctor(FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem, FSharp.Compiler.SourceCodeServices.FSharpNavigationDeclarationItem[])
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Boolean IsThereACloseParen
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Boolean get_IsThereACloseParen()
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Microsoft.FSharp.Collections.FSharpList`1[System.String] LongId
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_LongId()
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations] Find(pos, ParsedInput)
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Microsoft.FSharp.Core.FSharpOption`1[System.String][] NamedParamNames
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: Microsoft.FSharp.Core.FSharpOption`1[System.String][] get_NamedParamNames()
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos LongIdEndLocation
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos LongIdStartLocation
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos OpenParenLocation
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos get_LongIdEndLocation()
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos get_LongIdStartLocation()
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos get_OpenParenLocation()
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos[] TupleEndLocations
-FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations: pos[] get_TupleEndLocations()
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature Signature
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: FSharp.Compiler.SourceCodeServices.FSharpAbstractSignature get_Signature()
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: FSharp.Compiler.SourceCodeServices.FSharpExpr Body
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: FSharp.Compiler.SourceCodeServices.FSharpExpr get_Body()
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] GenericParameters
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter] get_GenericParameters()
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue]] CurriedParameterGroups
-FSharp.Compiler.SourceCodeServices.FSharpObjectExprOverride: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue]] get_CurriedParameterGroups()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Boolean IsOwnNamespace
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Boolean get_IsOwnNamespace()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] Modules
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] get_Modules()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType] Types
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_Types()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] LongId
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_LongId()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] Range
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: SynOpenDeclTarget Target
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: SynOpenDeclTarget get_Target()
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: range AppliedScope
-FSharp.Compiler.SourceCodeServices.FSharpOpenDeclaration: range get_AppliedScope()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsInArg
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsOptionalArg
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsOutArg
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean IsParamArrayArg
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean get_IsInArg()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean get_IsOptionalArg()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean get_IsOutArg()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Boolean get_IsParamArrayArg()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpParameter: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: FSharp.Compiler.SourceCodeServices.FSharpType Type
-FSharp.Compiler.SourceCodeServices.FSharpParameter: FSharp.Compiler.SourceCodeServices.FSharpType get_Type()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[System.String] Name
-FSharp.Compiler.SourceCodeServices.FSharpParameter: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpParameter: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpParameter: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Boolean IsPosContainedInApplication(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Boolean IsPositionContainedInACurriedParameter(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Boolean ParseHadErrors
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Boolean get_ParseHadErrors()
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[] Errors
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: FSharp.Compiler.SourceCodeServices.FSharpDiagnostic[] get_Errors()
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: FSharp.Compiler.SourceCodeServices.FSharpNavigationItems GetNavigationItems()
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] TryRangeOfExprInYieldOrReturn(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] TryRangeOfFunctionOrMethodBeingApplied(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] TryRangeOfNameOfNearestOuterBindingContainingPos(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] TryRangeOfRecordExpressionContainingPos(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] TryRangeOfRefCellDereferenceContainingPos(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ValidateBreakpointLocation(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpNoteworthyParamInfoLocations] FindNoteworthyParamInfoLocations(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+ParsedInput] ParseTree
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+ParsedInput] get_ParseTree()
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range]] GetAllArgumentsForFunctionApplicationAtPostion(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,System.Int32]] TryIdentOfPipelineContainingPosAndNumArgsApplied(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.Range+range,FSharp.Compiler.Range+range,FSharp.Compiler.Range+range]] TryRangeOfParenEnclosingOpEqualsGreaterUsage(pos)
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: System.String FileName
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: System.String get_FileName()
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: System.String[] DependencyFiles
-FSharp.Compiler.SourceCodeServices.FSharpParseFileResults: System.String[] get_DependencyFiles()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean CompilingFsLib
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpParsingOptions)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean IsExe
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean IsInteractive
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean get_CompilingFsLib()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean get_IsExe()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Boolean get_IsInteractive()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions ErrorSeverityOptions
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions get_ErrorSeverityOptions()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: FSharp.Compiler.SourceCodeServices.FSharpParsingOptions Default
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: FSharp.Compiler.SourceCodeServices.FSharpParsingOptions get_Default()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpParsingOptions)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Microsoft.FSharp.Collections.FSharpList`1[System.String] ConditionalCompilationDefines
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_ConditionalCompilationDefines()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Microsoft.FSharp.Core.FSharpOption`1[System.Boolean] LightSyntax
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Microsoft.FSharp.Core.FSharpOption`1[System.Boolean] get_LightSyntax()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: System.String[] SourceFiles
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: System.String[] get_SourceFiles()
-FSharp.Compiler.SourceCodeServices.FSharpParsingOptions: Void .ctor(System.String[], Microsoft.FSharp.Collections.FSharpList`1[System.String], FSharp.Compiler.SourceCodeServices.FSharpDiagnosticOptions, Boolean, Microsoft.FSharp.Core.FSharpOption`1[System.Boolean], Boolean, Boolean)
-FSharp.Compiler.SourceCodeServices.FSharpProjectContext: FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights AccessibilityRights
-FSharp.Compiler.SourceCodeServices.FSharpProjectContext: FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights get_AccessibilityRights()
-FSharp.Compiler.SourceCodeServices.FSharpProjectContext: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpAssembly] GetReferencedAssemblies()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpProjectOptions)
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean IsIncompleteTypeCheckEnvironment
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean UseScriptResolutionRules
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean get_IsIncompleteTypeCheckEnvironment()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Boolean get_UseScriptResolutionRules()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[FSharp.Compiler.Range+range,System.String,System.String]] OriginalLoadReferences
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[FSharp.Compiler.Range+range,System.String,System.String]] get_OriginalLoadReferences()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet] UnresolvedReferences
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet] get_UnresolvedReferences()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[System.Int64] Stamp
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[System.Int64] get_Stamp()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[System.Object] ExtraProjectInfo
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[System.Object] get_ExtraProjectInfo()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[System.String] ProjectId
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_ProjectId()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.DateTime LoadTime
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.DateTime get_LoadTime()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String ProjectFileName
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String get_ProjectFileName()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String[] OtherOptions
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String[] SourceFiles
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String[] get_OtherOptions()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.String[] get_SourceFiles()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.Tuple`2[System.String,FSharp.Compiler.SourceCodeServices.FSharpProjectOptions][] ReferencedProjects
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: System.Tuple`2[System.String,FSharp.Compiler.SourceCodeServices.FSharpProjectOptions][] get_ReferencedProjects()
-FSharp.Compiler.SourceCodeServices.FSharpProjectOptions: Void .ctor(System.String, Microsoft.FSharp.Core.FSharpOption`1[System.String], System.String[], System.String[], System.Tuple`2[System.String,FSharp.Compiler.SourceCodeServices.FSharpProjectOptions][], Boolean, Boolean, System.DateTime, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet], Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[FSharp.Compiler.Range+range,System.String,System.String]], Microsoft.FSharp.Core.FSharpOption`1[System.Object], Microsoft.FSharp.Core.FSharpOption`1[System.Int64])
-FSharp.Compiler.SourceCodeServices.FSharpSourceTokenizer: FSharp.Compiler.SourceCodeServices.FSharpLineTokenizer CreateBufferTokenizer(Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`3[System.Char[],System.Int32,System.Int32],System.Int32])
-FSharp.Compiler.SourceCodeServices.FSharpSourceTokenizer: FSharp.Compiler.SourceCodeServices.FSharpLineTokenizer CreateLineTokenizer(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpSourceTokenizer: Void .ctor(Microsoft.FSharp.Collections.FSharpList`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean HasDefaultValue
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean IsOptional
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean get_HasDefaultValue()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Boolean get_IsOptional()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: FSharp.Compiler.SourceCodeServices.FSharpType Kind
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: FSharp.Compiler.SourceCodeServices.FSharpType get_Kind()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.Object DefaultValue
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.Object get_DefaultValue()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: range Range
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpStaticParameter: range get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpAccessibility] GetAccessibility(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpSymbol: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromAttribute
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromComputationExpression
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromDefinition
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromDispatchSlotImplementation
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromOpenStatement
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromPattern
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsFromType
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean IsPrivateToFile
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromAttribute()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromComputationExpression()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromDefinition()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromDispatchSlotImplementation()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromOpenStatement()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromPattern()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsFromType()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: Boolean get_IsPrivateToFile()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext DisplayContext
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: FSharp.Compiler.SourceCodeServices.FSharpDisplayContext get_DisplayContext()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: FSharp.Compiler.SourceCodeServices.FSharpSymbol Symbol
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: FSharp.Compiler.SourceCodeServices.FSharpSymbol get_Symbol()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: System.String FileName
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: System.String get_FileName()
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: range RangeAlternate
-FSharp.Compiler.SourceCodeServices.FSharpSymbolUse: range get_RangeAlternate()
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean IsCommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean IsIdentifier
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean IsKeyword
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean IsNumericLiteral
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean IsStringLiteral
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean get_IsCommentTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean get_IsIdentifier()
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean get_IsKeyword()
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean get_IsNumericLiteral()
-FSharp.Compiler.SourceCodeServices.FSharpToken: Boolean get_IsStringLiteral()
-FSharp.Compiler.SourceCodeServices.FSharpToken: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Kind
-FSharp.Compiler.SourceCodeServices.FSharpToken: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Kind()
-FSharp.Compiler.SourceCodeServices.FSharpToken: range Range
-FSharp.Compiler.SourceCodeServices.FSharpToken: range get_Range()
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Comment
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Default
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Delimiter
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Identifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Keyword
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind LineComment
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Literal
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Operator
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind String
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind Text
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind WhiteSpace
-FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind: Int32 value__
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Comment
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Default
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Identifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind InactiveCode
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Keyword
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Number
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Operator
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind PreprocessorKeyword
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Punctuation
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind String
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind Text
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind UpperIdentifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind: Int32 value__
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpTokenInfo)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind CharClass
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind get_CharClass()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind ColorClass
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind get_ColorClass()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass FSharpTokenTriggerClass
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass get_FSharpTokenTriggerClass()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpTokenInfo)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 FullMatchedLength
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 LeftColumn
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 RightColumn
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 get_FullMatchedLength()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 get_LeftColumn()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 get_RightColumn()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: System.String TokenName
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: System.String get_TokenName()
-FSharp.Compiler.SourceCodeServices.FSharpTokenInfo: Void .ctor(Int32, Int32, FSharp.Compiler.SourceCodeServices.FSharpTokenColorKind, FSharp.Compiler.SourceCodeServices.FSharpTokenCharKind, FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass, Int32, System.String, Int32)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Abstract
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 AdjacentPrefixOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Ampersand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 AmpersandAmpersand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 And
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 As
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Asr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Assert
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Bar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 BarBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 BarRightBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 BarRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Base
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Begin
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 BigNumber
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Binder
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 ByteArray
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Char
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Class
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Colon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 ColonColon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 ColonEquals
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 ColonGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 ColonQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 ColonQuestionMarkGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Comma
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 CommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Const
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Constraint
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Constructor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Decimal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Default
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Delegate
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Do
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 DoBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Dollar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Done
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Dot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 DotDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 DotDotHat
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 DownTo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Downcast
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Elif
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Else
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 End
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Equals
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Exception
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Extern
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 False
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Finally
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Fixed
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 For
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Fun
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Function
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 FunkyOperatorName
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Global
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Greater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 GreaterBarRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 GreaterRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Hash
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HashElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HashEndIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HashIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HashLight
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HashLine
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HighPrecedenceBracketApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HighPrecedenceParenthesisApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 HighPrecedenceTypeApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Identifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Ieee32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Ieee64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 If
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 In
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InactiveCode
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixAmpersandOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixAsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixAtHatOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixBarOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixCompareOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixLand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixLor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixLsl
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixLsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixLxor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixMod
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixStarDivideModuloOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 InfixStarStarOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Inherit
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Inline
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Instance
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Int16
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Int32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Int32DotDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Int64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Int8
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Interface
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Internal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 JoinIn
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 KeywordString
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Lazy
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftArrow
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftBraceBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftBracketBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftBracketLess
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftParenthesisStarRightParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LeftQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Less
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Let
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 LineCommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Match
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 MatchBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Member
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Minus
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Mutable
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Namespace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 NativeInt
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 New
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 None
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Null
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Of
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideAssert
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideBinder
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideBlockBegin
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideBlockEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideBlockSep
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideDeclEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideDo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideDoBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideFun
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideFunction
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideInterfaceMember
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideLazy
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideLet
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideReset
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideRightBlockEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideThen
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 OffsideWith
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Open
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Or
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Override
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 PercentOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 PlusMinusOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 PrefixOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Private
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Public
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 QuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 QuestionMarkQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Quote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Rec
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Reserved
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 RightArrow
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 RightBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 RightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 RightParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 RightQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 RightQuoteDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Semicolon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 SemicolonSemicolon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Sig
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Star
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Static
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 String
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 StringText
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Struct
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Then
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 To
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 True
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Try
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 UInt16
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 UInt32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 UInt64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 UInt8
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 UNativeInt
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Underscore
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Upcast
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Val
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Void
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 When
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 While
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 WhitespaceTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 With
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 Yield
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags: Int32 YieldBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpTokenKind)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAbstract
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAdjacentPrefixOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAmpersand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAmpersandAmpersand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAs
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsAssert
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBarBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBarRightBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBarRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBase
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBegin
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBigNumber
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsBinder
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsByteArray
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsChar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsClass
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsColon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsColonColon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsColonEquals
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsColonGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsColonQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsColonQuestionMarkGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsComma
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsCommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsConst
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsConstraint
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDecimal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDefault
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDelegate
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDoBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDollar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDone
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDotDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDotDotHat
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDownTo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsDowncast
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsElif
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsEquals
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsException
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsExtern
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFalse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFinally
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFixed
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFun
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFunction
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsFunkyOperatorName
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsGlobal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsGreaterBarRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsGreaterRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHash
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHashElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHashEndIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHashIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHashLight
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHashLine
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHighPrecedenceBracketApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHighPrecedenceParenthesisApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsHighPrecedenceTypeApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsIdentifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsIeee32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsIeee64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsIn
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInactiveCode
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixAmpersandOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixAsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixAtHatOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixBarOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixCompareOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixLand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixLor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixLsl
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixLsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixLxor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixMod
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixStarDivideModuloOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInfixStarStarOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInherit
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInline
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInstance
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInt16
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInt32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInt32DotDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInt64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInt8
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsInternal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsJoinIn
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsKeywordString
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLazy
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftArrow
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftBraceBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftBracketBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftBracketLess
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftParenthesisStarRightParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLeftQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLess
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLet
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsLineCommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsMatch
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsMatchBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsMember
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsMinus
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsMutable
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsNativeInt
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsNew
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsNull
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideAssert
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideBinder
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideBlockBegin
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideBlockEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideBlockSep
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideDeclEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideDo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideDoBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideFun
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideFunction
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideInterfaceMember
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideLazy
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideLet
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideReset
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideRightBlockEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideThen
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOffsideWith
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOpen
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsOverride
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsPercentOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsPlusMinusOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsPrefixOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsPrivate
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsPublic
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsQuestionMarkQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRec
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsReserved
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRightArrow
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRightBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRightParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRightQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsRightQuoteDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsSemicolon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsSemicolonSemicolon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsSig
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsStar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsStatic
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsString
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsStringText
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsStruct
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsThen
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsTo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsTrue
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsTry
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsType
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUInt16
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUInt32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUInt64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUInt8
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUNativeInt
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUnderscore
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsUpcast
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsVal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsVoid
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsWhen
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsWhile
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsWhitespaceTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsWith
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsYield
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean IsYieldBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAbstract()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAdjacentPrefixOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAmpersand()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAmpersandAmpersand()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAs()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAsr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsAssert()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBarBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBarRightBrace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBarRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBase()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBegin()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBigNumber()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsBinder()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsByteArray()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsChar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsClass()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsColon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsColonColon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsColonEquals()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsColonGreater()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsColonQuestionMark()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsColonQuestionMarkGreater()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsComma()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsCommentTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsConst()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsConstraint()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDecimal()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDefault()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDelegate()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDo()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDoBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDollar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDone()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDotDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDotDotHat()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDownTo()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsDowncast()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsElif()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsElse()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsEquals()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsException()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsExtern()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFalse()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFinally()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFixed()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFun()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFunction()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsFunkyOperatorName()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsGlobal()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsGreater()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsGreaterBarRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsGreaterRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHash()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHashElse()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHashEndIf()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHashIf()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHashLight()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHashLine()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHighPrecedenceBracketApp()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHighPrecedenceParenthesisApp()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsHighPrecedenceTypeApp()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsIdentifier()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsIeee32()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsIeee64()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsIf()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsIn()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInactiveCode()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixAmpersandOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixAsr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixAtHatOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixBarOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixCompareOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixLand()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixLor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixLsl()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixLsr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixLxor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixMod()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixStarDivideModuloOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInfixStarStarOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInherit()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInline()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInstance()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInt16()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInt32()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInt32DotDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInt64()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInt8()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsInternal()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsJoinIn()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsKeywordString()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLazy()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftArrow()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftBrace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftBraceBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftBracketBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftBracketLess()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftParenthesis()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftParenthesisStarRightParenthesis()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLeftQuote()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLess()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLet()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsLineCommentTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsMatch()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsMatchBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsMember()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsMinus()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsMutable()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsNativeInt()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsNew()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsNull()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOf()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideAssert()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideBinder()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideBlockBegin()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideBlockEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideBlockSep()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideDeclEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideDo()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideDoBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideElse()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideFun()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideFunction()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideInterfaceMember()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideLazy()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideLet()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideReset()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideRightBlockEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideThen()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOffsideWith()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOpen()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsOverride()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsPercentOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsPlusMinusOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsPrefixOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsPrivate()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsPublic()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsQuestionMark()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsQuestionMarkQuestionMark()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsQuote()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRec()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsReserved()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRightArrow()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRightBrace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRightParenthesis()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRightQuote()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsRightQuoteDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsSemicolon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsSemicolonSemicolon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsSig()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsStar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsStatic()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsString()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsStringText()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsStruct()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsThen()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsTo()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsTrue()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsTry()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUInt16()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUInt32()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUInt64()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUInt8()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUNativeInt()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUnderscore()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsUpcast()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsVal()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsVoid()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsWhen()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsWhile()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsWhitespaceTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsWith()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsYield()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Boolean get_IsYieldBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Abstract
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind AdjacentPrefixOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Ampersand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind AmpersandAmpersand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind And
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind As
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Asr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Assert
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Bar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind BarBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind BarRightBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind BarRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Base
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Begin
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind BigNumber
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Binder
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind ByteArray
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Char
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Class
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Colon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind ColonColon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind ColonEquals
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind ColonGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind ColonQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind ColonQuestionMarkGreater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Comma
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind CommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Const
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Constraint
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Constructor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Decimal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Default
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Delegate
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Do
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind DoBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Dollar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Done
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Dot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind DotDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind DotDotHat
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind DownTo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Downcast
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Elif
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Else
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind End
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Equals
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Exception
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Extern
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind False
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Finally
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Fixed
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind For
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Fun
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Function
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind FunkyOperatorName
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Global
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Greater
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind GreaterBarRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind GreaterRightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Hash
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HashElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HashEndIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HashIf
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HashLight
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HashLine
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HighPrecedenceBracketApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HighPrecedenceParenthesisApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind HighPrecedenceTypeApp
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Identifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Ieee32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Ieee64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind If
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind In
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InactiveCode
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixAmpersandOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixAsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixAtHatOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixBarOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixCompareOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixLand
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixLor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixLsl
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixLsr
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixLxor
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixMod
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixStarDivideModuloOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind InfixStarStarOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Inherit
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Inline
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Instance
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Int16
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Int32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Int32DotDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Int64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Int8
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Interface
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Internal
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind JoinIn
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind KeywordString
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Lazy
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftArrow
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftBraceBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftBracketBar
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftBracketLess
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftParenthesisStarRightParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LeftQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Less
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Let
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind LineCommentTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Match
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind MatchBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Member
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Minus
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Module
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Mutable
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Namespace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind NativeInt
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind New
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind None
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Null
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Of
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideAssert
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideBinder
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideBlockBegin
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideBlockEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideBlockSep
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideDeclEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideDo
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideDoBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideElse
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideFun
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideFunction
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideInterfaceMember
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideLazy
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideLet
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideReset
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideRightBlockEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideThen
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind OffsideWith
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Open
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Or
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Override
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind PercentOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind PlusMinusOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind PrefixOperator
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Private
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Public
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind QuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind QuestionMarkQuestionMark
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Quote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Rec
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Reserved
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind RightArrow
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind RightBrace
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind RightBracket
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind RightParenthesis
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind RightQuote
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind RightQuoteDot
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Semicolon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind SemicolonSemicolon
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Sig
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Star
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Static
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind String
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind StringText
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Struct
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Then
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind To
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind True
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Try
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Type
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind UInt16
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind UInt32
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind UInt64
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind UInt8
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind UNativeInt
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Underscore
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Upcast
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Val
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Void
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind When
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind While
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind WhitespaceTrivia
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind With
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind Yield
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind YieldBang
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Abstract()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_AdjacentPrefixOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Ampersand()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_AmpersandAmpersand()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_And()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_As()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Asr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Assert()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Bar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_BarBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_BarRightBrace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_BarRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Base()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Begin()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_BigNumber()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Binder()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_ByteArray()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Char()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Class()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Colon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_ColonColon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_ColonEquals()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_ColonGreater()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_ColonQuestionMark()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_ColonQuestionMarkGreater()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Comma()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_CommentTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Const()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Constraint()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Constructor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Decimal()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Default()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Delegate()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Do()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_DoBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Dollar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Done()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Dot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_DotDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_DotDotHat()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_DownTo()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Downcast()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Elif()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Else()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_End()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Equals()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Exception()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Extern()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_False()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Finally()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Fixed()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_For()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Fun()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Function()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_FunkyOperatorName()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Global()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Greater()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_GreaterBarRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_GreaterRightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Hash()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HashElse()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HashEndIf()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HashIf()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HashLight()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HashLine()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HighPrecedenceBracketApp()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HighPrecedenceParenthesisApp()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_HighPrecedenceTypeApp()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Identifier()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Ieee32()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Ieee64()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_If()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_In()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InactiveCode()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixAmpersandOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixAsr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixAtHatOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixBarOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixCompareOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixLand()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixLor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixLsl()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixLsr()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixLxor()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixMod()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixStarDivideModuloOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_InfixStarStarOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Inherit()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Inline()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Instance()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Int16()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Int32()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Int32DotDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Int64()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Int8()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Interface()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Internal()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_JoinIn()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_KeywordString()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Lazy()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftArrow()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftBrace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftBraceBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftBracketBar()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftBracketLess()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftParenthesis()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftParenthesisStarRightParenthesis()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LeftQuote()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Less()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Let()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_LineCommentTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Match()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_MatchBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Member()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Minus()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Module()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Mutable()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Namespace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_NativeInt()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_New()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_None()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Null()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Of()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideAssert()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideBinder()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideBlockBegin()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideBlockEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideBlockSep()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideDeclEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideDo()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideDoBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideElse()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideFun()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideFunction()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideInterfaceMember()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideLazy()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideLet()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideReset()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideRightBlockEnd()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideThen()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_OffsideWith()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Open()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Or()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Override()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_PercentOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_PlusMinusOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_PrefixOperator()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Private()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Public()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_QuestionMark()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_QuestionMarkQuestionMark()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Quote()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Rec()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Reserved()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_RightArrow()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_RightBrace()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_RightBracket()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_RightParenthesis()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_RightQuote()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_RightQuoteDot()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Semicolon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_SemicolonSemicolon()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Sig()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Star()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Static()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_String()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_StringText()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Struct()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Then()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_To()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_True()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Try()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Type()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_UInt16()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_UInt32()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_UInt64()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_UInt8()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_UNativeInt()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Underscore()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Upcast()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Val()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Void()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_When()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_While()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_WhitespaceTrivia()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_With()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_Yield()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind get_YieldBang()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: FSharp.Compiler.SourceCodeServices.FSharpTokenKind+Tags
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpTokenKind)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpTokenKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 AMP_AMP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 BAR
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 BAR_BAR
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 BAR_RBRACK
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 BEGIN
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 CLASS
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COLON
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COLON_COLON
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COLON_EQUALS
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COLON_GREATER
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COLON_QMARK
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COLON_QMARK_GREATER
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COMMA
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 COMMENT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 DO
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 DOT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 DOT_DOT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 DOT_DOT_HAT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 ELSE
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 EQUALS
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 FUNCTION
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 GREATER
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 GREATER_RBRACK
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 IDENT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INFIX_AT_HAT_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INFIX_BAR_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INFIX_COMPARE_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INFIX_STAR_DIV_MOD_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INT32_DOT_DOT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INTERP_STRING_BEGIN_END
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INTERP_STRING_BEGIN_PART
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INTERP_STRING_END
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 INTERP_STRING_PART
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 Identifier
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LARROW
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LBRACE
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LBRACK
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LBRACK_BAR
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LBRACK_LESS
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LESS
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LINE_COMMENT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 LPAREN
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 MINUS
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 NEW
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 OWITH
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 PERCENT_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 PLUS_MINUS_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 PREFIX_OP
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 QMARK
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 QUOTE
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 RARROW
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 RBRACE
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 RBRACK
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 RPAREN
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 SEMICOLON
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 STAR
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 STRING
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 STRUCT
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 String
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 THEN
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 TRY
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 UNDERSCORE
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 WHITESPACE
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 WITH
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_AMP_AMP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_BAR()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_BAR_BAR()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_BAR_RBRACK()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_BEGIN()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_CLASS()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COLON()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COLON_COLON()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COLON_EQUALS()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COLON_GREATER()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COLON_QMARK()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COLON_QMARK_GREATER()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COMMA()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_COMMENT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_DO()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_DOT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_DOT_DOT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_DOT_DOT_HAT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_ELSE()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_EQUALS()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_FUNCTION()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_GREATER()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_GREATER_RBRACK()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_IDENT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INFIX_AT_HAT_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INFIX_BAR_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INFIX_COMPARE_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INFIX_STAR_DIV_MOD_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INT32_DOT_DOT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INTERP_STRING_BEGIN_END()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INTERP_STRING_BEGIN_PART()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INTERP_STRING_END()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_INTERP_STRING_PART()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_Identifier()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LARROW()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LBRACE()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LBRACK()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LBRACK_BAR()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LBRACK_LESS()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LESS()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LINE_COMMENT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_LPAREN()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_MINUS()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_NEW()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_OWITH()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_PERCENT_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_PLUS_MINUS_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_PREFIX_OP()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_QMARK()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_QUOTE()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_RARROW()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_RBRACE()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_RBRACK()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_RPAREN()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_SEMICOLON()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_STAR()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_STRING()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_STRUCT()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_String()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_THEN()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_TRY()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_UNDERSCORE()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_WHITESPACE()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTag: Int32 get_WITH()
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass ChoiceSelect
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass MatchBraces
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass MemberSelect
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass MethodTip
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass None
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass ParamEnd
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass ParamNext
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass ParamStart
-FSharp.Compiler.SourceCodeServices.FSharpTokenTriggerClass: Int32 value__
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState CamlOnly
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState Comment
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState EndLineThenSkip
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState EndLineThenToken
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState IfDefSkip
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState InitialState
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState SingleLineComment
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState String
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState StringInComment
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState Token
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState TripleQuoteString
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState TripleQuoteStringInComment
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState VerbatimString
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState VerbatimStringInComment
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerColorState: Int32 value__
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState)
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState Initial
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState get_Initial()
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Int64 OtherBits
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Int64 PosBits
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Int64 get_OtherBits()
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Int64 get_PosBits()
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpTokenizerLexState: Void .ctor(Int64, Int64)
-FSharp.Compiler.SourceCodeServices.FSharpToolTip: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[System.String] ToFSharpToolTipElement(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.SourceCodeServices.FSharpToolTip: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[System.String] ToFSharpToolTipText(FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] TypeMapping
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Microsoft.FSharp.Collections.FSharpList`1[T] get_TypeMapping()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Microsoft.FSharp.Core.FSharpOption`1[System.String] ParamName
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Microsoft.FSharp.Core.FSharpOption`1[System.String] get_ParamName()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] Remarks
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Microsoft.FSharp.Core.FSharpOption`1[T] get_Remarks()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: T MainDescription
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: T get_MainDescription()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]: Void .ctor(T, FSharp.Compiler.SourceCodeServices.FSharpXmlDoc, Microsoft.FSharp.Collections.FSharpList`1[T], Microsoft.FSharp.Core.FSharpOption`1[T], Microsoft.FSharp.Core.FSharpOption`1[System.String])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean IsCompositionError
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean IsGroup
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean get_IsCompositionError()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean get_IsGroup()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: System.String Item
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]: System.String get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean IsCompositionError
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean IsGroup
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean get_IsCompositionError()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean get_IsGroup()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]] Item
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]] get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Tags[T]: Int32 CompositionError
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Tags[T]: Int32 Group
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Tags[T]: Int32 None
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean IsCompositionError
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean IsGroup
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean get_IsCompositionError()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean get_IsGroup()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+CompositionError[T]
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Group[T]
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1+Tags[T]
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T] NewCompositionError(System.String)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T] NewGroup(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipElementData`1[T]])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T] None
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T] Single(T, FSharp.Compiler.SourceCodeServices.FSharpXmlDoc, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[T]], Microsoft.FSharp.Core.FSharpOption`1[System.String], Microsoft.FSharp.Core.FSharpOption`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T] get_None()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T] NewFSharpToolTipText(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T])
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]] Item
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.FSharpToolTipElement`1[T]] get_Item()
-FSharp.Compiler.SourceCodeServices.FSharpToolTipText`1[T]: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean HasTypeDefinition
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsAbbreviation
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsAnonRecordType
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsFunctionType
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsGenericParameter
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsNamedType
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsStructTupleType
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsTupleType
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsUnresolved
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_HasTypeDefinition()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsAbbreviation()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsAnonRecordType()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsFunctionType()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsGenericParameter()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsNamedType()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsStructTupleType()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsTupleType()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsUnresolved()
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails AnonRecordTypeDetails
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpAnonRecordTypeDetails get_AnonRecordTypeDetails()
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpEntity NamedEntity
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpEntity TypeDefinition
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpEntity get_NamedEntity()
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpEntity get_TypeDefinition()
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpGenericParameter GenericParameter
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpGenericParameter get_GenericParameter()
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpParameter Prettify(FSharp.Compiler.SourceCodeServices.FSharpParameter)
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpType AbbreviatedType
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpType Instantiate(Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpGenericParameter,FSharp.Compiler.SourceCodeServices.FSharpType]])
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpType Prettify(FSharp.Compiler.SourceCodeServices.FSharpType)
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.SourceCodeServices.FSharpType get_AbbreviatedType()
-FSharp.Compiler.SourceCodeServices.FSharpType: FSharp.Compiler.TextLayout.Layout FormatLayout(FSharp.Compiler.SourceCodeServices.FSharpDisplayContext)
-FSharp.Compiler.SourceCodeServices.FSharpType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpType: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] BaseType
-FSharp.Compiler.SourceCodeServices.FSharpType: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_BaseType()
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter] Prettify(System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter])
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] AllInterfaces
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] GenericArguments
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] Prettify(System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType])
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_AllInterfaces()
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpType] get_GenericArguments()
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]] Prettify(System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]])
-FSharp.Compiler.SourceCodeServices.FSharpType: System.String Format(FSharp.Compiler.SourceCodeServices.FSharpDisplayContext)
-FSharp.Compiler.SourceCodeServices.FSharpType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpType: System.Tuple`2[System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]],FSharp.Compiler.SourceCodeServices.FSharpParameter] Prettify(System.Collections.Generic.IList`1[System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpParameter]], FSharp.Compiler.SourceCodeServices.FSharpParameter)
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean HasNullAnnotation
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean IsNullAmbivalent
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_HasNullAnnotation()
-FSharp.Compiler.SourceCodeServices.FSharpType: Boolean get_IsNullAmbivalent()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean HasFields
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean IsAccessible(FSharp.Compiler.SourceCodeServices.FSharpAccessibilityRights)
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean IsEffectivelySameAs(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean IsExplicitlySuppressed
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean IsUnresolved
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean get_HasFields()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean get_IsExplicitlySuppressed()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Boolean get_IsUnresolved()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: FSharp.Compiler.SourceCodeServices.FSharpAccessibility Accessibility
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: FSharp.Compiler.SourceCodeServices.FSharpAccessibility get_Accessibility()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: FSharp.Compiler.SourceCodeServices.FSharpAssembly Assembly
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: FSharp.Compiler.SourceCodeServices.FSharpAssembly get_Assembly()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: FSharp.Compiler.SourceCodeServices.FSharpType ReturnType
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: FSharp.Compiler.SourceCodeServices.FSharpType get_ReturnType()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Int32 GetEffectivelySameAsHash()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] ImplementationLocation
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] SignatureLocation
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_ImplementationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_SignatureLocation()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] Attributes
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] get_Attributes()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpField] UnionCaseFields
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[FSharp.Compiler.SourceCodeServices.FSharpField] get_UnionCaseFields()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[System.String] ElaboratedXmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[System.String] XmlDoc
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[System.String] get_ElaboratedXmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.Collections.Generic.IList`1[System.String] get_XmlDoc()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String CompiledName
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String Name
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String XmlDocSig
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String get_CompiledName()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: System.String get_XmlDocSig()
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: range DeclarationLocation
-FSharp.Compiler.SourceCodeServices.FSharpUnionCase: range get_DeclarationLocation()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedReferencesSet: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String DisplayName
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String FullName
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String get_DisplayName()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String get_FullName()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String[] Namespace
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: System.String[] get_Namespace()
-FSharp.Compiler.SourceCodeServices.FSharpUnresolvedSymbol: Void .ctor(System.String, System.String, System.String[])
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Tags: Int32 None
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Tags: Int32 Text
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Tags: Int32 XmlDocFileSignature
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpXmlDoc)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean IsText
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean IsXmlDocFileSignature
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean get_IsText()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Boolean get_IsXmlDocFileSignature()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpXmlDoc)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: System.String[] elaboratedXmlLines
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: System.String[] get_elaboratedXmlLines()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: System.String[] get_unprocessedLines()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text: System.String[] unprocessedLines
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpXmlDoc)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean IsText
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean IsXmlDocFileSignature
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean get_IsText()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Boolean get_IsXmlDocFileSignature()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpXmlDoc)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: System.String Item1
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: System.String Item2
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: System.String get_Item1()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature: System.String get_Item2()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean Equals(FSharp.Compiler.SourceCodeServices.FSharpXmlDoc)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean IsNone
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean IsText
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean IsXmlDocFileSignature
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean get_IsNone()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean get_IsText()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Boolean get_IsXmlDocFileSignature()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc NewText(System.String[], System.String[])
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc NewXmlDocFileSignature(System.String, System.String)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc None
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc get_None()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Tags
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+Text
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: FSharp.Compiler.SourceCodeServices.FSharpXmlDoc+XmlDocFileSignature
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.FSharpXmlDoc)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 Tag
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.FSharpXmlDoc: System.String ToString()
-FSharp.Compiler.SourceCodeServices.FileSystemAutoOpens: Byte[] File.ReadBinaryChunk.Static(System.String, Int32, Int32)
-FSharp.Compiler.SourceCodeServices.FileSystemAutoOpens: FSharp.Compiler.SourceCodeServices.IFileSystem FileSystem
-FSharp.Compiler.SourceCodeServices.FileSystemAutoOpens: FSharp.Compiler.SourceCodeServices.IFileSystem get_FileSystem()
-FSharp.Compiler.SourceCodeServices.FileSystemAutoOpens: System.IO.StreamReader File.OpenReaderAndRetry.Static(System.String, Microsoft.FSharp.Core.FSharpOption`1[System.Int32], Boolean)
-FSharp.Compiler.SourceCodeServices.FileSystemAutoOpens: Void set_FileSystem(FSharp.Compiler.SourceCodeServices.IFileSystem)
-FSharp.Compiler.SourceCodeServices.IAssemblyContentCache: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.AssemblyContentCacheEntry] TryGet(System.String)
-FSharp.Compiler.SourceCodeServices.IAssemblyContentCache: Void Set(System.String, FSharp.Compiler.SourceCodeServices.AssemblyContentCacheEntry)
-FSharp.Compiler.SourceCodeServices.IFileSystem: Boolean IsInvalidPathShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: Boolean IsPathRootedShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: Boolean IsStableFileHeuristic(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: Boolean SafeExists(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: Byte[] ReadAllBytesShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.DateTime GetLastWriteTimeShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.IO.Stream FileStreamCreateShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.IO.Stream FileStreamReadShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.IO.Stream FileStreamWriteExistingShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.Reflection.Assembly AssemblyLoad(System.Reflection.AssemblyName)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.Reflection.Assembly AssemblyLoadFrom(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.String GetFullPathShim(System.String)
-FSharp.Compiler.SourceCodeServices.IFileSystem: System.String GetTempPathShim()
-FSharp.Compiler.SourceCodeServices.IFileSystem: Void FileDelete(System.String)
-FSharp.Compiler.SourceCodeServices.InheritanceContext+Tags: Int32 Class
-FSharp.Compiler.SourceCodeServices.InheritanceContext+Tags: Int32 Interface
-FSharp.Compiler.SourceCodeServices.InheritanceContext+Tags: Int32 Unknown
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean Equals(FSharp.Compiler.SourceCodeServices.InheritanceContext)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean IsClass
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean IsUnknown
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean get_IsClass()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Boolean get_IsUnknown()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext Class
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext Interface
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext Unknown
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext get_Class()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext get_Interface()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext get_Unknown()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: FSharp.Compiler.SourceCodeServices.InheritanceContext+Tags
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.InheritanceContext)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 Tag
-FSharp.Compiler.SourceCodeServices.InheritanceContext: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.InheritanceContext: System.String ToString()
-FSharp.Compiler.SourceCodeServices.InsertContext: Boolean Equals(FSharp.Compiler.SourceCodeServices.InsertContext)
-FSharp.Compiler.SourceCodeServices.InsertContext: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.InsertContext: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.InsertContext: FSharp.Compiler.SourceCodeServices.ScopeKind ScopeKind
-FSharp.Compiler.SourceCodeServices.InsertContext: FSharp.Compiler.SourceCodeServices.ScopeKind get_ScopeKind()
-FSharp.Compiler.SourceCodeServices.InsertContext: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.InsertContext: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.InsertContext: System.String ToString()
-FSharp.Compiler.SourceCodeServices.InsertContext: Void .ctor(FSharp.Compiler.SourceCodeServices.ScopeKind, pos)
-FSharp.Compiler.SourceCodeServices.InsertContext: pos Pos
-FSharp.Compiler.SourceCodeServices.InsertContext: pos get_Pos()
-FSharp.Compiler.SourceCodeServices.LookupType+Tags: Int32 Fuzzy
-FSharp.Compiler.SourceCodeServices.LookupType+Tags: Int32 Precise
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean Equals(FSharp.Compiler.SourceCodeServices.LookupType)
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean IsFuzzy
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean IsPrecise
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean get_IsFuzzy()
-FSharp.Compiler.SourceCodeServices.LookupType: Boolean get_IsPrecise()
-FSharp.Compiler.SourceCodeServices.LookupType: FSharp.Compiler.SourceCodeServices.LookupType Fuzzy
-FSharp.Compiler.SourceCodeServices.LookupType: FSharp.Compiler.SourceCodeServices.LookupType Precise
-FSharp.Compiler.SourceCodeServices.LookupType: FSharp.Compiler.SourceCodeServices.LookupType get_Fuzzy()
-FSharp.Compiler.SourceCodeServices.LookupType: FSharp.Compiler.SourceCodeServices.LookupType get_Precise()
-FSharp.Compiler.SourceCodeServices.LookupType: FSharp.Compiler.SourceCodeServices.LookupType+Tags
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.LookupType)
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 Tag
-FSharp.Compiler.SourceCodeServices.LookupType: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.LookupType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Boolean Equals(FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Boolean Resolved
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Boolean get_Resolved()
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: System.String Ident
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: System.String ToString()
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: System.String get_Ident()
-FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent: Void .ctor(System.String, Boolean)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.ModuleKind)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean HasModuleSuffix
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean IsAutoOpen
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean get_HasModuleSuffix()
-FSharp.Compiler.SourceCodeServices.ModuleKind: Boolean get_IsAutoOpen()
-FSharp.Compiler.SourceCodeServices.ModuleKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ModuleKind)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ModuleKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ModuleKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ModuleKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ModuleKind: Void .ctor(Boolean, Boolean)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Boolean Equals(Container)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: ContainerType Type
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: ContainerType get_Type()
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Int32 CompareTo(Container)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: System.String Name
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: System.String ToString()
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.NavigateTo+Container: Void .ctor(ContainerType, System.String)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType+Tags: Int32 Exception
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType+Tags: Int32 File
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType+Tags: Int32 Namespace
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean Equals(ContainerType)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean IsException
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean IsFile
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean IsType
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean get_IsException()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean get_IsFile()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType Exception
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType File
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType Module
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType Namespace
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType Type
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType get_Exception()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType get_File()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType get_Module()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType get_Namespace()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: ContainerType get_Type()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType+Tags
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 CompareTo(ContainerType)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 Tag
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Boolean Equals(NavigableItem)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Boolean IsSignature
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Boolean get_IsSignature()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Container Container
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Container get_Container()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: NavigableItemKind Kind
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: NavigableItemKind get_Kind()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: System.String Name
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: System.String ToString()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: System.String get_Name()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: Void .ctor(System.String, range, Boolean, NavigableItemKind, Container)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: range Range
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem: range get_Range()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Constructor
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 EnumCase
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Exception
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Field
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Member
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 ModuleAbbreviation
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 ModuleValue
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Property
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags: Int32 UnionCase
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean Equals(NavigableItemKind)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsEnumCase
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsException
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsField
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsMember
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsModuleAbbreviation
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsModuleValue
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsType
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean IsUnionCase
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsEnumCase()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsException()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsMember()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsModuleAbbreviation()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsModuleValue()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Boolean get_IsUnionCase()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind+Tags
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 CompareTo(NavigableItemKind)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Constructor
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind EnumCase
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Exception
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Field
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Member
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Module
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind ModuleAbbreviation
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind ModuleValue
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Property
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind Type
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind UnionCase
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Constructor()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_EnumCase()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Exception()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Field()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Member()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Module()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_ModuleAbbreviation()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_ModuleValue()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Property()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_Type()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: NavigableItemKind get_UnionCase()
-FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.NavigateTo: FSharp.Compiler.SourceCodeServices.NavigateTo+Container
-FSharp.Compiler.SourceCodeServices.NavigateTo: FSharp.Compiler.SourceCodeServices.NavigateTo+ContainerType
-FSharp.Compiler.SourceCodeServices.NavigateTo: FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItem
-FSharp.Compiler.SourceCodeServices.NavigateTo: FSharp.Compiler.SourceCodeServices.NavigateTo+NavigableItemKind
-FSharp.Compiler.SourceCodeServices.NavigateTo: NavigableItem[] getNavigableItems(ParsedInput)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint+Tags: Int32 Nearest
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint+Tags: Int32 TopLevel
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean Equals(FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean IsNearest
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean IsTopLevel
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean get_IsNearest()
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Boolean get_IsTopLevel()
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint Nearest
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint TopLevel
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint get_Nearest()
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint get_TopLevel()
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint+Tags
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 Tag
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean Equals(FSharp.Compiler.SourceCodeServices.ParamTypeSymbol)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean IsByref
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean IsParam
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean get_IsByref()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Boolean get_IsParam()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: FSharp.Compiler.SourceCodeServices.ExternalType Item
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: FSharp.Compiler.SourceCodeServices.ExternalType get_Item()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ParamTypeSymbol)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean Equals(FSharp.Compiler.SourceCodeServices.ParamTypeSymbol)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean IsByref
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean IsParam
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean get_IsByref()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Boolean get_IsParam()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: FSharp.Compiler.SourceCodeServices.ExternalType Item
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: FSharp.Compiler.SourceCodeServices.ExternalType get_Item()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ParamTypeSymbol)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Tags: Int32 Byref
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Tags: Int32 Param
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean Equals(FSharp.Compiler.SourceCodeServices.ParamTypeSymbol)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean IsByref
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean IsParam
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean get_IsByref()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Boolean get_IsParam()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: FSharp.Compiler.SourceCodeServices.ParamTypeSymbol NewByref(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: FSharp.Compiler.SourceCodeServices.ParamTypeSymbol NewParam(FSharp.Compiler.SourceCodeServices.ExternalType)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Byref
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Param
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: FSharp.Compiler.SourceCodeServices.ParamTypeSymbol+Tags
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ParamTypeSymbol)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ParamTypeSymbol: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ParsedInput: FSharp.Compiler.SourceCodeServices.InsertContext findNearestPointToInsertOpenDeclaration(Int32, ParsedInput, System.String[], FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint)
-FSharp.Compiler.SourceCodeServices.ParsedInput: Microsoft.FSharp.Core.FSharpFunc`2[System.Tuple`4[Microsoft.FSharp.Core.FSharpOption`1[System.String[]],Microsoft.FSharp.Core.FSharpOption`1[System.String[]],Microsoft.FSharp.Core.FSharpOption`1[System.String[]],System.String[]],System.Tuple`2[FSharp.Compiler.SourceCodeServices.Entity,FSharp.Compiler.SourceCodeServices.InsertContext][]] tryFindInsertionContext(Int32, ParsedInput, FSharp.Compiler.SourceCodeServices.MaybeUnresolvedIdent[], FSharp.Compiler.SourceCodeServices.OpenStatementInsertionPoint)
-FSharp.Compiler.SourceCodeServices.ParsedInput: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident]] getLongIdentAt(ParsedInput, pos)
-FSharp.Compiler.SourceCodeServices.ParsedInput: pos adjustInsertionPoint(Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String], FSharp.Compiler.SourceCodeServices.InsertContext)
-FSharp.Compiler.SourceCodeServices.PrettyNaming: Boolean IsIdentifierPartCharacter(Char)
-FSharp.Compiler.SourceCodeServices.PrettyNaming: Boolean IsLongIdentifierPartCharacter(Char)
-FSharp.Compiler.SourceCodeServices.PrettyNaming: Boolean IsOperatorName(System.String)
-FSharp.Compiler.SourceCodeServices.PrettyNaming: Microsoft.FSharp.Collections.FSharpList`1[System.String] GetLongNameFromString(System.String)
-FSharp.Compiler.SourceCodeServices.PrettyNaming: Microsoft.FSharp.Collections.FSharpList`1[System.String] KeywordNames
-FSharp.Compiler.SourceCodeServices.PrettyNaming: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_KeywordNames()
-FSharp.Compiler.SourceCodeServices.PrettyNaming: System.String FormatAndOtherOverloadsString(Int32)
-FSharp.Compiler.SourceCodeServices.PrettyNaming: System.String QuoteIdentifierIfNeeded(System.String)
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean Equals(FSharp.Compiler.SourceCodeServices.RecordContext)
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean IsCopyOnUpdate
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean IsNew
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean get_IsCopyOnUpdate()
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Boolean get_IsNew()
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Int32 Tag
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: System.String Item
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: System.String ToString()
-FSharp.Compiler.SourceCodeServices.RecordContext+Constructor: System.String get_Item()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean Equals(FSharp.Compiler.SourceCodeServices.RecordContext)
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean IsCopyOnUpdate
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean IsNew
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean get_IsCopyOnUpdate()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Boolean get_IsNew()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Int32 Tag
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: System.String ToString()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]] Item2
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]] get_Item2()
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: range Item1
-FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate: range get_Item1()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean Equals(FSharp.Compiler.SourceCodeServices.RecordContext)
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean IsCopyOnUpdate
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean IsNew
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean get_IsCopyOnUpdate()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Boolean get_IsNew()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Int32 Tag
-FSharp.Compiler.SourceCodeServices.RecordContext+New: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: System.String ToString()
-FSharp.Compiler.SourceCodeServices.RecordContext+New: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]] Item
-FSharp.Compiler.SourceCodeServices.RecordContext+New: System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]] get_Item()
-FSharp.Compiler.SourceCodeServices.RecordContext+Tags: Int32 Constructor
-FSharp.Compiler.SourceCodeServices.RecordContext+Tags: Int32 CopyOnUpdate
-FSharp.Compiler.SourceCodeServices.RecordContext+Tags: Int32 New
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean Equals(FSharp.Compiler.SourceCodeServices.RecordContext)
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean IsConstructor
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean IsCopyOnUpdate
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean IsNew
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean get_IsConstructor()
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean get_IsCopyOnUpdate()
-FSharp.Compiler.SourceCodeServices.RecordContext: Boolean get_IsNew()
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext NewConstructor(System.String)
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext NewCopyOnUpdate(range, System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]])
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext NewNew(System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[System.String],Microsoft.FSharp.Core.FSharpOption`1[System.String]])
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext+Constructor
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext+CopyOnUpdate
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext+New
-FSharp.Compiler.SourceCodeServices.RecordContext: FSharp.Compiler.SourceCodeServices.RecordContext+Tags
-FSharp.Compiler.SourceCodeServices.RecordContext: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.RecordContext: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.RecordContext: Int32 Tag
-FSharp.Compiler.SourceCodeServices.RecordContext: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.RecordContext: System.String ToString()
-FSharp.Compiler.SourceCodeServices.ScopeKind+Tags: Int32 HashDirective
-FSharp.Compiler.SourceCodeServices.ScopeKind+Tags: Int32 Namespace
-FSharp.Compiler.SourceCodeServices.ScopeKind+Tags: Int32 NestedModule
-FSharp.Compiler.SourceCodeServices.ScopeKind+Tags: Int32 OpenDeclaration
-FSharp.Compiler.SourceCodeServices.ScopeKind+Tags: Int32 TopModule
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean Equals(FSharp.Compiler.SourceCodeServices.ScopeKind)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean IsHashDirective
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean IsNestedModule
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean IsOpenDeclaration
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean IsTopModule
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean get_IsHashDirective()
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean get_IsNestedModule()
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean get_IsOpenDeclaration()
-FSharp.Compiler.SourceCodeServices.ScopeKind: Boolean get_IsTopModule()
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind HashDirective
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind Namespace
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind NestedModule
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind OpenDeclaration
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind TopModule
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind get_HashDirective()
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind get_Namespace()
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind get_NestedModule()
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind get_OpenDeclaration()
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind get_TopModule()
-FSharp.Compiler.SourceCodeServices.ScopeKind: FSharp.Compiler.SourceCodeServices.ScopeKind+Tags
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.ScopeKind)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 Tag
-FSharp.Compiler.SourceCodeServices.ScopeKind: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.ScopeKind: System.String ToString()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 ComputationExpression
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 ConstructorForReferenceType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 ConstructorForValueType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Delegate
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 DisposableLocalValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 DisposableTopLevelValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 DisposableType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Enumeration
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Event
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Exception
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 ExtensionMethod
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Field
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Function
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Interface
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 IntrinsicFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Literal
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 LocalValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Method
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 MutableRecordField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 MutableVar
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 NamedArgument
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Namespace
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Operator
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Plaintext
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Printf
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Property
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 RecordField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 RecordFieldAsFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 ReferenceType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 TypeArgument
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 TypeDef
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 UnionCase
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 UnionCaseField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 Value
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags: Int32 ValueType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean Equals(FSharp.Compiler.SourceCodeServices.SemanticClassificationType)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsComputationExpression
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsConstructorForReferenceType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsConstructorForValueType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsDelegate
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsDisposableLocalValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsDisposableTopLevelValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsDisposableType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsEnumeration
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsEvent
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsException
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsExtensionMethod
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsIntrinsicFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsLiteral
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsLocalValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsMethod
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsMutableRecordField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsMutableVar
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsNamedArgument
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsOperator
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsPlaintext
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsPrintf
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsProperty
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsRecordFieldAsFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsReferenceType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsTypeArgument
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsTypeDef
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsUnionCase
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsUnionCaseField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean IsValueType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsComputationExpression()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsConstructorForReferenceType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsConstructorForValueType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsDelegate()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsDisposableLocalValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsDisposableTopLevelValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsDisposableType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsEnumeration()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsEvent()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsException()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsExtensionMethod()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsFunction()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsIntrinsicFunction()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsLiteral()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsLocalValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsMethod()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsMutableRecordField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsMutableVar()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsNamedArgument()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsOperator()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsPlaintext()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsPrintf()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsProperty()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsRecordFieldAsFunction()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsReferenceType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsTypeArgument()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsTypeDef()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsUnionCase()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsUnionCaseField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Boolean get_IsValueType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType ComputationExpression
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType ConstructorForReferenceType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType ConstructorForValueType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Delegate
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType DisposableLocalValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType DisposableTopLevelValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType DisposableType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Enumeration
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Event
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Exception
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType ExtensionMethod
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Field
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Function
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Interface
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType IntrinsicFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Literal
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType LocalValue
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Method
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Module
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType MutableRecordField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType MutableVar
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType NamedArgument
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Namespace
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Operator
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Plaintext
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Printf
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Property
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType RecordField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType RecordFieldAsFunction
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType ReferenceType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Type
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType TypeArgument
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType TypeDef
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType UnionCase
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType UnionCaseField
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType Value
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType ValueType
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_ComputationExpression()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_ConstructorForReferenceType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_ConstructorForValueType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Delegate()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_DisposableLocalValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_DisposableTopLevelValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_DisposableType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Enumeration()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Event()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Exception()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_ExtensionMethod()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Field()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Function()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Interface()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_IntrinsicFunction()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Literal()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_LocalValue()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Method()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Module()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_MutableRecordField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_MutableVar()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_NamedArgument()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Namespace()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Operator()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Plaintext()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Printf()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Property()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_RecordField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_RecordFieldAsFunction()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_ReferenceType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Type()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_TypeArgument()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_TypeDef()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_UnionCase()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_UnionCaseField()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_Value()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType get_ValueType()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: FSharp.Compiler.SourceCodeServices.SemanticClassificationType+Tags
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.SemanticClassificationType)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 Tag
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.SemanticClassificationType: System.String ToString()
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: Boolean Equals(SimplifiableRange)
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: System.String RelativeName
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: System.String ToString()
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: System.String get_RelativeName()
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: Void .ctor(range, System.String)
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: range Range
-FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange: range get_Range()
-FSharp.Compiler.SourceCodeServices.SimplifyNames: FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange
-FSharp.Compiler.SourceCodeServices.SimplifyNames: Microsoft.FSharp.Control.FSharpAsync`1[System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.SimplifyNames+SimplifiableRange]] getSimplifiableNames(FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String])
-FSharp.Compiler.SourceCodeServices.SourceFile: Boolean IsCompilable(System.String)
-FSharp.Compiler.SourceCodeServices.SourceFile: Boolean MustBeSingleFileProject(System.String)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse+Tags: Int32 Below
-FSharp.Compiler.SourceCodeServices.Structure+Collapse+Tags: Int32 Same
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean Equals(Collapse)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean IsBelow
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean IsSame
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean get_IsBelow()
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Boolean get_IsSame()
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Collapse Below
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Collapse Same
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Collapse get_Below()
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Collapse get_Same()
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: FSharp.Compiler.SourceCodeServices.Structure+Collapse+Tags
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 CompareTo(Collapse)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 Tag
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.Structure+Collapse: System.String ToString()
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 ArrayOrList
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Attribute
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Comment
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 CompExpr
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 CompExprInternal
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Do
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 ElseInIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 EnumCase
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 FinallyInTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 For
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 HashDirective
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 IfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Interface
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Lambda
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 LetOrUse
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 LetOrUseBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Match
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 MatchBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 MatchClause
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 MatchLambda
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Member
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Module
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Namespace
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 New
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 ObjExpr
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Open
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Quote
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Record
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 RecordDefn
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 RecordField
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 SpecialFunc
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 ThenInIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 TryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 TryInTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 TryInTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 TryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Tuple
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Type
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 TypeExtension
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 UnionCase
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 UnionDefn
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 Val
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 While
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 WithInTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 XmlDocComment
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 YieldOrReturn
-FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags: Int32 YieldOrReturnBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean Equals(Scope)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsArrayOrList
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsAttribute
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsComment
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsCompExpr
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsCompExprInternal
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsDo
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsElseInIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsEnumCase
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsFinallyInTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsFor
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsHashDirective
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsInterface
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsLambda
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsLetOrUse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsLetOrUseBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsMatch
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsMatchBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsMatchClause
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsMatchLambda
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsMember
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsModule
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsNamespace
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsNew
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsObjExpr
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsOpen
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsQuote
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsRecord
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsRecordDefn
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsRecordField
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsSpecialFunc
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsThenInIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsTryInTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsTryInTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsTuple
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsType
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsTypeExtension
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsUnionCase
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsUnionDefn
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsVal
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsWhile
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsWithInTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsXmlDocComment
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsYieldOrReturn
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean IsYieldOrReturnBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsArrayOrList()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsAttribute()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsComment()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsCompExpr()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsCompExprInternal()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsDo()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsElseInIfThenElse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsEnumCase()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsFinallyInTryFinally()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsFor()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsHashDirective()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsIfThenElse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsInterface()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsLambda()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsLetOrUse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsMatch()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsMatchBang()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsMatchClause()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsMatchLambda()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsMember()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsModule()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsNamespace()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsNew()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsObjExpr()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsOpen()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsQuote()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsRecord()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsRecordDefn()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsRecordField()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsSpecialFunc()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsThenInIfThenElse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsTryFinally()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsTryInTryFinally()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsTryInTryWith()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsTryWith()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsTuple()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsType()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsTypeExtension()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsUnionCase()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsUnionDefn()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsVal()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsWhile()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsWithInTryWith()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsXmlDocComment()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Boolean get_IsYieldOrReturnBang()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: FSharp.Compiler.SourceCodeServices.Structure+Scope+Tags
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 CompareTo(Scope)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 Tag
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope ArrayOrList
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Attribute
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Comment
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope CompExpr
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope CompExprInternal
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Do
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope ElseInIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope EnumCase
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope FinallyInTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope For
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope HashDirective
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope IfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Interface
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Lambda
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope LetOrUse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope LetOrUseBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Match
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope MatchBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope MatchClause
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope MatchLambda
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Member
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Module
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Namespace
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope New
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope ObjExpr
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Open
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Quote
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Record
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope RecordDefn
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope RecordField
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope SpecialFunc
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope ThenInIfThenElse
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope TryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope TryInTryFinally
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope TryInTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope TryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Tuple
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Type
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope TypeExtension
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope UnionCase
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope UnionDefn
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope Val
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope While
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope WithInTryWith
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope XmlDocComment
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope YieldOrReturn
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope YieldOrReturnBang
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_ArrayOrList()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Attribute()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Comment()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_CompExpr()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_CompExprInternal()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Do()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_ElseInIfThenElse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_EnumCase()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_FinallyInTryFinally()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_For()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_HashDirective()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_IfThenElse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Interface()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Lambda()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_LetOrUse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_LetOrUseBang()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Match()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_MatchBang()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_MatchClause()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_MatchLambda()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Member()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Module()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Namespace()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_New()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_ObjExpr()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Open()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Quote()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Record()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_RecordDefn()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_RecordField()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_SpecialFunc()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_ThenInIfThenElse()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_TryFinally()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_TryInTryFinally()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_TryInTryWith()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_TryWith()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Tuple()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Type()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_TypeExtension()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_UnionCase()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_UnionDefn()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_Val()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_While()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_WithInTryWith()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_XmlDocComment()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_YieldOrReturn()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: Scope get_YieldOrReturnBang()
-FSharp.Compiler.SourceCodeServices.Structure+Scope: System.String ToString()
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Boolean Equals(ScopeRange)
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Collapse Collapse
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Collapse get_Collapse()
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Scope Scope
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Scope get_Scope()
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: System.String ToString()
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: Void .ctor(Scope, Collapse, range, range)
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: range CollapseRange
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: range Range
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: range get_CollapseRange()
-FSharp.Compiler.SourceCodeServices.Structure+ScopeRange: range get_Range()
-FSharp.Compiler.SourceCodeServices.Structure: FSharp.Compiler.SourceCodeServices.Structure+Collapse
-FSharp.Compiler.SourceCodeServices.Structure: FSharp.Compiler.SourceCodeServices.Structure+Scope
-FSharp.Compiler.SourceCodeServices.Structure: FSharp.Compiler.SourceCodeServices.Structure+ScopeRange
-FSharp.Compiler.SourceCodeServices.Structure: System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.Structure+ScopeRange] getOutliningRanges(System.String[], ParsedInput)
-FSharp.Compiler.SourceCodeServices.Symbol: Boolean hasAttribute[T](System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute])
-FSharp.Compiler.SourceCodeServices.Symbol: Boolean hasModuleSuffixAttribute(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Boolean isAttribute[T](FSharp.Compiler.SourceCodeServices.FSharpAttribute)
-FSharp.Compiler.SourceCodeServices.Symbol: Boolean isOperator(System.String)
-FSharp.Compiler.SourceCodeServices.Symbol: Boolean isUnnamedUnionCaseField(FSharp.Compiler.SourceCodeServices.FSharpField)
-FSharp.Compiler.SourceCodeServices.Symbol: FSharp.Compiler.SourceCodeServices.FSharpType getAbbreviatedType(FSharp.Compiler.SourceCodeServices.FSharpType)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpActivePatternCase] |ActivePatternCase|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute] tryGetAttribute[T](System.Collections.Generic.IEnumerable`1[FSharp.Compiler.SourceCodeServices.FSharpAttribute])
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] |Constructor|_|(FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpEntity] |TypeWithDefinition|_|(FSharp.Compiler.SourceCodeServices.FSharpType)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpField] |RecordField|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue] |MemberFunctionOrValue|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType] |AbbreviatedType|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpUnionCase] |UnionCase|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |AbstractClass|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Array|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Attribute|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |ByRef|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Class|_|[a](FSharp.Compiler.SourceCodeServices.FSharpEntity, FSharp.Compiler.SourceCodeServices.FSharpEntity, a)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Delegate|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Enum|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Event|_|(FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |ExtensionMember|_|(FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |FSharpException|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |FSharpModule|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |FSharpType|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |FunctionType|_|(FSharp.Compiler.SourceCodeServices.FSharpType)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Function|_|(Boolean, FSharp.Compiler.SourceCodeServices.FSharpMemberOrFunctionOrValue)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Interface|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |MutableVar|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Namespace|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Parameter|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Pattern|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |ProvidedAndErasedType|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |ProvidedType|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Record|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |RefCell|_|(FSharp.Compiler.SourceCodeServices.FSharpType)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |Tuple|_|(FSharp.Compiler.SourceCodeServices.FSharpType)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |UnionType|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.Unit] |ValueType|_|(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpField,FSharp.Compiler.SourceCodeServices.FSharpType]] |Field|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.SourceCodeServices.FSharpEntity,FSharp.Compiler.SourceCodeServices.FSharpEntity,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType]]] |FSharpEntity|_|(FSharp.Compiler.SourceCodeServices.FSharpSymbol)
-FSharp.Compiler.SourceCodeServices.Symbol: System.Tuple`2[FSharp.Compiler.SourceCodeServices.FSharpEntity,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.FSharpType]] getEntityAbbreviatedType(FSharp.Compiler.SourceCodeServices.FSharpEntity)
-FSharp.Compiler.SourceCodeServices.UntypedParseImpl: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] GetRangeOfExprLeftOfDot(pos, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+ParsedInput])
-FSharp.Compiler.SourceCodeServices.UntypedParseImpl: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.CompletionContext] TryGetCompletionContext(pos, ParsedInput, System.String)
-FSharp.Compiler.SourceCodeServices.UntypedParseImpl: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SourceCodeServices.EntityKind] GetEntityKind(pos, ParsedInput)
-FSharp.Compiler.SourceCodeServices.UntypedParseImpl: Microsoft.FSharp.Core.FSharpOption`1[System.String] TryFindExpressionIslandInPosition(pos, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+ParsedInput])
-FSharp.Compiler.SourceCodeServices.UntypedParseImpl: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+pos,System.Boolean]] TryFindExpressionASTLeftOfDotLeftOfCursor(pos, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+ParsedInput])
-FSharp.Compiler.SourceCodeServices.UntypedParseImpl: System.String[] GetFullNameOfSmallestModuleOrNamespaceAtPoint(ParsedInput, pos)
-FSharp.Compiler.SourceCodeServices.UnusedDeclarations: Microsoft.FSharp.Control.FSharpAsync`1[System.Collections.Generic.IEnumerable`1[FSharp.Compiler.Range+range]] getUnusedDeclarations(FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults, Boolean)
-FSharp.Compiler.SourceCodeServices.UnusedOpens: Microsoft.FSharp.Control.FSharpAsync`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range]] getUnusedOpens(FSharp.Compiler.SourceCodeServices.FSharpCheckFileResults, Microsoft.FSharp.Core.FSharpFunc`2[System.Int32,System.String])
-FSharp.Compiler.SourceCodeServices.XmlDocComment: Microsoft.FSharp.Core.FSharpOption`1[System.Int32] isBlank(System.String)
-FSharp.Compiler.SourceCodeServices.XmlDocParser: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SourceCodeServices.XmlDocable] getXmlDocables(FSharp.Compiler.Text.ISourceText, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+ParsedInput])
-FSharp.Compiler.SourceCodeServices.XmlDocable: Boolean Equals(FSharp.Compiler.SourceCodeServices.XmlDocable)
-FSharp.Compiler.SourceCodeServices.XmlDocable: Boolean Equals(System.Object)
-FSharp.Compiler.SourceCodeServices.XmlDocable: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.XmlDocable: FSharp.Compiler.SourceCodeServices.XmlDocable NewXmlDocable(Int32, Int32, Microsoft.FSharp.Collections.FSharpList`1[System.String])
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 CompareTo(FSharp.Compiler.SourceCodeServices.XmlDocable)
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 CompareTo(System.Object)
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 GetHashCode()
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 Tag
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 get_Tag()
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 get_indent()
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 get_line()
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 indent
-FSharp.Compiler.SourceCodeServices.XmlDocable: Int32 line
-FSharp.Compiler.SourceCodeServices.XmlDocable: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_paramNames()
-FSharp.Compiler.SourceCodeServices.XmlDocable: Microsoft.FSharp.Collections.FSharpList`1[System.String] paramNames
-FSharp.Compiler.SourceCodeServices.XmlDocable: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Tags: Int32 No
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Tags: Int32 Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean Equals(DebugPointAtFinally)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: range get_range()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes: range range
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean Equals(DebugPointAtFinally)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: DebugPointAtFinally NewYes(range)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: DebugPointAtFinally No
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: DebugPointAtFinally get_No()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Tags
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: FSharp.Compiler.SyntaxTree+DebugPointAtFinally+Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtFinally: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Tags: Int32 No
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Tags: Int32 Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean Equals(DebugPointAtFor)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: range get_range()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes: range range
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean Equals(DebugPointAtFor)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: DebugPointAtFor NewYes(range)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: DebugPointAtFor No
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: DebugPointAtFor get_No()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: FSharp.Compiler.SyntaxTree+DebugPointAtFor+Tags
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: FSharp.Compiler.SyntaxTree+DebugPointAtFor+Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtFor: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential+Tags: Int32 Both
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential+Tags: Int32 ExprOnly
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential+Tags: Int32 StmtOnly
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean Equals(DebugPointAtSequential)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean IsBoth
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean IsExprOnly
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean IsStmtOnly
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean get_IsBoth()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean get_IsExprOnly()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Boolean get_IsStmtOnly()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: DebugPointAtSequential Both
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: DebugPointAtSequential ExprOnly
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: DebugPointAtSequential StmtOnly
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: DebugPointAtSequential get_Both()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: DebugPointAtSequential get_ExprOnly()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: DebugPointAtSequential get_StmtOnly()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: FSharp.Compiler.SyntaxTree+DebugPointAtSequential+Tags
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 CompareTo(DebugPointAtSequential)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtSequential: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Tags: Int32 Body
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Tags: Int32 No
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Tags: Int32 Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean Equals(DebugPointAtTry)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean IsBody
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean get_IsBody()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: range get_range()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes: range range
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean Equals(DebugPointAtTry)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean IsBody
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean get_IsBody()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: DebugPointAtTry Body
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: DebugPointAtTry NewYes(range)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: DebugPointAtTry No
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: DebugPointAtTry get_Body()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: DebugPointAtTry get_No()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: FSharp.Compiler.SyntaxTree+DebugPointAtTry+Tags
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: FSharp.Compiler.SyntaxTree+DebugPointAtTry+Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtTry: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Tags: Int32 No
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Tags: Int32 Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean Equals(DebugPointAtWhile)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: range get_range()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes: range range
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean Equals(DebugPointAtWhile)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: DebugPointAtWhile NewYes(range)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: DebugPointAtWhile No
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: DebugPointAtWhile get_No()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Tags
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: FSharp.Compiler.SyntaxTree+DebugPointAtWhile+Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtWhile: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Tags: Int32 No
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Tags: Int32 Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean Equals(DebugPointAtWith)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: range get_range()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes: range range
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean Equals(DebugPointAtWith)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: DebugPointAtWith NewYes(range)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: DebugPointAtWith No
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: DebugPointAtWith get_No()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: FSharp.Compiler.SyntaxTree+DebugPointAtWith+Tags
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: FSharp.Compiler.SyntaxTree+DebugPointAtWith+Yes
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointAtWith: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean Equals(DebugPointForBinding)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean IsDebugPointAtBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean IsNoDebugPointAtDoBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean IsNoDebugPointAtInvisibleBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean IsNoDebugPointAtLetBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean IsNoDebugPointAtStickyBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean get_IsDebugPointAtBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean get_IsNoDebugPointAtDoBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean get_IsNoDebugPointAtInvisibleBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean get_IsNoDebugPointAtLetBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Boolean get_IsNoDebugPointAtStickyBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: DebugPointForBinding Combine(DebugPointForBinding)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: range get_range()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding: range range
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+Tags: Int32 DebugPointAtBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+Tags: Int32 NoDebugPointAtDoBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+Tags: Int32 NoDebugPointAtInvisibleBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+Tags: Int32 NoDebugPointAtLetBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding+Tags: Int32 NoDebugPointAtStickyBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean Equals(DebugPointForBinding)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean IsDebugPointAtBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean IsNoDebugPointAtDoBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean IsNoDebugPointAtInvisibleBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean IsNoDebugPointAtLetBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean IsNoDebugPointAtStickyBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean get_IsDebugPointAtBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean get_IsNoDebugPointAtDoBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean get_IsNoDebugPointAtInvisibleBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean get_IsNoDebugPointAtLetBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Boolean get_IsNoDebugPointAtStickyBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding Combine(DebugPointForBinding)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding NewDebugPointAtBinding(range)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding NoDebugPointAtDoBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding NoDebugPointAtInvisibleBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding NoDebugPointAtLetBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding NoDebugPointAtStickyBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding get_NoDebugPointAtDoBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding get_NoDebugPointAtInvisibleBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding get_NoDebugPointAtLetBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: DebugPointForBinding get_NoDebugPointAtStickyBinding()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: FSharp.Compiler.SyntaxTree+DebugPointForBinding+DebugPointAtBinding
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: FSharp.Compiler.SyntaxTree+DebugPointForBinding+Tags
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointForBinding: System.String ToString()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget+Tags: Int32 No
-FSharp.Compiler.SyntaxTree+DebugPointForTarget+Tags: Int32 Yes
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean Equals(DebugPointForTarget)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean IsNo
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean IsYes
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean get_IsNo()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Boolean get_IsYes()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: DebugPointForTarget No
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: DebugPointForTarget Yes
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: DebugPointForTarget get_No()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: DebugPointForTarget get_Yes()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: FSharp.Compiler.SyntaxTree+DebugPointForTarget+Tags
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 CompareTo(DebugPointForTarget)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 Tag
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+DebugPointForTarget: System.String ToString()
-FSharp.Compiler.SyntaxTree+ExprAtomicFlag: ExprAtomicFlag Atomic
-FSharp.Compiler.SyntaxTree+ExprAtomicFlag: ExprAtomicFlag NonAtomic
-FSharp.Compiler.SyntaxTree+ExprAtomicFlag: Int32 value__
-FSharp.Compiler.SyntaxTree+Ident: System.String ToString()
-FSharp.Compiler.SyntaxTree+Ident: System.String get_idText()
-FSharp.Compiler.SyntaxTree+Ident: System.String idText
-FSharp.Compiler.SyntaxTree+Ident: Void .ctor(System.String, range)
-FSharp.Compiler.SyntaxTree+Ident: range get_idRange()
-FSharp.Compiler.SyntaxTree+Ident: range idRange
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Boolean ThereIsAnExtraDotAtTheEnd
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Boolean get_ThereIsAnExtraDotAtTheEnd()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Int32 Tag
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: LongIdentWithDots NewLongIdentWithDots(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range])
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] dotms
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] get_dotms()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] Lid
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_Lid()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_id()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] id
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: System.String ToString()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: range Range
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: range get_Range()
-FSharp.Compiler.SyntaxTree+LongIdentWithDots: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean Equals(MemberFlags)
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean IsDispatchSlot
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean IsFinal
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean IsInstance
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean IsOverrideOrExplicitImpl
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean get_IsDispatchSlot()
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean get_IsFinal()
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean get_IsInstance()
-FSharp.Compiler.SyntaxTree+MemberFlags: Boolean get_IsOverrideOrExplicitImpl()
-FSharp.Compiler.SyntaxTree+MemberFlags: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+MemberFlags: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+MemberFlags: MemberKind MemberKind
-FSharp.Compiler.SyntaxTree+MemberFlags: MemberKind get_MemberKind()
-FSharp.Compiler.SyntaxTree+MemberFlags: System.String ToString()
-FSharp.Compiler.SyntaxTree+MemberFlags: Void .ctor(Boolean, Boolean, Boolean, Boolean, MemberKind)
-FSharp.Compiler.SyntaxTree+MemberKind+Tags: Int32 ClassConstructor
-FSharp.Compiler.SyntaxTree+MemberKind+Tags: Int32 Constructor
-FSharp.Compiler.SyntaxTree+MemberKind+Tags: Int32 Member
-FSharp.Compiler.SyntaxTree+MemberKind+Tags: Int32 PropertyGet
-FSharp.Compiler.SyntaxTree+MemberKind+Tags: Int32 PropertyGetSet
-FSharp.Compiler.SyntaxTree+MemberKind+Tags: Int32 PropertySet
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean Equals(MemberKind)
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean IsClassConstructor
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean IsConstructor
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean IsMember
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean IsPropertyGet
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean IsPropertyGetSet
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean IsPropertySet
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean get_IsClassConstructor()
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean get_IsConstructor()
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean get_IsPropertyGet()
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean get_IsPropertyGetSet()
-FSharp.Compiler.SyntaxTree+MemberKind: Boolean get_IsPropertySet()
-FSharp.Compiler.SyntaxTree+MemberKind: FSharp.Compiler.SyntaxTree+MemberKind+Tags
-FSharp.Compiler.SyntaxTree+MemberKind: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+MemberKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+MemberKind: Int32 Tag
-FSharp.Compiler.SyntaxTree+MemberKind: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind ClassConstructor
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind Constructor
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind Member
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind PropertyGet
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind PropertyGetSet
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind PropertySet
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind get_ClassConstructor()
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind get_Constructor()
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind get_Member()
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind get_PropertyGet()
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind get_PropertyGetSet()
-FSharp.Compiler.SyntaxTree+MemberKind: MemberKind get_PropertySet()
-FSharp.Compiler.SyntaxTree+MemberKind: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Boolean IsIDefns
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Boolean IsIHash
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Boolean get_IsIDefns()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Boolean get_IsIHash()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] defns
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] get_defns()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns: range range
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: Boolean IsIDefns
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: Boolean IsIHash
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: Boolean get_IsIDefns()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: Boolean get_IsIHash()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: ParsedHashDirective get_hashDirective()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: ParsedHashDirective hashDirective
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash: range range
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+Tags: Int32 IDefns
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+Tags: Int32 IHash
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: Boolean IsIDefns
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: Boolean IsIHash
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: Boolean get_IsIDefns()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: Boolean get_IsIHash()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IDefns
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+IHash
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: FSharp.Compiler.SyntaxTree+ParsedFsiInteraction+Tags
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: ParsedFsiInteraction NewIDefns(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl], range)
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: ParsedFsiInteraction NewIHash(ParsedHashDirective, range)
-FSharp.Compiler.SyntaxTree+ParsedFsiInteraction: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: Microsoft.FSharp.Collections.FSharpList`1[System.String] args
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_args()
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: ParsedHashDirective NewParsedHashDirective(System.String, Microsoft.FSharp.Collections.FSharpList`1[System.String], range)
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: System.String get_ident()
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: System.String ident
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedHashDirective: range range
-FSharp.Compiler.SyntaxTree+ParsedImplFile: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedImplFile: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedImplFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] get_hashDirectives()
-FSharp.Compiler.SyntaxTree+ParsedImplFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] hashDirectives
-FSharp.Compiler.SyntaxTree+ParsedImplFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedImplFileFragment] fragments
-FSharp.Compiler.SyntaxTree+ParsedImplFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedImplFileFragment] get_fragments()
-FSharp.Compiler.SyntaxTree+ParsedImplFile: ParsedImplFile NewParsedImplFile(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedImplFileFragment])
-FSharp.Compiler.SyntaxTree+ParsedImplFile: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] decls
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] get_decls()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule: range range
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: SynModuleOrNamespace get_namedModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: SynModuleOrNamespace namedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] decls
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] get_decls()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: SynModuleOrNamespaceKind get_kind()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: SynModuleOrNamespaceKind kind
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment: range range
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+Tags: Int32 AnonModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+Tags: Int32 NamedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+Tags: Int32 NamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+AnonModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamedModule
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+NamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: FSharp.Compiler.SyntaxTree+ParsedImplFileFragment+Tags
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: ParsedImplFileFragment NewAnonModule(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl], range)
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: ParsedImplFileFragment NewNamedModule(SynModuleOrNamespace)
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: ParsedImplFileFragment NewNamespaceFragment(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Boolean, SynModuleOrNamespaceKind, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl], PreXmlDoc, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], range)
-FSharp.Compiler.SyntaxTree+ParsedImplFileFragment: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Boolean get_isScript()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Boolean isScript
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] get_hashDirectives()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] hashDirectives
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ScopedPragma] get_scopedPragmas()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ScopedPragma] scopedPragmas
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleOrNamespace] get_modules()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleOrNamespace] modules
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: ParsedImplFileInput NewParsedImplFileInput(System.String, Boolean, QualifiedNameOfFile, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ScopedPragma], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleOrNamespace], System.Tuple`2[System.Boolean,System.Boolean])
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: QualifiedNameOfFile get_qualifiedNameOfFile()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: QualifiedNameOfFile qualifiedNameOfFile
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: System.String fileName
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: System.String get_fileName()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: System.Tuple`2[System.Boolean,System.Boolean] get_isLastCompiland()
-FSharp.Compiler.SyntaxTree+ParsedImplFileInput: System.Tuple`2[System.Boolean,System.Boolean] isLastCompiland
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: Boolean IsImplFile
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: Boolean IsSigFile
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: Boolean get_IsImplFile()
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: Boolean get_IsSigFile()
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: ParsedImplFileInput Item
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: ParsedImplFileInput get_Item()
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: range Range
-FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile: range get_Range()
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: Boolean IsImplFile
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: Boolean IsSigFile
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: Boolean get_IsImplFile()
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: Boolean get_IsSigFile()
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: ParsedSigFileInput Item
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: ParsedSigFileInput get_Item()
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: range Range
-FSharp.Compiler.SyntaxTree+ParsedInput+SigFile: range get_Range()
-FSharp.Compiler.SyntaxTree+ParsedInput+Tags: Int32 ImplFile
-FSharp.Compiler.SyntaxTree+ParsedInput+Tags: Int32 SigFile
-FSharp.Compiler.SyntaxTree+ParsedInput: Boolean IsImplFile
-FSharp.Compiler.SyntaxTree+ParsedInput: Boolean IsSigFile
-FSharp.Compiler.SyntaxTree+ParsedInput: Boolean get_IsImplFile()
-FSharp.Compiler.SyntaxTree+ParsedInput: Boolean get_IsSigFile()
-FSharp.Compiler.SyntaxTree+ParsedInput: FSharp.Compiler.SyntaxTree+ParsedInput+ImplFile
-FSharp.Compiler.SyntaxTree+ParsedInput: FSharp.Compiler.SyntaxTree+ParsedInput+SigFile
-FSharp.Compiler.SyntaxTree+ParsedInput: FSharp.Compiler.SyntaxTree+ParsedInput+Tags
-FSharp.Compiler.SyntaxTree+ParsedInput: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedInput: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedInput: ParsedInput NewImplFile(ParsedImplFileInput)
-FSharp.Compiler.SyntaxTree+ParsedInput: ParsedInput NewSigFile(ParsedSigFileInput)
-FSharp.Compiler.SyntaxTree+ParsedInput: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedInput: range Range
-FSharp.Compiler.SyntaxTree+ParsedInput: range get_Range()
-FSharp.Compiler.SyntaxTree+ParsedSigFile: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedSigFile: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedSigFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] get_hashDirectives()
-FSharp.Compiler.SyntaxTree+ParsedSigFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] hashDirectives
-FSharp.Compiler.SyntaxTree+ParsedSigFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedSigFileFragment] fragments
-FSharp.Compiler.SyntaxTree+ParsedSigFile: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedSigFileFragment] get_fragments()
-FSharp.Compiler.SyntaxTree+ParsedSigFile: ParsedSigFile NewParsedSigFile(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedSigFileFragment])
-FSharp.Compiler.SyntaxTree+ParsedSigFile: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] decls
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] get_decls()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule: range range
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: SynModuleOrNamespaceSig get_namedModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: SynModuleOrNamespaceSig namedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] decls
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] get_decls()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: SynModuleOrNamespaceKind get_kind()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: SynModuleOrNamespaceKind kind
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: range get_range()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment: range range
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+Tags: Int32 AnonModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+Tags: Int32 NamedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+Tags: Int32 NamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+AnonModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamedModule
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+NamespaceFragment
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: FSharp.Compiler.SyntaxTree+ParsedSigFileFragment+Tags
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: ParsedSigFileFragment NewAnonModule(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl], range)
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: ParsedSigFileFragment NewNamedModule(SynModuleOrNamespaceSig)
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: ParsedSigFileFragment NewNamespaceFragment(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Boolean, SynModuleOrNamespaceKind, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl], PreXmlDoc, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], range)
-FSharp.Compiler.SyntaxTree+ParsedSigFileFragment: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] get_hashDirectives()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective] hashDirectives
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ScopedPragma] get_scopedPragmas()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ScopedPragma] scopedPragmas
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig] get_modules()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig] modules
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: ParsedSigFileInput NewParsedSigFileInput(System.String, QualifiedNameOfFile, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ScopedPragma], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+ParsedHashDirective], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig])
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: QualifiedNameOfFile get_qualifiedNameOfFile()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: QualifiedNameOfFile qualifiedNameOfFile
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: System.String ToString()
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: System.String fileName
-FSharp.Compiler.SyntaxTree+ParsedSigFileInput: System.String get_fileName()
-FSharp.Compiler.SyntaxTree+ParserDetail+Tags: Int32 ErrorRecovery
-FSharp.Compiler.SyntaxTree+ParserDetail+Tags: Int32 Ok
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean Equals(ParserDetail)
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean IsErrorRecovery
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean IsOk
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean get_IsErrorRecovery()
-FSharp.Compiler.SyntaxTree+ParserDetail: Boolean get_IsOk()
-FSharp.Compiler.SyntaxTree+ParserDetail: FSharp.Compiler.SyntaxTree+ParserDetail+Tags
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 CompareTo(ParserDetail)
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 Tag
-FSharp.Compiler.SyntaxTree+ParserDetail: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ParserDetail: ParserDetail ErrorRecovery
-FSharp.Compiler.SyntaxTree+ParserDetail: ParserDetail Ok
-FSharp.Compiler.SyntaxTree+ParserDetail: ParserDetail get_ErrorRecovery()
-FSharp.Compiler.SyntaxTree+ParserDetail: ParserDetail get_Ok()
-FSharp.Compiler.SyntaxTree+ParserDetail: System.String ToString()
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: Ident Id
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: Ident Item
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: Ident get_Id()
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: Ident get_Item()
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: Int32 Tag
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: QualifiedNameOfFile NewQualifiedNameOfFile(Ident)
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: System.String Text
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: System.String ToString()
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: System.String get_Text()
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: range Range
-FSharp.Compiler.SyntaxTree+QualifiedNameOfFile: range get_Range()
-FSharp.Compiler.SyntaxTree+ScopedPragma: Boolean Equals(ScopedPragma)
-FSharp.Compiler.SyntaxTree+ScopedPragma: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+ScopedPragma: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+ScopedPragma: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+ScopedPragma: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+ScopedPragma: Int32 Tag
-FSharp.Compiler.SyntaxTree+ScopedPragma: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+ScopedPragma: Int32 get_warningNumber()
-FSharp.Compiler.SyntaxTree+ScopedPragma: Int32 warningNumber
-FSharp.Compiler.SyntaxTree+ScopedPragma: ScopedPragma NewWarningOff(range, Int32)
-FSharp.Compiler.SyntaxTree+ScopedPragma: System.String ToString()
-FSharp.Compiler.SyntaxTree+ScopedPragma: range get_range()
-FSharp.Compiler.SyntaxTree+ScopedPragma: range range
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Boolean Equals(SeqExprOnly)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Boolean Item
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Boolean get_Item()
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 CompareTo(SeqExprOnly)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 Tag
-FSharp.Compiler.SyntaxTree+SeqExprOnly: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SeqExprOnly: SeqExprOnly NewSeqExprOnly(Boolean)
-FSharp.Compiler.SyntaxTree+SeqExprOnly: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynAccess+Tags: Int32 Internal
-FSharp.Compiler.SyntaxTree+SynAccess+Tags: Int32 Private
-FSharp.Compiler.SyntaxTree+SynAccess+Tags: Int32 Public
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean Equals(SynAccess)
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean IsInternal
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean IsPrivate
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean IsPublic
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean get_IsInternal()
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean get_IsPrivate()
-FSharp.Compiler.SyntaxTree+SynAccess: Boolean get_IsPublic()
-FSharp.Compiler.SyntaxTree+SynAccess: FSharp.Compiler.SyntaxTree+SynAccess+Tags
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 CompareTo(SynAccess)
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynAccess: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynAccess: SynAccess Internal
-FSharp.Compiler.SyntaxTree+SynAccess: SynAccess Private
-FSharp.Compiler.SyntaxTree+SynAccess: SynAccess Public
-FSharp.Compiler.SyntaxTree+SynAccess: SynAccess get_Internal()
-FSharp.Compiler.SyntaxTree+SynAccess: SynAccess get_Private()
-FSharp.Compiler.SyntaxTree+SynAccess: SynAccess get_Public()
-FSharp.Compiler.SyntaxTree+SynAccess: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynArgInfo: Boolean get_optional()
-FSharp.Compiler.SyntaxTree+SynArgInfo: Boolean optional
-FSharp.Compiler.SyntaxTree+SynArgInfo: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynArgInfo: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynArgInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynArgInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynArgInfo: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] Ident
-FSharp.Compiler.SyntaxTree+SynArgInfo: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_Ident()
-FSharp.Compiler.SyntaxTree+SynArgInfo: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_ident()
-FSharp.Compiler.SyntaxTree+SynArgInfo: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] ident
-FSharp.Compiler.SyntaxTree+SynArgInfo: SynArgInfo NewSynArgInfo(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Boolean, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident])
-FSharp.Compiler.SyntaxTree+SynArgInfo: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Boolean IsNamePatPairs
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Boolean IsPats
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Boolean get_IsNamePatPairs()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Boolean get_IsPats()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynPat]] get_pats()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynPat]] pats
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: range get_range()
-FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs: range range
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Boolean IsNamePatPairs
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Boolean IsPats
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Boolean get_IsNamePatPairs()
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Boolean get_IsPats()
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] get_pats()
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] pats
-FSharp.Compiler.SyntaxTree+SynArgPats+Pats: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynArgPats+Tags: Int32 NamePatPairs
-FSharp.Compiler.SyntaxTree+SynArgPats+Tags: Int32 Pats
-FSharp.Compiler.SyntaxTree+SynArgPats: Boolean IsNamePatPairs
-FSharp.Compiler.SyntaxTree+SynArgPats: Boolean IsPats
-FSharp.Compiler.SyntaxTree+SynArgPats: Boolean get_IsNamePatPairs()
-FSharp.Compiler.SyntaxTree+SynArgPats: Boolean get_IsPats()
-FSharp.Compiler.SyntaxTree+SynArgPats: FSharp.Compiler.SyntaxTree+SynArgPats+NamePatPairs
-FSharp.Compiler.SyntaxTree+SynArgPats: FSharp.Compiler.SyntaxTree+SynArgPats+Pats
-FSharp.Compiler.SyntaxTree+SynArgPats: FSharp.Compiler.SyntaxTree+SynArgPats+Tags
-FSharp.Compiler.SyntaxTree+SynArgPats: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynArgPats: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynArgPats: SynArgPats NewNamePatPairs(Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynPat]], range)
-FSharp.Compiler.SyntaxTree+SynArgPats: SynArgPats NewPats(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat])
-FSharp.Compiler.SyntaxTree+SynArgPats: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynAttribute: Boolean AppliesToGetterAndSetter
-FSharp.Compiler.SyntaxTree+SynAttribute: Boolean get_AppliesToGetterAndSetter()
-FSharp.Compiler.SyntaxTree+SynAttribute: LongIdentWithDots TypeName
-FSharp.Compiler.SyntaxTree+SynAttribute: LongIdentWithDots get_TypeName()
-FSharp.Compiler.SyntaxTree+SynAttribute: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] Target
-FSharp.Compiler.SyntaxTree+SynAttribute: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_Target()
-FSharp.Compiler.SyntaxTree+SynAttribute: SynExpr ArgExpr
-FSharp.Compiler.SyntaxTree+SynAttribute: SynExpr get_ArgExpr()
-FSharp.Compiler.SyntaxTree+SynAttribute: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynAttribute: Void .ctor(LongIdentWithDots, SynExpr, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], Boolean, range)
-FSharp.Compiler.SyntaxTree+SynAttribute: range Range
-FSharp.Compiler.SyntaxTree+SynAttribute: range get_Range()
-FSharp.Compiler.SyntaxTree+SynAttributeList: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttribute] Attributes
-FSharp.Compiler.SyntaxTree+SynAttributeList: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttribute] get_Attributes()
-FSharp.Compiler.SyntaxTree+SynAttributeList: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynAttributeList: Void .ctor(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttribute], range)
-FSharp.Compiler.SyntaxTree+SynAttributeList: range Range
-FSharp.Compiler.SyntaxTree+SynAttributeList: range get_Range()
-FSharp.Compiler.SyntaxTree+SynBinding: Boolean get_isMutable()
-FSharp.Compiler.SyntaxTree+SynBinding: Boolean get_mustInline()
-FSharp.Compiler.SyntaxTree+SynBinding: Boolean isMutable
-FSharp.Compiler.SyntaxTree+SynBinding: Boolean mustInline
-FSharp.Compiler.SyntaxTree+SynBinding: DebugPointForBinding get_seqPoint()
-FSharp.Compiler.SyntaxTree+SynBinding: DebugPointForBinding seqPoint
-FSharp.Compiler.SyntaxTree+SynBinding: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynBinding: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynBinding: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynBinding: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynBinding: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynBinding: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynBinding: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynBindingReturnInfo] get_returnInfo()
-FSharp.Compiler.SyntaxTree+SynBinding: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynBindingReturnInfo] returnInfo
-FSharp.Compiler.SyntaxTree+SynBinding: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynBinding: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynBinding: SynBinding NewBinding(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], SynBindingKind, Boolean, Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], PreXmlDoc, SynValData, SynPat, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynBindingReturnInfo], SynExpr, range, DebugPointForBinding)
-FSharp.Compiler.SyntaxTree+SynBinding: SynBindingKind get_kind()
-FSharp.Compiler.SyntaxTree+SynBinding: SynBindingKind kind
-FSharp.Compiler.SyntaxTree+SynBinding: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynBinding: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynBinding: SynPat get_headPat()
-FSharp.Compiler.SyntaxTree+SynBinding: SynPat headPat
-FSharp.Compiler.SyntaxTree+SynBinding: SynValData get_valData()
-FSharp.Compiler.SyntaxTree+SynBinding: SynValData valData
-FSharp.Compiler.SyntaxTree+SynBinding: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynBinding: range RangeOfBindingAndRhs
-FSharp.Compiler.SyntaxTree+SynBinding: range RangeOfBindingSansRhs
-FSharp.Compiler.SyntaxTree+SynBinding: range RangeOfHeadPat
-FSharp.Compiler.SyntaxTree+SynBinding: range get_RangeOfBindingAndRhs()
-FSharp.Compiler.SyntaxTree+SynBinding: range get_RangeOfBindingSansRhs()
-FSharp.Compiler.SyntaxTree+SynBinding: range get_RangeOfHeadPat()
-FSharp.Compiler.SyntaxTree+SynBinding: range get_range()
-FSharp.Compiler.SyntaxTree+SynBinding: range range
-FSharp.Compiler.SyntaxTree+SynBindingKind+Tags: Int32 DoBinding
-FSharp.Compiler.SyntaxTree+SynBindingKind+Tags: Int32 NormalBinding
-FSharp.Compiler.SyntaxTree+SynBindingKind+Tags: Int32 StandaloneExpression
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean Equals(SynBindingKind)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean IsDoBinding
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean IsNormalBinding
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean IsStandaloneExpression
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean get_IsDoBinding()
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean get_IsNormalBinding()
-FSharp.Compiler.SyntaxTree+SynBindingKind: Boolean get_IsStandaloneExpression()
-FSharp.Compiler.SyntaxTree+SynBindingKind: FSharp.Compiler.SyntaxTree+SynBindingKind+Tags
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 CompareTo(SynBindingKind)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynBindingKind: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynBindingKind: SynBindingKind DoBinding
-FSharp.Compiler.SyntaxTree+SynBindingKind: SynBindingKind NormalBinding
-FSharp.Compiler.SyntaxTree+SynBindingKind: SynBindingKind StandaloneExpression
-FSharp.Compiler.SyntaxTree+SynBindingKind: SynBindingKind get_DoBinding()
-FSharp.Compiler.SyntaxTree+SynBindingKind: SynBindingKind get_NormalBinding()
-FSharp.Compiler.SyntaxTree+SynBindingKind: SynBindingKind get_StandaloneExpression()
-FSharp.Compiler.SyntaxTree+SynBindingKind: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: SynBindingReturnInfo NewSynBindingReturnInfo(SynType, range, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList])
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: SynType typeName
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: range get_range()
-FSharp.Compiler.SyntaxTree+SynBindingReturnInfo: range range
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Boolean get_preferPostfix()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Boolean preferPostfix
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTyparDecl] get_typeParams()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTyparDecl] typeParams
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint] constraints
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint] get_constraints()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynComponentInfo: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynComponentInfo: SynComponentInfo NewComponentInfo(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTyparDecl], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], PreXmlDoc, Boolean, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynComponentInfo: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: range Range
-FSharp.Compiler.SyntaxTree+SynComponentInfo: range get_Range()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: range get_range()
-FSharp.Compiler.SyntaxTree+SynComponentInfo: range range
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean Item
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Boolean get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Bool: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Bool: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Byte Item
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Byte get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Byte: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Byte: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Byte[] bytes
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Byte[] get_bytes()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: range get_range()
-FSharp.Compiler.SyntaxTree+SynConst+Bytes: range range
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Char Item
-FSharp.Compiler.SyntaxTree+SynConst+Char: Char get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Char: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Char: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Char: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Char: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: System.Decimal Item
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: System.Decimal get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Decimal: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Double Item
-FSharp.Compiler.SyntaxTree+SynConst+Double: Double get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Double: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Double: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Double: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Double: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Int16 Item
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Int16 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Int16: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Int16: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Int32 Item
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Int32 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Int32: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Int64 Item
-FSharp.Compiler.SyntaxTree+SynConst+Int64: Int64 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Int64: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Int64 Item
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: Int64 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+IntPtr: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Measure: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: SynConst constant
-FSharp.Compiler.SyntaxTree+SynConst+Measure: SynConst get_constant()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: SynMeasure Item2
-FSharp.Compiler.SyntaxTree+SynConst+Measure: SynMeasure get_Item2()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Measure: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+SByte: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: SByte Item
-FSharp.Compiler.SyntaxTree+SynConst+SByte: SByte get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+SByte: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+Single: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+Single: Single Item
-FSharp.Compiler.SyntaxTree+SynConst+Single: Single get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+Single: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+Single: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+String: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+String: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+String: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+String: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+String: System.String get_text()
-FSharp.Compiler.SyntaxTree+SynConst+String: System.String text
-FSharp.Compiler.SyntaxTree+SynConst+String: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+String: range get_range()
-FSharp.Compiler.SyntaxTree+SynConst+String: range range
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Bool
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Byte
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Bytes
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Char
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Decimal
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Double
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Int16
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Int32
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Int64
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 IntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Measure
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 SByte
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Single
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 String
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 UInt16
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 UInt16s
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 UInt32
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 UInt64
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 UIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 Unit
-FSharp.Compiler.SyntaxTree+SynConst+Tags: Int32 UserNum
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: UInt16 Item
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: UInt16 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: UInt16[] Item
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: UInt16[] get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+UInt16s: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: UInt32 Item
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: UInt32 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+UInt32: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: UInt64 Item
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: UInt64 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+UInt64: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: UInt64 Item
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: UInt64 get_Item()
-FSharp.Compiler.SyntaxTree+SynConst+UIntPtr: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: System.String get_suffix()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: System.String get_value()
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: System.String suffix
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: System.String value
-FSharp.Compiler.SyntaxTree+SynConst+UserNum: range Range(range)
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsBool
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsByte
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsBytes
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsChar
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsDecimal
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsDouble
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsInt16
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsInt32
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsInt64
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsIntPtr
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsMeasure
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsSByte
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsSingle
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUInt16
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUInt16s
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUInt32
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUInt64
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUIntPtr
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUnit
-FSharp.Compiler.SyntaxTree+SynConst: Boolean IsUserNum
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsBool()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsByte()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsBytes()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsChar()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsDecimal()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsDouble()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsInt16()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsInt32()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsInt64()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsMeasure()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsSByte()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsSingle()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUInt16()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUInt16s()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUInt32()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUInt64()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUIntPtr()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUnit()
-FSharp.Compiler.SyntaxTree+SynConst: Boolean get_IsUserNum()
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Bool
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Byte
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Bytes
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Char
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Decimal
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Double
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Int16
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Int32
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Int64
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+IntPtr
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Measure
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+SByte
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Single
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+String
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+Tags
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+UInt16
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+UInt16s
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+UInt32
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+UInt64
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+UIntPtr
-FSharp.Compiler.SyntaxTree+SynConst: FSharp.Compiler.SyntaxTree+SynConst+UserNum
-FSharp.Compiler.SyntaxTree+SynConst: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynConst: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewBool(Boolean)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewByte(Byte)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewBytes(Byte[], range)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewChar(Char)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewDecimal(System.Decimal)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewDouble(Double)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewInt16(Int16)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewInt32(Int32)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewInt64(Int64)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewIntPtr(Int64)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewMeasure(SynConst, SynMeasure)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewSByte(SByte)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewSingle(Single)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewString(System.String, range)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewUInt16(UInt16)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewUInt16s(UInt16[])
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewUInt32(UInt32)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewUInt64(UInt64)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewUIntPtr(UInt64)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst NewUserNum(System.String, System.String)
-FSharp.Compiler.SyntaxTree+SynConst: SynConst Unit
-FSharp.Compiler.SyntaxTree+SynConst: SynConst get_Unit()
-FSharp.Compiler.SyntaxTree+SynConst: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynConst: range Range(range)
-FSharp.Compiler.SyntaxTree+SynEnumCase: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynEnumCase: Ident ident
-FSharp.Compiler.SyntaxTree+SynEnumCase: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynEnumCase: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynEnumCase: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynEnumCase: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynEnumCase: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynEnumCase: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynEnumCase: SynConst get_value()
-FSharp.Compiler.SyntaxTree+SynEnumCase: SynConst value
-FSharp.Compiler.SyntaxTree+SynEnumCase: SynEnumCase NewEnumCase(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Ident, SynConst, PreXmlDoc, range)
-FSharp.Compiler.SyntaxTree+SynEnumCase: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynEnumCase: range Range
-FSharp.Compiler.SyntaxTree+SynEnumCase: range get_Range()
-FSharp.Compiler.SyntaxTree+SynEnumCase: range get_range()
-FSharp.Compiler.SyntaxTree+SynEnumCase: range range
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn] get_members()
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn] members
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: SynExceptionDefn NewSynExceptionDefn(SynExceptionDefnRepr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn], range)
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: SynExceptionDefnRepr exnRepr
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: SynExceptionDefnRepr get_exnRepr()
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: range Range
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: range get_range()
-FSharp.Compiler.SyntaxTree+SynExceptionDefn: range range
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident]] get_longId()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident]] longId
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: SynExceptionDefnRepr NewSynExceptionDefnRepr(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], SynUnionCase, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident]], PreXmlDoc, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: SynUnionCase caseName
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: SynUnionCase get_caseName()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: range Range
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: range get_range()
-FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr: range range
-FSharp.Compiler.SyntaxTree+SynExceptionSig: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExceptionSig: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExceptionSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig] get_members()
-FSharp.Compiler.SyntaxTree+SynExceptionSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig] members
-FSharp.Compiler.SyntaxTree+SynExceptionSig: SynExceptionDefnRepr exnRepr
-FSharp.Compiler.SyntaxTree+SynExceptionSig: SynExceptionDefnRepr get_exnRepr()
-FSharp.Compiler.SyntaxTree+SynExceptionSig: SynExceptionSig NewSynExceptionSig(SynExceptionDefnRepr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig], range)
-FSharp.Compiler.SyntaxTree+SynExceptionSig: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExceptionSig: range get_range()
-FSharp.Compiler.SyntaxTree+SynExceptionSig: range range
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean get_isByref()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Boolean isByref
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range get_opRange()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range opRange
-FSharp.Compiler.SyntaxTree+SynExpr+AddressOf: range range
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean get_isStruct()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Boolean isStruct
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynExpr]] get_recordFields()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynExpr]] recordFields
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]] copyInfo
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]] get_copyInfo()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd: range range
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean get_isInfix()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Boolean isInfix
-FSharp.Compiler.SyntaxTree+SynExpr+App: ExprAtomicFlag flag
-FSharp.Compiler.SyntaxTree+SynExpr+App: ExprAtomicFlag get_flag()
-FSharp.Compiler.SyntaxTree+SynExpr+App: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+App: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+App: SynExpr argExpr
-FSharp.Compiler.SyntaxTree+SynExpr+App: SynExpr funcExpr
-FSharp.Compiler.SyntaxTree+SynExpr+App: SynExpr get_argExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+App: SynExpr get_funcExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+App: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+App: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+App: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+App: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+App: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+App: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+App: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+App: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+App: range range
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: System.String debugStr
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: System.String get_debugStr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError: range range
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean get_isList()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Boolean isList
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] exprs
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] get_exprs()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList: range range
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean get_isArray()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Boolean isArray
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Assert: range range
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean get_isArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Boolean isArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Microsoft.FSharp.Core.FSharpRef`1[System.Boolean] get_isNotNakedRefCell()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: Microsoft.FSharp.Core.FSharpRef`1[System.Boolean] isNotNakedRefCell
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+CompExpr: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Const: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: SynConst constant
-FSharp.Compiler.SyntaxTree+SynExpr+Const: SynConst get_constant()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Const: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Do: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Do: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Do: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DoBang: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range get_rangeOfDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DotGet: range rangeOfDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynIndexerArg] get_indexExprs()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynIndexerArg] indexExprs
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: SynExpr get_objectExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: SynExpr objectExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range dotRange
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range get_dotRange()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynIndexerArg] get_indexExprs()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynIndexerArg] indexExprs
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: SynExpr get_objectExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: SynExpr get_valueExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: SynExpr objectExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: SynExpr valueExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range dotRange
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range get_dotRange()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range get_leftOfSetRange()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range leftOfSetRange
-FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: SynExpr argExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: SynExpr get_argExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: SynExpr get_rhsExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: SynExpr get_targetExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: SynExpr rhsExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: SynExpr targetExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: SynExpr get_rhsExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: SynExpr get_targetExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: SynExpr rhsExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: SynExpr targetExpr
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+DotSet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: SynType targetType
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Downcast: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Fixed: range range
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean direction
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Boolean get_direction()
-FSharp.Compiler.SyntaxTree+SynExpr+For: DebugPointAtFor forSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+For: DebugPointAtFor get_forSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynExpr+For: Ident ident
-FSharp.Compiler.SyntaxTree+SynExpr+For: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+For: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+For: SynExpr doBody
-FSharp.Compiler.SyntaxTree+SynExpr+For: SynExpr get_doBody()
-FSharp.Compiler.SyntaxTree+SynExpr+For: SynExpr get_identBody()
-FSharp.Compiler.SyntaxTree+SynExpr+For: SynExpr get_toBody()
-FSharp.Compiler.SyntaxTree+SynExpr+For: SynExpr identBody
-FSharp.Compiler.SyntaxTree+SynExpr+For: SynExpr toBody
-FSharp.Compiler.SyntaxTree+SynExpr+For: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+For: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+For: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+For: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+For: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+For: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+For: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+For: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+For: range range
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean get_isFromSource()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Boolean isFromSource
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: DebugPointAtFor forSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: DebugPointAtFor get_forSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SeqExprOnly get_seqExprOnly()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SeqExprOnly seqExprOnly
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SynExpr bodyExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SynExpr enumExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SynExpr get_bodyExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SynExpr get_enumExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: SynPat pat
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+ForEach: range range
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+FromParseError: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Ident ident
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Ident: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean get_isFromErrorRecovery()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Boolean isFromErrorRecovery
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: DebugPointForBinding get_spIfToThen()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: DebugPointForBinding spIfToThen
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr] elseExpr
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr] get_elseExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: SynExpr get_ifExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: SynExpr get_thenExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: SynExpr ifExpr
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: SynExpr thenExpr
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range get_ifToThenRange()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range ifToThenRange
-FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse: range range
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero: range range
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast: range range
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast: range range
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart] contents
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart] get_contents()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString: range range
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: SynExpr get_lhsExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: SynExpr get_rhsExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: SynExpr lhsExpr
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: SynExpr rhsExpr
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range get_lhsRange()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range lhsRange
-FSharp.Compiler.SyntaxTree+SynExpr+JoinIn: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean fromMethod
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_fromMethod()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean get_inLambdaSeq()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Boolean inLambdaSeq
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat],FSharp.Compiler.SyntaxTree+SynExpr]] get_parsedData()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat],FSharp.Compiler.SyntaxTree+SynExpr]] parsedData
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: SynExpr body
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: SynExpr get_body()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: SynSimplePats args
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: SynSimplePats get_args()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Lambda: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Lazy: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean get_isUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Boolean isUse
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] bindings
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] get_bindings()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: SynExpr body
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: SynExpr get_body()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_isFromSource()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean get_isUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean isFromSource
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Boolean isUse
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: DebugPointForBinding bindSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: DebugPointForBinding get_bindSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`6[FSharp.Compiler.SyntaxTree+DebugPointForBinding,System.Boolean,System.Boolean,FSharp.Compiler.SyntaxTree+SynPat,FSharp.Compiler.SyntaxTree+SynExpr,FSharp.Compiler.Range+range]] andBangs
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`6[FSharp.Compiler.SyntaxTree+DebugPointForBinding,System.Boolean,System.Boolean,FSharp.Compiler.SyntaxTree+SynPat,FSharp.Compiler.SyntaxTree+SynExpr,FSharp.Compiler.Range+range]] get_andBangs()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: SynExpr body
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: SynExpr get_body()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: SynExpr get_rhs()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: SynExpr rhs
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: SynPat pat
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] args
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] get_args()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_retTy()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typeArgs()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] retTy
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typeArgs
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: System.Object get_ilCode()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: System.Object ilCode
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint] constraints
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint] get_constraints()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: SynExpr get_optimizedExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: SynExpr optimizedExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Int32 fieldNum
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Int32 get_fieldNum()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Int32 fieldNum
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Int32 get_fieldNum()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: SynExpr get_rhsExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: SynExpr rhsExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean get_isOptional()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Boolean isOptional
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpRef`1[FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo]] altNameRefCell
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpRef`1[FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo]] get_altNameRefCell()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdent: range range
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: DebugPointForBinding get_matchSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: DebugPointForBinding matchSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] clauses
-FSharp.Compiler.SyntaxTree+SynExpr+Match: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] get_clauses()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Match: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Match: range range
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: DebugPointForBinding get_matchSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: DebugPointForBinding matchSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] clauses
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] get_clauses()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchBang: range range
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean get_isExnMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Boolean isExnMatch
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: DebugPointForBinding get_matchSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: DebugPointForBinding matchSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] get_matchClauses()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] matchClauses
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range get_keywordRange()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range keywordRange
-FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda: range range
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: SynExpr expr1
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: SynExpr expr2
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: SynExpr get_expr1()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: SynExpr get_expr2()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet: range range
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean get_isProtected()
-FSharp.Compiler.SyntaxTree+SynExpr+New: Boolean isProtected
-FSharp.Compiler.SyntaxTree+SynExpr+New: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+New: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+New: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+New: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+New: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynExpr+New: SynType targetType
-FSharp.Compiler.SyntaxTree+SynExpr+New: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+New: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+New: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+New: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+New: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+New: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+New: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+New: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+New: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Null: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Null: range range
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] bindings
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] get_bindings()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynInterfaceImpl] extraImpls
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynInterfaceImpl] get_extraImpls()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident]]] argOptions
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident]]] get_argOptions()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: SynType get_objType()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: SynType objType
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range get_newExprRange()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range newExprRange
-FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_rightParenRange()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] rightParenRange
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range get_leftParenRange()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range leftParenRange
-FSharp.Compiler.SyntaxTree+SynExpr+Paren: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_isFromQueryExpression()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean get_isRaw()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean isFromQueryExpression
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Boolean isRaw
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: SynExpr get_operator()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: SynExpr get_quotedExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: SynExpr operator
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: SynExpr quotedExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Quote: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[System.Tuple`2[FSharp.Compiler.SyntaxTree+LongIdentWithDots,System.Boolean],Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr],Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]]] get_recordFields()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[System.Tuple`2[FSharp.Compiler.SyntaxTree+LongIdentWithDots,System.Boolean],Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr],Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]]] recordFields
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]] copyInfo
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]] get_copyInfo()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.SyntaxTree+SynExpr,FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]],FSharp.Compiler.Range+range]] baseInfo
-FSharp.Compiler.SyntaxTree+SynExpr+Record: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.SyntaxTree+SynExpr,FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]],FSharp.Compiler.Range+range]] get_baseInfo()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Record: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean get_isTrueSeq()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Boolean isTrueSeq
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: DebugPointAtSequential get_seqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: DebugPointAtSequential seqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: SynExpr expr1
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: SynExpr expr2
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: SynExpr get_expr1()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: SynExpr get_expr2()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Sequential: range range
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: DebugPointAtSequential get_seqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: DebugPointAtSequential seqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: SynExpr expr1
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: SynExpr expr2
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: SynExpr get_expr1()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: SynExpr get_expr2()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: SynExpr get_ifNotStmt()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: SynExpr ifNotStmt
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Set: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: SynExpr get_rhsExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: SynExpr get_targetExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: SynExpr rhsExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Set: SynExpr targetExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Set: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Set: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 AddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 AnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 App
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 ArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 ArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 ArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Assert
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 CompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Const
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Do
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 DotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Downcast
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Fixed
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 For
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 ForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 FromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Ident
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 IfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 ImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 InferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 InferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 InterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 JoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Lambda
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Lazy
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 LongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Match
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 MatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 MatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 NamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 New
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Null
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 ObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Paren
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Quote
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Record
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Sequential
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 SequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Set
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 TraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 TryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 TryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Tuple
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 TypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 TypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Typed
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 Upcast
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 While
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 YieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Tags: Int32 YieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypar] get_supportTys()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypar] supportTys
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: SynExpr argExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: SynExpr get_argExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: SynMemberSig get_traitSig()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: SynMemberSig traitSig
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+TraitCall: range range
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: DebugPointAtFinally finallySeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: DebugPointAtFinally get_finallySeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: DebugPointAtTry get_trySeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: DebugPointAtTry trySeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: SynExpr finallyExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: SynExpr get_finallyExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: SynExpr get_tryExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: SynExpr tryExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+TryFinally: range range
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: DebugPointAtTry get_trySeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: DebugPointAtTry trySeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: DebugPointAtWith get_withSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: DebugPointAtWith withSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] get_withCases()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause] withCases
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: SynExpr get_tryExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: SynExpr tryExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range get_tryRange()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range get_withRange()
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range range
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range tryRange
-FSharp.Compiler.SyntaxTree+SynExpr+TryWith: range withRange
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean get_isStruct()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Boolean isStruct
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] commaRanges
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] get_commaRanges()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] exprs
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] get_exprs()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Tuple: range range
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] commaRanges
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] get_commaRanges()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typeArgs()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typeArgs
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_greaterRange()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] greaterRange
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range get_lessRange()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range get_typeArgsRange()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range lessRange
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range range
-FSharp.Compiler.SyntaxTree+SynExpr+TypeApp: range typeArgsRange
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: SynType targetType
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+TypeTest: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: SynType targetType
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Typed: range range
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: SynType targetType
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+Upcast: range range
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+While: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+While: DebugPointAtWhile get_whileSeqPoint()
-FSharp.Compiler.SyntaxTree+SynExpr+While: DebugPointAtWhile whileSeqPoint
-FSharp.Compiler.SyntaxTree+SynExpr+While: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+While: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+While: SynExpr doExpr
-FSharp.Compiler.SyntaxTree+SynExpr+While: SynExpr get_doExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+While: SynExpr get_whileExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+While: SynExpr whileExpr
-FSharp.Compiler.SyntaxTree+SynExpr+While: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+While: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+While: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+While: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+While: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+While: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+While: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+While: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+While: range range
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: System.Tuple`2[System.Boolean,System.Boolean] flags
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: System.Tuple`2[System.Boolean,System.Boolean] get_flags()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn: range range
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: System.Tuple`2[System.Boolean,System.Boolean] flags
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: System.Tuple`2[System.Boolean,System.Boolean] get_flags()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range Range
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range get_range()
-FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom: range range
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsAddressOf
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsArbExprAndThusAlreadyReportedError
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsAssert
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsCompExpr
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDo
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDoBang
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDotGet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDotSet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsDowncast
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsFixed
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsFor
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsForEach
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsIdent
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsIfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsInferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsInferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsInterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsJoinIn
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLambda
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLazy
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsLongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsMatch
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsMatchBang
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsMatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsNew
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsQuote
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsSequential
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsSequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsSet
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTraitCall
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTryFinally
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTryWith
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTypeApp
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTypeTest
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsUpcast
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsWhile
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsYieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean IsYieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsAddressOf()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsArbExprAndThusAlreadyReportedError()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsArbitraryAfterError()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsArrayOrListOfSeqExpr()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsAssert()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsCompExpr()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDiscardAfterMissingQualificationAfterDot()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDo()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDoBang()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDotGet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDotIndexedGet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDotIndexedSet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDotNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDotSet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsFixed()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsFor()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsForEach()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsIdent()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsIfThenElse()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsImplicitZero()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsInferredDowncast()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsInferredUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsInterpolatedString()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsJoinIn()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLambda()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLazy()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLetOrUse()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLetOrUseBang()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLibraryOnlyStaticOptimization()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLibraryOnlyUnionCaseFieldGet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLibraryOnlyUnionCaseFieldSet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsLongIdentSet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsMatch()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsMatchBang()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsMatchLambda()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsNamedIndexedPropertySet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsNew()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsObjExpr()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsQuote()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsSequential()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsSequentialOrImplicitYield()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsSet()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTraitCall()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTryFinally()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTryWith()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTypeApp()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTypeTest()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsUpcast()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsWhile()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsYieldOrReturn()
-FSharp.Compiler.SyntaxTree+SynExpr: Boolean get_IsYieldOrReturnFrom()
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+AddressOf
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+AnonRecd
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+App
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+ArbitraryAfterError
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrList
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+ArrayOrListOfSeqExpr
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Assert
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+CompExpr
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Const
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DiscardAfterMissingQualificationAfterDot
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Do
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DoBang
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DotGet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedGet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DotIndexedSet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DotNamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+DotSet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Downcast
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Fixed
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+For
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+ForEach
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+FromParseError
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Ident
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+IfThenElse
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+ImplicitZero
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+InferredDowncast
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+InferredUpcast
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+InterpolatedString
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+JoinIn
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Lambda
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Lazy
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LetOrUse
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LetOrUseBang
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyStaticOptimization
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldGet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LibraryOnlyUnionCaseFieldSet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LongIdent
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+LongIdentSet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Match
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+MatchBang
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+MatchLambda
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+NamedIndexedPropertySet
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+New
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Null
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+ObjExpr
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Paren
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Quote
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Record
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Sequential
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+SequentialOrImplicitYield
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Set
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Tags
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+TraitCall
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+TryFinally
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+TryWith
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Tuple
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+TypeApp
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+TypeTest
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Typed
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+Upcast
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+While
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturn
-FSharp.Compiler.SyntaxTree+SynExpr: FSharp.Compiler.SyntaxTree+SynExpr+YieldOrReturnFrom
-FSharp.Compiler.SyntaxTree+SynExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewAddressOf(Boolean, SynExpr, range, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewAnonRecd(Boolean, Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]], Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynExpr]], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewApp(ExprAtomicFlag, Boolean, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewArbitraryAfterError(System.String, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewArrayOrList(Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewArrayOrListOfSeqExpr(Boolean, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewAssert(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewCompExpr(Boolean, Microsoft.FSharp.Core.FSharpRef`1[System.Boolean], SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewConst(SynConst, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDiscardAfterMissingQualificationAfterDot(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDo(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDoBang(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDotGet(SynExpr, range, LongIdentWithDots, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDotIndexedGet(SynExpr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynIndexerArg], range, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDotIndexedSet(SynExpr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynIndexerArg], SynExpr, range, range, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDotNamedIndexedPropertySet(SynExpr, LongIdentWithDots, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDotSet(SynExpr, LongIdentWithDots, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewDowncast(SynExpr, SynType, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewFixed(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewFor(DebugPointAtFor, Ident, SynExpr, Boolean, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewForEach(DebugPointAtFor, SeqExprOnly, Boolean, SynPat, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewFromParseError(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewIdent(Ident)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewIfThenElse(SynExpr, SynExpr, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr], DebugPointForBinding, Boolean, range, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewImplicitZero(range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewInferredDowncast(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewInferredUpcast(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewInterpolatedString(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewJoinIn(SynExpr, range, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLambda(Boolean, Boolean, SynSimplePats, SynExpr, Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat],FSharp.Compiler.SyntaxTree+SynExpr]], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLazy(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLetOrUse(Boolean, Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding], SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLetOrUseBang(DebugPointForBinding, Boolean, Boolean, SynPat, SynExpr, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`6[FSharp.Compiler.SyntaxTree+DebugPointForBinding,System.Boolean,System.Boolean,FSharp.Compiler.SyntaxTree+SynPat,FSharp.Compiler.SyntaxTree+SynExpr,FSharp.Compiler.Range+range]], SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLibraryOnlyILAssembly(System.Object, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLibraryOnlyStaticOptimization(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint], SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLibraryOnlyUnionCaseFieldGet(SynExpr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Int32, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLibraryOnlyUnionCaseFieldSet(SynExpr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Int32, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLongIdent(Boolean, LongIdentWithDots, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpRef`1[FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo]], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewLongIdentSet(LongIdentWithDots, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewMatch(DebugPointForBinding, SynExpr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewMatchBang(DebugPointForBinding, SynExpr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewMatchLambda(Boolean, range, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause], DebugPointForBinding, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewNamedIndexedPropertySet(LongIdentWithDots, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewNew(Boolean, SynType, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewNull(range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewObjExpr(SynType, Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident]]], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynInterfaceImpl], range, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewParen(SynExpr, range, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewQuote(SynExpr, Boolean, SynExpr, Boolean, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewRecord(Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`5[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.SyntaxTree+SynExpr,FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]],FSharp.Compiler.Range+range]], Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynExpr,System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]], Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[System.Tuple`2[FSharp.Compiler.SyntaxTree+LongIdentWithDots,System.Boolean],Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr],Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+pos]]]]], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewSequential(DebugPointAtSequential, Boolean, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewSequentialOrImplicitYield(DebugPointAtSequential, SynExpr, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewSet(SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTraitCall(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypar], SynMemberSig, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTryFinally(SynExpr, SynExpr, range, DebugPointAtTry, DebugPointAtFinally)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTryWith(SynExpr, range, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMatchClause], range, range, DebugPointAtTry, DebugPointAtWith)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTuple(Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range], range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTypeApp(SynExpr, range, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], range, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTypeTest(SynExpr, SynType, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewTyped(SynExpr, SynType, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewUpcast(SynExpr, SynType, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewWhile(DebugPointAtWhile, SynExpr, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewYieldOrReturn(System.Tuple`2[System.Boolean,System.Boolean], SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: SynExpr NewYieldOrReturnFrom(System.Tuple`2[System.Boolean,System.Boolean], SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynExpr: range Range
-FSharp.Compiler.SyntaxTree+SynExpr: range RangeOfFirstPortion
-FSharp.Compiler.SyntaxTree+SynExpr: range RangeSansAnyExtraDot
-FSharp.Compiler.SyntaxTree+SynExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynExpr: range get_RangeOfFirstPortion()
-FSharp.Compiler.SyntaxTree+SynExpr: range get_RangeSansAnyExtraDot()
-FSharp.Compiler.SyntaxTree+SynField: Boolean get_isMutable()
-FSharp.Compiler.SyntaxTree+SynField: Boolean get_isStatic()
-FSharp.Compiler.SyntaxTree+SynField: Boolean isMutable
-FSharp.Compiler.SyntaxTree+SynField: Boolean isStatic
-FSharp.Compiler.SyntaxTree+SynField: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynField: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynField: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynField: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_idOpt()
-FSharp.Compiler.SyntaxTree+SynField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] idOpt
-FSharp.Compiler.SyntaxTree+SynField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynField: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynField: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynField: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynField: SynField NewField(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Boolean, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], SynType, Boolean, PreXmlDoc, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynField: SynType fieldType
-FSharp.Compiler.SyntaxTree+SynField: SynType get_fieldType()
-FSharp.Compiler.SyntaxTree+SynField: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynField: range get_range()
-FSharp.Compiler.SyntaxTree+SynField: range range
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Boolean IsTwo
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Boolean fromEnd
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Boolean get_IsTwo()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Boolean get_fromEnd()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] Exprs
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] get_Exprs()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: range Item3
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: range Range
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: range get_Item3()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+One: range get_Range()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Tags: Int32 One
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Tags: Int32 Two
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean IsTwo
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean fromEnd1
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean fromEnd2
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean get_IsTwo()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean get_fromEnd1()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Boolean get_fromEnd2()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] Exprs
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] get_Exprs()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: SynExpr expr1
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: SynExpr expr2
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: SynExpr get_expr1()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: SynExpr get_expr2()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: range Range
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: range get_Range()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: range get_range1()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: range get_range2()
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: range range1
-FSharp.Compiler.SyntaxTree+SynIndexerArg+Two: range range2
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Boolean IsTwo
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Boolean get_IsTwo()
-FSharp.Compiler.SyntaxTree+SynIndexerArg: FSharp.Compiler.SyntaxTree+SynIndexerArg+One
-FSharp.Compiler.SyntaxTree+SynIndexerArg: FSharp.Compiler.SyntaxTree+SynIndexerArg+Tags
-FSharp.Compiler.SyntaxTree+SynIndexerArg: FSharp.Compiler.SyntaxTree+SynIndexerArg+Two
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] Exprs
-FSharp.Compiler.SyntaxTree+SynIndexerArg: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynExpr] get_Exprs()
-FSharp.Compiler.SyntaxTree+SynIndexerArg: SynIndexerArg NewOne(SynExpr, Boolean, range)
-FSharp.Compiler.SyntaxTree+SynIndexerArg: SynIndexerArg NewTwo(SynExpr, Boolean, SynExpr, Boolean, range, range)
-FSharp.Compiler.SyntaxTree+SynIndexerArg: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynIndexerArg: range Range
-FSharp.Compiler.SyntaxTree+SynIndexerArg: range get_Range()
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] bindings
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] get_bindings()
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: SynInterfaceImpl NewInterfaceImpl(SynType, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding], range)
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: SynType get_interfaceTy()
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: SynType interfaceTy
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: range get_range()
-FSharp.Compiler.SyntaxTree+SynInterfaceImpl: range range
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Boolean IsFillExpr
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Boolean get_IsFillExpr()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_qualifiers()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] qualifiers
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: SynExpr fillExpr
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: SynExpr get_fillExpr()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: Boolean IsFillExpr
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: Boolean get_IsFillExpr()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: System.String get_value()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: System.String value
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: range get_range()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String: range range
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+Tags: Int32 FillExpr
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+Tags: Int32 String
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: Boolean IsFillExpr
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: Boolean IsString
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: Boolean get_IsFillExpr()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: Boolean get_IsString()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+FillExpr
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+String
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart+Tags
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: SynInterpolatedStringPart NewFillExpr(SynExpr, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident])
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: SynInterpolatedStringPart NewString(System.String, range)
-FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMatchClause: DebugPointForTarget get_spInfo()
-FSharp.Compiler.SyntaxTree+SynMatchClause: DebugPointForTarget spInfo
-FSharp.Compiler.SyntaxTree+SynMatchClause: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMatchClause: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMatchClause: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr] get_whenExpr()
-FSharp.Compiler.SyntaxTree+SynMatchClause: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr] whenExpr
-FSharp.Compiler.SyntaxTree+SynMatchClause: SynExpr get_resultExpr()
-FSharp.Compiler.SyntaxTree+SynMatchClause: SynExpr resultExpr
-FSharp.Compiler.SyntaxTree+SynMatchClause: SynMatchClause NewClause(SynPat, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr], SynExpr, range, DebugPointForTarget)
-FSharp.Compiler.SyntaxTree+SynMatchClause: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynMatchClause: SynPat pat
-FSharp.Compiler.SyntaxTree+SynMatchClause: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMatchClause: range Range
-FSharp.Compiler.SyntaxTree+SynMatchClause: range RangeOfGuardAndRhs
-FSharp.Compiler.SyntaxTree+SynMatchClause: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMatchClause: range get_RangeOfGuardAndRhs()
-FSharp.Compiler.SyntaxTree+SynMatchClause: range get_range()
-FSharp.Compiler.SyntaxTree+SynMatchClause: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Anon: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: SynMeasure get_measure1()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: SynMeasure get_measure2()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: SynMeasure measure1
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: SynMeasure measure2
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Divide: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Named: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: SynMeasure get_measure()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: SynMeasure measure
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: SynRationalConst get_power()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: SynRationalConst power
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Power: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: SynMeasure get_measure1()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: SynMeasure get_measure2()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: SynMeasure measure1
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: SynMeasure measure2
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Product: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMeasure] get_measures()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMeasure] measures
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Seq: range range
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Anon
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Divide
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Named
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 One
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Power
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Product
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Seq
-FSharp.Compiler.SyntaxTree+SynMeasure+Tags: Int32 Var
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: range get_range()
-FSharp.Compiler.SyntaxTree+SynMeasure+Var: range range
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsDivide
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsOne
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsPower
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsProduct
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsSeq
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsDivide()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsOne()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsPower()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsProduct()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsSeq()
-FSharp.Compiler.SyntaxTree+SynMeasure: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Anon
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Divide
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Named
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Power
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Product
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Seq
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Tags
-FSharp.Compiler.SyntaxTree+SynMeasure: FSharp.Compiler.SyntaxTree+SynMeasure+Var
-FSharp.Compiler.SyntaxTree+SynMeasure: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMeasure: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewAnon(range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewDivide(SynMeasure, SynMeasure, range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewNamed(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewPower(SynMeasure, SynRationalConst, range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewProduct(SynMeasure, SynMeasure, range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewSeq(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMeasure], range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure NewVar(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure One
-FSharp.Compiler.SyntaxTree+SynMeasure: SynMeasure get_One()
-FSharp.Compiler.SyntaxTree+SynMeasure: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: MemberFlags flags
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: MemberFlags get_flags()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: SynValSig get_slotSig()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: SynValSig slotSig
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean get_isStatic()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Boolean isStatic
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Ident ident
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: MemberKind get_propKind()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: MemberKind propKind
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+MemberKind,FSharp.Compiler.SyntaxTree+MemberFlags] get_memberFlags()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+MemberKind,FSharp.Compiler.SyntaxTree+MemberFlags] memberFlags
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] getSetRange
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_getSetRange()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynType] get_typeOpt()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynType] typeOpt
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: SynExpr get_synExpr()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: SynExpr synExpr
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_selfIdentifier()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] selfIdentifier
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: SynSimplePats ctorArgs
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: SynSimplePats get_ctorArgs()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_inheritAlias()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] inheritAlias
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: SynExpr get_inheritArgs()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: SynExpr inheritArgs
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: SynType get_inheritType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: SynType inheritType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] asIdent
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_asIdent()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: SynType baseType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: SynType get_baseType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn]] get_members()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn]] members
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: SynType get_interfaceType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: SynType interfaceType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean get_isStatic()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Boolean isStatic
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] bindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] get_bindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: SynBinding get_memberDefn()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: SynBinding memberDefn
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Member: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: SynTypeDefn get_typeDefn()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: SynTypeDefn typeDefn
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: SynOpenDeclTarget get_target()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: SynOpenDeclTarget target
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Open: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 AbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 AutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 ImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 ImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 Inherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 Interface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 LetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 Member
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 NestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 Open
-FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags: Int32 ValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: SynField fieldInfo
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: SynField get_fieldInfo()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField: range range
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsAbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsAutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsLetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsAbstractSlot()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsAutoProperty()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsImplicitCtor()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsImplicitInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsLetBindings()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+AbstractSlot
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+AutoProperty
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitCtor
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+ImplicitInherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+Inherit
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+Interface
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+LetBindings
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+Member
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+NestedType
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+Open
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+Tags
-FSharp.Compiler.SyntaxTree+SynMemberDefn: FSharp.Compiler.SyntaxTree+SynMemberDefn+ValField
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberDefn: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewAbstractSlot(SynValSig, MemberFlags, range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewAutoProperty(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Boolean, Ident, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynType], MemberKind, Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.SyntaxTree+MemberKind,FSharp.Compiler.SyntaxTree+MemberFlags], PreXmlDoc, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], SynExpr, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewImplicitCtor(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], SynSimplePats, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], PreXmlDoc, range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewImplicitInherit(SynType, SynExpr, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewInherit(SynType, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewInterface(SynType, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn]], range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewLetBindings(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding], Boolean, Boolean, range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewMember(SynBinding, range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewNestedType(SynTypeDefn, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewOpen(SynOpenDeclTarget, range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: SynMemberDefn NewValField(SynField, range)
-FSharp.Compiler.SyntaxTree+SynMemberDefn: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberDefn: range Range
-FSharp.Compiler.SyntaxTree+SynMemberDefn: range get_Range()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: SynType get_inheritedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: SynType inheritedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit: range range
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: SynType get_interfaceType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: SynType interfaceType
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Interface: range range
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: MemberFlags flags
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: MemberFlags get_flags()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: SynValSig get_memberSig()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: SynValSig memberSig
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberSig+Member: range range
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: SynTypeDefnSig get_nestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: SynTypeDefnSig nestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType: range range
-FSharp.Compiler.SyntaxTree+SynMemberSig+Tags: Int32 Inherit
-FSharp.Compiler.SyntaxTree+SynMemberSig+Tags: Int32 Interface
-FSharp.Compiler.SyntaxTree+SynMemberSig+Tags: Int32 Member
-FSharp.Compiler.SyntaxTree+SynMemberSig+Tags: Int32 NestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+Tags: Int32 ValField
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: SynField field
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: SynField get_field()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: range get_range()
-FSharp.Compiler.SyntaxTree+SynMemberSig+ValField: range range
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean IsInherit
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean IsInterface
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean IsMember
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean IsNestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean IsValField
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean get_IsInherit()
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean get_IsInterface()
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean get_IsMember()
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean get_IsNestedType()
-FSharp.Compiler.SyntaxTree+SynMemberSig: Boolean get_IsValField()
-FSharp.Compiler.SyntaxTree+SynMemberSig: FSharp.Compiler.SyntaxTree+SynMemberSig+Inherit
-FSharp.Compiler.SyntaxTree+SynMemberSig: FSharp.Compiler.SyntaxTree+SynMemberSig+Interface
-FSharp.Compiler.SyntaxTree+SynMemberSig: FSharp.Compiler.SyntaxTree+SynMemberSig+Member
-FSharp.Compiler.SyntaxTree+SynMemberSig: FSharp.Compiler.SyntaxTree+SynMemberSig+NestedType
-FSharp.Compiler.SyntaxTree+SynMemberSig: FSharp.Compiler.SyntaxTree+SynMemberSig+Tags
-FSharp.Compiler.SyntaxTree+SynMemberSig: FSharp.Compiler.SyntaxTree+SynMemberSig+ValField
-FSharp.Compiler.SyntaxTree+SynMemberSig: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynMemberSig: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynMemberSig: SynMemberSig NewInherit(SynType, range)
-FSharp.Compiler.SyntaxTree+SynMemberSig: SynMemberSig NewInterface(SynType, range)
-FSharp.Compiler.SyntaxTree+SynMemberSig: SynMemberSig NewMember(SynValSig, MemberFlags, range)
-FSharp.Compiler.SyntaxTree+SynMemberSig: SynMemberSig NewNestedType(SynTypeDefnSig, range)
-FSharp.Compiler.SyntaxTree+SynMemberSig: SynMemberSig NewValField(SynField, range)
-FSharp.Compiler.SyntaxTree+SynMemberSig: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: DebugPointForBinding get_spInfo()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: DebugPointForBinding spInfo
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: SynExceptionDefn exnDefn
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: SynExceptionDefn get_exnDefn()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: ParsedHashDirective get_hashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: ParsedHashDirective hashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] bindings
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding] get_bindings()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Let: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Ident ident
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: SynModuleOrNamespace fragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: SynModuleOrNamespace get_fragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_isContinuing()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean isContinuing
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] decls
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] get_decls()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: SynComponentInfo get_moduleInfo()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: SynComponentInfo moduleInfo
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: SynOpenDeclTarget get_target()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: SynOpenDeclTarget target
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Open: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 Attributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 DoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 Exception
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 HashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 Let
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 ModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 NamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 NestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 Open
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags: Int32 Types
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeDefn] get_typeDefns()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeDefn] typeDefns
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleDecl+Types: range range
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsAttributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsDoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsLet
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsAttributes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsDoExpr()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsLet()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+Attributes
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+DoExpr
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+Exception
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+HashDirective
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+Let
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+ModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+NamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+NestedModule
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+Open
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+Tags
-FSharp.Compiler.SyntaxTree+SynModuleDecl: FSharp.Compiler.SyntaxTree+SynModuleDecl+Types
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleDecl: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewAttributes(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewDoExpr(DebugPointForBinding, SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewException(SynExceptionDefn, range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewHashDirective(ParsedHashDirective, range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewLet(Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynBinding], range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewModuleAbbrev(Ident, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewNamespaceFragment(SynModuleOrNamespace)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewNestedModule(SynComponentInfo, Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl], Boolean, range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewOpen(SynOpenDeclTarget, range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: SynModuleDecl NewTypes(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeDefn], range)
-FSharp.Compiler.SyntaxTree+SynModuleDecl: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleDecl: range Range
-FSharp.Compiler.SyntaxTree+SynModuleDecl: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attribs
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attribs()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] decls
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl] get_decls()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: SynModuleOrNamespace NewSynModuleOrNamespace(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Boolean, SynModuleOrNamespaceKind, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleDecl], PreXmlDoc, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: SynModuleOrNamespaceKind get_kind()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: SynModuleOrNamespaceKind kind
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: range Range
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespace: range range
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind+Tags: Int32 AnonModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind+Tags: Int32 DeclaredNamespace
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind+Tags: Int32 GlobalNamespace
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind+Tags: Int32 NamedModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean Equals(SynModuleOrNamespaceKind)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean IsAnonModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean IsDeclaredNamespace
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean IsGlobalNamespace
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean IsModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean IsNamedModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean get_IsAnonModule()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean get_IsDeclaredNamespace()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean get_IsGlobalNamespace()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean get_IsModule()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Boolean get_IsNamedModule()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind+Tags
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 CompareTo(SynModuleOrNamespaceKind)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind AnonModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind DeclaredNamespace
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind GlobalNamespace
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind NamedModule
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind get_AnonModule()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind get_DeclaredNamespace()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind get_GlobalNamespace()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: SynModuleOrNamespaceKind get_NamedModule()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attribs
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attribs()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] decls
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] get_decls()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: SynModuleOrNamespaceKind get_kind()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: SynModuleOrNamespaceKind kind
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: SynModuleOrNamespaceSig NewSynModuleOrNamespaceSig(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], Boolean, SynModuleOrNamespaceKind, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl], PreXmlDoc, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: SynExceptionSig exnSig
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: SynExceptionSig get_exnSig()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: ParsedHashDirective get_hashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: ParsedHashDirective hashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Ident ident
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: SynModuleOrNamespaceSig Item
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: SynModuleOrNamespaceSig get_Item()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean get_isRecursive()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Boolean isRecursive
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] get_moduleDecls()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl] moduleDecls
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: SynComponentInfo get_moduleInfo()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: SynComponentInfo moduleInfo
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: SynOpenDeclTarget get_target()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: SynOpenDeclTarget target
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 Exception
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 HashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 ModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 NamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 NestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 Open
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 Types
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags: Int32 Val
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeDefnSig] get_types()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeDefnSig] types
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: SynValSig get_valSig()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: SynValSig valSig
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: range get_Range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: range get_range()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val: range range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsHashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsNamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsNestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsOpen
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsTypes
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean IsVal
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsHashDirective()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsModuleAbbrev()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsNamespaceFragment()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsNestedModule()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsOpen()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsTypes()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Boolean get_IsVal()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Exception
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+HashDirective
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+ModuleAbbrev
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NamespaceFragment
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+NestedModule
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Open
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Tags
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Types
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: FSharp.Compiler.SyntaxTree+SynModuleSigDecl+Val
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewException(SynExceptionSig, range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewHashDirective(ParsedHashDirective, range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewModuleAbbrev(Ident, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewNamespaceFragment(SynModuleOrNamespaceSig)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewNestedModule(SynComponentInfo, Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynModuleSigDecl], range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewOpen(SynOpenDeclTarget, range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewTypes(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeDefnSig], range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: SynModuleSigDecl NewVal(SynValSig, range)
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: range Range
-FSharp.Compiler.SyntaxTree+SynModuleSigDecl: range get_Range()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Boolean IsModuleOrNamespace
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Boolean IsType
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Boolean get_IsType()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] get_longId()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident] longId
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: range Range
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: range get_Range()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: range get_range()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace: range range
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Tags: Int32 ModuleOrNamespace
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Tags: Int32 Type
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: Boolean IsModuleOrNamespace
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: Boolean IsType
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: Boolean get_IsType()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: SynType typeName
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: range Range
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: range get_Range()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: range get_range()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type: range range
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: Boolean IsModuleOrNamespace
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: Boolean IsType
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: Boolean get_IsModuleOrNamespace()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: Boolean get_IsType()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+ModuleOrNamespace
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Tags
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: FSharp.Compiler.SyntaxTree+SynOpenDeclTarget+Type
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: SynOpenDeclTarget NewModuleOrNamespace(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident], range)
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: SynOpenDeclTarget NewType(SynType, range)
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: range Range
-FSharp.Compiler.SyntaxTree+SynOpenDeclTarget: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] get_pats()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] pats
-FSharp.Compiler.SyntaxTree+SynPat+Ands: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Ands: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Ands: range range
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean get_isArray()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Boolean isArray
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] elementPats
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] get_elementPats()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: range Range
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList: range range
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: SynPat pat
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Attrib: range range
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Const: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Const: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Const: SynConst constant
-FSharp.Compiler.SyntaxTree+SynPat+Const: SynConst get_constant()
-FSharp.Compiler.SyntaxTree+SynPat+Const: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Const: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Const: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Const: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Const: range range
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Char endChar
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Char get_endChar()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Char get_startChar()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Char startChar
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: range Range
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange: range range
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: SynPat pat
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: range Range
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+FromParseError: range range
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Ident get_memberId()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Ident get_thisId()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Ident memberId
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Ident thisId
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_toolingId()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] toolingId
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: range Range
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+InstanceMember: range range
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: SynType get_pat()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: SynType pat
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: range Range
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+IsInst: range range
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] extraId
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_extraId()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynValTyparDecls] get_typarDecls()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynValTyparDecls] typarDecls
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: SynArgPats argPats
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: SynArgPats get_argPats()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: range Range
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+LongIdent: range range
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean get_isSelfIdentifier()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Boolean isSelfIdentifier
-FSharp.Compiler.SyntaxTree+SynPat+Named: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Ident ident
-FSharp.Compiler.SyntaxTree+SynPat+Named: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Named: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Named: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynPat+Named: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynPat+Named: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynPat+Named: SynPat pat
-FSharp.Compiler.SyntaxTree+SynPat+Named: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Named: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Named: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Named: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Named: range range
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Null: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Null: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Null: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Null: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Null: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Null: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Null: range range
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Ident ident
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: range Range
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+OptionalVal: range range
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Or: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Or: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Or: SynPat get_lhsPat()
-FSharp.Compiler.SyntaxTree+SynPat+Or: SynPat get_rhsPat()
-FSharp.Compiler.SyntaxTree+SynPat+Or: SynPat lhsPat
-FSharp.Compiler.SyntaxTree+SynPat+Or: SynPat rhsPat
-FSharp.Compiler.SyntaxTree+SynPat+Or: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Or: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Or: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Or: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Or: range range
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Paren: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: SynPat pat
-FSharp.Compiler.SyntaxTree+SynPat+Paren: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Paren: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Paren: range range
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: range Range
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr: range range
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Record: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Record: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident],FSharp.Compiler.SyntaxTree+Ident],FSharp.Compiler.SyntaxTree+SynPat]] fieldPats
-FSharp.Compiler.SyntaxTree+SynPat+Record: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident],FSharp.Compiler.SyntaxTree+Ident],FSharp.Compiler.SyntaxTree+SynPat]] get_fieldPats()
-FSharp.Compiler.SyntaxTree+SynPat+Record: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Record: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Record: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Record: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Record: range range
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Ands
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 ArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Attrib
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Const
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 DeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 FromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 InstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 IsInst
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 LongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Named
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Null
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 OptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Or
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Paren
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 QuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Record
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Tuple
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Typed
-FSharp.Compiler.SyntaxTree+SynPat+Tags: Int32 Wild
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean get_isStruct()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Boolean isStruct
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] elementPats
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat] get_elementPats()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Tuple: range range
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Typed: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: SynPat get_pat()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: SynPat pat
-FSharp.Compiler.SyntaxTree+SynPat+Typed: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: SynType targetType
-FSharp.Compiler.SyntaxTree+SynPat+Typed: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Typed: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Typed: range range
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat+Wild: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: range Range
-FSharp.Compiler.SyntaxTree+SynPat+Wild: range get_Range()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: range get_range()
-FSharp.Compiler.SyntaxTree+SynPat+Wild: range range
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsAnds
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsConst
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsDeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsFromParseError
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsInstanceMember
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsIsInst
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsNamed
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsNull
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsOptionalVal
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsOr
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsQuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynPat: Boolean IsWild
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsAnds()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsArrayOrList()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsConst()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsDeprecatedCharRange()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsFromParseError()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsInstanceMember()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsIsInst()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsNamed()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsNull()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsOptionalVal()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsOr()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsQuoteExpr()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynPat: Boolean get_IsWild()
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Ands
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+ArrayOrList
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Attrib
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Const
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+DeprecatedCharRange
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+FromParseError
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+InstanceMember
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+IsInst
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+LongIdent
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Named
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Null
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+OptionalVal
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Or
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Paren
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+QuoteExpr
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Record
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Tags
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Tuple
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Typed
-FSharp.Compiler.SyntaxTree+SynPat: FSharp.Compiler.SyntaxTree+SynPat+Wild
-FSharp.Compiler.SyntaxTree+SynPat: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynPat: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewAnds(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewArrayOrList(Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewAttrib(SynPat, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewConst(SynConst, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewDeprecatedCharRange(Char, Char, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewFromParseError(SynPat, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewInstanceMember(Ident, Ident, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewIsInst(SynType, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewLongIdent(LongIdentWithDots, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynValTyparDecls], SynArgPats, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewNamed(SynPat, Ident, Boolean, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewNull(range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewOptionalVal(Ident, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewOr(SynPat, SynPat, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewParen(SynPat, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewQuoteExpr(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewRecord(Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Tuple`2[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+Ident],FSharp.Compiler.SyntaxTree+Ident],FSharp.Compiler.SyntaxTree+SynPat]], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewTuple(Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynPat], range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewTyped(SynPat, SynType, range)
-FSharp.Compiler.SyntaxTree+SynPat: SynPat NewWild(range)
-FSharp.Compiler.SyntaxTree+SynPat: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynPat: range Range
-FSharp.Compiler.SyntaxTree+SynPat: range get_Range()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Boolean IsInteger
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Boolean IsNegate
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Boolean IsRational
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Boolean get_IsInteger()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Boolean get_IsNegate()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Boolean get_IsRational()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Int32 get_value()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: Int32 value
-FSharp.Compiler.SyntaxTree+SynRationalConst+Integer: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Boolean IsInteger
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Boolean IsNegate
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Boolean IsRational
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Boolean get_IsInteger()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Boolean get_IsNegate()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Boolean get_IsRational()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: SynRationalConst Item
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: SynRationalConst get_Item()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Negate: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Boolean IsInteger
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Boolean IsNegate
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Boolean IsRational
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Boolean get_IsInteger()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Boolean get_IsNegate()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Boolean get_IsRational()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Int32 denominator
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Int32 get_denominator()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Int32 get_numerator()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: Int32 numerator
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: range get_range()
-FSharp.Compiler.SyntaxTree+SynRationalConst+Rational: range range
-FSharp.Compiler.SyntaxTree+SynRationalConst+Tags: Int32 Integer
-FSharp.Compiler.SyntaxTree+SynRationalConst+Tags: Int32 Negate
-FSharp.Compiler.SyntaxTree+SynRationalConst+Tags: Int32 Rational
-FSharp.Compiler.SyntaxTree+SynRationalConst: Boolean IsInteger
-FSharp.Compiler.SyntaxTree+SynRationalConst: Boolean IsNegate
-FSharp.Compiler.SyntaxTree+SynRationalConst: Boolean IsRational
-FSharp.Compiler.SyntaxTree+SynRationalConst: Boolean get_IsInteger()
-FSharp.Compiler.SyntaxTree+SynRationalConst: Boolean get_IsNegate()
-FSharp.Compiler.SyntaxTree+SynRationalConst: Boolean get_IsRational()
-FSharp.Compiler.SyntaxTree+SynRationalConst: FSharp.Compiler.SyntaxTree+SynRationalConst+Integer
-FSharp.Compiler.SyntaxTree+SynRationalConst: FSharp.Compiler.SyntaxTree+SynRationalConst+Negate
-FSharp.Compiler.SyntaxTree+SynRationalConst: FSharp.Compiler.SyntaxTree+SynRationalConst+Rational
-FSharp.Compiler.SyntaxTree+SynRationalConst: FSharp.Compiler.SyntaxTree+SynRationalConst+Tags
-FSharp.Compiler.SyntaxTree+SynRationalConst: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynRationalConst: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynRationalConst: SynRationalConst NewInteger(Int32)
-FSharp.Compiler.SyntaxTree+SynRationalConst: SynRationalConst NewNegate(SynRationalConst)
-FSharp.Compiler.SyntaxTree+SynRationalConst: SynRationalConst NewRational(Int32, Int32, range)
-FSharp.Compiler.SyntaxTree+SynRationalConst: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynReturnInfo: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynReturnInfo: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynReturnInfo: SynReturnInfo NewSynReturnInfo(System.Tuple`2[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.SyntaxTree+SynArgInfo], range)
-FSharp.Compiler.SyntaxTree+SynReturnInfo: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynReturnInfo: System.Tuple`2[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.SyntaxTree+SynArgInfo] get_returnType()
-FSharp.Compiler.SyntaxTree+SynReturnInfo: System.Tuple`2[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.SyntaxTree+SynArgInfo] returnType
-FSharp.Compiler.SyntaxTree+SynReturnInfo: range get_range()
-FSharp.Compiler.SyntaxTree+SynReturnInfo: range range
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Boolean IsId
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Boolean get_IsId()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: SynSimplePat get_pat()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: SynSimplePat pat
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: range get_range()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib: range range
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean IsId
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean get_IsId()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean get_isCompilerGenerated()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean get_isOptArg()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean get_isThisVar()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean isCompilerGenerated
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean isOptArg
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Boolean isThisVar
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Ident ident
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpRef`1[FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo]] altNameRefCell
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpRef`1[FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo]] get_altNameRefCell()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: range get_range()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Id: range range
-FSharp.Compiler.SyntaxTree+SynSimplePat+Tags: Int32 Attrib
-FSharp.Compiler.SyntaxTree+SynSimplePat+Tags: Int32 Id
-FSharp.Compiler.SyntaxTree+SynSimplePat+Tags: Int32 Typed
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Boolean IsId
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Boolean get_IsId()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: SynSimplePat get_pat()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: SynSimplePat pat
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: SynType targetType
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: range get_range()
-FSharp.Compiler.SyntaxTree+SynSimplePat+Typed: range range
-FSharp.Compiler.SyntaxTree+SynSimplePat: Boolean IsAttrib
-FSharp.Compiler.SyntaxTree+SynSimplePat: Boolean IsId
-FSharp.Compiler.SyntaxTree+SynSimplePat: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePat: Boolean get_IsAttrib()
-FSharp.Compiler.SyntaxTree+SynSimplePat: Boolean get_IsId()
-FSharp.Compiler.SyntaxTree+SynSimplePat: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePat: FSharp.Compiler.SyntaxTree+SynSimplePat+Attrib
-FSharp.Compiler.SyntaxTree+SynSimplePat: FSharp.Compiler.SyntaxTree+SynSimplePat+Id
-FSharp.Compiler.SyntaxTree+SynSimplePat: FSharp.Compiler.SyntaxTree+SynSimplePat+Tags
-FSharp.Compiler.SyntaxTree+SynSimplePat: FSharp.Compiler.SyntaxTree+SynSimplePat+Typed
-FSharp.Compiler.SyntaxTree+SynSimplePat: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePat: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePat: SynSimplePat NewAttrib(SynSimplePat, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], range)
-FSharp.Compiler.SyntaxTree+SynSimplePat: SynSimplePat NewId(Ident, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Core.FSharpRef`1[FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo]], Boolean, Boolean, Boolean, range)
-FSharp.Compiler.SyntaxTree+SynSimplePat: SynSimplePat NewTyped(SynSimplePat, SynType, range)
-FSharp.Compiler.SyntaxTree+SynSimplePat: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Boolean IsDecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Boolean IsUndecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Boolean get_IsDecided()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Boolean get_IsUndecided()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Ident Item
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Ident get_Item()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Tags: Int32 Decided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Tags: Int32 Undecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Boolean IsDecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Boolean IsUndecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Boolean get_IsDecided()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Boolean get_IsUndecided()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Ident Item
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Ident get_Item()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: Boolean IsDecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: Boolean IsUndecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: Boolean get_IsDecided()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: Boolean get_IsUndecided()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Decided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Tags
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo+Undecided
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: SynSimplePatAlternativeIdInfo NewDecided(Ident)
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: SynSimplePatAlternativeIdInfo NewUndecided(Ident)
-FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Boolean IsSimplePats
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Boolean get_IsSimplePats()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynSimplePat] get_pats()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynSimplePat] pats
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: range get_range()
-FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats: range range
-FSharp.Compiler.SyntaxTree+SynSimplePats+Tags: Int32 SimplePats
-FSharp.Compiler.SyntaxTree+SynSimplePats+Tags: Int32 Typed
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: Boolean IsSimplePats
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: Boolean get_IsSimplePats()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: SynSimplePats get_pats()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: SynSimplePats pats
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: SynType get_targetType()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: SynType targetType
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: range get_range()
-FSharp.Compiler.SyntaxTree+SynSimplePats+Typed: range range
-FSharp.Compiler.SyntaxTree+SynSimplePats: Boolean IsSimplePats
-FSharp.Compiler.SyntaxTree+SynSimplePats: Boolean IsTyped
-FSharp.Compiler.SyntaxTree+SynSimplePats: Boolean get_IsSimplePats()
-FSharp.Compiler.SyntaxTree+SynSimplePats: Boolean get_IsTyped()
-FSharp.Compiler.SyntaxTree+SynSimplePats: FSharp.Compiler.SyntaxTree+SynSimplePats+SimplePats
-FSharp.Compiler.SyntaxTree+SynSimplePats: FSharp.Compiler.SyntaxTree+SynSimplePats+Tags
-FSharp.Compiler.SyntaxTree+SynSimplePats: FSharp.Compiler.SyntaxTree+SynSimplePats+Typed
-FSharp.Compiler.SyntaxTree+SynSimplePats: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynSimplePats: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynSimplePats: SynSimplePats NewSimplePats(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynSimplePat], range)
-FSharp.Compiler.SyntaxTree+SynSimplePats: SynSimplePats NewTyped(SynSimplePats, SynType, range)
-FSharp.Compiler.SyntaxTree+SynSimplePats: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+Tags: Int32 WhenTyparIsStruct
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+Tags: Int32 WhenTyparTyconEqualsTycon
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: Boolean IsWhenTyparIsStruct
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: Boolean IsWhenTyparTyconEqualsTycon
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: Boolean get_IsWhenTyparIsStruct()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: Boolean get_IsWhenTyparTyconEqualsTycon()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: range get_range()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct: range range
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: Boolean IsWhenTyparIsStruct
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: Boolean IsWhenTyparTyconEqualsTycon
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: Boolean get_IsWhenTyparIsStruct()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: Boolean get_IsWhenTyparTyconEqualsTycon()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: SynType get_rhsType()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: SynType rhsType
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: range get_range()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon: range range
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: Boolean IsWhenTyparIsStruct
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: Boolean IsWhenTyparTyconEqualsTycon
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: Boolean get_IsWhenTyparIsStruct()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: Boolean get_IsWhenTyparTyconEqualsTycon()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+Tags
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparIsStruct
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint+WhenTyparTyconEqualsTycon
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: SynStaticOptimizationConstraint NewWhenTyparIsStruct(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: SynStaticOptimizationConstraint NewWhenTyparTyconEqualsTycon(SynTypar, SynType, range)
-FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypar: Boolean get_isCompGen()
-FSharp.Compiler.SyntaxTree+SynTypar: Boolean isCompGen
-FSharp.Compiler.SyntaxTree+SynTypar: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynTypar: Ident ident
-FSharp.Compiler.SyntaxTree+SynTypar: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypar: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypar: SynTypar NewTypar(Ident, TyparStaticReq, Boolean)
-FSharp.Compiler.SyntaxTree+SynTypar: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypar: TyparStaticReq get_staticReq()
-FSharp.Compiler.SyntaxTree+SynTypar: TyparStaticReq staticReq
-FSharp.Compiler.SyntaxTree+SynTypar: range Range
-FSharp.Compiler.SyntaxTree+SynTypar: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTyparDecl: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTyparDecl: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTyparDecl: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynTyparDecl: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynTyparDecl: SynTypar Item2
-FSharp.Compiler.SyntaxTree+SynTyparDecl: SynTypar get_Item2()
-FSharp.Compiler.SyntaxTree+SynTyparDecl: SynTyparDecl NewTyparDecl(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], SynTypar)
-FSharp.Compiler.SyntaxTree+SynTyparDecl: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+Anon: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+Anon: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Anon: range Range
-FSharp.Compiler.SyntaxTree+SynType+Anon: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+Anon: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+Anon: range range
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_isStruct()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean isStruct
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynType]] fields
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynType]] get_fields()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: range Range
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: range range
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_isPostfix()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean isPostfix
-FSharp.Compiler.SyntaxTree+SynType+App: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+App: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] commaRanges
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] get_commaRanges()
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typeArgs()
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typeArgs
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_greaterRange()
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_lessRange()
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] greaterRange
-FSharp.Compiler.SyntaxTree+SynType+App: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] lessRange
-FSharp.Compiler.SyntaxTree+SynType+App: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynType+App: SynType typeName
-FSharp.Compiler.SyntaxTree+SynType+App: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+App: range Range
-FSharp.Compiler.SyntaxTree+SynType+App: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+App: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+App: range range
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+Array: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+Array: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+Array: Int32 get_rank()
-FSharp.Compiler.SyntaxTree+SynType+Array: Int32 rank
-FSharp.Compiler.SyntaxTree+SynType+Array: SynType elementType
-FSharp.Compiler.SyntaxTree+SynType+Array: SynType get_elementType()
-FSharp.Compiler.SyntaxTree+SynType+Array: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Array: range Range
-FSharp.Compiler.SyntaxTree+SynType+Array: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+Array: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+Array: range range
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+Fun: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+Fun: SynType argType
-FSharp.Compiler.SyntaxTree+SynType+Fun: SynType get_argType()
-FSharp.Compiler.SyntaxTree+SynType+Fun: SynType get_returnType()
-FSharp.Compiler.SyntaxTree+SynType+Fun: SynType returnType
-FSharp.Compiler.SyntaxTree+SynType+Fun: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Fun: range Range
-FSharp.Compiler.SyntaxTree+SynType+Fun: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+Fun: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+Fun: range range
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: SynType get_innerType()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: SynType innerType
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: range Range
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: range range
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: range Range
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: LongIdentWithDots get_longDotId()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: LongIdentWithDots longDotId
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] commaRanges
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range] get_commaRanges()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typeArgs()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typeArgs
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_greaterRange()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] get_lessRange()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] greaterRange
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range] lessRange
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: SynType typeName
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: range Range
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: range range
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: SynType dividend
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: SynType divisor
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: SynType get_dividend()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: SynType get_divisor()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: range Range
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: range range
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: SynRationalConst exponent
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: SynRationalConst get_exponent()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: SynType baseMeasure
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: SynType get_baseMeasure()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: range Range
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: range range
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+Paren: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+Paren: SynType get_innerType()
-FSharp.Compiler.SyntaxTree+SynType+Paren: SynType innerType
-FSharp.Compiler.SyntaxTree+SynType+Paren: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Paren: range Range
-FSharp.Compiler.SyntaxTree+SynType+Paren: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+Paren: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+Paren: range range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: SynConst constant
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: SynConst get_constant()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: range Range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: range range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: SynExpr expr
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: SynExpr get_expr()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: range Range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: range range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: SynType get_ident()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: SynType get_value()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: SynType ident
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: SynType value
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: range Range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: range range
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 Anon
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 AnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 App
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 Array
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 Fun
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 HashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 LongIdent
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 LongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 MeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 MeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 Paren
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 StaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 StaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 StaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 Tuple
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 Var
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 WithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_isStruct()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean isStruct
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Boolean,FSharp.Compiler.SyntaxTree+SynType]] elementTypes
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Boolean,FSharp.Compiler.SyntaxTree+SynType]] get_elementTypes()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: range Range
-FSharp.Compiler.SyntaxTree+SynType+Tuple: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: range range
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+Var: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+Var: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+Var: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynType+Var: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynType+Var: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+Var: range Range
-FSharp.Compiler.SyntaxTree+SynType+Var: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+Var: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+Var: range range
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint] constraints
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint] get_constraints()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: SynType typeName
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: range Range
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: range range
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Anon
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+AnonRecd
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+App
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Array
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Fun
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+HashConstraint
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+LongIdent
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+LongIdentApp
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+MeasureDivide
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+MeasurePower
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Paren
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+StaticConstant
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Tags
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Tuple
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+Var
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType: SynType NewAnon(range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewAnonRecd(Boolean, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+Ident,FSharp.Compiler.SyntaxTree+SynType]], range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewApp(SynType, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], Boolean, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewArray(Int32, SynType, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewFun(SynType, SynType, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewHashConstraint(SynType, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewLongIdent(LongIdentWithDots)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewLongIdentApp(SynType, LongIdentWithDots, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Range+range], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Range+range], range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewMeasureDivide(SynType, SynType, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewMeasurePower(SynType, SynRationalConst, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewParen(SynType, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewStaticConstant(SynConst, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewStaticConstantExpr(SynExpr, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewStaticConstantNamed(SynType, SynType, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewTuple(Boolean, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Boolean,FSharp.Compiler.SyntaxTree+SynType]], range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewVar(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewWithGlobalConstraints(SynType, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint], range)
-FSharp.Compiler.SyntaxTree+SynType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType: range Range
-FSharp.Compiler.SyntaxTree+SynType: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: SynType typeName
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typeArgs()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typeArgs
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typeArgs()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typeArgs
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: SynType get_typeName()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: SynType typeName
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] get_typars()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType] typars
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: SynMemberSig get_memberSig()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: SynMemberSig memberSig
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: SynTypar get_typar()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: SynTypar typar
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparDefaultsToType(SynTypar, SynType, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsComparable(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsDelegate(SynTypar, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsEnum(SynTypar, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsEquatable(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsReferenceType(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsUnmanaged(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparIsValueType(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparSubtypeOfType(SynTypar, SynType, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparSupportsMember(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynType], SynMemberSig, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparSupportsNull(SynTypar, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefn: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn] get_members()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn] members
-FSharp.Compiler.SyntaxTree+SynTypeDefn: SynComponentInfo get_typeInfo()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: SynComponentInfo typeInfo
-FSharp.Compiler.SyntaxTree+SynTypeDefn: SynTypeDefn NewTypeDefn(SynComponentInfo, SynTypeDefnRepr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefn: SynTypeDefnRepr get_typeRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: SynTypeDefnRepr typeRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefn: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefn: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefn: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconAugmentation
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconClass
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconDelegate
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconHiddenRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconILAssemblyCode
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconInterface
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconStruct
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags: Int32 TyconUnspecified
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconAugmentation
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconClass
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconDelegate
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconHiddenRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconILAssemblyCode
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconInterface
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconStruct
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean IsTyconUnspecified
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconAugmentation()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconClass()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconHiddenRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconILAssemblyCode()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconInterface()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconStruct()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Boolean get_IsTyconUnspecified()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: SynType get_signature()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: SynType signature
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: SynValInfo get_signatureInfo()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: SynValInfo signatureInfo
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconAugmentation
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconClass
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconDelegate
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconHiddenRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconILAssemblyCode
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconInterface
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconStruct
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean IsTyconUnspecified
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconAugmentation()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconClass()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconHiddenRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconILAssemblyCode()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconInterface()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconStruct()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Boolean get_IsTyconUnspecified()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: FSharp.Compiler.SyntaxTree+SynTypeDefnKind+Tags
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: FSharp.Compiler.SyntaxTree+SynTypeDefnKind+TyconDelegate
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind NewTyconDelegate(SynType, SynValInfo)
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconAugmentation
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconClass
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconHiddenRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconILAssemblyCode
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconInterface
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconStruct
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind TyconUnspecified
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconAugmentation()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconClass()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconHiddenRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconILAssemblyCode()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconInterface()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconStruct()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: SynTypeDefnKind get_TyconUnspecified()
-FSharp.Compiler.SyntaxTree+SynTypeDefnKind: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: SynExceptionDefnRepr exnRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: SynExceptionDefnRepr get_exnRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn] get_members()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn] members
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: SynTypeDefnKind get_kind()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: SynTypeDefnKind kind
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: SynTypeDefnSimpleRepr get_simpleRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: SynTypeDefnSimpleRepr simpleRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Tags: Int32 Exception
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Tags: Int32 ObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Tags: Int32 Simple
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Exception
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+ObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Simple
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnRepr+Tags
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: SynTypeDefnRepr NewException(SynExceptionDefnRepr)
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: SynTypeDefnRepr NewObjectModel(SynTypeDefnKind, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberDefn], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: SynTypeDefnRepr NewSimple(SynTypeDefnSimpleRepr, range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnRepr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig] get_members()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig] members
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: SynComponentInfo get_typeInfo()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: SynComponentInfo typeInfo
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: SynTypeDefnSig NewTypeDefnSig(SynComponentInfo, SynTypeDefnSigRepr, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: SynTypeDefnSigRepr get_typeRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: SynTypeDefnSigRepr typeRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSig: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: SynExceptionDefnRepr Item
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: SynExceptionDefnRepr get_Item()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig] get_memberSigs()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig] memberSigs
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: SynTypeDefnKind get_kind()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: SynTypeDefnKind kind
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: SynTypeDefnSimpleRepr get_repr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: SynTypeDefnSimpleRepr repr
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Tags: Int32 Exception
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Tags: Int32 ObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Tags: Int32 Simple
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Boolean IsObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Boolean IsSimple
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Boolean get_IsObjectModel()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Boolean get_IsSimple()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Exception
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+ObjectModel
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Simple
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr+Tags
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: SynTypeDefnSigRepr NewException(SynExceptionDefnRepr)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: SynTypeDefnSigRepr NewObjectModel(SynTypeDefnKind, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynMemberSig], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: SynTypeDefnSigRepr NewSimple(SynTypeDefnSimpleRepr, range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynEnumCase] cases
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynEnumCase] get_cases()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: SynExceptionDefnRepr exnRepr
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: SynExceptionDefnRepr get_exnRepr()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_isConcrete()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean get_isIncrClass()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean isConcrete
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Boolean isIncrClass
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField] fields
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField] get_fields()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynValSig,FSharp.Compiler.SyntaxTree+MemberFlags]] get_slotsigs()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynValSig,FSharp.Compiler.SyntaxTree+MemberFlags]] slotsigs
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident]]] get_inherits()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident]]] inherits
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynSimplePats] get_implicitCtorSynPats()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynSimplePats] implicitCtorSynPats
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: SynTypeDefnKind get_kind()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: SynTypeDefnKind kind
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: System.Object get_ilType()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: System.Object ilType
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField] get_recordFields()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField] recordFields
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 Enum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 Exception
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 General
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 LibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 None
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 Record
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 TypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags: Int32 Union
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: ParserDetail detail
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: ParserDetail get_detail()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: SynType get_rhsType()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: SynType rhsType
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynUnionCase] get_unionCases()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynUnionCase] unionCases
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: range get_Range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union: range range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsEnum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsException
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsGeneral
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsLibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsNone
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsRecord
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsTypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean IsUnion
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsException()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsGeneral()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsLibraryOnlyILAssembly()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsNone()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsRecord()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsTypeAbbrev()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Boolean get_IsUnion()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Enum
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Exception
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+General
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+LibraryOnlyILAssembly
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+None
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Record
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Tags
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+TypeAbbrev
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr+Union
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewEnum(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynEnumCase], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewException(SynExceptionDefnRepr)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewGeneral(SynTypeDefnKind, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`3[FSharp.Compiler.SyntaxTree+SynType,FSharp.Compiler.Range+range,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident]]], Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.SyntaxTree+SynValSig,FSharp.Compiler.SyntaxTree+MemberFlags]], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField], Boolean, Boolean, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynSimplePats], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewLibraryOnlyILAssembly(System.Object, range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewNone(range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewRecord(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewTypeAbbrev(ParserDetail, SynType, range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: SynTypeDefnSimpleRepr NewUnion(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynUnionCase], range)
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: range Range
-FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr: range get_Range()
-FSharp.Compiler.SyntaxTree+SynUnionCase: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynUnionCase: Ident ident
-FSharp.Compiler.SyntaxTree+SynUnionCase: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynUnionCase: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynUnionCase: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynUnionCase: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynUnionCase: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynUnionCase: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynUnionCase: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynUnionCase: SynUnionCase NewUnionCase(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Ident, SynUnionCaseType, PreXmlDoc, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], range)
-FSharp.Compiler.SyntaxTree+SynUnionCase: SynUnionCaseType caseType
-FSharp.Compiler.SyntaxTree+SynUnionCase: SynUnionCaseType get_caseType()
-FSharp.Compiler.SyntaxTree+SynUnionCase: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynUnionCase: range Range
-FSharp.Compiler.SyntaxTree+SynUnionCase: range get_Range()
-FSharp.Compiler.SyntaxTree+SynUnionCase: range get_range()
-FSharp.Compiler.SyntaxTree+SynUnionCase: range range
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+Tags: Int32 UnionCaseFields
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+Tags: Int32 UnionCaseFullType
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Boolean IsUnionCaseFields
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Boolean IsUnionCaseFullType
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Boolean get_IsUnionCaseFields()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Boolean get_IsUnionCaseFullType()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField] cases
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField] get_cases()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: Boolean IsUnionCaseFields
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: Boolean IsUnionCaseFullType
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: Boolean get_IsUnionCaseFields()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: Boolean get_IsUnionCaseFullType()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: SynType fullType
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: SynType get_fullType()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: SynValInfo fullTypeInfo
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: SynValInfo get_fullTypeInfo()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: Boolean IsUnionCaseFields
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: Boolean IsUnionCaseFullType
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: Boolean get_IsUnionCaseFields()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: Boolean get_IsUnionCaseFullType()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: FSharp.Compiler.SyntaxTree+SynUnionCaseType+Tags
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFields
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: FSharp.Compiler.SyntaxTree+SynUnionCaseType+UnionCaseFullType
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: SynUnionCaseType NewUnionCaseFields(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynField])
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: SynUnionCaseType NewUnionCaseFullType(SynType, SynValInfo)
-FSharp.Compiler.SyntaxTree+SynUnionCaseType: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynValData: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynValData: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynValData: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] get_thisIdOpt()
-FSharp.Compiler.SyntaxTree+SynValData: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident] thisIdOpt
-FSharp.Compiler.SyntaxTree+SynValData: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+MemberFlags] get_memberFlags()
-FSharp.Compiler.SyntaxTree+SynValData: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+MemberFlags] memberFlags
-FSharp.Compiler.SyntaxTree+SynValData: SynValData NewSynValData(Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+MemberFlags], SynValInfo, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+Ident])
-FSharp.Compiler.SyntaxTree+SynValData: SynValInfo SynValInfo
-FSharp.Compiler.SyntaxTree+SynValData: SynValInfo get_SynValInfo()
-FSharp.Compiler.SyntaxTree+SynValData: SynValInfo get_valInfo()
-FSharp.Compiler.SyntaxTree+SynValData: SynValInfo valInfo
-FSharp.Compiler.SyntaxTree+SynValData: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynValInfo: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynValInfo: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynValInfo: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynArgInfo]] CurriedArgInfos
-FSharp.Compiler.SyntaxTree+SynValInfo: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynArgInfo]] curriedArgInfos
-FSharp.Compiler.SyntaxTree+SynValInfo: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynArgInfo]] get_CurriedArgInfos()
-FSharp.Compiler.SyntaxTree+SynValInfo: Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynArgInfo]] get_curriedArgInfos()
-FSharp.Compiler.SyntaxTree+SynValInfo: Microsoft.FSharp.Collections.FSharpList`1[System.String] ArgNames
-FSharp.Compiler.SyntaxTree+SynValInfo: Microsoft.FSharp.Collections.FSharpList`1[System.String] get_ArgNames()
-FSharp.Compiler.SyntaxTree+SynValInfo: SynArgInfo get_returnInfo()
-FSharp.Compiler.SyntaxTree+SynValInfo: SynArgInfo returnInfo
-FSharp.Compiler.SyntaxTree+SynValInfo: SynValInfo NewSynValInfo(Microsoft.FSharp.Collections.FSharpList`1[Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynArgInfo]], SynArgInfo)
-FSharp.Compiler.SyntaxTree+SynValInfo: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynValSig: Boolean get_isInline()
-FSharp.Compiler.SyntaxTree+SynValSig: Boolean get_isMutable()
-FSharp.Compiler.SyntaxTree+SynValSig: Boolean isInline
-FSharp.Compiler.SyntaxTree+SynValSig: Boolean isMutable
-FSharp.Compiler.SyntaxTree+SynValSig: Ident get_ident()
-FSharp.Compiler.SyntaxTree+SynValSig: Ident ident
-FSharp.Compiler.SyntaxTree+SynValSig: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynValSig: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynValSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] attributes
-FSharp.Compiler.SyntaxTree+SynValSig: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList] get_attributes()
-FSharp.Compiler.SyntaxTree+SynValSig: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] accessibility
-FSharp.Compiler.SyntaxTree+SynValSig: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess] get_accessibility()
-FSharp.Compiler.SyntaxTree+SynValSig: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr] get_synExpr()
-FSharp.Compiler.SyntaxTree+SynValSig: Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr] synExpr
-FSharp.Compiler.SyntaxTree+SynValSig: PreXmlDoc get_xmlDoc()
-FSharp.Compiler.SyntaxTree+SynValSig: PreXmlDoc xmlDoc
-FSharp.Compiler.SyntaxTree+SynValSig: SynType SynType
-FSharp.Compiler.SyntaxTree+SynValSig: SynType get_SynType()
-FSharp.Compiler.SyntaxTree+SynValSig: SynType get_synType()
-FSharp.Compiler.SyntaxTree+SynValSig: SynType synType
-FSharp.Compiler.SyntaxTree+SynValSig: SynValInfo SynInfo
-FSharp.Compiler.SyntaxTree+SynValSig: SynValInfo arity
-FSharp.Compiler.SyntaxTree+SynValSig: SynValInfo get_SynInfo()
-FSharp.Compiler.SyntaxTree+SynValSig: SynValInfo get_arity()
-FSharp.Compiler.SyntaxTree+SynValSig: SynValSig NewValSpfn(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynAttributeList], Ident, SynValTyparDecls, SynType, SynValInfo, Boolean, Boolean, PreXmlDoc, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynAccess], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.SyntaxTree+SynExpr], range)
-FSharp.Compiler.SyntaxTree+SynValSig: SynValTyparDecls explicitValDecls
-FSharp.Compiler.SyntaxTree+SynValSig: SynValTyparDecls get_explicitValDecls()
-FSharp.Compiler.SyntaxTree+SynValSig: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynValSig: range RangeOfId
-FSharp.Compiler.SyntaxTree+SynValSig: range get_RangeOfId()
-FSharp.Compiler.SyntaxTree+SynValSig: range get_range()
-FSharp.Compiler.SyntaxTree+SynValSig: range range
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Boolean canInfer
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Boolean get_canInfer()
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTyparDecl] get_typars()
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTyparDecl] typars
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint] constraints
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint] get_constraints()
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: SynValTyparDecls NewSynValTyparDecls(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTyparDecl], Boolean, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.SyntaxTree+SynTypeConstraint])
-FSharp.Compiler.SyntaxTree+SynValTyparDecls: System.String ToString()
-FSharp.Compiler.SyntaxTree+TyparStaticReq+Tags: Int32 HeadTypeStaticReq
-FSharp.Compiler.SyntaxTree+TyparStaticReq+Tags: Int32 NoStaticReq
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean Equals(System.Object)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean Equals(TyparStaticReq)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean IsHeadTypeStaticReq
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean IsNoStaticReq
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean get_IsHeadTypeStaticReq()
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Boolean get_IsNoStaticReq()
-FSharp.Compiler.SyntaxTree+TyparStaticReq: FSharp.Compiler.SyntaxTree+TyparStaticReq+Tags
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 CompareTo(System.Object)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 CompareTo(System.Object, System.Collections.IComparer)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 CompareTo(TyparStaticReq)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 GetHashCode()
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 Tag
-FSharp.Compiler.SyntaxTree+TyparStaticReq: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+TyparStaticReq: System.String ToString()
-FSharp.Compiler.SyntaxTree+TyparStaticReq: TyparStaticReq HeadTypeStaticReq
-FSharp.Compiler.SyntaxTree+TyparStaticReq: TyparStaticReq NoStaticReq
-FSharp.Compiler.SyntaxTree+TyparStaticReq: TyparStaticReq get_HeadTypeStaticReq()
-FSharp.Compiler.SyntaxTree+TyparStaticReq: TyparStaticReq get_NoStaticReq()
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointAtFinally
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointAtFor
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointAtSequential
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointAtTry
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointAtWhile
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointAtWith
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointForBinding
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+DebugPointForTarget
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ExprAtomicFlag
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+Ident
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+LongIdentWithDots
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+MemberFlags
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+MemberKind
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedFsiInteraction
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedHashDirective
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedImplFile
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedImplFileFragment
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedImplFileInput
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedInput
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedSigFile
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedSigFileFragment
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParsedSigFileInput
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ParserDetail
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+QualifiedNameOfFile
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+ScopedPragma
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SeqExprOnly
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynAccess
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynArgInfo
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynArgPats
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynAttribute
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynAttributeList
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynBinding
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynBindingKind
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynBindingReturnInfo
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynComponentInfo
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynConst
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynEnumCase
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynExceptionDefn
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynExceptionDefnRepr
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynExceptionSig
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynExpr
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynField
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynIndexerArg
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynInterfaceImpl
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynInterpolatedStringPart
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynMatchClause
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynMeasure
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynMemberDefn
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynMemberSig
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynModuleDecl
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynModuleOrNamespace
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceKind
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynModuleOrNamespaceSig
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynModuleSigDecl
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynOpenDeclTarget
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynPat
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynRationalConst
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynReturnInfo
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynSimplePat
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynSimplePatAlternativeIdInfo
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynSimplePats
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynStaticOptimizationConstraint
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypar
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTyparDecl
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynType
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeConstraint
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeDefn
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeDefnKind
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeDefnRepr
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeDefnSig
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeDefnSigRepr
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynTypeDefnSimpleRepr
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynUnionCase
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynUnionCaseType
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValData
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValInfo
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValSig
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+SynValTyparDecls
-FSharp.Compiler.SyntaxTree: FSharp.Compiler.SyntaxTree+TyparStaticReq
-=======
 FSharp.Compiler.Symbols.FSharpAbstractParameter
 FSharp.Compiler.Symbols.FSharpAbstractParameter: Boolean IsInArg
 FSharp.Compiler.Symbols.FSharpAbstractParameter: Boolean IsOptionalArg
@@ -26177,19 +4371,23 @@ FSharp.Compiler.Symbols.FSharpSymbolPatterns: Microsoft.FSharp.Core.FSharpOption
 FSharp.Compiler.Symbols.FSharpSymbolPatterns: Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`3[FSharp.Compiler.Symbols.FSharpEntity,FSharp.Compiler.Symbols.FSharpEntity,Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Symbols.FSharpType]]] |FSharpEntity|_|(FSharp.Compiler.Symbols.FSharpSymbol)
 FSharp.Compiler.Symbols.FSharpType
 FSharp.Compiler.Symbols.FSharpType: Boolean Equals(System.Object)
+FSharp.Compiler.Symbols.FSharpType: Boolean HasNullAnnotation
 FSharp.Compiler.Symbols.FSharpType: Boolean HasTypeDefinition
 FSharp.Compiler.Symbols.FSharpType: Boolean IsAbbreviation
 FSharp.Compiler.Symbols.FSharpType: Boolean IsAnonRecordType
 FSharp.Compiler.Symbols.FSharpType: Boolean IsFunctionType
 FSharp.Compiler.Symbols.FSharpType: Boolean IsGenericParameter
+FSharp.Compiler.Symbols.FSharpType: Boolean IsNullAmbivalent
 FSharp.Compiler.Symbols.FSharpType: Boolean IsStructTupleType
 FSharp.Compiler.Symbols.FSharpType: Boolean IsTupleType
 FSharp.Compiler.Symbols.FSharpType: Boolean IsUnresolved
+FSharp.Compiler.Symbols.FSharpType: Boolean get_HasNullAnnotation()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_HasTypeDefinition()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsAbbreviation()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsAnonRecordType()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsFunctionType()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsGenericParameter()
+FSharp.Compiler.Symbols.FSharpType: Boolean get_IsNullAmbivalent()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsStructTupleType()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsTupleType()
 FSharp.Compiler.Symbols.FSharpType: Boolean get_IsUnresolved()
@@ -29269,6 +7467,8 @@ FSharp.Compiler.Syntax.SynType+StaticConstantNamed: FSharp.Compiler.Syntax.SynTy
 FSharp.Compiler.Syntax.SynType+StaticConstantNamed: FSharp.Compiler.Syntax.SynType value
 FSharp.Compiler.Syntax.SynType+StaticConstantNamed: FSharp.Compiler.Text.Range get_range()
 FSharp.Compiler.Syntax.SynType+StaticConstantNamed: FSharp.Compiler.Text.Range range
+FSharp.Compiler.Syntax.SynType+StaticConstantNull: FSharp.Compiler.Text.Range get_range()
+FSharp.Compiler.Syntax.SynType+StaticConstantNull: FSharp.Compiler.Text.Range range
 FSharp.Compiler.Syntax.SynType+Tags: Int32 Anon
 FSharp.Compiler.Syntax.SynType+Tags: Int32 AnonRecd
 FSharp.Compiler.Syntax.SynType+Tags: Int32 App
@@ -29283,9 +7483,11 @@ FSharp.Compiler.Syntax.SynType+Tags: Int32 Paren
 FSharp.Compiler.Syntax.SynType+Tags: Int32 StaticConstant
 FSharp.Compiler.Syntax.SynType+Tags: Int32 StaticConstantExpr
 FSharp.Compiler.Syntax.SynType+Tags: Int32 StaticConstantNamed
+FSharp.Compiler.Syntax.SynType+Tags: Int32 StaticConstantNull
 FSharp.Compiler.Syntax.SynType+Tags: Int32 Tuple
 FSharp.Compiler.Syntax.SynType+Tags: Int32 Var
 FSharp.Compiler.Syntax.SynType+Tags: Int32 WithGlobalConstraints
+FSharp.Compiler.Syntax.SynType+Tags: Int32 WithNull
 FSharp.Compiler.Syntax.SynType+Tuple: Boolean get_isStruct()
 FSharp.Compiler.Syntax.SynType+Tuple: Boolean isStruct
 FSharp.Compiler.Syntax.SynType+Tuple: FSharp.Compiler.Text.Range get_range()
@@ -29302,6 +7504,12 @@ FSharp.Compiler.Syntax.SynType+WithGlobalConstraints: FSharp.Compiler.Text.Range
 FSharp.Compiler.Syntax.SynType+WithGlobalConstraints: FSharp.Compiler.Text.Range range
 FSharp.Compiler.Syntax.SynType+WithGlobalConstraints: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Syntax.SynTypeConstraint] constraints
 FSharp.Compiler.Syntax.SynType+WithGlobalConstraints: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Syntax.SynTypeConstraint] get_constraints()
+FSharp.Compiler.Syntax.SynType+WithNull: Boolean ambivalent
+FSharp.Compiler.Syntax.SynType+WithNull: Boolean get_ambivalent()
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Syntax.SynType get_innerType()
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Syntax.SynType innerType
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Text.Range get_range()
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Text.Range range
 FSharp.Compiler.Syntax.SynType: Boolean IsAnon
 FSharp.Compiler.Syntax.SynType: Boolean IsAnonRecd
 FSharp.Compiler.Syntax.SynType: Boolean IsApp
@@ -29316,9 +7524,11 @@ FSharp.Compiler.Syntax.SynType: Boolean IsParen
 FSharp.Compiler.Syntax.SynType: Boolean IsStaticConstant
 FSharp.Compiler.Syntax.SynType: Boolean IsStaticConstantExpr
 FSharp.Compiler.Syntax.SynType: Boolean IsStaticConstantNamed
+FSharp.Compiler.Syntax.SynType: Boolean IsStaticConstantNull
 FSharp.Compiler.Syntax.SynType: Boolean IsTuple
 FSharp.Compiler.Syntax.SynType: Boolean IsVar
 FSharp.Compiler.Syntax.SynType: Boolean IsWithGlobalConstraints
+FSharp.Compiler.Syntax.SynType: Boolean IsWithNull
 FSharp.Compiler.Syntax.SynType: Boolean get_IsAnon()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsAnonRecd()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsApp()
@@ -29333,9 +7543,11 @@ FSharp.Compiler.Syntax.SynType: Boolean get_IsParen()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsStaticConstant()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsStaticConstantExpr()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsStaticConstantNamed()
+FSharp.Compiler.Syntax.SynType: Boolean get_IsStaticConstantNull()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsTuple()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsVar()
 FSharp.Compiler.Syntax.SynType: Boolean get_IsWithGlobalConstraints()
+FSharp.Compiler.Syntax.SynType: Boolean get_IsWithNull()
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewAnon(FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewAnonRecd(Boolean, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[FSharp.Compiler.Syntax.Ident,FSharp.Compiler.Syntax.SynType]], FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewApp(FSharp.Compiler.Syntax.SynType, Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Text.Range], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Syntax.SynType], Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Text.Range], Microsoft.FSharp.Core.FSharpOption`1[FSharp.Compiler.Text.Range], Boolean, FSharp.Compiler.Text.Range)
@@ -29350,9 +7562,11 @@ FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewParen(FSharp.C
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewStaticConstant(FSharp.Compiler.Syntax.SynConst, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewStaticConstantExpr(FSharp.Compiler.Syntax.SynExpr, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewStaticConstantNamed(FSharp.Compiler.Syntax.SynType, FSharp.Compiler.Syntax.SynType, FSharp.Compiler.Text.Range)
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewStaticConstantNull(FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewTuple(Boolean, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.Boolean,FSharp.Compiler.Syntax.SynType]], FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewVar(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewWithGlobalConstraints(FSharp.Compiler.Syntax.SynType, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Syntax.SynTypeConstraint], FSharp.Compiler.Text.Range)
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewWithNull(FSharp.Compiler.Syntax.SynType, Boolean, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+Anon
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+AnonRecd
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+App
@@ -29367,10 +7581,12 @@ FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+Paren
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+StaticConstant
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+StaticConstantExpr
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+StaticConstantNamed
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+StaticConstantNull
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+Tags
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+Tuple
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+Var
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+WithGlobalConstraints
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+WithNull
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Text.Range Range
 FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Text.Range get_Range()
 FSharp.Compiler.Syntax.SynType: Int32 Tag
@@ -29385,6 +7601,7 @@ FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparIsEquatable
 FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparIsReferenceType
 FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparIsUnmanaged
 FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparIsValueType
+FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparNotSupportsNull
 FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparSubtypeOfType
 FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparSupportsMember
 FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparSupportsNull
@@ -29426,6 +7643,10 @@ FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsValueType: FSharp.Compiler.
 FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsValueType: FSharp.Compiler.Syntax.SynTypar typar
 FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsValueType: FSharp.Compiler.Text.Range get_range()
 FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsValueType: FSharp.Compiler.Text.Range range
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Syntax.SynTypar genericName
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Syntax.SynTypar get_genericName()
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Text.Range get_range()
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Text.Range range
 FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparSubtypeOfType: FSharp.Compiler.Syntax.SynTypar get_typar()
 FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparSubtypeOfType: FSharp.Compiler.Syntax.SynTypar typar
 FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparSubtypeOfType: FSharp.Compiler.Syntax.SynType get_typeName()
@@ -29450,6 +7671,7 @@ FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparIsEquatable
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparIsReferenceType
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparIsUnmanaged
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparIsValueType
+FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparNotSupportsNull
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparSubtypeOfType
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparSupportsMember
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparSupportsNull
@@ -29461,6 +7683,7 @@ FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparIsEquatable()
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparIsReferenceType()
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparIsUnmanaged()
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparIsValueType()
+FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparNotSupportsNull()
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparSubtypeOfType()
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparSupportsMember()
 FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparSupportsNull()
@@ -29472,6 +7695,7 @@ FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstrai
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparIsReferenceType(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparIsUnmanaged(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparIsValueType(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
+FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparNotSupportsNull(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparSubtypeOfType(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Syntax.SynType, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparSupportsMember(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.Syntax.SynType], FSharp.Compiler.Syntax.SynMemberSig, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparSupportsNull(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
@@ -29484,6 +7708,7 @@ FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstrai
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsReferenceType
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsUnmanaged
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparIsValueType
+FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparSubtypeOfType
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparSupportsMember
 FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparSupportsNull
@@ -29982,7 +8207,6 @@ FSharp.Compiler.Syntax.XmlDoc: System.String[] UnprocessedLines
 FSharp.Compiler.Syntax.XmlDoc: System.String[] get_UnprocessedLines()
 FSharp.Compiler.Syntax.XmlDoc: Void .ctor(System.String[], FSharp.Compiler.Text.Range)
 FSharp.Compiler.Text.ISourceText
->>>>>>> 341121b19f54fd02ee0d4d3a4f63a75e1bc071f3
 FSharp.Compiler.Text.ISourceText: Boolean ContentEquals(FSharp.Compiler.Text.ISourceText)
 FSharp.Compiler.Text.ISourceText: Boolean SubTextEquals(System.String, Int32)
 FSharp.Compiler.Text.ISourceText: Char Item [Int32]
@@ -30075,690 +8299,6 @@ FSharp.Compiler.Text.RangeModule: System.Tuple`2[System.Tuple`2[System.Int32,Sys
 FSharp.Compiler.Text.RangeModule: Void outputRange(System.IO.TextWriter, FSharp.Compiler.Text.Range)
 FSharp.Compiler.Text.SourceText
 FSharp.Compiler.Text.SourceText: FSharp.Compiler.Text.ISourceText ofString(System.String)
-<<<<<<< HEAD
-FSharp.Compiler.TextLayout.Layout: System.String ToString()
-FSharp.Compiler.TextLayout.LayoutModule: Boolean isEmptyL(FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout aboveL(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout aboveListL(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout braceL(FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout bracketL(FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout commaListL(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout emptyL
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout get_emptyL()
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout leftL(FSharp.Compiler.TextLayout.TaggedText)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout listL[T](Microsoft.FSharp.Core.FSharpFunc`2[T,FSharp.Compiler.TextLayout.Layout], Microsoft.FSharp.Collections.FSharpList`1[T])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout objL(System.Object)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_AtAt(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_AtAtMinus(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_AtAtMinusMinus(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_HatHat(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_MinusMinus(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_MinusMinusMinus(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout op_PlusPlus(FSharp.Compiler.TextLayout.Layout, FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout optionL[T](Microsoft.FSharp.Core.FSharpFunc`2[T,FSharp.Compiler.TextLayout.Layout], Microsoft.FSharp.Core.FSharpOption`1[T])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout rightL(FSharp.Compiler.TextLayout.TaggedText)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout semiListL(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout sepL(FSharp.Compiler.TextLayout.TaggedText)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout sepListL(FSharp.Compiler.TextLayout.Layout, Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout spaceListL(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout squareBracketL(FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout tagAttrL(System.String, Microsoft.FSharp.Collections.FSharpList`1[System.Tuple`2[System.String,System.String]], FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout tupleL(Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout])
-FSharp.Compiler.TextLayout.LayoutModule: FSharp.Compiler.TextLayout.Layout wordL(FSharp.Compiler.TextLayout.TaggedText)
-FSharp.Compiler.TextLayout.LayoutModule: Microsoft.FSharp.Collections.FSharpList`1[FSharp.Compiler.TextLayout.Layout] unfoldL[T,State](Microsoft.FSharp.Core.FSharpFunc`2[T,FSharp.Compiler.TextLayout.Layout], Microsoft.FSharp.Core.FSharpFunc`2[State,Microsoft.FSharp.Core.FSharpOption`1[System.Tuple`2[T,State]]], State, Int32)
-FSharp.Compiler.TextLayout.LayoutRender: Void emitL(Microsoft.FSharp.Core.FSharpFunc`2[FSharp.Compiler.TextLayout.TaggedText,Microsoft.FSharp.Core.Unit], FSharp.Compiler.TextLayout.Layout)
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 ActivePatternCase
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 ActivePatternResult
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Alias
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Class
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Delegate
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Enum
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Event
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Field
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Function
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Interface
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Keyword
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 LineBreak
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Local
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Member
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Method
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Module
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 ModuleBinding
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Namespace
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 NumericLiteral
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Operator
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Parameter
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Property
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Punctuation
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Record
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 RecordField
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Space
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 StringLiteral
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Struct
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Text
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 TypeParameter
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 Union
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 UnionCase
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 UnknownEntity
-FSharp.Compiler.TextLayout.LayoutTag+Tags: Int32 UnknownType
-FSharp.Compiler.TextLayout.LayoutTag: Boolean Equals(FSharp.Compiler.TextLayout.LayoutTag)
-FSharp.Compiler.TextLayout.LayoutTag: Boolean Equals(System.Object)
-FSharp.Compiler.TextLayout.LayoutTag: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsActivePatternCase
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsActivePatternResult
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsAlias
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsClass
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsDelegate
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsEnum
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsEvent
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsField
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsFunction
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsInterface
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsKeyword
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsLineBreak
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsLocal
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsMember
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsMethod
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsModule
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsModuleBinding
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsNamespace
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsNumericLiteral
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsOperator
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsParameter
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsProperty
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsPunctuation
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsRecord
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsRecordField
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsSpace
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsStringLiteral
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsStruct
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsText
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsTypeParameter
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsUnion
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsUnionCase
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsUnknownEntity
-FSharp.Compiler.TextLayout.LayoutTag: Boolean IsUnknownType
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsActivePatternCase()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsActivePatternResult()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsAlias()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsClass()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsDelegate()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsEnum()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsEvent()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsField()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsFunction()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsInterface()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsKeyword()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsLineBreak()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsLocal()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsMember()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsMethod()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsModule()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsModuleBinding()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsNamespace()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsNumericLiteral()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsOperator()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsParameter()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsProperty()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsPunctuation()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsRecord()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsRecordField()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsSpace()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsStringLiteral()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsStruct()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsText()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsTypeParameter()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsUnion()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsUnionCase()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsUnknownEntity()
-FSharp.Compiler.TextLayout.LayoutTag: Boolean get_IsUnknownType()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag ActivePatternCase
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag ActivePatternResult
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Alias
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Class
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Delegate
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Enum
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Event
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Field
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Function
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Interface
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Keyword
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag LineBreak
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Local
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Member
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Method
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Module
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag ModuleBinding
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Namespace
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag NumericLiteral
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Operator
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Parameter
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Property
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Punctuation
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Record
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag RecordField
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Space
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag StringLiteral
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Struct
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Text
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag TypeParameter
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag Union
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag UnionCase
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag UnknownEntity
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag UnknownType
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_ActivePatternCase()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_ActivePatternResult()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Alias()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Class()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Delegate()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Enum()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Event()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Field()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Function()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Interface()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Keyword()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_LineBreak()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Local()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Member()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Method()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Module()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_ModuleBinding()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Namespace()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_NumericLiteral()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Operator()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Parameter()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Property()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Punctuation()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Record()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_RecordField()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Space()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_StringLiteral()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Struct()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Text()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_TypeParameter()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_Union()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_UnionCase()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_UnknownEntity()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag get_UnknownType()
-FSharp.Compiler.TextLayout.LayoutTag: FSharp.Compiler.TextLayout.LayoutTag+Tags
-FSharp.Compiler.TextLayout.LayoutTag: Int32 GetHashCode()
-FSharp.Compiler.TextLayout.LayoutTag: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.TextLayout.LayoutTag: Int32 Tag
-FSharp.Compiler.TextLayout.LayoutTag: Int32 get_Tag()
-FSharp.Compiler.TextLayout.LayoutTag: System.String ToString()
-FSharp.Compiler.TextLayout.NavigableTaggedText: FSharp.Compiler.TextLayout.LayoutTag Tag
-FSharp.Compiler.TextLayout.NavigableTaggedText: FSharp.Compiler.TextLayout.LayoutTag get_Tag()
-FSharp.Compiler.TextLayout.NavigableTaggedText: System.String Text
-FSharp.Compiler.TextLayout.NavigableTaggedText: System.String ToString()
-FSharp.Compiler.TextLayout.NavigableTaggedText: System.String get_Text()
-FSharp.Compiler.TextLayout.NavigableTaggedText: range Range
-FSharp.Compiler.TextLayout.NavigableTaggedText: range get_Range()
-FSharp.Compiler.TextLayout.TaggedText: FSharp.Compiler.TextLayout.LayoutTag Tag
-FSharp.Compiler.TextLayout.TaggedText: FSharp.Compiler.TextLayout.LayoutTag get_Tag()
-FSharp.Compiler.TextLayout.TaggedText: System.String Text
-FSharp.Compiler.TextLayout.TaggedText: System.String ToString()
-FSharp.Compiler.TextLayout.TaggedText: System.String get_Text()
-FSharp.Compiler.TextLayout.TaggedText: Void .ctor(FSharp.Compiler.TextLayout.LayoutTag, System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText arrow
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText bar
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText colon
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText comma
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText dot
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText equals
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_arrow()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_bar()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_colon()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_comma()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_dot()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_equals()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordAbstract()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordDelegate()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordEnd()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordEnum()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordEvent()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordFalse()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordGet()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordInherit()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordInternal()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordMember()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordNested()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordNew()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordOf()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordOverride()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordPrivate()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordSet()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordStatic()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordStruct()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordTrue()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordType()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordTypedefof()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordTypeof()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordVal()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_keywordWith()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftAngle()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftBrace()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftBraceBar()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftBracket()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftBracketAngle()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftBracketBar()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_leftParen()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_lineBreak()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_minus()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_questionMark()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightAngle()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightBrace()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightBraceBar()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightBracket()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightBracketAngle()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightBracketBar()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_rightParen()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_semicolon()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_space()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_star()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText get_structUnit()
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordAbstract
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordDelegate
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordEnd
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordEnum
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordEvent
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordFalse
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordGet
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordInherit
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordInternal
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordMember
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordNested
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordNew
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordOf
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordOverride
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordPrivate
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordSet
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordStatic
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordStruct
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordTrue
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordType
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordTypedefof
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordTypeof
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordVal
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText keywordWith
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftAngle
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftBrace
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftBraceBar
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftBracket
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftBracketAngle
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftBracketBar
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText leftParen
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText lineBreak
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText minus
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText mkTag(FSharp.Compiler.TextLayout.LayoutTag, System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText questionMark
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightAngle
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightBrace
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightBraceBar
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightBracket
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightBracketAngle
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightBracketBar
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText rightParen
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText semicolon
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText space
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText star
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText structUnit
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagActivePatternCase(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagActivePatternResult(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagAlias(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagClass(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagDelegate(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagEnum(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagEvent(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagField(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagFunction(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagInterface(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagKeyword(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagLineBreak(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagLocal(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagMember(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagMethod(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagModule(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagModuleBinding(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagNamespace(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagNumericLiteral(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagOperator(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagParameter(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagProperty(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagPunctuation(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagRecord(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagRecordField(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagSpace(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagStringLiteral(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagStruct(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagText(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagTypeParameter(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagUnion(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagUnionCase(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagUnknownEntity(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: FSharp.Compiler.TextLayout.TaggedText tagUnknownType(System.String)
-FSharp.Compiler.TextLayout.TaggedTextModule: Microsoft.FSharp.Collections.FSharpSet`1[System.String] get_keywordFunctions()
-FSharp.Compiler.TextLayout.TaggedTextModule: Microsoft.FSharp.Collections.FSharpSet`1[System.String] keywordFunctions
-FSharp.Compiler.XmlDoc+PreXmlDoc: Boolean Equals(PreXmlDoc)
-FSharp.Compiler.XmlDoc+PreXmlDoc: Boolean Equals(System.Object)
-FSharp.Compiler.XmlDoc+PreXmlDoc: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-FSharp.Compiler.XmlDoc+PreXmlDoc: Int32 GetHashCode()
-FSharp.Compiler.XmlDoc+PreXmlDoc: Int32 GetHashCode(System.Collections.IEqualityComparer)
-FSharp.Compiler.XmlDoc+PreXmlDoc: PreXmlDoc Create(System.String[], range)
-FSharp.Compiler.XmlDoc+PreXmlDoc: PreXmlDoc Empty
-FSharp.Compiler.XmlDoc+PreXmlDoc: PreXmlDoc Merge(PreXmlDoc, PreXmlDoc)
-FSharp.Compiler.XmlDoc+PreXmlDoc: PreXmlDoc get_Empty()
-FSharp.Compiler.XmlDoc+PreXmlDoc: System.String ToString()
-FSharp.Compiler.XmlDoc+PreXmlDoc: XmlDoc ToXmlDoc(Boolean, Microsoft.FSharp.Core.FSharpOption`1[Microsoft.FSharp.Collections.FSharpList`1[System.String]])
-FSharp.Compiler.XmlDoc+XmlDoc: Boolean IsEmpty
-FSharp.Compiler.XmlDoc+XmlDoc: Boolean NonEmpty
-FSharp.Compiler.XmlDoc+XmlDoc: Boolean get_IsEmpty()
-FSharp.Compiler.XmlDoc+XmlDoc: Boolean get_NonEmpty()
-FSharp.Compiler.XmlDoc+XmlDoc: System.String GetXmlText()
-FSharp.Compiler.XmlDoc+XmlDoc: System.String[] GetElaboratedXmlLines()
-FSharp.Compiler.XmlDoc+XmlDoc: System.String[] UnprocessedLines
-FSharp.Compiler.XmlDoc+XmlDoc: System.String[] get_UnprocessedLines()
-FSharp.Compiler.XmlDoc+XmlDoc: Void .ctor(System.String[], range)
-FSharp.Compiler.XmlDoc+XmlDoc: XmlDoc Empty
-FSharp.Compiler.XmlDoc+XmlDoc: XmlDoc Merge(XmlDoc, XmlDoc)
-FSharp.Compiler.XmlDoc+XmlDoc: XmlDoc get_Empty()
-FSharp.Compiler.XmlDoc+XmlDoc: range Range
-FSharp.Compiler.XmlDoc+XmlDoc: range get_Range()
-FSharp.Compiler.XmlDoc: FSharp.Compiler.XmlDoc+PreXmlDoc
-FSharp.Compiler.XmlDoc: FSharp.Compiler.XmlDoc+XmlDoc
-Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] EndInvoke(System.IAsyncResult)
-Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] Invoke()
-Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
-Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe: Void .ctor(System.Object, IntPtr)
-Microsoft.DotNet.DependencyManager.AssemblyResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe])
-Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IDependencyManagerProvider TryFindDependencyManagerByKey(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
-Microsoft.DotNet.DependencyManager.DependencyProvider: Microsoft.DotNet.DependencyManager.IResolveDependenciesResult Resolve(Microsoft.DotNet.DependencyManager.IDependencyManagerProvider, System.String, System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.String,System.String]], Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String, System.String, System.String, System.String, System.String, Int32)
-Microsoft.DotNet.DependencyManager.DependencyProvider: System.String[] GetRegisteredDependencyManagerHelpText(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)
-Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[System.Int32,System.String] CreatePackageManagerUnknownError(System.Collections.Generic.IEnumerable`1[System.String], System.String, System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport)
-Microsoft.DotNet.DependencyManager.DependencyProvider: System.Tuple`2[System.String,Microsoft.DotNet.DependencyManager.IDependencyManagerProvider] TryFindDependencyManagerInPath(System.Collections.Generic.IEnumerable`1[System.String], System.String, Microsoft.DotNet.DependencyManager.ResolvingErrorReport, System.String)
-Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor()
-Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor(Microsoft.DotNet.DependencyManager.AssemblyResolutionProbe, Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
-Microsoft.DotNet.DependencyManager.DependencyProvider: Void .ctor(Microsoft.DotNet.DependencyManager.NativeResolutionProbe)
-Microsoft.DotNet.DependencyManager.ErrorReportType+Tags: Int32 Error
-Microsoft.DotNet.DependencyManager.ErrorReportType+Tags: Int32 Warning
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean Equals(Microsoft.DotNet.DependencyManager.ErrorReportType)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean Equals(System.Object)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean Equals(System.Object, System.Collections.IEqualityComparer)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean IsError
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean IsWarning
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean get_IsError()
-Microsoft.DotNet.DependencyManager.ErrorReportType: Boolean get_IsWarning()
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 CompareTo(Microsoft.DotNet.DependencyManager.ErrorReportType)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 CompareTo(System.Object)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 CompareTo(System.Object, System.Collections.IComparer)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 GetHashCode()
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 GetHashCode(System.Collections.IEqualityComparer)
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 Tag
-Microsoft.DotNet.DependencyManager.ErrorReportType: Int32 get_Tag()
-Microsoft.DotNet.DependencyManager.ErrorReportType: Microsoft.DotNet.DependencyManager.ErrorReportType Error
-Microsoft.DotNet.DependencyManager.ErrorReportType: Microsoft.DotNet.DependencyManager.ErrorReportType Warning
-Microsoft.DotNet.DependencyManager.ErrorReportType: Microsoft.DotNet.DependencyManager.ErrorReportType get_Error()
-Microsoft.DotNet.DependencyManager.ErrorReportType: Microsoft.DotNet.DependencyManager.ErrorReportType get_Warning()
-Microsoft.DotNet.DependencyManager.ErrorReportType: Microsoft.DotNet.DependencyManager.ErrorReportType+Tags
-Microsoft.DotNet.DependencyManager.ErrorReportType: System.String ToString()
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: Microsoft.DotNet.DependencyManager.IResolveDependenciesResult ResolveDependencies(System.String, System.String, System.String, System.String, System.Collections.Generic.IEnumerable`1[System.Tuple`2[System.String,System.String]], System.String, System.String, Int32)
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: System.String Key
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: System.String Name
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: System.String get_Key()
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: System.String get_Name()
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: System.String[] HelpMessages
-Microsoft.DotNet.DependencyManager.IDependencyManagerProvider: System.String[] get_HelpMessages()
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: Boolean Success
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: Boolean get_Success()
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.Collections.Generic.IEnumerable`1[System.String] Resolutions
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.Collections.Generic.IEnumerable`1[System.String] Roots
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.Collections.Generic.IEnumerable`1[System.String] SourceFiles
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.Collections.Generic.IEnumerable`1[System.String] get_Resolutions()
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.Collections.Generic.IEnumerable`1[System.String] get_Roots()
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.Collections.Generic.IEnumerable`1[System.String] get_SourceFiles()
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] StdError
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] StdOut
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] get_StdError()
-Microsoft.DotNet.DependencyManager.IResolveDependenciesResult: System.String[] get_StdOut()
-Microsoft.DotNet.DependencyManager.NativeDllResolveHandler: Void .ctor(Microsoft.FSharp.Core.FSharpOption`1[Microsoft.DotNet.DependencyManager.NativeResolutionProbe])
-Microsoft.DotNet.DependencyManager.NativeResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] EndInvoke(System.IAsyncResult)
-Microsoft.DotNet.DependencyManager.NativeResolutionProbe: System.Collections.Generic.IEnumerable`1[System.String] Invoke()
-Microsoft.DotNet.DependencyManager.NativeResolutionProbe: System.IAsyncResult BeginInvoke(System.AsyncCallback, System.Object)
-Microsoft.DotNet.DependencyManager.NativeResolutionProbe: Void .ctor(System.Object, IntPtr)
-Microsoft.DotNet.DependencyManager.ResolvingErrorReport: System.IAsyncResult BeginInvoke(Microsoft.DotNet.DependencyManager.ErrorReportType, Int32, System.String, System.AsyncCallback, System.Object)
-Microsoft.DotNet.DependencyManager.ResolvingErrorReport: Void .ctor(System.Object, IntPtr)
-Microsoft.DotNet.DependencyManager.ResolvingErrorReport: Void EndInvoke(System.IAsyncResult)
-Microsoft.DotNet.DependencyManager.ResolvingErrorReport: Void Invoke(Microsoft.DotNet.DependencyManager.ErrorReportType, Int32, System.String)
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+Anon: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+AnonRecd: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+App: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+Array: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+Fun: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+HashConstraint: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+LongIdent: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+LongIdentApp: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+MeasureDivide: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+MeasurePower: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+Paren: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstant: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantExpr: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNamed: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range Range
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull: range range
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 StaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Tags: Int32 WithNull
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+Tuple: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+Var: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+WithGlobalConstraints: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsAnon
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsAnonRecd
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsApp
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsArray
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsFun
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsHashConstraint
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsLongIdent
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsLongIdentApp
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsMeasureDivide
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsMeasurePower
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsParen
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstant
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantExpr
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantNamed
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsTuple
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsVar
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsWithGlobalConstraints
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean ambivalent
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsAnon()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsAnonRecd()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsApp()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsArray()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsFun()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsHashConstraint()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsLongIdent()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsLongIdentApp()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsMeasureDivide()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsMeasurePower()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsParen()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstant()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantExpr()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantNamed()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsTuple()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsVar()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsWithGlobalConstraints()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Boolean get_ambivalent()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynType+WithNull: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: SynType get_innerType()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: SynType innerType
-FSharp.Compiler.SyntaxTree+SynType+WithNull: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: range Range
-FSharp.Compiler.SyntaxTree+SynType+WithNull: range get_Range()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: range get_range()
-FSharp.Compiler.SyntaxTree+SynType+WithNull: range range
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsStaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType: Boolean IsWithNull
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsStaticConstantNull()
-FSharp.Compiler.SyntaxTree+SynType: Boolean get_IsWithNull()
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+StaticConstantNull
-FSharp.Compiler.SyntaxTree+SynType: FSharp.Compiler.SyntaxTree+SynType+WithNull
-FSharp.Compiler.SyntaxTree+SynType: SynType NewStaticConstantNull(range)
-FSharp.Compiler.SyntaxTree+SynType: SynType NewWithNull(SynType, Boolean, range)
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+Tags: Int32 WhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparDefaultsToType: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsComparable: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsDelegate: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEnum: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsEquatable: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsReferenceType: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsUnmanaged: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparIsValueType: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparDefaultsToType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsComparable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsDelegate
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsEnum
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsEquatable
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsReferenceType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsUnmanaged
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparIsValueType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSubtypeOfType
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSupportsMember
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean IsWhereTyparSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparDefaultsToType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsComparable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsDelegate()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsEnum()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsEquatable()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsReferenceType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsUnmanaged()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparIsValueType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSubtypeOfType()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSupportsMember()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Boolean get_IsWhereTyparSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Int32 Tag
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: Int32 get_Tag()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: SynTypar genericName
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: SynTypar get_genericName()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: System.String ToString()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: range get_range()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull: range range
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSubtypeOfType: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsMember: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparSupportsNull: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean IsWhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: Boolean get_IsWhereTyparNotSupportsNull()
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: FSharp.Compiler.SyntaxTree+SynTypeConstraint+WhereTyparNotSupportsNull
-FSharp.Compiler.SyntaxTree+SynTypeConstraint: SynTypeConstraint NewWhereTyparNotSupportsNull(SynTypar, range)"
-=======
 FSharp.Compiler.Text.TaggedText
 FSharp.Compiler.Text.TaggedText: FSharp.Compiler.Text.TextTag Tag
 FSharp.Compiler.Text.TaggedText: FSharp.Compiler.Text.TextTag get_Tag()
@@ -32189,5 +9729,4 @@ FSharp.Compiler.Tokenization.FSharpTokenizerLexState: Int64 get_OtherBits()
 FSharp.Compiler.Tokenization.FSharpTokenizerLexState: Int64 get_PosBits()
 FSharp.Compiler.Tokenization.FSharpTokenizerLexState: System.String ToString()
 FSharp.Compiler.Tokenization.FSharpTokenizerLexState: Void .ctor(Int64, Int64)"
->>>>>>> 341121b19f54fd02ee0d4d3a4f63a75e1bc071f3
         SurfaceArea.verify expected "netstandard" (System.IO.Path.Combine(__SOURCE_DIRECTORY__,__SOURCE_FILE__))
\ No newline at end of file
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
index 40f6d462276..c995f21c445 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
@@ -65,7 +65,7 @@ type internal FSharpNavigableSymbolSource(checkerProvider: FSharpCheckerProvider
 
                             match result with
                             | FSharpGoToDefinitionResult.NavigableItem(navItem) ->
-                                return FSharpNavigableSymbol(navigableItem, symbolSpan, gtd, statusBar) :> INavigableSymbol?
+                                return FSharpNavigableSymbol(navItem, symbolSpan, gtd, statusBar) :> INavigableSymbol?
                             | _ ->
                                 return null
                         else 

From 001ae14b34a1975f7c5b46cf1cba940f9b4aef63 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 4 Feb 2021 18:19:22 +0000
Subject: [PATCH 047/112] fix bootstrap build

---
 src/fsharp/AccessibilityLogic.fs                               | 1 +
 src/fsharp/ErrorLogger.fs                                      | 1 +
 .../FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj     | 3 +--
 src/fsharp/FxResolver.fs                                       | 1 +
 4 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index 6231b14b675..f4d69c07909 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -3,6 +3,7 @@
 /// The basic logic of private/internal/protected/InternalsVisibleTo/public accessibility
 module internal FSharp.Compiler.AccessibilityLogic
 
+open Internal.Utilities.Library
 open FSharp.Compiler 
 open FSharp.Compiler.AbstractIL.IL 
 open FSharp.Compiler.ErrorLogger
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index 417da4f73e3..c13d181f662 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -2,6 +2,7 @@
 
 module FSharp.Compiler.ErrorLogger
 
+open Internal.Utilities.Library
 open FSharp.Compiler.Features
 open FSharp.Compiler.Text.Range
 open FSharp.Compiler.Text
diff --git a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
index 6a8e419a420..e27c0ffce3c 100644
--- a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
+++ b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
@@ -12,11 +12,10 @@
     $(DefineConstants);ENABLE_MONO_SUPPORT
     $(OtherFlags) /warnon:3218 /warnon:1182 /warnon:3390 --times
     $(OtherFlags) --checknulls --langversion:preview
-    $(OtherFlags) /warnon:3218 /warnon:1182 /warnon:3390 --times
     true
     
     true
-    $(OtherFlags) /warnon:3218 /warnon:1182 /warnon:3390 --maxerrors:20 --extraoptimizationloops:1 --times
+    $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1 --times
     true 
     $(IntermediateOutputPath)$(TargetFramework)\
     $(IntermediateOutputPath)$(TargetFramework)\
diff --git a/src/fsharp/FxResolver.fs b/src/fsharp/FxResolver.fs
index a8eccd145fc..7e6108e9630 100644
--- a/src/fsharp/FxResolver.fs
+++ b/src/fsharp/FxResolver.fs
@@ -12,6 +12,7 @@ open System.IO
 open System.Reflection
 open System.Runtime.InteropServices
 open Internal.Utilities.FSharpEnvironment
+open Internal.Utilities.Library
 open FSharp.Compiler.AbstractIL.ILBinaryReader
 open FSharp.Compiler.ErrorLogger
 open FSharp.Compiler.Text

From 4a5305a2844c1d22faa5ec8962d45f68c1a49054 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 24 May 2021 19:18:40 +0100
Subject: [PATCH 048/112] disable failing test

---
 tests/service/ExprTests.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/service/ExprTests.fs b/tests/service/ExprTests.fs
index c23146ea1ac..e8bc419025f 100644
--- a/tests/service/ExprTests.fs
+++ b/tests/service/ExprTests.fs
@@ -3544,7 +3544,7 @@ let isNullQuoted (ts : 't[]) =
 
     let createOptions() = createOptionsAux [fileSource1] ["--langversion:preview"]
 
-[]
+[]
 let ``Test ProjectForWitnesses4 GetWitnessPassingInfo`` () =
     let cleanup, options = ProjectForWitnesses4.createOptions()
     use _holder = cleanup

From fddc444bf12798def49e66d5fd929d823d0b6e43 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Jun 2021 21:57:52 +0100
Subject: [PATCH 049/112] update baselines

---
 .../EmittedIL/Misc/CodeGenRenamings01.il.bsl  |  121 +-
 .../ToplevelModule.il.bsl                     | 1669 +++++++++++
 .../ToplevelNamespace.il.bsl                  | 2431 +++++++++++++++++
 .../SteppingMatch/SteppingMatch01.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch02.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch03.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch04.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch05.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch06.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch07.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch08.il.bsl      |    4 +-
 .../SteppingMatch/SteppingMatch09.il.bsl      |    8 +-
 .../TestFunctions/TestFunction13.il.bsl       |   10 +-
 .../TestFunctions/TestFunction16.il.bsl       |   10 +-
 .../TestFunctions/TestFunction17.il.bsl       |   10 +-
 .../TestFunctions/TestFunction21.il.bsl       |   10 +-
 .../TestFunctions/TestFunction23.il.bsl       |    8 +-
 .../TestFunctions/TestFunction24.il.bsl       |   10 +-
 .../TestFunctions/TestFunction9b4.il.bsl      |   10 +-
 .../TestFunctions/Testfunction18.il.bsl       |   10 +-
 .../Inlining/StructUnion01.il.bsl             |   10 +-
 21 files changed, 4271 insertions(+), 120 deletions(-)

diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
index 8deee6335b2..c3d52c59f16 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000003D0 Length: 0x0000011B
 }
 .module CodeGenRenamings01.exe
-// MVID: {60B8D5B8-8173-986B-A745-0383B8D5B860}
+// MVID: {60BF835E-8173-986B-A745-03835E83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x058A0000
+// Image base: 0x06920000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -422,7 +422,7 @@
   .method public static void  main@() cil managed
   {
     .entrypoint
-    // Code size       579 (0x243)
+    // Code size       567 (0x237)
     .maxstack  12
     .locals init ([0] class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 alist,
              [1] int32[] 'array',
@@ -437,13 +437,10 @@
              [10] int32[] a2,
              [11] class [mscorlib]System.Tuple`4 V_11,
              [12] class [mscorlib]System.Tuple`4 V_12,
-             [13] class [mscorlib]System.Tuple`4 V_13,
+             [13] class [mscorlib]System.Tuple`3 V_13,
              [14] class [mscorlib]System.Tuple`3 V_14,
-             [15] class [mscorlib]System.Tuple`3 V_15,
-             [16] class [mscorlib]System.Tuple`3 V_16,
-             [17] class [mscorlib]System.Tuple`4 V_17,
-             [18] class [mscorlib]System.Tuple`4 V_18,
-             [19] class [mscorlib]System.Tuple`4 V_19)
+             [15] class [mscorlib]System.Tuple`4 V_15,
+             [16] class [mscorlib]System.Tuple`4 V_16)
     .line 5,5 : 1,24 ''
     IL_0000:  ldc.i4.1
     IL_0001:  ldc.i4.1
@@ -624,99 +621,93 @@
     IL_0183:  stloc.s    V_11
     IL_0185:  ldloc.s    V_11
     IL_0187:  stloc.s    V_12
-    IL_0189:  ldloc.s    V_12
-    IL_018b:  stloc.s    V_13
     .line 31,31 : 1,41 ''
-    IL_018d:  call       int32[0...,0...] CodeGenRenamings01::get_a3()
-    IL_0192:  ldc.i4.0
-    IL_0193:  ldc.i4.0
-    IL_0194:  call       int32[0...,0...] CodeGenRenamings01::get_a3()
-    IL_0199:  ldc.i4.0
-    IL_019a:  ldc.i4.0
-    IL_019b:  call       !!0 [FSharp.Core]Microsoft.FSharp.Collections.Array2DModule::Get(!!0[0...,0...],
+    IL_0189:  call       int32[0...,0...] CodeGenRenamings01::get_a3()
+    IL_018e:  ldc.i4.0
+    IL_018f:  ldc.i4.0
+    IL_0190:  call       int32[0...,0...] CodeGenRenamings01::get_a3()
+    IL_0195:  ldc.i4.0
+    IL_0196:  ldc.i4.0
+    IL_0197:  call       !!0 [FSharp.Core]Microsoft.FSharp.Collections.Array2DModule::Get(!!0[0...,0...],
                                                                                                  int32,
                                                                                                  int32)
-    IL_01a0:  call       void [FSharp.Core]Microsoft.FSharp.Collections.Array2DModule::Set(!!0[0...,0...],
+    IL_019c:  call       void [FSharp.Core]Microsoft.FSharp.Collections.Array2DModule::Set(!!0[0...,0...],
                                                                                                   int32,
                                                                                                   int32,
                                                                                                   !!0)
-    IL_01a5:  nop
+    IL_01a1:  nop
     .line 34,34 : 1,86 ''
-    IL_01a6:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
-    IL_01ab:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Length1(!!0[0...,0...,0...])
-    IL_01b0:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
-    IL_01b5:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Length2(!!0[0...,0...,0...])
-    IL_01ba:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
-    IL_01bf:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Length3(!!0[0...,0...,0...])
-    IL_01c4:  newobj     instance void class [mscorlib]System.Tuple`3::.ctor(!0,
+    IL_01a2:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
+    IL_01a7:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Length1(!!0[0...,0...,0...])
+    IL_01ac:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
+    IL_01b1:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Length2(!!0[0...,0...,0...])
+    IL_01b6:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
+    IL_01bb:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Length3(!!0[0...,0...,0...])
+    IL_01c0:  newobj     instance void class [mscorlib]System.Tuple`3::.ctor(!0,
                                                                                                 !1,
                                                                                                 !2)
+    IL_01c5:  stloc.s    V_13
+    IL_01c7:  ldloc.s    V_13
     IL_01c9:  stloc.s    V_14
-    IL_01cb:  ldloc.s    V_14
-    IL_01cd:  stloc.s    V_15
-    IL_01cf:  ldloc.s    V_15
-    IL_01d1:  stloc.s    V_16
     .line 35,35 : 1,55 ''
+    IL_01cb:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
+    IL_01d0:  ldc.i4.0
+    IL_01d1:  ldc.i4.0
+    IL_01d2:  ldc.i4.0
     IL_01d3:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
     IL_01d8:  ldc.i4.0
     IL_01d9:  ldc.i4.0
     IL_01da:  ldc.i4.0
-    IL_01db:  call       int32[0...,0...,0...] CodeGenRenamings01::get_array3D()
-    IL_01e0:  ldc.i4.0
-    IL_01e1:  ldc.i4.0
-    IL_01e2:  ldc.i4.0
-    IL_01e3:  call       !!0 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Get(!!0[0...,0...,0...],
+    IL_01db:  call       !!0 [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Get(!!0[0...,0...,0...],
                                                                                                  int32,
                                                                                                  int32,
                                                                                                  int32)
-    IL_01e8:  call       void [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Set(!!0[0...,0...,0...],
+    IL_01e0:  call       void [FSharp.Core]Microsoft.FSharp.Collections.Array3DModule::Set(!!0[0...,0...,0...],
                                                                                                   int32,
                                                                                                   int32,
                                                                                                   int32,
                                                                                                   !!0)
-    IL_01ed:  nop
+    IL_01e5:  nop
     .line 38,38 : 1,111 ''
-    IL_01ee:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
-    IL_01f3:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length1(!!0[0...,0...,0...,0...])
-    IL_01f8:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
-    IL_01fd:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length2(!!0[0...,0...,0...,0...])
-    IL_0202:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
-    IL_0207:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length3(!!0[0...,0...,0...,0...])
-    IL_020c:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
-    IL_0211:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length4(!!0[0...,0...,0...,0...])
-    IL_0216:  newobj     instance void class [mscorlib]System.Tuple`4::.ctor(!0,
+    IL_01e6:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_01eb:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length1(!!0[0...,0...,0...,0...])
+    IL_01f0:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_01f5:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length2(!!0[0...,0...,0...,0...])
+    IL_01fa:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_01ff:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length3(!!0[0...,0...,0...,0...])
+    IL_0204:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_0209:  call       int32 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Length4(!!0[0...,0...,0...,0...])
+    IL_020e:  newobj     instance void class [mscorlib]System.Tuple`4::.ctor(!0,
                                                                                                       !1,
                                                                                                       !2,
                                                                                                       !3)
-    IL_021b:  stloc.s    V_17
-    IL_021d:  ldloc.s    V_17
-    IL_021f:  stloc.s    V_18
-    IL_0221:  ldloc.s    V_18
-    IL_0223:  stloc.s    V_19
+    IL_0213:  stloc.s    V_15
+    IL_0215:  ldloc.s    V_15
+    IL_0217:  stloc.s    V_16
     .line 39,39 : 1,59 ''
-    IL_0225:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_0219:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_021e:  ldc.i4.0
+    IL_021f:  ldc.i4.0
+    IL_0220:  ldc.i4.0
+    IL_0221:  ldc.i4.0
+    IL_0222:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
+    IL_0227:  ldc.i4.0
+    IL_0228:  ldc.i4.0
+    IL_0229:  ldc.i4.0
     IL_022a:  ldc.i4.0
-    IL_022b:  ldc.i4.0
-    IL_022c:  ldc.i4.0
-    IL_022d:  ldc.i4.0
-    IL_022e:  call       int32[0...,0...,0...,0...] CodeGenRenamings01::get_array4D()
-    IL_0233:  ldc.i4.0
-    IL_0234:  ldc.i4.0
-    IL_0235:  ldc.i4.0
-    IL_0236:  ldc.i4.0
-    IL_0237:  call       !!0 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Get(!!0[0...,0...,0...,0...],
+    IL_022b:  call       !!0 [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Get(!!0[0...,0...,0...,0...],
                                                                                                  int32,
                                                                                                  int32,
                                                                                                  int32,
                                                                                                  int32)
-    IL_023c:  call       void [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Set(!!0[0...,0...,0...,0...],
+    IL_0230:  call       void [FSharp.Core]Microsoft.FSharp.Collections.Array4DModule::Set(!!0[0...,0...,0...,0...],
                                                                                                   int32,
                                                                                                   int32,
                                                                                                   int32,
                                                                                                   int32,
                                                                                                   !!0)
-    IL_0241:  nop
-    IL_0242:  ret
+    IL_0235:  nop
+    IL_0236:  ret
   } // end of method $CodeGenRenamings01::main@
 
 } // end of class ''.$CodeGenRenamings01
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
index 8f7043eeff2..d5c4f162088 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
@@ -2,3 +2,1672 @@
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
+
+
+// Metadata version: v4.0.30319
+.assembly extern mscorlib
+{
+  .publickeytoken = (B7 7A 5C 56 19 34 E0 89 )                         // .z\V.4..
+  .ver 4:0:0:0
+}
+.assembly extern FSharp.Core
+{
+  .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
+  .ver 5:0:0:0
+}
+.assembly TopLevelModule
+{
+  .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 ) 
+
+  // --- The following custom attribute is added automatically, do not uncomment -------
+  //  .custom instance void [mscorlib]System.Diagnostics.DebuggableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggableAttribute/DebuggingModes) = ( 01 00 01 01 00 00 00 00 ) 
+
+  .hash algorithm 0x00008004
+  .ver 0:0:0:0
+}
+.mresource public FSharpSignatureData.TopLevelModule
+{
+  // Offset: 0x00000000 Length: 0x0000113D
+}
+.mresource public FSharpOptimizationData.TopLevelModule
+{
+  // Offset: 0x00001148 Length: 0x000003FD
+}
+.module TopLevelModule.dll
+// MVID: {60BE3D8A-37F5-C118-A745-03838A3DBE60}
+.imagebase 0x00400000
+.file alignment 0x00000200
+.stackreserve 0x00100000
+.subsystem 0x0003       // WINDOWS_CUI
+.corflags 0x00000001    //  ILONLY
+// Image base: 0x07250000
+
+
+// =============== CLASS MEMBERS DECLARATION ===================
+
+.class public abstract auto ansi sealed ABC
+       extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
+         extends [mscorlib]System.Object
+         implements class [mscorlib]System.IEquatable`1,
+                    [mscorlib]System.Collections.IStructuralEquatable,
+                    class [mscorlib]System.IComparable`1,
+                    [mscorlib]System.IComparable,
+                    [mscorlib]System.Collections.IStructuralComparable
+  {
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
+                                                                                                   61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
+    .field assembly initonly int32 item
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    .method public static class ABC/Expr 
+            NewNum(int32 item) cil managed
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                  int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  newobj     instance void ABC/Expr::.ctor(int32)
+      IL_0006:  ret
+    } // end of method Expr::NewNum
+
+    .method assembly specialname rtspecialname 
+            instance void  .ctor(int32 item) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       14 (0xe)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
+      IL_0006:  ldarg.0
+      IL_0007:  ldarg.1
+      IL_0008:  stfld      int32 ABC/Expr::item
+      IL_000d:  ret
+    } // end of method Expr::.ctor
+
+    .method public hidebysig instance int32 
+            get_Item() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  ldfld      int32 ABC/Expr::item
+      IL_0006:  ret
+    } // end of method Expr::get_Item
+
+    .method public hidebysig instance int32 
+            get_Tag() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       4 (0x4)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  pop
+      IL_0002:  ldc.i4.0
+      IL_0003:  ret
+    } // end of method Expr::get_Tag
+
+    .method assembly hidebysig specialname 
+            instance object  __DebugDisplay() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       22 (0x16)
+      .maxstack  8
+      IL_0000:  ldstr      "%+0.8A"
+      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
+      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+      IL_000f:  ldarg.0
+      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+      IL_0015:  ret
+    } // end of method Expr::__DebugDisplay
+
+    .method public strict virtual instance string 
+            ToString() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       22 (0x16)
+      .maxstack  8
+      IL_0000:  ldstr      "%+A"
+      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class ABC/Expr>::.ctor(string)
+      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+      IL_000f:  ldarg.0
+      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+      IL_0015:  ret
+    } // end of method Expr::ToString
+
+    .method public hidebysig virtual final 
+            instance int32  CompareTo(class ABC/Expr obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       64 (0x40)
+      .maxstack  4
+      .locals init ([0] class ABC/Expr V_0,
+               [1] class ABC/Expr V_1,
+               [2] class [mscorlib]System.Collections.IComparer V_2,
+               [3] int32 V_3,
+               [4] int32 V_4)
+      .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SerializableAttribute\\ToplevelModule.fs'
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0036
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  ldnull
+      IL_0008:  cgt.un
+      IL_000a:  brfalse.s  IL_0034
+
+      .line 100001,100001 : 0,0 ''
+      IL_000c:  ldarg.0
+      IL_000d:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_000e:  ldarg.0
+      IL_000f:  stloc.0
+      IL_0010:  ldarg.1
+      IL_0011:  stloc.1
+      IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
+      IL_0017:  stloc.2
+      IL_0018:  ldloc.0
+      IL_0019:  ldfld      int32 ABC/Expr::item
+      IL_001e:  stloc.3
+      IL_001f:  ldloc.1
+      IL_0020:  ldfld      int32 ABC/Expr::item
+      IL_0025:  stloc.s    V_4
+      IL_0027:  ldloc.3
+      IL_0028:  ldloc.s    V_4
+      IL_002a:  bge.s      IL_002e
+
+      .line 100001,100001 : 0,0 ''
+      IL_002c:  ldc.i4.m1
+      IL_002d:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002e:  ldloc.3
+      IL_002f:  ldloc.s    V_4
+      IL_0031:  cgt
+      IL_0033:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0034:  ldc.i4.1
+      IL_0035:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0036:  ldarg.1
+      IL_0037:  ldnull
+      IL_0038:  cgt.un
+      IL_003a:  brfalse.s  IL_003e
+
+      .line 100001,100001 : 0,0 ''
+      IL_003c:  ldc.i4.m1
+      IL_003d:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_003e:  ldc.i4.0
+      IL_003f:  ret
+    } // end of method Expr::CompareTo
+
+    .method public hidebysig virtual final 
+            instance int32  CompareTo(object obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       13 (0xd)
+      .maxstack  8
+      .line 6,6 : 14,18 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldarg.1
+      IL_0002:  unbox.any  ABC/Expr
+      IL_0007:  callvirt   instance int32 ABC/Expr::CompareTo(class ABC/Expr)
+      IL_000c:  ret
+    } // end of method Expr::CompareTo
+
+    .method public hidebysig virtual final 
+            instance int32  CompareTo(object obj,
+                                      class [mscorlib]System.Collections.IComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       80 (0x50)
+      .maxstack  4
+      .locals init ([0] class ABC/Expr V_0,
+               [1] class ABC/Expr V_1,
+               [2] class ABC/Expr V_2,
+               [3] class [mscorlib]System.Collections.IComparer V_3,
+               [4] int32 V_4,
+               [5] int32 V_5)
+      .line 6,6 : 14,18 ''
+      IL_0000:  ldarg.1
+      IL_0001:  unbox.any  ABC/Expr
+      IL_0006:  stloc.0
+      IL_0007:  ldarg.0
+      IL_0008:  ldnull
+      IL_0009:  cgt.un
+      IL_000b:  brfalse.s  IL_0041
+
+      .line 100001,100001 : 0,0 ''
+      IL_000d:  ldarg.1
+      IL_000e:  unbox.any  ABC/Expr
+      IL_0013:  ldnull
+      IL_0014:  cgt.un
+      IL_0016:  brfalse.s  IL_003f
+
+      .line 100001,100001 : 0,0 ''
+      IL_0018:  ldarg.0
+      IL_0019:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_001a:  ldarg.0
+      IL_001b:  stloc.1
+      IL_001c:  ldloc.0
+      IL_001d:  stloc.2
+      IL_001e:  ldarg.2
+      IL_001f:  stloc.3
+      IL_0020:  ldloc.1
+      IL_0021:  ldfld      int32 ABC/Expr::item
+      IL_0026:  stloc.s    V_4
+      IL_0028:  ldloc.2
+      IL_0029:  ldfld      int32 ABC/Expr::item
+      IL_002e:  stloc.s    V_5
+      IL_0030:  ldloc.s    V_4
+      IL_0032:  ldloc.s    V_5
+      IL_0034:  bge.s      IL_0038
+
+      .line 100001,100001 : 0,0 ''
+      IL_0036:  ldc.i4.m1
+      IL_0037:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0038:  ldloc.s    V_4
+      IL_003a:  ldloc.s    V_5
+      IL_003c:  cgt
+      IL_003e:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_003f:  ldc.i4.1
+      IL_0040:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0041:  ldarg.1
+      IL_0042:  unbox.any  ABC/Expr
+      IL_0047:  ldnull
+      IL_0048:  cgt.un
+      IL_004a:  brfalse.s  IL_004e
+
+      .line 100001,100001 : 0,0 ''
+      IL_004c:  ldc.i4.m1
+      IL_004d:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_004e:  ldc.i4.0
+      IL_004f:  ret
+    } // end of method Expr::CompareTo
+
+    .method public hidebysig virtual final 
+            instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       41 (0x29)
+      .maxstack  7
+      .locals init ([0] int32 V_0,
+               [1] class ABC/Expr V_1,
+               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0027
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldc.i4.0
+      IL_0007:  stloc.0
+      IL_0008:  ldarg.0
+      IL_0009:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_000a:  ldarg.0
+      IL_000b:  stloc.1
+      IL_000c:  ldc.i4.0
+      IL_000d:  stloc.0
+      IL_000e:  ldc.i4     0x9e3779b9
+      IL_0013:  ldarg.1
+      IL_0014:  stloc.2
+      IL_0015:  ldloc.1
+      IL_0016:  ldfld      int32 ABC/Expr::item
+      IL_001b:  ldloc.0
+      IL_001c:  ldc.i4.6
+      IL_001d:  shl
+      IL_001e:  ldloc.0
+      IL_001f:  ldc.i4.2
+      IL_0020:  shr
+      IL_0021:  add
+      IL_0022:  add
+      IL_0023:  add
+      IL_0024:  stloc.0
+      IL_0025:  ldloc.0
+      IL_0026:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0027:  ldc.i4.0
+      IL_0028:  ret
+    } // end of method Expr::GetHashCode
+
+    .method public hidebysig virtual final 
+            instance int32  GetHashCode() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       12 (0xc)
+      .maxstack  8
+      .line 6,6 : 14,18 ''
+      IL_0000:  ldarg.0
+      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+      IL_0006:  callvirt   instance int32 ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+      IL_000b:  ret
+    } // end of method Expr::GetHashCode
+
+    .method public hidebysig virtual final 
+            instance bool  Equals(object obj,
+                                  class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       52 (0x34)
+      .maxstack  4
+      .locals init ([0] class ABC/Expr V_0,
+               [1] class ABC/Expr V_1,
+               [2] class ABC/Expr V_2,
+               [3] class ABC/Expr V_3,
+               [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_002c
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  isinst     ABC/Expr
+      IL_000c:  stloc.0
+      IL_000d:  ldloc.0
+      IL_000e:  brfalse.s  IL_002a
+
+      .line 100001,100001 : 0,0 ''
+      IL_0010:  ldloc.0
+      IL_0011:  stloc.1
+      IL_0012:  ldarg.0
+      IL_0013:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_0014:  ldarg.0
+      IL_0015:  stloc.2
+      IL_0016:  ldloc.1
+      IL_0017:  stloc.3
+      IL_0018:  ldarg.2
+      IL_0019:  stloc.s    V_4
+      IL_001b:  ldloc.2
+      IL_001c:  ldfld      int32 ABC/Expr::item
+      IL_0021:  ldloc.3
+      IL_0022:  ldfld      int32 ABC/Expr::item
+      IL_0027:  ceq
+      IL_0029:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002a:  ldc.i4.0
+      IL_002b:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002c:  ldarg.1
+      IL_002d:  ldnull
+      IL_002e:  cgt.un
+      IL_0030:  ldc.i4.0
+      IL_0031:  ceq
+      IL_0033:  ret
+    } // end of method Expr::Equals
+
+    .method public hidebysig virtual final 
+            instance bool  Equals(class ABC/Expr obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       43 (0x2b)
+      .maxstack  4
+      .locals init ([0] class ABC/Expr V_0,
+               [1] class ABC/Expr V_1)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0023
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  ldnull
+      IL_0008:  cgt.un
+      IL_000a:  brfalse.s  IL_0021
+
+      .line 100001,100001 : 0,0 ''
+      IL_000c:  ldarg.0
+      IL_000d:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_000e:  ldarg.0
+      IL_000f:  stloc.0
+      IL_0010:  ldarg.1
+      IL_0011:  stloc.1
+      IL_0012:  ldloc.0
+      IL_0013:  ldfld      int32 ABC/Expr::item
+      IL_0018:  ldloc.1
+      IL_0019:  ldfld      int32 ABC/Expr::item
+      IL_001e:  ceq
+      IL_0020:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0021:  ldc.i4.0
+      IL_0022:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0023:  ldarg.1
+      IL_0024:  ldnull
+      IL_0025:  cgt.un
+      IL_0027:  ldc.i4.0
+      IL_0028:  ceq
+      IL_002a:  ret
+    } // end of method Expr::Equals
+
+    .method public hidebysig virtual final 
+            instance bool  Equals(object obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       20 (0x14)
+      .maxstack  4
+      .locals init ([0] class ABC/Expr V_0)
+      .line 6,6 : 14,18 ''
+      IL_0000:  ldarg.1
+      IL_0001:  isinst     ABC/Expr
+      IL_0006:  stloc.0
+      IL_0007:  ldloc.0
+      IL_0008:  brfalse.s  IL_0012
+
+      .line 100001,100001 : 0,0 ''
+      IL_000a:  ldarg.0
+      IL_000b:  ldloc.0
+      IL_000c:  callvirt   instance bool ABC/Expr::Equals(class ABC/Expr)
+      IL_0011:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0012:  ldc.i4.0
+      IL_0013:  ret
+    } // end of method Expr::Equals
+
+    .property instance int32 Tag()
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+      .get instance int32 ABC/Expr::get_Tag()
+    } // end of property Expr::Tag
+    .property instance int32 Item()
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                  int32,
+                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      .get instance int32 ABC/Expr::get_Item()
+    } // end of property Expr::Item
+  } // end of class Expr
+
+  .class auto ansi serializable nested public beforefieldinit MyExn
+         extends [mscorlib]System.Exception
+         implements [mscorlib]System.Collections.IStructuralEquatable
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
+    .field assembly int32 Data0@
+    .method public specialname rtspecialname 
+            instance void  .ctor(int32 data0) cil managed
+    {
+      // Code size       14 (0xe)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+      IL_0006:  ldarg.0
+      IL_0007:  ldarg.1
+      IL_0008:  stfld      int32 ABC/MyExn::Data0@
+      IL_000d:  ret
+    } // end of method MyExn::.ctor
+
+    .method public specialname rtspecialname 
+            instance void  .ctor() cil managed
+    {
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+      IL_0006:  ret
+    } // end of method MyExn::.ctor
+
+    .method family specialname rtspecialname 
+            instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
+                                 valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
+    {
+      // Code size       9 (0x9)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  ldarg.1
+      IL_0002:  ldarg.2
+      IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
+                                                                           valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
+      IL_0008:  ret
+    } // end of method MyExn::.ctor
+
+    .method public hidebysig specialname 
+            instance int32  get_Data0() cil managed
+    {
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  ldfld      int32 ABC/MyExn::Data0@
+      IL_0006:  ret
+    } // end of method MyExn::get_Data0
+
+    .method public hidebysig virtual instance int32 
+            GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       40 (0x28)
+      .maxstack  7
+      .locals init ([0] int32 V_0,
+               [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0026
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldc.i4.0
+      IL_0007:  stloc.0
+      IL_0008:  ldc.i4     0x9e3779b9
+      IL_000d:  ldarg.1
+      IL_000e:  stloc.1
+      IL_000f:  ldarg.0
+      IL_0010:  castclass  ABC/MyExn
+      IL_0015:  call       instance int32 ABC/MyExn::get_Data0()
+      IL_001a:  ldloc.0
+      IL_001b:  ldc.i4.6
+      IL_001c:  shl
+      IL_001d:  ldloc.0
+      IL_001e:  ldc.i4.2
+      IL_001f:  shr
+      IL_0020:  add
+      IL_0021:  add
+      IL_0022:  add
+      IL_0023:  stloc.0
+      IL_0024:  ldloc.0
+      IL_0025:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0026:  ldc.i4.0
+      IL_0027:  ret
+    } // end of method MyExn::GetHashCode
+
+    .method public hidebysig virtual instance int32 
+            GetHashCode() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       12 (0xc)
+      .maxstack  8
+      .line 7,7 : 19,24 ''
+      IL_0000:  ldarg.0
+      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+      IL_0006:  callvirt   instance int32 ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+      IL_000b:  ret
+    } // end of method MyExn::GetHashCode
+
+    .method public hidebysig virtual instance bool 
+            Equals(object obj,
+                   class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       67 (0x43)
+      .maxstack  4
+      .locals init ([0] class [mscorlib]System.Exception V_0,
+               [1] class [mscorlib]System.Exception V_1,
+               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_003b
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  isinst     [mscorlib]System.Exception
+      IL_000c:  stloc.0
+      IL_000d:  ldloc.0
+      IL_000e:  brfalse.s  IL_0039
+
+      .line 100001,100001 : 0,0 ''
+      IL_0010:  ldloc.0
+      IL_0011:  stloc.1
+      IL_0012:  ldloc.0
+      IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+      IL_0018:  brtrue.s   IL_001c
+
+      IL_001a:  br.s       IL_0037
+
+      .line 100001,100001 : 0,0 ''
+      IL_001c:  ldarg.2
+      IL_001d:  stloc.2
+      IL_001e:  ldarg.0
+      IL_001f:  castclass  ABC/MyExn
+      IL_0024:  call       instance int32 ABC/MyExn::get_Data0()
+      IL_0029:  ldloc.1
+      IL_002a:  castclass  ABC/MyExn
+      IL_002f:  call       instance int32 ABC/MyExn::get_Data0()
+      IL_0034:  ceq
+      IL_0036:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0037:  ldc.i4.0
+      IL_0038:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0039:  ldc.i4.0
+      IL_003a:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_003b:  ldarg.1
+      IL_003c:  ldnull
+      IL_003d:  cgt.un
+      IL_003f:  ldc.i4.0
+      IL_0040:  ceq
+      IL_0042:  ret
+    } // end of method MyExn::Equals
+
+    .method public hidebysig instance bool 
+            Equals(class [mscorlib]System.Exception obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       59 (0x3b)
+      .maxstack  8
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0033
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  ldnull
+      IL_0008:  cgt.un
+      IL_000a:  brfalse.s  IL_0031
+
+      .line 100001,100001 : 0,0 ''
+      IL_000c:  ldarg.1
+      IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+      IL_0012:  brtrue.s   IL_0016
+
+      IL_0014:  br.s       IL_002f
+
+      .line 100001,100001 : 0,0 ''
+      IL_0016:  ldarg.0
+      IL_0017:  castclass  ABC/MyExn
+      IL_001c:  call       instance int32 ABC/MyExn::get_Data0()
+      IL_0021:  ldarg.1
+      IL_0022:  castclass  ABC/MyExn
+      IL_0027:  call       instance int32 ABC/MyExn::get_Data0()
+      IL_002c:  ceq
+      IL_002e:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002f:  ldc.i4.0
+      IL_0030:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0031:  ldc.i4.0
+      IL_0032:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0033:  ldarg.1
+      IL_0034:  ldnull
+      IL_0035:  cgt.un
+      IL_0037:  ldc.i4.0
+      IL_0038:  ceq
+      IL_003a:  ret
+    } // end of method MyExn::Equals
+
+    .method public hidebysig virtual instance bool 
+            Equals(object obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       20 (0x14)
+      .maxstack  4
+      .locals init ([0] class [mscorlib]System.Exception V_0)
+      .line 7,7 : 19,24 ''
+      IL_0000:  ldarg.1
+      IL_0001:  isinst     [mscorlib]System.Exception
+      IL_0006:  stloc.0
+      IL_0007:  ldloc.0
+      IL_0008:  brfalse.s  IL_0012
+
+      .line 100001,100001 : 0,0 ''
+      IL_000a:  ldarg.0
+      IL_000b:  ldloc.0
+      IL_000c:  callvirt   instance bool ABC/MyExn::Equals(class [mscorlib]System.Exception)
+      IL_0011:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0012:  ldc.i4.0
+      IL_0013:  ret
+    } // end of method MyExn::Equals
+
+    .property instance int32 Data0()
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
+      .get instance int32 ABC/MyExn::get_Data0()
+    } // end of property MyExn::Data0
+  } // end of class MyExn
+
+  .class auto ansi serializable nested public A
+         extends [mscorlib]System.Object
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
+    .field assembly string x
+    .method public specialname rtspecialname 
+            instance void  .ctor(string x) cil managed
+    {
+      // Code size       16 (0x10)
+      .maxstack  8
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
+      IL_0006:  ldarg.0
+      IL_0007:  pop
+      .line 8,8 : 16,17 ''
+      IL_0008:  ldarg.0
+      IL_0009:  ldarg.1
+      IL_000a:  stfld      string ABC/A::x
+      .line 8,8 : 14,15 ''
+      IL_000f:  ret
+    } // end of method A::.ctor
+
+    .method public hidebysig specialname 
+            instance string  get_X() cil managed
+    {
+      // Code size       7 (0x7)
+      .maxstack  8
+      .line 8,8 : 42,43 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldfld      string ABC/A::x
+      IL_0006:  ret
+    } // end of method A::get_X
+
+    .property instance string X()
+    {
+      .get instance string ABC/A::get_X()
+    } // end of property A::X
+  } // end of class A
+
+  .class abstract auto ansi sealed nested public ABC
+         extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
+           extends [mscorlib]System.Object
+           implements class [mscorlib]System.IEquatable`1,
+                      [mscorlib]System.Collections.IStructuralEquatable,
+                      class [mscorlib]System.IComparable`1,
+                      [mscorlib]System.IComparable,
+                      [mscorlib]System.Collections.IStructuralComparable
+    {
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
+                                                                                                     61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
+      .field assembly initonly int32 item
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      .method public static class ABC/ABC/Expr 
+              NewNum(int32 item) cil managed
+      {
+        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                    int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  newobj     instance void ABC/ABC/Expr::.ctor(int32)
+        IL_0006:  ret
+      } // end of method Expr::NewNum
+
+      .method assembly specialname rtspecialname 
+              instance void  .ctor(int32 item) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       14 (0xe)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
+        IL_0006:  ldarg.0
+        IL_0007:  ldarg.1
+        IL_0008:  stfld      int32 ABC/ABC/Expr::item
+        IL_000d:  ret
+      } // end of method Expr::.ctor
+
+      .method public hidebysig instance int32 
+              get_Item() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  ldfld      int32 ABC/ABC/Expr::item
+        IL_0006:  ret
+      } // end of method Expr::get_Item
+
+      .method public hidebysig instance int32 
+              get_Tag() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       4 (0x4)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  pop
+        IL_0002:  ldc.i4.0
+        IL_0003:  ret
+      } // end of method Expr::get_Tag
+
+      .method assembly hidebysig specialname 
+              instance object  __DebugDisplay() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       22 (0x16)
+        .maxstack  8
+        IL_0000:  ldstr      "%+0.8A"
+        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
+        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+        IL_000f:  ldarg.0
+        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+        IL_0015:  ret
+      } // end of method Expr::__DebugDisplay
+
+      .method public strict virtual instance string 
+              ToString() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       22 (0x16)
+        .maxstack  8
+        IL_0000:  ldstr      "%+A"
+        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class ABC/ABC/Expr>::.ctor(string)
+        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+        IL_000f:  ldarg.0
+        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+        IL_0015:  ret
+      } // end of method Expr::ToString
+
+      .method public hidebysig virtual final 
+              instance int32  CompareTo(class ABC/ABC/Expr obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       64 (0x40)
+        .maxstack  4
+        .locals init ([0] class ABC/ABC/Expr V_0,
+                 [1] class ABC/ABC/Expr V_1,
+                 [2] class [mscorlib]System.Collections.IComparer V_2,
+                 [3] int32 V_3,
+                 [4] int32 V_4)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0036
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  ldnull
+        IL_0008:  cgt.un
+        IL_000a:  brfalse.s  IL_0034
+
+        .line 100001,100001 : 0,0 ''
+        IL_000c:  ldarg.0
+        IL_000d:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_000e:  ldarg.0
+        IL_000f:  stloc.0
+        IL_0010:  ldarg.1
+        IL_0011:  stloc.1
+        IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
+        IL_0017:  stloc.2
+        IL_0018:  ldloc.0
+        IL_0019:  ldfld      int32 ABC/ABC/Expr::item
+        IL_001e:  stloc.3
+        IL_001f:  ldloc.1
+        IL_0020:  ldfld      int32 ABC/ABC/Expr::item
+        IL_0025:  stloc.s    V_4
+        IL_0027:  ldloc.3
+        IL_0028:  ldloc.s    V_4
+        IL_002a:  bge.s      IL_002e
+
+        .line 100001,100001 : 0,0 ''
+        IL_002c:  ldc.i4.m1
+        IL_002d:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002e:  ldloc.3
+        IL_002f:  ldloc.s    V_4
+        IL_0031:  cgt
+        IL_0033:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0034:  ldc.i4.1
+        IL_0035:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0036:  ldarg.1
+        IL_0037:  ldnull
+        IL_0038:  cgt.un
+        IL_003a:  brfalse.s  IL_003e
+
+        .line 100001,100001 : 0,0 ''
+        IL_003c:  ldc.i4.m1
+        IL_003d:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_003e:  ldc.i4.0
+        IL_003f:  ret
+      } // end of method Expr::CompareTo
+
+      .method public hidebysig virtual final 
+              instance int32  CompareTo(object obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       13 (0xd)
+        .maxstack  8
+        .line 16,16 : 18,22 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldarg.1
+        IL_0002:  unbox.any  ABC/ABC/Expr
+        IL_0007:  callvirt   instance int32 ABC/ABC/Expr::CompareTo(class ABC/ABC/Expr)
+        IL_000c:  ret
+      } // end of method Expr::CompareTo
+
+      .method public hidebysig virtual final 
+              instance int32  CompareTo(object obj,
+                                        class [mscorlib]System.Collections.IComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       80 (0x50)
+        .maxstack  4
+        .locals init ([0] class ABC/ABC/Expr V_0,
+                 [1] class ABC/ABC/Expr V_1,
+                 [2] class ABC/ABC/Expr V_2,
+                 [3] class [mscorlib]System.Collections.IComparer V_3,
+                 [4] int32 V_4,
+                 [5] int32 V_5)
+        .line 16,16 : 18,22 ''
+        IL_0000:  ldarg.1
+        IL_0001:  unbox.any  ABC/ABC/Expr
+        IL_0006:  stloc.0
+        IL_0007:  ldarg.0
+        IL_0008:  ldnull
+        IL_0009:  cgt.un
+        IL_000b:  brfalse.s  IL_0041
+
+        .line 100001,100001 : 0,0 ''
+        IL_000d:  ldarg.1
+        IL_000e:  unbox.any  ABC/ABC/Expr
+        IL_0013:  ldnull
+        IL_0014:  cgt.un
+        IL_0016:  brfalse.s  IL_003f
+
+        .line 100001,100001 : 0,0 ''
+        IL_0018:  ldarg.0
+        IL_0019:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_001a:  ldarg.0
+        IL_001b:  stloc.1
+        IL_001c:  ldloc.0
+        IL_001d:  stloc.2
+        IL_001e:  ldarg.2
+        IL_001f:  stloc.3
+        IL_0020:  ldloc.1
+        IL_0021:  ldfld      int32 ABC/ABC/Expr::item
+        IL_0026:  stloc.s    V_4
+        IL_0028:  ldloc.2
+        IL_0029:  ldfld      int32 ABC/ABC/Expr::item
+        IL_002e:  stloc.s    V_5
+        IL_0030:  ldloc.s    V_4
+        IL_0032:  ldloc.s    V_5
+        IL_0034:  bge.s      IL_0038
+
+        .line 100001,100001 : 0,0 ''
+        IL_0036:  ldc.i4.m1
+        IL_0037:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0038:  ldloc.s    V_4
+        IL_003a:  ldloc.s    V_5
+        IL_003c:  cgt
+        IL_003e:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_003f:  ldc.i4.1
+        IL_0040:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0041:  ldarg.1
+        IL_0042:  unbox.any  ABC/ABC/Expr
+        IL_0047:  ldnull
+        IL_0048:  cgt.un
+        IL_004a:  brfalse.s  IL_004e
+
+        .line 100001,100001 : 0,0 ''
+        IL_004c:  ldc.i4.m1
+        IL_004d:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_004e:  ldc.i4.0
+        IL_004f:  ret
+      } // end of method Expr::CompareTo
+
+      .method public hidebysig virtual final 
+              instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       41 (0x29)
+        .maxstack  7
+        .locals init ([0] int32 V_0,
+                 [1] class ABC/ABC/Expr V_1,
+                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0027
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldc.i4.0
+        IL_0007:  stloc.0
+        IL_0008:  ldarg.0
+        IL_0009:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_000a:  ldarg.0
+        IL_000b:  stloc.1
+        IL_000c:  ldc.i4.0
+        IL_000d:  stloc.0
+        IL_000e:  ldc.i4     0x9e3779b9
+        IL_0013:  ldarg.1
+        IL_0014:  stloc.2
+        IL_0015:  ldloc.1
+        IL_0016:  ldfld      int32 ABC/ABC/Expr::item
+        IL_001b:  ldloc.0
+        IL_001c:  ldc.i4.6
+        IL_001d:  shl
+        IL_001e:  ldloc.0
+        IL_001f:  ldc.i4.2
+        IL_0020:  shr
+        IL_0021:  add
+        IL_0022:  add
+        IL_0023:  add
+        IL_0024:  stloc.0
+        IL_0025:  ldloc.0
+        IL_0026:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0027:  ldc.i4.0
+        IL_0028:  ret
+      } // end of method Expr::GetHashCode
+
+      .method public hidebysig virtual final 
+              instance int32  GetHashCode() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       12 (0xc)
+        .maxstack  8
+        .line 16,16 : 18,22 ''
+        IL_0000:  ldarg.0
+        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+        IL_0006:  callvirt   instance int32 ABC/ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+        IL_000b:  ret
+      } // end of method Expr::GetHashCode
+
+      .method public hidebysig virtual final 
+              instance bool  Equals(object obj,
+                                    class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       52 (0x34)
+        .maxstack  4
+        .locals init ([0] class ABC/ABC/Expr V_0,
+                 [1] class ABC/ABC/Expr V_1,
+                 [2] class ABC/ABC/Expr V_2,
+                 [3] class ABC/ABC/Expr V_3,
+                 [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_002c
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  isinst     ABC/ABC/Expr
+        IL_000c:  stloc.0
+        IL_000d:  ldloc.0
+        IL_000e:  brfalse.s  IL_002a
+
+        .line 100001,100001 : 0,0 ''
+        IL_0010:  ldloc.0
+        IL_0011:  stloc.1
+        IL_0012:  ldarg.0
+        IL_0013:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_0014:  ldarg.0
+        IL_0015:  stloc.2
+        IL_0016:  ldloc.1
+        IL_0017:  stloc.3
+        IL_0018:  ldarg.2
+        IL_0019:  stloc.s    V_4
+        IL_001b:  ldloc.2
+        IL_001c:  ldfld      int32 ABC/ABC/Expr::item
+        IL_0021:  ldloc.3
+        IL_0022:  ldfld      int32 ABC/ABC/Expr::item
+        IL_0027:  ceq
+        IL_0029:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002a:  ldc.i4.0
+        IL_002b:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002c:  ldarg.1
+        IL_002d:  ldnull
+        IL_002e:  cgt.un
+        IL_0030:  ldc.i4.0
+        IL_0031:  ceq
+        IL_0033:  ret
+      } // end of method Expr::Equals
+
+      .method public hidebysig virtual final 
+              instance bool  Equals(class ABC/ABC/Expr obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       43 (0x2b)
+        .maxstack  4
+        .locals init ([0] class ABC/ABC/Expr V_0,
+                 [1] class ABC/ABC/Expr V_1)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0023
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  ldnull
+        IL_0008:  cgt.un
+        IL_000a:  brfalse.s  IL_0021
+
+        .line 100001,100001 : 0,0 ''
+        IL_000c:  ldarg.0
+        IL_000d:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_000e:  ldarg.0
+        IL_000f:  stloc.0
+        IL_0010:  ldarg.1
+        IL_0011:  stloc.1
+        IL_0012:  ldloc.0
+        IL_0013:  ldfld      int32 ABC/ABC/Expr::item
+        IL_0018:  ldloc.1
+        IL_0019:  ldfld      int32 ABC/ABC/Expr::item
+        IL_001e:  ceq
+        IL_0020:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0021:  ldc.i4.0
+        IL_0022:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0023:  ldarg.1
+        IL_0024:  ldnull
+        IL_0025:  cgt.un
+        IL_0027:  ldc.i4.0
+        IL_0028:  ceq
+        IL_002a:  ret
+      } // end of method Expr::Equals
+
+      .method public hidebysig virtual final 
+              instance bool  Equals(object obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       20 (0x14)
+        .maxstack  4
+        .locals init ([0] class ABC/ABC/Expr V_0)
+        .line 16,16 : 18,22 ''
+        IL_0000:  ldarg.1
+        IL_0001:  isinst     ABC/ABC/Expr
+        IL_0006:  stloc.0
+        IL_0007:  ldloc.0
+        IL_0008:  brfalse.s  IL_0012
+
+        .line 100001,100001 : 0,0 ''
+        IL_000a:  ldarg.0
+        IL_000b:  ldloc.0
+        IL_000c:  callvirt   instance bool ABC/ABC/Expr::Equals(class ABC/ABC/Expr)
+        IL_0011:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0012:  ldc.i4.0
+        IL_0013:  ret
+      } // end of method Expr::Equals
+
+      .property instance int32 Tag()
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+        .get instance int32 ABC/ABC/Expr::get_Tag()
+      } // end of property Expr::Tag
+      .property instance int32 Item()
+      {
+        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                    int32,
+                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        .get instance int32 ABC/ABC/Expr::get_Item()
+      } // end of property Expr::Item
+    } // end of class Expr
+
+    .class auto ansi serializable nested public beforefieldinit MyExn
+           extends [mscorlib]System.Exception
+           implements [mscorlib]System.Collections.IStructuralEquatable
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
+      .field assembly int32 Data0@
+      .method public specialname rtspecialname 
+              instance void  .ctor(int32 data0) cil managed
+      {
+        // Code size       14 (0xe)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+        IL_0006:  ldarg.0
+        IL_0007:  ldarg.1
+        IL_0008:  stfld      int32 ABC/ABC/MyExn::Data0@
+        IL_000d:  ret
+      } // end of method MyExn::.ctor
+
+      .method public specialname rtspecialname 
+              instance void  .ctor() cil managed
+      {
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+        IL_0006:  ret
+      } // end of method MyExn::.ctor
+
+      .method family specialname rtspecialname 
+              instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
+                                   valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
+      {
+        // Code size       9 (0x9)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  ldarg.1
+        IL_0002:  ldarg.2
+        IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
+                                                                             valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
+        IL_0008:  ret
+      } // end of method MyExn::.ctor
+
+      .method public hidebysig specialname 
+              instance int32  get_Data0() cil managed
+      {
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  ldfld      int32 ABC/ABC/MyExn::Data0@
+        IL_0006:  ret
+      } // end of method MyExn::get_Data0
+
+      .method public hidebysig virtual instance int32 
+              GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       40 (0x28)
+        .maxstack  7
+        .locals init ([0] int32 V_0,
+                 [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0026
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldc.i4.0
+        IL_0007:  stloc.0
+        IL_0008:  ldc.i4     0x9e3779b9
+        IL_000d:  ldarg.1
+        IL_000e:  stloc.1
+        IL_000f:  ldarg.0
+        IL_0010:  castclass  ABC/ABC/MyExn
+        IL_0015:  call       instance int32 ABC/ABC/MyExn::get_Data0()
+        IL_001a:  ldloc.0
+        IL_001b:  ldc.i4.6
+        IL_001c:  shl
+        IL_001d:  ldloc.0
+        IL_001e:  ldc.i4.2
+        IL_001f:  shr
+        IL_0020:  add
+        IL_0021:  add
+        IL_0022:  add
+        IL_0023:  stloc.0
+        IL_0024:  ldloc.0
+        IL_0025:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0026:  ldc.i4.0
+        IL_0027:  ret
+      } // end of method MyExn::GetHashCode
+
+      .method public hidebysig virtual instance int32 
+              GetHashCode() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       12 (0xc)
+        .maxstack  8
+        .line 17,17 : 23,28 ''
+        IL_0000:  ldarg.0
+        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+        IL_0006:  callvirt   instance int32 ABC/ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+        IL_000b:  ret
+      } // end of method MyExn::GetHashCode
+
+      .method public hidebysig virtual instance bool 
+              Equals(object obj,
+                     class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       67 (0x43)
+        .maxstack  4
+        .locals init ([0] class [mscorlib]System.Exception V_0,
+                 [1] class [mscorlib]System.Exception V_1,
+                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_003b
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  isinst     [mscorlib]System.Exception
+        IL_000c:  stloc.0
+        IL_000d:  ldloc.0
+        IL_000e:  brfalse.s  IL_0039
+
+        .line 100001,100001 : 0,0 ''
+        IL_0010:  ldloc.0
+        IL_0011:  stloc.1
+        IL_0012:  ldloc.0
+        IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+        IL_0018:  brtrue.s   IL_001c
+
+        IL_001a:  br.s       IL_0037
+
+        .line 100001,100001 : 0,0 ''
+        IL_001c:  ldarg.2
+        IL_001d:  stloc.2
+        IL_001e:  ldarg.0
+        IL_001f:  castclass  ABC/ABC/MyExn
+        IL_0024:  call       instance int32 ABC/ABC/MyExn::get_Data0()
+        IL_0029:  ldloc.1
+        IL_002a:  castclass  ABC/ABC/MyExn
+        IL_002f:  call       instance int32 ABC/ABC/MyExn::get_Data0()
+        IL_0034:  ceq
+        IL_0036:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0037:  ldc.i4.0
+        IL_0038:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0039:  ldc.i4.0
+        IL_003a:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_003b:  ldarg.1
+        IL_003c:  ldnull
+        IL_003d:  cgt.un
+        IL_003f:  ldc.i4.0
+        IL_0040:  ceq
+        IL_0042:  ret
+      } // end of method MyExn::Equals
+
+      .method public hidebysig instance bool 
+              Equals(class [mscorlib]System.Exception obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       59 (0x3b)
+        .maxstack  8
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0033
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  ldnull
+        IL_0008:  cgt.un
+        IL_000a:  brfalse.s  IL_0031
+
+        .line 100001,100001 : 0,0 ''
+        IL_000c:  ldarg.1
+        IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+        IL_0012:  brtrue.s   IL_0016
+
+        IL_0014:  br.s       IL_002f
+
+        .line 100001,100001 : 0,0 ''
+        IL_0016:  ldarg.0
+        IL_0017:  castclass  ABC/ABC/MyExn
+        IL_001c:  call       instance int32 ABC/ABC/MyExn::get_Data0()
+        IL_0021:  ldarg.1
+        IL_0022:  castclass  ABC/ABC/MyExn
+        IL_0027:  call       instance int32 ABC/ABC/MyExn::get_Data0()
+        IL_002c:  ceq
+        IL_002e:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002f:  ldc.i4.0
+        IL_0030:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0031:  ldc.i4.0
+        IL_0032:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0033:  ldarg.1
+        IL_0034:  ldnull
+        IL_0035:  cgt.un
+        IL_0037:  ldc.i4.0
+        IL_0038:  ceq
+        IL_003a:  ret
+      } // end of method MyExn::Equals
+
+      .method public hidebysig virtual instance bool 
+              Equals(object obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       20 (0x14)
+        .maxstack  4
+        .locals init ([0] class [mscorlib]System.Exception V_0)
+        .line 17,17 : 23,28 ''
+        IL_0000:  ldarg.1
+        IL_0001:  isinst     [mscorlib]System.Exception
+        IL_0006:  stloc.0
+        IL_0007:  ldloc.0
+        IL_0008:  brfalse.s  IL_0012
+
+        .line 100001,100001 : 0,0 ''
+        IL_000a:  ldarg.0
+        IL_000b:  ldloc.0
+        IL_000c:  callvirt   instance bool ABC/ABC/MyExn::Equals(class [mscorlib]System.Exception)
+        IL_0011:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0012:  ldc.i4.0
+        IL_0013:  ret
+      } // end of method MyExn::Equals
+
+      .property instance int32 Data0()
+      {
+        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
+        .get instance int32 ABC/ABC/MyExn::get_Data0()
+      } // end of property MyExn::Data0
+    } // end of class MyExn
+
+    .class auto ansi serializable nested public A
+           extends [mscorlib]System.Object
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
+      .field assembly string x
+      .method public specialname rtspecialname 
+              instance void  .ctor(string x) cil managed
+      {
+        // Code size       16 (0x10)
+        .maxstack  8
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
+        IL_0006:  ldarg.0
+        IL_0007:  pop
+        .line 18,18 : 20,21 ''
+        IL_0008:  ldarg.0
+        IL_0009:  ldarg.1
+        IL_000a:  stfld      string ABC/ABC/A::x
+        .line 18,18 : 18,19 ''
+        IL_000f:  ret
+      } // end of method A::.ctor
+
+      .method public hidebysig specialname 
+              instance string  get_X() cil managed
+      {
+        // Code size       7 (0x7)
+        .maxstack  8
+        .line 18,18 : 46,47 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldfld      string ABC/ABC/A::x
+        IL_0006:  ret
+      } // end of method A::get_X
+
+      .property instance string X()
+      {
+        .get instance string ABC/ABC/A::get_X()
+      } // end of property A::X
+    } // end of class A
+
+    .method public static int32  'add'(int32 x,
+                                       int32 y) 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 ) 
+      // Code size       4 (0x4)
+      .maxstack  8
+      .line 21,21 : 27,32 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldarg.1
+      IL_0002:  add
+      IL_0003:  ret
+    } // end of method ABC::'add'
+
+    .method public specialname static string 
+            get_greeting() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       6 (0x6)
+      .maxstack  8
+      IL_0000:  ldstr      "hello"
+      IL_0005:  ret
+    } // end of method ABC::get_greeting
+
+    .property string greeting()
+    {
+      .get string ABC/ABC::get_greeting()
+    } // end of property ABC::greeting
+  } // end of class ABC
+
+  .method public static int32  'add'(int32 x,
+                                     int32 y) 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 ) 
+    // Code size       4 (0x4)
+    .maxstack  8
+    .line 11,11 : 23,28 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldarg.1
+    IL_0002:  add
+    IL_0003:  ret
+  } // end of method ABC::'add'
+
+  .method public specialname static string 
+          get_greeting() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       6 (0x6)
+    .maxstack  8
+    IL_0000:  ldstr      "hello"
+    IL_0005:  ret
+  } // end of method ABC::get_greeting
+
+  .property string greeting()
+  {
+    .get string ABC::get_greeting()
+  } // end of property ABC::greeting
+} // end of class ABC
+
+.class private abstract auto ansi sealed ''.$ABC
+       extends [mscorlib]System.Object
+{
+  .field static assembly int32 init@
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+  .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+  .method private specialname rtspecialname static 
+          void  .cctor() cil managed
+  {
+    // Code size       13 (0xd)
+    .maxstack  3
+    .locals init ([0] string greeting,
+             [1] string V_1)
+    .line 12,12 : 9,31 ''
+    IL_0000:  call       string ABC::get_greeting()
+    IL_0005:  stloc.0
+    .line 22,22 : 13,35 ''
+    IL_0006:  call       string ABC/ABC::get_greeting()
+    IL_000b:  stloc.1
+    IL_000c:  ret
+  } // end of method $ABC::.cctor
+
+} // end of class ''.$ABC
+
+
+// =============================================================
+
+// *********** DISASSEMBLY COMPLETE ***********************
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
index 8f7043eeff2..38632dbe761 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
@@ -2,3 +2,2434 @@
 //  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
+
+
+// Metadata version: v4.0.30319
+.assembly extern mscorlib
+{
+  .publickeytoken = (B7 7A 5C 56 19 34 E0 89 )                         // .z\V.4..
+  .ver 4:0:0:0
+}
+.assembly extern FSharp.Core
+{
+  .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
+  .ver 5:0:0:0
+}
+.assembly ToplevelNamespace
+{
+  .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 ) 
+
+  // --- The following custom attribute is added automatically, do not uncomment -------
+  //  .custom instance void [mscorlib]System.Diagnostics.DebuggableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggableAttribute/DebuggingModes) = ( 01 00 01 01 00 00 00 00 ) 
+
+  .hash algorithm 0x00008004
+  .ver 0:0:0:0
+}
+.mresource public FSharpSignatureData.ToplevelNamespace
+{
+  // Offset: 0x00000000 Length: 0x00001848
+}
+.mresource public FSharpOptimizationData.ToplevelNamespace
+{
+  // Offset: 0x00001850 Length: 0x0000055C
+}
+.module ToplevelNamespace.dll
+// MVID: {60BE3D8D-218B-729A-A745-03838D3DBE60}
+.imagebase 0x00400000
+.file alignment 0x00000200
+.stackreserve 0x00100000
+.subsystem 0x0003       // WINDOWS_CUI
+.corflags 0x00000001    //  ILONLY
+// Image base: 0x00BA0000
+
+
+// =============== CLASS MEMBERS DECLARATION ===================
+
+.class public auto autochar serializable sealed beforefieldinit XYZ.Expr
+       extends [mscorlib]System.Object
+       implements class [mscorlib]System.IEquatable`1,
+                  [mscorlib]System.Collections.IStructuralEquatable,
+                  class [mscorlib]System.IComparable`1,
+                  [mscorlib]System.IComparable,
+                  [mscorlib]System.Collections.IStructuralComparable
+{
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
+                                                                                                 61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
+  .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
+  .field assembly initonly int32 item
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+  .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+  .method public static class XYZ.Expr  NewNum(int32 item) cil managed
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
+    // Code size       7 (0x7)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  newobj     instance void XYZ.Expr::.ctor(int32)
+    IL_0006:  ret
+  } // end of method Expr::NewNum
+
+  .method assembly specialname rtspecialname 
+          instance void  .ctor(int32 item) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       14 (0xe)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
+    IL_0006:  ldarg.0
+    IL_0007:  ldarg.1
+    IL_0008:  stfld      int32 XYZ.Expr::item
+    IL_000d:  ret
+  } // end of method Expr::.ctor
+
+  .method public hidebysig instance int32 
+          get_Item() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       7 (0x7)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  ldfld      int32 XYZ.Expr::item
+    IL_0006:  ret
+  } // end of method Expr::get_Item
+
+  .method public hidebysig instance int32 
+          get_Tag() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       4 (0x4)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  pop
+    IL_0002:  ldc.i4.0
+    IL_0003:  ret
+  } // end of method Expr::get_Tag
+
+  .method assembly hidebysig specialname 
+          instance object  __DebugDisplay() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       22 (0x16)
+    .maxstack  8
+    IL_0000:  ldstr      "%+0.8A"
+    IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
+    IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+    IL_000f:  ldarg.0
+    IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+    IL_0015:  ret
+  } // end of method Expr::__DebugDisplay
+
+  .method public strict virtual instance string 
+          ToString() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       22 (0x16)
+    .maxstack  8
+    IL_0000:  ldstr      "%+A"
+    IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class XYZ.Expr>::.ctor(string)
+    IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+    IL_000f:  ldarg.0
+    IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+    IL_0015:  ret
+  } // end of method Expr::ToString
+
+  .method public hidebysig virtual final 
+          instance int32  CompareTo(class XYZ.Expr obj) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       64 (0x40)
+    .maxstack  4
+    .locals init ([0] class XYZ.Expr V_0,
+             [1] class XYZ.Expr V_1,
+             [2] class [mscorlib]System.Collections.IComparer V_2,
+             [3] int32 V_3,
+             [4] int32 V_4)
+    .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
+    .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SerializableAttribute\\ToplevelNamespace.fs'
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_0036
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldarg.1
+    IL_0007:  ldnull
+    IL_0008:  cgt.un
+    IL_000a:  brfalse.s  IL_0034
+
+    .line 100001,100001 : 0,0 ''
+    IL_000c:  ldarg.0
+    IL_000d:  pop
+    .line 100001,100001 : 0,0 ''
+    IL_000e:  ldarg.0
+    IL_000f:  stloc.0
+    IL_0010:  ldarg.1
+    IL_0011:  stloc.1
+    IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
+    IL_0017:  stloc.2
+    IL_0018:  ldloc.0
+    IL_0019:  ldfld      int32 XYZ.Expr::item
+    IL_001e:  stloc.3
+    IL_001f:  ldloc.1
+    IL_0020:  ldfld      int32 XYZ.Expr::item
+    IL_0025:  stloc.s    V_4
+    IL_0027:  ldloc.3
+    IL_0028:  ldloc.s    V_4
+    IL_002a:  bge.s      IL_002e
+
+    .line 100001,100001 : 0,0 ''
+    IL_002c:  ldc.i4.m1
+    IL_002d:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_002e:  ldloc.3
+    IL_002f:  ldloc.s    V_4
+    IL_0031:  cgt
+    IL_0033:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0034:  ldc.i4.1
+    IL_0035:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0036:  ldarg.1
+    IL_0037:  ldnull
+    IL_0038:  cgt.un
+    IL_003a:  brfalse.s  IL_003e
+
+    .line 100001,100001 : 0,0 ''
+    IL_003c:  ldc.i4.m1
+    IL_003d:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_003e:  ldc.i4.0
+    IL_003f:  ret
+  } // end of method Expr::CompareTo
+
+  .method public hidebysig virtual final 
+          instance int32  CompareTo(object obj) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       13 (0xd)
+    .maxstack  8
+    .line 7,7 : 10,14 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldarg.1
+    IL_0002:  unbox.any  XYZ.Expr
+    IL_0007:  callvirt   instance int32 XYZ.Expr::CompareTo(class XYZ.Expr)
+    IL_000c:  ret
+  } // end of method Expr::CompareTo
+
+  .method public hidebysig virtual final 
+          instance int32  CompareTo(object obj,
+                                    class [mscorlib]System.Collections.IComparer comp) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       80 (0x50)
+    .maxstack  4
+    .locals init ([0] class XYZ.Expr V_0,
+             [1] class XYZ.Expr V_1,
+             [2] class XYZ.Expr V_2,
+             [3] class [mscorlib]System.Collections.IComparer V_3,
+             [4] int32 V_4,
+             [5] int32 V_5)
+    .line 7,7 : 10,14 ''
+    IL_0000:  ldarg.1
+    IL_0001:  unbox.any  XYZ.Expr
+    IL_0006:  stloc.0
+    IL_0007:  ldarg.0
+    IL_0008:  ldnull
+    IL_0009:  cgt.un
+    IL_000b:  brfalse.s  IL_0041
+
+    .line 100001,100001 : 0,0 ''
+    IL_000d:  ldarg.1
+    IL_000e:  unbox.any  XYZ.Expr
+    IL_0013:  ldnull
+    IL_0014:  cgt.un
+    IL_0016:  brfalse.s  IL_003f
+
+    .line 100001,100001 : 0,0 ''
+    IL_0018:  ldarg.0
+    IL_0019:  pop
+    .line 100001,100001 : 0,0 ''
+    IL_001a:  ldarg.0
+    IL_001b:  stloc.1
+    IL_001c:  ldloc.0
+    IL_001d:  stloc.2
+    IL_001e:  ldarg.2
+    IL_001f:  stloc.3
+    IL_0020:  ldloc.1
+    IL_0021:  ldfld      int32 XYZ.Expr::item
+    IL_0026:  stloc.s    V_4
+    IL_0028:  ldloc.2
+    IL_0029:  ldfld      int32 XYZ.Expr::item
+    IL_002e:  stloc.s    V_5
+    IL_0030:  ldloc.s    V_4
+    IL_0032:  ldloc.s    V_5
+    IL_0034:  bge.s      IL_0038
+
+    .line 100001,100001 : 0,0 ''
+    IL_0036:  ldc.i4.m1
+    IL_0037:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0038:  ldloc.s    V_4
+    IL_003a:  ldloc.s    V_5
+    IL_003c:  cgt
+    IL_003e:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_003f:  ldc.i4.1
+    IL_0040:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0041:  ldarg.1
+    IL_0042:  unbox.any  XYZ.Expr
+    IL_0047:  ldnull
+    IL_0048:  cgt.un
+    IL_004a:  brfalse.s  IL_004e
+
+    .line 100001,100001 : 0,0 ''
+    IL_004c:  ldc.i4.m1
+    IL_004d:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_004e:  ldc.i4.0
+    IL_004f:  ret
+  } // end of method Expr::CompareTo
+
+  .method public hidebysig virtual final 
+          instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       41 (0x29)
+    .maxstack  7
+    .locals init ([0] int32 V_0,
+             [1] class XYZ.Expr V_1,
+             [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_0027
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldc.i4.0
+    IL_0007:  stloc.0
+    IL_0008:  ldarg.0
+    IL_0009:  pop
+    .line 100001,100001 : 0,0 ''
+    IL_000a:  ldarg.0
+    IL_000b:  stloc.1
+    IL_000c:  ldc.i4.0
+    IL_000d:  stloc.0
+    IL_000e:  ldc.i4     0x9e3779b9
+    IL_0013:  ldarg.1
+    IL_0014:  stloc.2
+    IL_0015:  ldloc.1
+    IL_0016:  ldfld      int32 XYZ.Expr::item
+    IL_001b:  ldloc.0
+    IL_001c:  ldc.i4.6
+    IL_001d:  shl
+    IL_001e:  ldloc.0
+    IL_001f:  ldc.i4.2
+    IL_0020:  shr
+    IL_0021:  add
+    IL_0022:  add
+    IL_0023:  add
+    IL_0024:  stloc.0
+    IL_0025:  ldloc.0
+    IL_0026:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0027:  ldc.i4.0
+    IL_0028:  ret
+  } // end of method Expr::GetHashCode
+
+  .method public hidebysig virtual final 
+          instance int32  GetHashCode() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       12 (0xc)
+    .maxstack  8
+    .line 7,7 : 10,14 ''
+    IL_0000:  ldarg.0
+    IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+    IL_0006:  callvirt   instance int32 XYZ.Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+    IL_000b:  ret
+  } // end of method Expr::GetHashCode
+
+  .method public hidebysig virtual final 
+          instance bool  Equals(object obj,
+                                class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       52 (0x34)
+    .maxstack  4
+    .locals init ([0] class XYZ.Expr V_0,
+             [1] class XYZ.Expr V_1,
+             [2] class XYZ.Expr V_2,
+             [3] class XYZ.Expr V_3,
+             [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_002c
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldarg.1
+    IL_0007:  isinst     XYZ.Expr
+    IL_000c:  stloc.0
+    IL_000d:  ldloc.0
+    IL_000e:  brfalse.s  IL_002a
+
+    .line 100001,100001 : 0,0 ''
+    IL_0010:  ldloc.0
+    IL_0011:  stloc.1
+    IL_0012:  ldarg.0
+    IL_0013:  pop
+    .line 100001,100001 : 0,0 ''
+    IL_0014:  ldarg.0
+    IL_0015:  stloc.2
+    IL_0016:  ldloc.1
+    IL_0017:  stloc.3
+    IL_0018:  ldarg.2
+    IL_0019:  stloc.s    V_4
+    IL_001b:  ldloc.2
+    IL_001c:  ldfld      int32 XYZ.Expr::item
+    IL_0021:  ldloc.3
+    IL_0022:  ldfld      int32 XYZ.Expr::item
+    IL_0027:  ceq
+    IL_0029:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_002a:  ldc.i4.0
+    IL_002b:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_002c:  ldarg.1
+    IL_002d:  ldnull
+    IL_002e:  cgt.un
+    IL_0030:  ldc.i4.0
+    IL_0031:  ceq
+    IL_0033:  ret
+  } // end of method Expr::Equals
+
+  .method public hidebysig virtual final 
+          instance bool  Equals(class XYZ.Expr obj) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       43 (0x2b)
+    .maxstack  4
+    .locals init ([0] class XYZ.Expr V_0,
+             [1] class XYZ.Expr V_1)
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_0023
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldarg.1
+    IL_0007:  ldnull
+    IL_0008:  cgt.un
+    IL_000a:  brfalse.s  IL_0021
+
+    .line 100001,100001 : 0,0 ''
+    IL_000c:  ldarg.0
+    IL_000d:  pop
+    .line 100001,100001 : 0,0 ''
+    IL_000e:  ldarg.0
+    IL_000f:  stloc.0
+    IL_0010:  ldarg.1
+    IL_0011:  stloc.1
+    IL_0012:  ldloc.0
+    IL_0013:  ldfld      int32 XYZ.Expr::item
+    IL_0018:  ldloc.1
+    IL_0019:  ldfld      int32 XYZ.Expr::item
+    IL_001e:  ceq
+    IL_0020:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0021:  ldc.i4.0
+    IL_0022:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0023:  ldarg.1
+    IL_0024:  ldnull
+    IL_0025:  cgt.un
+    IL_0027:  ldc.i4.0
+    IL_0028:  ceq
+    IL_002a:  ret
+  } // end of method Expr::Equals
+
+  .method public hidebysig virtual final 
+          instance bool  Equals(object obj) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       20 (0x14)
+    .maxstack  4
+    .locals init ([0] class XYZ.Expr V_0)
+    .line 7,7 : 10,14 ''
+    IL_0000:  ldarg.1
+    IL_0001:  isinst     XYZ.Expr
+    IL_0006:  stloc.0
+    IL_0007:  ldloc.0
+    IL_0008:  brfalse.s  IL_0012
+
+    .line 100001,100001 : 0,0 ''
+    IL_000a:  ldarg.0
+    IL_000b:  ldloc.0
+    IL_000c:  callvirt   instance bool XYZ.Expr::Equals(class XYZ.Expr)
+    IL_0011:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0012:  ldc.i4.0
+    IL_0013:  ret
+  } // end of method Expr::Equals
+
+  .property instance int32 Tag()
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+    .get instance int32 XYZ.Expr::get_Tag()
+  } // end of property Expr::Tag
+  .property instance int32 Item()
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                int32,
+                                                                                                int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    .get instance int32 XYZ.Expr::get_Item()
+  } // end of property Expr::Item
+} // end of class XYZ.Expr
+
+.class public auto ansi serializable beforefieldinit XYZ.MyExn
+       extends [mscorlib]System.Exception
+       implements [mscorlib]System.Collections.IStructuralEquatable
+{
+  .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
+  .field assembly int32 Data0@
+  .method public specialname rtspecialname 
+          instance void  .ctor(int32 data0) cil managed
+  {
+    // Code size       14 (0xe)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+    IL_0006:  ldarg.0
+    IL_0007:  ldarg.1
+    IL_0008:  stfld      int32 XYZ.MyExn::Data0@
+    IL_000d:  ret
+  } // end of method MyExn::.ctor
+
+  .method public specialname rtspecialname 
+          instance void  .ctor() cil managed
+  {
+    // Code size       7 (0x7)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+    IL_0006:  ret
+  } // end of method MyExn::.ctor
+
+  .method family specialname rtspecialname 
+          instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
+                               valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
+  {
+    // Code size       9 (0x9)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  ldarg.1
+    IL_0002:  ldarg.2
+    IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
+                                                                         valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
+    IL_0008:  ret
+  } // end of method MyExn::.ctor
+
+  .method public hidebysig specialname instance int32 
+          get_Data0() cil managed
+  {
+    // Code size       7 (0x7)
+    .maxstack  8
+    IL_0000:  ldarg.0
+    IL_0001:  ldfld      int32 XYZ.MyExn::Data0@
+    IL_0006:  ret
+  } // end of method MyExn::get_Data0
+
+  .method public hidebysig virtual instance int32 
+          GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       40 (0x28)
+    .maxstack  7
+    .locals init ([0] int32 V_0,
+             [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_0026
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldc.i4.0
+    IL_0007:  stloc.0
+    IL_0008:  ldc.i4     0x9e3779b9
+    IL_000d:  ldarg.1
+    IL_000e:  stloc.1
+    IL_000f:  ldarg.0
+    IL_0010:  castclass  XYZ.MyExn
+    IL_0015:  call       instance int32 XYZ.MyExn::get_Data0()
+    IL_001a:  ldloc.0
+    IL_001b:  ldc.i4.6
+    IL_001c:  shl
+    IL_001d:  ldloc.0
+    IL_001e:  ldc.i4.2
+    IL_001f:  shr
+    IL_0020:  add
+    IL_0021:  add
+    IL_0022:  add
+    IL_0023:  stloc.0
+    IL_0024:  ldloc.0
+    IL_0025:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0026:  ldc.i4.0
+    IL_0027:  ret
+  } // end of method MyExn::GetHashCode
+
+  .method public hidebysig virtual instance int32 
+          GetHashCode() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       12 (0xc)
+    .maxstack  8
+    .line 8,8 : 15,20 ''
+    IL_0000:  ldarg.0
+    IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+    IL_0006:  callvirt   instance int32 XYZ.MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+    IL_000b:  ret
+  } // end of method MyExn::GetHashCode
+
+  .method public hidebysig virtual instance bool 
+          Equals(object obj,
+                 class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       67 (0x43)
+    .maxstack  4
+    .locals init ([0] class [mscorlib]System.Exception V_0,
+             [1] class [mscorlib]System.Exception V_1,
+             [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_003b
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldarg.1
+    IL_0007:  isinst     [mscorlib]System.Exception
+    IL_000c:  stloc.0
+    IL_000d:  ldloc.0
+    IL_000e:  brfalse.s  IL_0039
+
+    .line 100001,100001 : 0,0 ''
+    IL_0010:  ldloc.0
+    IL_0011:  stloc.1
+    IL_0012:  ldloc.0
+    IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+    IL_0018:  brtrue.s   IL_001c
+
+    IL_001a:  br.s       IL_0037
+
+    .line 100001,100001 : 0,0 ''
+    IL_001c:  ldarg.2
+    IL_001d:  stloc.2
+    IL_001e:  ldarg.0
+    IL_001f:  castclass  XYZ.MyExn
+    IL_0024:  call       instance int32 XYZ.MyExn::get_Data0()
+    IL_0029:  ldloc.1
+    IL_002a:  castclass  XYZ.MyExn
+    IL_002f:  call       instance int32 XYZ.MyExn::get_Data0()
+    IL_0034:  ceq
+    IL_0036:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0037:  ldc.i4.0
+    IL_0038:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0039:  ldc.i4.0
+    IL_003a:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_003b:  ldarg.1
+    IL_003c:  ldnull
+    IL_003d:  cgt.un
+    IL_003f:  ldc.i4.0
+    IL_0040:  ceq
+    IL_0042:  ret
+  } // end of method MyExn::Equals
+
+  .method public hidebysig instance bool 
+          Equals(class [mscorlib]System.Exception obj) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       59 (0x3b)
+    .maxstack  8
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldnull
+    IL_0002:  cgt.un
+    IL_0004:  brfalse.s  IL_0033
+
+    .line 100001,100001 : 0,0 ''
+    IL_0006:  ldarg.1
+    IL_0007:  ldnull
+    IL_0008:  cgt.un
+    IL_000a:  brfalse.s  IL_0031
+
+    .line 100001,100001 : 0,0 ''
+    IL_000c:  ldarg.1
+    IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+    IL_0012:  brtrue.s   IL_0016
+
+    IL_0014:  br.s       IL_002f
+
+    .line 100001,100001 : 0,0 ''
+    IL_0016:  ldarg.0
+    IL_0017:  castclass  XYZ.MyExn
+    IL_001c:  call       instance int32 XYZ.MyExn::get_Data0()
+    IL_0021:  ldarg.1
+    IL_0022:  castclass  XYZ.MyExn
+    IL_0027:  call       instance int32 XYZ.MyExn::get_Data0()
+    IL_002c:  ceq
+    IL_002e:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_002f:  ldc.i4.0
+    IL_0030:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0031:  ldc.i4.0
+    IL_0032:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0033:  ldarg.1
+    IL_0034:  ldnull
+    IL_0035:  cgt.un
+    IL_0037:  ldc.i4.0
+    IL_0038:  ceq
+    IL_003a:  ret
+  } // end of method MyExn::Equals
+
+  .method public hidebysig virtual instance bool 
+          Equals(object obj) cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       20 (0x14)
+    .maxstack  4
+    .locals init ([0] class [mscorlib]System.Exception V_0)
+    .line 8,8 : 15,20 ''
+    IL_0000:  ldarg.1
+    IL_0001:  isinst     [mscorlib]System.Exception
+    IL_0006:  stloc.0
+    IL_0007:  ldloc.0
+    IL_0008:  brfalse.s  IL_0012
+
+    .line 100001,100001 : 0,0 ''
+    IL_000a:  ldarg.0
+    IL_000b:  ldloc.0
+    IL_000c:  callvirt   instance bool XYZ.MyExn::Equals(class [mscorlib]System.Exception)
+    IL_0011:  ret
+
+    .line 100001,100001 : 0,0 ''
+    IL_0012:  ldc.i4.0
+    IL_0013:  ret
+  } // end of method MyExn::Equals
+
+  .property instance int32 Data0()
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
+    .get instance int32 XYZ.MyExn::get_Data0()
+  } // end of property MyExn::Data0
+} // end of class XYZ.MyExn
+
+.class public auto ansi serializable XYZ.A
+       extends [mscorlib]System.Object
+{
+  .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
+  .field assembly string x
+  .method public specialname rtspecialname 
+          instance void  .ctor(string x) cil managed
+  {
+    // Code size       16 (0x10)
+    .maxstack  8
+    .line 100001,100001 : 0,0 ''
+    IL_0000:  ldarg.0
+    IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
+    IL_0006:  ldarg.0
+    IL_0007:  pop
+    .line 9,9 : 12,13 ''
+    IL_0008:  ldarg.0
+    IL_0009:  ldarg.1
+    IL_000a:  stfld      string XYZ.A::x
+    .line 9,9 : 10,11 ''
+    IL_000f:  ret
+  } // end of method A::.ctor
+
+  .method public hidebysig specialname instance string 
+          get_X() cil managed
+  {
+    // Code size       7 (0x7)
+    .maxstack  8
+    .line 9,9 : 38,39 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldfld      string XYZ.A::x
+    IL_0006:  ret
+  } // end of method A::get_X
+
+  .property instance string X()
+  {
+    .get instance string XYZ.A::get_X()
+  } // end of property A::X
+} // end of class XYZ.A
+
+.class public abstract auto ansi sealed XYZ.ABC
+       extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
+         extends [mscorlib]System.Object
+         implements class [mscorlib]System.IEquatable`1,
+                    [mscorlib]System.Collections.IStructuralEquatable,
+                    class [mscorlib]System.IComparable`1,
+                    [mscorlib]System.IComparable,
+                    [mscorlib]System.Collections.IStructuralComparable
+  {
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
+                                                                                                   61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
+    .field assembly initonly int32 item
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    .method public static class XYZ.ABC/Expr 
+            NewNum(int32 item) cil managed
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                  int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  newobj     instance void XYZ.ABC/Expr::.ctor(int32)
+      IL_0006:  ret
+    } // end of method Expr::NewNum
+
+    .method assembly specialname rtspecialname 
+            instance void  .ctor(int32 item) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       14 (0xe)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
+      IL_0006:  ldarg.0
+      IL_0007:  ldarg.1
+      IL_0008:  stfld      int32 XYZ.ABC/Expr::item
+      IL_000d:  ret
+    } // end of method Expr::.ctor
+
+    .method public hidebysig instance int32 
+            get_Item() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_0006:  ret
+    } // end of method Expr::get_Item
+
+    .method public hidebysig instance int32 
+            get_Tag() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       4 (0x4)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  pop
+      IL_0002:  ldc.i4.0
+      IL_0003:  ret
+    } // end of method Expr::get_Tag
+
+    .method assembly hidebysig specialname 
+            instance object  __DebugDisplay() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       22 (0x16)
+      .maxstack  8
+      IL_0000:  ldstr      "%+0.8A"
+      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
+      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+      IL_000f:  ldarg.0
+      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+      IL_0015:  ret
+    } // end of method Expr::__DebugDisplay
+
+    .method public strict virtual instance string 
+            ToString() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       22 (0x16)
+      .maxstack  8
+      IL_0000:  ldstr      "%+A"
+      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class XYZ.ABC/Expr>::.ctor(string)
+      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+      IL_000f:  ldarg.0
+      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+      IL_0015:  ret
+    } // end of method Expr::ToString
+
+    .method public hidebysig virtual final 
+            instance int32  CompareTo(class XYZ.ABC/Expr obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       64 (0x40)
+      .maxstack  4
+      .locals init ([0] class XYZ.ABC/Expr V_0,
+               [1] class XYZ.ABC/Expr V_1,
+               [2] class [mscorlib]System.Collections.IComparer V_2,
+               [3] int32 V_3,
+               [4] int32 V_4)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0036
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  ldnull
+      IL_0008:  cgt.un
+      IL_000a:  brfalse.s  IL_0034
+
+      .line 100001,100001 : 0,0 ''
+      IL_000c:  ldarg.0
+      IL_000d:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_000e:  ldarg.0
+      IL_000f:  stloc.0
+      IL_0010:  ldarg.1
+      IL_0011:  stloc.1
+      IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
+      IL_0017:  stloc.2
+      IL_0018:  ldloc.0
+      IL_0019:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_001e:  stloc.3
+      IL_001f:  ldloc.1
+      IL_0020:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_0025:  stloc.s    V_4
+      IL_0027:  ldloc.3
+      IL_0028:  ldloc.s    V_4
+      IL_002a:  bge.s      IL_002e
+
+      .line 100001,100001 : 0,0 ''
+      IL_002c:  ldc.i4.m1
+      IL_002d:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002e:  ldloc.3
+      IL_002f:  ldloc.s    V_4
+      IL_0031:  cgt
+      IL_0033:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0034:  ldc.i4.1
+      IL_0035:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0036:  ldarg.1
+      IL_0037:  ldnull
+      IL_0038:  cgt.un
+      IL_003a:  brfalse.s  IL_003e
+
+      .line 100001,100001 : 0,0 ''
+      IL_003c:  ldc.i4.m1
+      IL_003d:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_003e:  ldc.i4.0
+      IL_003f:  ret
+    } // end of method Expr::CompareTo
+
+    .method public hidebysig virtual final 
+            instance int32  CompareTo(object obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       13 (0xd)
+      .maxstack  8
+      .line 13,13 : 14,18 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldarg.1
+      IL_0002:  unbox.any  XYZ.ABC/Expr
+      IL_0007:  callvirt   instance int32 XYZ.ABC/Expr::CompareTo(class XYZ.ABC/Expr)
+      IL_000c:  ret
+    } // end of method Expr::CompareTo
+
+    .method public hidebysig virtual final 
+            instance int32  CompareTo(object obj,
+                                      class [mscorlib]System.Collections.IComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       80 (0x50)
+      .maxstack  4
+      .locals init ([0] class XYZ.ABC/Expr V_0,
+               [1] class XYZ.ABC/Expr V_1,
+               [2] class XYZ.ABC/Expr V_2,
+               [3] class [mscorlib]System.Collections.IComparer V_3,
+               [4] int32 V_4,
+               [5] int32 V_5)
+      .line 13,13 : 14,18 ''
+      IL_0000:  ldarg.1
+      IL_0001:  unbox.any  XYZ.ABC/Expr
+      IL_0006:  stloc.0
+      IL_0007:  ldarg.0
+      IL_0008:  ldnull
+      IL_0009:  cgt.un
+      IL_000b:  brfalse.s  IL_0041
+
+      .line 100001,100001 : 0,0 ''
+      IL_000d:  ldarg.1
+      IL_000e:  unbox.any  XYZ.ABC/Expr
+      IL_0013:  ldnull
+      IL_0014:  cgt.un
+      IL_0016:  brfalse.s  IL_003f
+
+      .line 100001,100001 : 0,0 ''
+      IL_0018:  ldarg.0
+      IL_0019:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_001a:  ldarg.0
+      IL_001b:  stloc.1
+      IL_001c:  ldloc.0
+      IL_001d:  stloc.2
+      IL_001e:  ldarg.2
+      IL_001f:  stloc.3
+      IL_0020:  ldloc.1
+      IL_0021:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_0026:  stloc.s    V_4
+      IL_0028:  ldloc.2
+      IL_0029:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_002e:  stloc.s    V_5
+      IL_0030:  ldloc.s    V_4
+      IL_0032:  ldloc.s    V_5
+      IL_0034:  bge.s      IL_0038
+
+      .line 100001,100001 : 0,0 ''
+      IL_0036:  ldc.i4.m1
+      IL_0037:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0038:  ldloc.s    V_4
+      IL_003a:  ldloc.s    V_5
+      IL_003c:  cgt
+      IL_003e:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_003f:  ldc.i4.1
+      IL_0040:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0041:  ldarg.1
+      IL_0042:  unbox.any  XYZ.ABC/Expr
+      IL_0047:  ldnull
+      IL_0048:  cgt.un
+      IL_004a:  brfalse.s  IL_004e
+
+      .line 100001,100001 : 0,0 ''
+      IL_004c:  ldc.i4.m1
+      IL_004d:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_004e:  ldc.i4.0
+      IL_004f:  ret
+    } // end of method Expr::CompareTo
+
+    .method public hidebysig virtual final 
+            instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       41 (0x29)
+      .maxstack  7
+      .locals init ([0] int32 V_0,
+               [1] class XYZ.ABC/Expr V_1,
+               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0027
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldc.i4.0
+      IL_0007:  stloc.0
+      IL_0008:  ldarg.0
+      IL_0009:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_000a:  ldarg.0
+      IL_000b:  stloc.1
+      IL_000c:  ldc.i4.0
+      IL_000d:  stloc.0
+      IL_000e:  ldc.i4     0x9e3779b9
+      IL_0013:  ldarg.1
+      IL_0014:  stloc.2
+      IL_0015:  ldloc.1
+      IL_0016:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_001b:  ldloc.0
+      IL_001c:  ldc.i4.6
+      IL_001d:  shl
+      IL_001e:  ldloc.0
+      IL_001f:  ldc.i4.2
+      IL_0020:  shr
+      IL_0021:  add
+      IL_0022:  add
+      IL_0023:  add
+      IL_0024:  stloc.0
+      IL_0025:  ldloc.0
+      IL_0026:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0027:  ldc.i4.0
+      IL_0028:  ret
+    } // end of method Expr::GetHashCode
+
+    .method public hidebysig virtual final 
+            instance int32  GetHashCode() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       12 (0xc)
+      .maxstack  8
+      .line 13,13 : 14,18 ''
+      IL_0000:  ldarg.0
+      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+      IL_0006:  callvirt   instance int32 XYZ.ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+      IL_000b:  ret
+    } // end of method Expr::GetHashCode
+
+    .method public hidebysig virtual final 
+            instance bool  Equals(object obj,
+                                  class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       52 (0x34)
+      .maxstack  4
+      .locals init ([0] class XYZ.ABC/Expr V_0,
+               [1] class XYZ.ABC/Expr V_1,
+               [2] class XYZ.ABC/Expr V_2,
+               [3] class XYZ.ABC/Expr V_3,
+               [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_002c
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  isinst     XYZ.ABC/Expr
+      IL_000c:  stloc.0
+      IL_000d:  ldloc.0
+      IL_000e:  brfalse.s  IL_002a
+
+      .line 100001,100001 : 0,0 ''
+      IL_0010:  ldloc.0
+      IL_0011:  stloc.1
+      IL_0012:  ldarg.0
+      IL_0013:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_0014:  ldarg.0
+      IL_0015:  stloc.2
+      IL_0016:  ldloc.1
+      IL_0017:  stloc.3
+      IL_0018:  ldarg.2
+      IL_0019:  stloc.s    V_4
+      IL_001b:  ldloc.2
+      IL_001c:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_0021:  ldloc.3
+      IL_0022:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_0027:  ceq
+      IL_0029:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002a:  ldc.i4.0
+      IL_002b:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002c:  ldarg.1
+      IL_002d:  ldnull
+      IL_002e:  cgt.un
+      IL_0030:  ldc.i4.0
+      IL_0031:  ceq
+      IL_0033:  ret
+    } // end of method Expr::Equals
+
+    .method public hidebysig virtual final 
+            instance bool  Equals(class XYZ.ABC/Expr obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       43 (0x2b)
+      .maxstack  4
+      .locals init ([0] class XYZ.ABC/Expr V_0,
+               [1] class XYZ.ABC/Expr V_1)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0023
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  ldnull
+      IL_0008:  cgt.un
+      IL_000a:  brfalse.s  IL_0021
+
+      .line 100001,100001 : 0,0 ''
+      IL_000c:  ldarg.0
+      IL_000d:  pop
+      .line 100001,100001 : 0,0 ''
+      IL_000e:  ldarg.0
+      IL_000f:  stloc.0
+      IL_0010:  ldarg.1
+      IL_0011:  stloc.1
+      IL_0012:  ldloc.0
+      IL_0013:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_0018:  ldloc.1
+      IL_0019:  ldfld      int32 XYZ.ABC/Expr::item
+      IL_001e:  ceq
+      IL_0020:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0021:  ldc.i4.0
+      IL_0022:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0023:  ldarg.1
+      IL_0024:  ldnull
+      IL_0025:  cgt.un
+      IL_0027:  ldc.i4.0
+      IL_0028:  ceq
+      IL_002a:  ret
+    } // end of method Expr::Equals
+
+    .method public hidebysig virtual final 
+            instance bool  Equals(object obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       20 (0x14)
+      .maxstack  4
+      .locals init ([0] class XYZ.ABC/Expr V_0)
+      .line 13,13 : 14,18 ''
+      IL_0000:  ldarg.1
+      IL_0001:  isinst     XYZ.ABC/Expr
+      IL_0006:  stloc.0
+      IL_0007:  ldloc.0
+      IL_0008:  brfalse.s  IL_0012
+
+      .line 100001,100001 : 0,0 ''
+      IL_000a:  ldarg.0
+      IL_000b:  ldloc.0
+      IL_000c:  callvirt   instance bool XYZ.ABC/Expr::Equals(class XYZ.ABC/Expr)
+      IL_0011:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0012:  ldc.i4.0
+      IL_0013:  ret
+    } // end of method Expr::Equals
+
+    .property instance int32 Tag()
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+      .get instance int32 XYZ.ABC/Expr::get_Tag()
+    } // end of property Expr::Tag
+    .property instance int32 Item()
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                  int32,
+                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      .get instance int32 XYZ.ABC/Expr::get_Item()
+    } // end of property Expr::Item
+  } // end of class Expr
+
+  .class auto ansi serializable nested public beforefieldinit MyExn
+         extends [mscorlib]System.Exception
+         implements [mscorlib]System.Collections.IStructuralEquatable
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
+    .field assembly int32 Data0@
+    .method public specialname rtspecialname 
+            instance void  .ctor(int32 data0) cil managed
+    {
+      // Code size       14 (0xe)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+      IL_0006:  ldarg.0
+      IL_0007:  ldarg.1
+      IL_0008:  stfld      int32 XYZ.ABC/MyExn::Data0@
+      IL_000d:  ret
+    } // end of method MyExn::.ctor
+
+    .method public specialname rtspecialname 
+            instance void  .ctor() cil managed
+    {
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+      IL_0006:  ret
+    } // end of method MyExn::.ctor
+
+    .method family specialname rtspecialname 
+            instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
+                                 valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
+    {
+      // Code size       9 (0x9)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  ldarg.1
+      IL_0002:  ldarg.2
+      IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
+                                                                           valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
+      IL_0008:  ret
+    } // end of method MyExn::.ctor
+
+    .method public hidebysig specialname 
+            instance int32  get_Data0() cil managed
+    {
+      // Code size       7 (0x7)
+      .maxstack  8
+      IL_0000:  ldarg.0
+      IL_0001:  ldfld      int32 XYZ.ABC/MyExn::Data0@
+      IL_0006:  ret
+    } // end of method MyExn::get_Data0
+
+    .method public hidebysig virtual instance int32 
+            GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       40 (0x28)
+      .maxstack  7
+      .locals init ([0] int32 V_0,
+               [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0026
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldc.i4.0
+      IL_0007:  stloc.0
+      IL_0008:  ldc.i4     0x9e3779b9
+      IL_000d:  ldarg.1
+      IL_000e:  stloc.1
+      IL_000f:  ldarg.0
+      IL_0010:  castclass  XYZ.ABC/MyExn
+      IL_0015:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
+      IL_001a:  ldloc.0
+      IL_001b:  ldc.i4.6
+      IL_001c:  shl
+      IL_001d:  ldloc.0
+      IL_001e:  ldc.i4.2
+      IL_001f:  shr
+      IL_0020:  add
+      IL_0021:  add
+      IL_0022:  add
+      IL_0023:  stloc.0
+      IL_0024:  ldloc.0
+      IL_0025:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0026:  ldc.i4.0
+      IL_0027:  ret
+    } // end of method MyExn::GetHashCode
+
+    .method public hidebysig virtual instance int32 
+            GetHashCode() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       12 (0xc)
+      .maxstack  8
+      .line 14,14 : 19,24 ''
+      IL_0000:  ldarg.0
+      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+      IL_0006:  callvirt   instance int32 XYZ.ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+      IL_000b:  ret
+    } // end of method MyExn::GetHashCode
+
+    .method public hidebysig virtual instance bool 
+            Equals(object obj,
+                   class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       67 (0x43)
+      .maxstack  4
+      .locals init ([0] class [mscorlib]System.Exception V_0,
+               [1] class [mscorlib]System.Exception V_1,
+               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_003b
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  isinst     [mscorlib]System.Exception
+      IL_000c:  stloc.0
+      IL_000d:  ldloc.0
+      IL_000e:  brfalse.s  IL_0039
+
+      .line 100001,100001 : 0,0 ''
+      IL_0010:  ldloc.0
+      IL_0011:  stloc.1
+      IL_0012:  ldloc.0
+      IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+      IL_0018:  brtrue.s   IL_001c
+
+      IL_001a:  br.s       IL_0037
+
+      .line 100001,100001 : 0,0 ''
+      IL_001c:  ldarg.2
+      IL_001d:  stloc.2
+      IL_001e:  ldarg.0
+      IL_001f:  castclass  XYZ.ABC/MyExn
+      IL_0024:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
+      IL_0029:  ldloc.1
+      IL_002a:  castclass  XYZ.ABC/MyExn
+      IL_002f:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
+      IL_0034:  ceq
+      IL_0036:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0037:  ldc.i4.0
+      IL_0038:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0039:  ldc.i4.0
+      IL_003a:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_003b:  ldarg.1
+      IL_003c:  ldnull
+      IL_003d:  cgt.un
+      IL_003f:  ldc.i4.0
+      IL_0040:  ceq
+      IL_0042:  ret
+    } // end of method MyExn::Equals
+
+    .method public hidebysig instance bool 
+            Equals(class [mscorlib]System.Exception obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       59 (0x3b)
+      .maxstack  8
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldnull
+      IL_0002:  cgt.un
+      IL_0004:  brfalse.s  IL_0033
+
+      .line 100001,100001 : 0,0 ''
+      IL_0006:  ldarg.1
+      IL_0007:  ldnull
+      IL_0008:  cgt.un
+      IL_000a:  brfalse.s  IL_0031
+
+      .line 100001,100001 : 0,0 ''
+      IL_000c:  ldarg.1
+      IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+      IL_0012:  brtrue.s   IL_0016
+
+      IL_0014:  br.s       IL_002f
+
+      .line 100001,100001 : 0,0 ''
+      IL_0016:  ldarg.0
+      IL_0017:  castclass  XYZ.ABC/MyExn
+      IL_001c:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
+      IL_0021:  ldarg.1
+      IL_0022:  castclass  XYZ.ABC/MyExn
+      IL_0027:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
+      IL_002c:  ceq
+      IL_002e:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_002f:  ldc.i4.0
+      IL_0030:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0031:  ldc.i4.0
+      IL_0032:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0033:  ldarg.1
+      IL_0034:  ldnull
+      IL_0035:  cgt.un
+      IL_0037:  ldc.i4.0
+      IL_0038:  ceq
+      IL_003a:  ret
+    } // end of method MyExn::Equals
+
+    .method public hidebysig virtual instance bool 
+            Equals(object obj) cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       20 (0x14)
+      .maxstack  4
+      .locals init ([0] class [mscorlib]System.Exception V_0)
+      .line 14,14 : 19,24 ''
+      IL_0000:  ldarg.1
+      IL_0001:  isinst     [mscorlib]System.Exception
+      IL_0006:  stloc.0
+      IL_0007:  ldloc.0
+      IL_0008:  brfalse.s  IL_0012
+
+      .line 100001,100001 : 0,0 ''
+      IL_000a:  ldarg.0
+      IL_000b:  ldloc.0
+      IL_000c:  callvirt   instance bool XYZ.ABC/MyExn::Equals(class [mscorlib]System.Exception)
+      IL_0011:  ret
+
+      .line 100001,100001 : 0,0 ''
+      IL_0012:  ldc.i4.0
+      IL_0013:  ret
+    } // end of method MyExn::Equals
+
+    .property instance int32 Data0()
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
+      .get instance int32 XYZ.ABC/MyExn::get_Data0()
+    } // end of property MyExn::Data0
+  } // end of class MyExn
+
+  .class auto ansi serializable nested public A
+         extends [mscorlib]System.Object
+  {
+    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
+    .field assembly string x
+    .method public specialname rtspecialname 
+            instance void  .ctor(string x) cil managed
+    {
+      // Code size       16 (0x10)
+      .maxstack  8
+      .line 100001,100001 : 0,0 ''
+      IL_0000:  ldarg.0
+      IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
+      IL_0006:  ldarg.0
+      IL_0007:  pop
+      .line 15,15 : 16,17 ''
+      IL_0008:  ldarg.0
+      IL_0009:  ldarg.1
+      IL_000a:  stfld      string XYZ.ABC/A::x
+      .line 15,15 : 14,15 ''
+      IL_000f:  ret
+    } // end of method A::.ctor
+
+    .method public hidebysig specialname 
+            instance string  get_X() cil managed
+    {
+      // Code size       7 (0x7)
+      .maxstack  8
+      .line 15,15 : 42,43 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldfld      string XYZ.ABC/A::x
+      IL_0006:  ret
+    } // end of method A::get_X
+
+    .property instance string X()
+    {
+      .get instance string XYZ.ABC/A::get_X()
+    } // end of property A::X
+  } // end of class A
+
+  .class abstract auto ansi sealed nested public ABC
+         extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
+           extends [mscorlib]System.Object
+           implements class [mscorlib]System.IEquatable`1,
+                      [mscorlib]System.Collections.IStructuralEquatable,
+                      class [mscorlib]System.IComparable`1,
+                      [mscorlib]System.IComparable,
+                      [mscorlib]System.Collections.IStructuralComparable
+    {
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
+                                                                                                     61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
+      .field assembly initonly int32 item
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      .method public static class XYZ.ABC/ABC/Expr 
+              NewNum(int32 item) cil managed
+      {
+        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                    int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  newobj     instance void XYZ.ABC/ABC/Expr::.ctor(int32)
+        IL_0006:  ret
+      } // end of method Expr::NewNum
+
+      .method assembly specialname rtspecialname 
+              instance void  .ctor(int32 item) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       14 (0xe)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
+        IL_0006:  ldarg.0
+        IL_0007:  ldarg.1
+        IL_0008:  stfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_000d:  ret
+      } // end of method Expr::.ctor
+
+      .method public hidebysig instance int32 
+              get_Item() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_0006:  ret
+      } // end of method Expr::get_Item
+
+      .method public hidebysig instance int32 
+              get_Tag() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       4 (0x4)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  pop
+        IL_0002:  ldc.i4.0
+        IL_0003:  ret
+      } // end of method Expr::get_Tag
+
+      .method assembly hidebysig specialname 
+              instance object  __DebugDisplay() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       22 (0x16)
+        .maxstack  8
+        IL_0000:  ldstr      "%+0.8A"
+        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
+        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+        IL_000f:  ldarg.0
+        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+        IL_0015:  ret
+      } // end of method Expr::__DebugDisplay
+
+      .method public strict virtual instance string 
+              ToString() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       22 (0x16)
+        .maxstack  8
+        IL_0000:  ldstr      "%+A"
+        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class XYZ.ABC/ABC/Expr>::.ctor(string)
+        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
+        IL_000f:  ldarg.0
+        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
+        IL_0015:  ret
+      } // end of method Expr::ToString
+
+      .method public hidebysig virtual final 
+              instance int32  CompareTo(class XYZ.ABC/ABC/Expr obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       64 (0x40)
+        .maxstack  4
+        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
+                 [1] class XYZ.ABC/ABC/Expr V_1,
+                 [2] class [mscorlib]System.Collections.IComparer V_2,
+                 [3] int32 V_3,
+                 [4] int32 V_4)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0036
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  ldnull
+        IL_0008:  cgt.un
+        IL_000a:  brfalse.s  IL_0034
+
+        .line 100001,100001 : 0,0 ''
+        IL_000c:  ldarg.0
+        IL_000d:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_000e:  ldarg.0
+        IL_000f:  stloc.0
+        IL_0010:  ldarg.1
+        IL_0011:  stloc.1
+        IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
+        IL_0017:  stloc.2
+        IL_0018:  ldloc.0
+        IL_0019:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_001e:  stloc.3
+        IL_001f:  ldloc.1
+        IL_0020:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_0025:  stloc.s    V_4
+        IL_0027:  ldloc.3
+        IL_0028:  ldloc.s    V_4
+        IL_002a:  bge.s      IL_002e
+
+        .line 100001,100001 : 0,0 ''
+        IL_002c:  ldc.i4.m1
+        IL_002d:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002e:  ldloc.3
+        IL_002f:  ldloc.s    V_4
+        IL_0031:  cgt
+        IL_0033:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0034:  ldc.i4.1
+        IL_0035:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0036:  ldarg.1
+        IL_0037:  ldnull
+        IL_0038:  cgt.un
+        IL_003a:  brfalse.s  IL_003e
+
+        .line 100001,100001 : 0,0 ''
+        IL_003c:  ldc.i4.m1
+        IL_003d:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_003e:  ldc.i4.0
+        IL_003f:  ret
+      } // end of method Expr::CompareTo
+
+      .method public hidebysig virtual final 
+              instance int32  CompareTo(object obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       13 (0xd)
+        .maxstack  8
+        .line 23,23 : 18,22 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldarg.1
+        IL_0002:  unbox.any  XYZ.ABC/ABC/Expr
+        IL_0007:  callvirt   instance int32 XYZ.ABC/ABC/Expr::CompareTo(class XYZ.ABC/ABC/Expr)
+        IL_000c:  ret
+      } // end of method Expr::CompareTo
+
+      .method public hidebysig virtual final 
+              instance int32  CompareTo(object obj,
+                                        class [mscorlib]System.Collections.IComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       80 (0x50)
+        .maxstack  4
+        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
+                 [1] class XYZ.ABC/ABC/Expr V_1,
+                 [2] class XYZ.ABC/ABC/Expr V_2,
+                 [3] class [mscorlib]System.Collections.IComparer V_3,
+                 [4] int32 V_4,
+                 [5] int32 V_5)
+        .line 23,23 : 18,22 ''
+        IL_0000:  ldarg.1
+        IL_0001:  unbox.any  XYZ.ABC/ABC/Expr
+        IL_0006:  stloc.0
+        IL_0007:  ldarg.0
+        IL_0008:  ldnull
+        IL_0009:  cgt.un
+        IL_000b:  brfalse.s  IL_0041
+
+        .line 100001,100001 : 0,0 ''
+        IL_000d:  ldarg.1
+        IL_000e:  unbox.any  XYZ.ABC/ABC/Expr
+        IL_0013:  ldnull
+        IL_0014:  cgt.un
+        IL_0016:  brfalse.s  IL_003f
+
+        .line 100001,100001 : 0,0 ''
+        IL_0018:  ldarg.0
+        IL_0019:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_001a:  ldarg.0
+        IL_001b:  stloc.1
+        IL_001c:  ldloc.0
+        IL_001d:  stloc.2
+        IL_001e:  ldarg.2
+        IL_001f:  stloc.3
+        IL_0020:  ldloc.1
+        IL_0021:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_0026:  stloc.s    V_4
+        IL_0028:  ldloc.2
+        IL_0029:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_002e:  stloc.s    V_5
+        IL_0030:  ldloc.s    V_4
+        IL_0032:  ldloc.s    V_5
+        IL_0034:  bge.s      IL_0038
+
+        .line 100001,100001 : 0,0 ''
+        IL_0036:  ldc.i4.m1
+        IL_0037:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0038:  ldloc.s    V_4
+        IL_003a:  ldloc.s    V_5
+        IL_003c:  cgt
+        IL_003e:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_003f:  ldc.i4.1
+        IL_0040:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0041:  ldarg.1
+        IL_0042:  unbox.any  XYZ.ABC/ABC/Expr
+        IL_0047:  ldnull
+        IL_0048:  cgt.un
+        IL_004a:  brfalse.s  IL_004e
+
+        .line 100001,100001 : 0,0 ''
+        IL_004c:  ldc.i4.m1
+        IL_004d:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_004e:  ldc.i4.0
+        IL_004f:  ret
+      } // end of method Expr::CompareTo
+
+      .method public hidebysig virtual final 
+              instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       41 (0x29)
+        .maxstack  7
+        .locals init ([0] int32 V_0,
+                 [1] class XYZ.ABC/ABC/Expr V_1,
+                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0027
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldc.i4.0
+        IL_0007:  stloc.0
+        IL_0008:  ldarg.0
+        IL_0009:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_000a:  ldarg.0
+        IL_000b:  stloc.1
+        IL_000c:  ldc.i4.0
+        IL_000d:  stloc.0
+        IL_000e:  ldc.i4     0x9e3779b9
+        IL_0013:  ldarg.1
+        IL_0014:  stloc.2
+        IL_0015:  ldloc.1
+        IL_0016:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_001b:  ldloc.0
+        IL_001c:  ldc.i4.6
+        IL_001d:  shl
+        IL_001e:  ldloc.0
+        IL_001f:  ldc.i4.2
+        IL_0020:  shr
+        IL_0021:  add
+        IL_0022:  add
+        IL_0023:  add
+        IL_0024:  stloc.0
+        IL_0025:  ldloc.0
+        IL_0026:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0027:  ldc.i4.0
+        IL_0028:  ret
+      } // end of method Expr::GetHashCode
+
+      .method public hidebysig virtual final 
+              instance int32  GetHashCode() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       12 (0xc)
+        .maxstack  8
+        .line 23,23 : 18,22 ''
+        IL_0000:  ldarg.0
+        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+        IL_0006:  callvirt   instance int32 XYZ.ABC/ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+        IL_000b:  ret
+      } // end of method Expr::GetHashCode
+
+      .method public hidebysig virtual final 
+              instance bool  Equals(object obj,
+                                    class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       52 (0x34)
+        .maxstack  4
+        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
+                 [1] class XYZ.ABC/ABC/Expr V_1,
+                 [2] class XYZ.ABC/ABC/Expr V_2,
+                 [3] class XYZ.ABC/ABC/Expr V_3,
+                 [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_002c
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  isinst     XYZ.ABC/ABC/Expr
+        IL_000c:  stloc.0
+        IL_000d:  ldloc.0
+        IL_000e:  brfalse.s  IL_002a
+
+        .line 100001,100001 : 0,0 ''
+        IL_0010:  ldloc.0
+        IL_0011:  stloc.1
+        IL_0012:  ldarg.0
+        IL_0013:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_0014:  ldarg.0
+        IL_0015:  stloc.2
+        IL_0016:  ldloc.1
+        IL_0017:  stloc.3
+        IL_0018:  ldarg.2
+        IL_0019:  stloc.s    V_4
+        IL_001b:  ldloc.2
+        IL_001c:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_0021:  ldloc.3
+        IL_0022:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_0027:  ceq
+        IL_0029:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002a:  ldc.i4.0
+        IL_002b:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002c:  ldarg.1
+        IL_002d:  ldnull
+        IL_002e:  cgt.un
+        IL_0030:  ldc.i4.0
+        IL_0031:  ceq
+        IL_0033:  ret
+      } // end of method Expr::Equals
+
+      .method public hidebysig virtual final 
+              instance bool  Equals(class XYZ.ABC/ABC/Expr obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       43 (0x2b)
+        .maxstack  4
+        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
+                 [1] class XYZ.ABC/ABC/Expr V_1)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0023
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  ldnull
+        IL_0008:  cgt.un
+        IL_000a:  brfalse.s  IL_0021
+
+        .line 100001,100001 : 0,0 ''
+        IL_000c:  ldarg.0
+        IL_000d:  pop
+        .line 100001,100001 : 0,0 ''
+        IL_000e:  ldarg.0
+        IL_000f:  stloc.0
+        IL_0010:  ldarg.1
+        IL_0011:  stloc.1
+        IL_0012:  ldloc.0
+        IL_0013:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_0018:  ldloc.1
+        IL_0019:  ldfld      int32 XYZ.ABC/ABC/Expr::item
+        IL_001e:  ceq
+        IL_0020:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0021:  ldc.i4.0
+        IL_0022:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0023:  ldarg.1
+        IL_0024:  ldnull
+        IL_0025:  cgt.un
+        IL_0027:  ldc.i4.0
+        IL_0028:  ceq
+        IL_002a:  ret
+      } // end of method Expr::Equals
+
+      .method public hidebysig virtual final 
+              instance bool  Equals(object obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       20 (0x14)
+        .maxstack  4
+        .locals init ([0] class XYZ.ABC/ABC/Expr V_0)
+        .line 23,23 : 18,22 ''
+        IL_0000:  ldarg.1
+        IL_0001:  isinst     XYZ.ABC/ABC/Expr
+        IL_0006:  stloc.0
+        IL_0007:  ldloc.0
+        IL_0008:  brfalse.s  IL_0012
+
+        .line 100001,100001 : 0,0 ''
+        IL_000a:  ldarg.0
+        IL_000b:  ldloc.0
+        IL_000c:  callvirt   instance bool XYZ.ABC/ABC/Expr::Equals(class XYZ.ABC/ABC/Expr)
+        IL_0011:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0012:  ldc.i4.0
+        IL_0013:  ret
+      } // end of method Expr::Equals
+
+      .property instance int32 Tag()
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+        .get instance int32 XYZ.ABC/ABC/Expr::get_Tag()
+      } // end of property Expr::Tag
+      .property instance int32 Item()
+      {
+        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                    int32,
+                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+        .get instance int32 XYZ.ABC/ABC/Expr::get_Item()
+      } // end of property Expr::Item
+    } // end of class Expr
+
+    .class auto ansi serializable nested public beforefieldinit MyExn
+           extends [mscorlib]System.Exception
+           implements [mscorlib]System.Collections.IStructuralEquatable
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
+      .field assembly int32 Data0@
+      .method public specialname rtspecialname 
+              instance void  .ctor(int32 data0) cil managed
+      {
+        // Code size       14 (0xe)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+        IL_0006:  ldarg.0
+        IL_0007:  ldarg.1
+        IL_0008:  stfld      int32 XYZ.ABC/ABC/MyExn::Data0@
+        IL_000d:  ret
+      } // end of method MyExn::.ctor
+
+      .method public specialname rtspecialname 
+              instance void  .ctor() cil managed
+      {
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
+        IL_0006:  ret
+      } // end of method MyExn::.ctor
+
+      .method family specialname rtspecialname 
+              instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
+                                   valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
+      {
+        // Code size       9 (0x9)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  ldarg.1
+        IL_0002:  ldarg.2
+        IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
+                                                                             valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
+        IL_0008:  ret
+      } // end of method MyExn::.ctor
+
+      .method public hidebysig specialname 
+              instance int32  get_Data0() cil managed
+      {
+        // Code size       7 (0x7)
+        .maxstack  8
+        IL_0000:  ldarg.0
+        IL_0001:  ldfld      int32 XYZ.ABC/ABC/MyExn::Data0@
+        IL_0006:  ret
+      } // end of method MyExn::get_Data0
+
+      .method public hidebysig virtual instance int32 
+              GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       40 (0x28)
+        .maxstack  7
+        .locals init ([0] int32 V_0,
+                 [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0026
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldc.i4.0
+        IL_0007:  stloc.0
+        IL_0008:  ldc.i4     0x9e3779b9
+        IL_000d:  ldarg.1
+        IL_000e:  stloc.1
+        IL_000f:  ldarg.0
+        IL_0010:  castclass  XYZ.ABC/ABC/MyExn
+        IL_0015:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
+        IL_001a:  ldloc.0
+        IL_001b:  ldc.i4.6
+        IL_001c:  shl
+        IL_001d:  ldloc.0
+        IL_001e:  ldc.i4.2
+        IL_001f:  shr
+        IL_0020:  add
+        IL_0021:  add
+        IL_0022:  add
+        IL_0023:  stloc.0
+        IL_0024:  ldloc.0
+        IL_0025:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0026:  ldc.i4.0
+        IL_0027:  ret
+      } // end of method MyExn::GetHashCode
+
+      .method public hidebysig virtual instance int32 
+              GetHashCode() cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       12 (0xc)
+        .maxstack  8
+        .line 24,24 : 23,28 ''
+        IL_0000:  ldarg.0
+        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
+        IL_0006:  callvirt   instance int32 XYZ.ABC/ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
+        IL_000b:  ret
+      } // end of method MyExn::GetHashCode
+
+      .method public hidebysig virtual instance bool 
+              Equals(object obj,
+                     class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       67 (0x43)
+        .maxstack  4
+        .locals init ([0] class [mscorlib]System.Exception V_0,
+                 [1] class [mscorlib]System.Exception V_1,
+                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_003b
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  isinst     [mscorlib]System.Exception
+        IL_000c:  stloc.0
+        IL_000d:  ldloc.0
+        IL_000e:  brfalse.s  IL_0039
+
+        .line 100001,100001 : 0,0 ''
+        IL_0010:  ldloc.0
+        IL_0011:  stloc.1
+        IL_0012:  ldloc.0
+        IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+        IL_0018:  brtrue.s   IL_001c
+
+        IL_001a:  br.s       IL_0037
+
+        .line 100001,100001 : 0,0 ''
+        IL_001c:  ldarg.2
+        IL_001d:  stloc.2
+        IL_001e:  ldarg.0
+        IL_001f:  castclass  XYZ.ABC/ABC/MyExn
+        IL_0024:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
+        IL_0029:  ldloc.1
+        IL_002a:  castclass  XYZ.ABC/ABC/MyExn
+        IL_002f:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
+        IL_0034:  ceq
+        IL_0036:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0037:  ldc.i4.0
+        IL_0038:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0039:  ldc.i4.0
+        IL_003a:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_003b:  ldarg.1
+        IL_003c:  ldnull
+        IL_003d:  cgt.un
+        IL_003f:  ldc.i4.0
+        IL_0040:  ceq
+        IL_0042:  ret
+      } // end of method MyExn::Equals
+
+      .method public hidebysig instance bool 
+              Equals(class [mscorlib]System.Exception obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       59 (0x3b)
+        .maxstack  8
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldnull
+        IL_0002:  cgt.un
+        IL_0004:  brfalse.s  IL_0033
+
+        .line 100001,100001 : 0,0 ''
+        IL_0006:  ldarg.1
+        IL_0007:  ldnull
+        IL_0008:  cgt.un
+        IL_000a:  brfalse.s  IL_0031
+
+        .line 100001,100001 : 0,0 ''
+        IL_000c:  ldarg.1
+        IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
+        IL_0012:  brtrue.s   IL_0016
+
+        IL_0014:  br.s       IL_002f
+
+        .line 100001,100001 : 0,0 ''
+        IL_0016:  ldarg.0
+        IL_0017:  castclass  XYZ.ABC/ABC/MyExn
+        IL_001c:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
+        IL_0021:  ldarg.1
+        IL_0022:  castclass  XYZ.ABC/ABC/MyExn
+        IL_0027:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
+        IL_002c:  ceq
+        IL_002e:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_002f:  ldc.i4.0
+        IL_0030:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0031:  ldc.i4.0
+        IL_0032:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0033:  ldarg.1
+        IL_0034:  ldnull
+        IL_0035:  cgt.un
+        IL_0037:  ldc.i4.0
+        IL_0038:  ceq
+        IL_003a:  ret
+      } // end of method MyExn::Equals
+
+      .method public hidebysig virtual instance bool 
+              Equals(object obj) cil managed
+      {
+        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+        // Code size       20 (0x14)
+        .maxstack  4
+        .locals init ([0] class [mscorlib]System.Exception V_0)
+        .line 24,24 : 23,28 ''
+        IL_0000:  ldarg.1
+        IL_0001:  isinst     [mscorlib]System.Exception
+        IL_0006:  stloc.0
+        IL_0007:  ldloc.0
+        IL_0008:  brfalse.s  IL_0012
+
+        .line 100001,100001 : 0,0 ''
+        IL_000a:  ldarg.0
+        IL_000b:  ldloc.0
+        IL_000c:  callvirt   instance bool XYZ.ABC/ABC/MyExn::Equals(class [mscorlib]System.Exception)
+        IL_0011:  ret
+
+        .line 100001,100001 : 0,0 ''
+        IL_0012:  ldc.i4.0
+        IL_0013:  ret
+      } // end of method MyExn::Equals
+
+      .property instance int32 Data0()
+      {
+        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
+                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
+        .get instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
+      } // end of property MyExn::Data0
+    } // end of class MyExn
+
+    .class auto ansi serializable nested public A
+           extends [mscorlib]System.Object
+    {
+      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
+      .field assembly string x
+      .method public specialname rtspecialname 
+              instance void  .ctor(string x) cil managed
+      {
+        // Code size       16 (0x10)
+        .maxstack  8
+        .line 100001,100001 : 0,0 ''
+        IL_0000:  ldarg.0
+        IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
+        IL_0006:  ldarg.0
+        IL_0007:  pop
+        .line 25,25 : 20,21 ''
+        IL_0008:  ldarg.0
+        IL_0009:  ldarg.1
+        IL_000a:  stfld      string XYZ.ABC/ABC/A::x
+        .line 25,25 : 18,19 ''
+        IL_000f:  ret
+      } // end of method A::.ctor
+
+      .method public hidebysig specialname 
+              instance string  get_X() cil managed
+      {
+        // Code size       7 (0x7)
+        .maxstack  8
+        .line 25,25 : 46,47 ''
+        IL_0000:  ldarg.0
+        IL_0001:  ldfld      string XYZ.ABC/ABC/A::x
+        IL_0006:  ret
+      } // end of method A::get_X
+
+      .property instance string X()
+      {
+        .get instance string XYZ.ABC/ABC/A::get_X()
+      } // end of property A::X
+    } // end of class A
+
+    .method public static int32  'add'(int32 x,
+                                       int32 y) 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 ) 
+      // Code size       4 (0x4)
+      .maxstack  8
+      .line 28,28 : 27,32 ''
+      IL_0000:  ldarg.0
+      IL_0001:  ldarg.1
+      IL_0002:  add
+      IL_0003:  ret
+    } // end of method ABC::'add'
+
+    .method public specialname static string 
+            get_greeting() cil managed
+    {
+      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+      // Code size       6 (0x6)
+      .maxstack  8
+      IL_0000:  ldstr      "hello"
+      IL_0005:  ret
+    } // end of method ABC::get_greeting
+
+    .property string greeting()
+    {
+      .get string XYZ.ABC/ABC::get_greeting()
+    } // end of property ABC::greeting
+  } // end of class ABC
+
+  .method public static int32  'add'(int32 x,
+                                     int32 y) 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 ) 
+    // Code size       4 (0x4)
+    .maxstack  8
+    .line 18,18 : 23,28 ''
+    IL_0000:  ldarg.0
+    IL_0001:  ldarg.1
+    IL_0002:  add
+    IL_0003:  ret
+  } // end of method ABC::'add'
+
+  .method public specialname static string 
+          get_greeting() cil managed
+  {
+    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+    // Code size       6 (0x6)
+    .maxstack  8
+    IL_0000:  ldstr      "hello"
+    IL_0005:  ret
+  } // end of method ABC::get_greeting
+
+  .property string greeting()
+  {
+    .get string XYZ.ABC::get_greeting()
+  } // end of property ABC::greeting
+} // end of class XYZ.ABC
+
+.class private abstract auto ansi sealed ''.$ToplevelNamespace
+       extends [mscorlib]System.Object
+{
+  .field static assembly int32 init@
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
+  .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
+  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
+  .method private specialname rtspecialname static 
+          void  .cctor() cil managed
+  {
+    // Code size       13 (0xd)
+    .maxstack  3
+    .locals init ([0] string greeting,
+             [1] string V_1)
+    .line 19,19 : 9,31 ''
+    IL_0000:  call       string XYZ.ABC::get_greeting()
+    IL_0005:  stloc.0
+    .line 29,29 : 13,35 ''
+    IL_0006:  call       string XYZ.ABC/ABC::get_greeting()
+    IL_000b:  stloc.1
+    IL_000c:  ret
+  } // end of method $ToplevelNamespace::.cctor
+
+} // end of class ''.$ToplevelNamespace
+
+
+// =============================================================
+
+// *********** DISASSEMBLY COMPLETE ***********************
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
index c3bb349428a..2634d93ba08 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000210
 }
+.mresource public FSharpSignatureDataB.SteppingMatch01
+{
+  // Offset: 0x00000218 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.SteppingMatch01
 {
-  // Offset: 0x00000218 Length: 0x0000007A
+  // Offset: 0x00000220 Length: 0x0000007A
 }
 .module SteppingMatch01.dll
-// MVID: {60B68B90-ABFD-13F6-A745-0383908BB660}
+// MVID: {60BF8367-ABFD-13F6-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06940000
+// Image base: 0x07340000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
index 21138ae19ab..f5412aba138 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000210
 }
+.mresource public FSharpSignatureDataB.SteppingMatch02
+{
+  // Offset: 0x00000218 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.SteppingMatch02
 {
-  // Offset: 0x00000218 Length: 0x0000007A
+  // Offset: 0x00000220 Length: 0x0000007A
 }
 .module SteppingMatch02.dll
-// MVID: {60B68B90-CAC2-C63D-A745-0383908BB660}
+// MVID: {60BF8367-CAC2-C63D-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05330000
+// Image base: 0x07340000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
index 2413a566d87..54bb689193d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000225
 }
+.mresource public FSharpSignatureDataB.SteppingMatch03
+{
+  // Offset: 0x00000230 Length: 0x00000003
+}
 .mresource public FSharpOptimizationData.SteppingMatch03
 {
-  // Offset: 0x00000230 Length: 0x0000007A
+  // Offset: 0x00000238 Length: 0x0000007A
 }
 .module SteppingMatch03.dll
-// MVID: {60B68B90-4E87-D110-A745-0383908BB660}
+// MVID: {60BF8367-4E87-D110-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07380000
+// Image base: 0x04DA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
index df2a0c23809..67cca9075a7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000226
 }
+.mresource public FSharpSignatureDataB.SteppingMatch04
+{
+  // Offset: 0x00000230 Length: 0x00000003
+}
 .mresource public FSharpOptimizationData.SteppingMatch04
 {
-  // Offset: 0x00000230 Length: 0x0000007B
+  // Offset: 0x00000238 Length: 0x0000007B
 }
 .module SteppingMatch04.dll
-// MVID: {60B68B90-6D4C-8357-A745-0383908BB660}
+// MVID: {60BF8367-6D4C-8357-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x073C0000
+// Image base: 0x05210000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
index 6f851d8245e..00f380c8635 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000226
 }
+.mresource public FSharpSignatureDataB.SteppingMatch05
+{
+  // Offset: 0x00000230 Length: 0x00000003
+}
 .mresource public FSharpOptimizationData.SteppingMatch05
 {
-  // Offset: 0x00000230 Length: 0x0000007B
+  // Offset: 0x00000238 Length: 0x0000007B
 }
 .module SteppingMatch05.dll
-// MVID: {60B68B90-30E9-4ADA-A745-0383908BB660}
+// MVID: {60BF8367-30E9-4ADA-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x072E0000
+// Image base: 0x070C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
index da1fa20a676..92bf13d5bf8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000675
 }
+.mresource public FSharpSignatureDataB.SteppingMatch06
+{
+  // Offset: 0x00000680 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.SteppingMatch06
 {
-  // Offset: 0x00000680 Length: 0x000001D9
+  // Offset: 0x00000688 Length: 0x000001D9
 }
 .module SteppingMatch06.dll
-// MVID: {60B68B90-4FAE-FD21-A745-0383908BB660}
+// MVID: {60BF8367-4FAE-FD21-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05BB0000
+// Image base: 0x06E50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
index d91371610a6..3f1f99134b2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000675
 }
+.mresource public FSharpSignatureDataB.SteppingMatch07
+{
+  // Offset: 0x00000680 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.SteppingMatch07
 {
-  // Offset: 0x00000680 Length: 0x000001D9
+  // Offset: 0x00000688 Length: 0x000001D9
 }
 .module SteppingMatch07.dll
-// MVID: {60B68B90-D373-07F3-A745-0383908BB660}
+// MVID: {60BF8367-D373-07F3-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07270000
+// Image base: 0x05510000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
index 76a265460b5..a90158b270a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001E0 Length: 0x00000079
 }
 .module SteppingMatch08.dll
-// MVID: {60B68B90-F238-BA3A-A745-0383908BB660}
+// MVID: {60BF8367-F238-BA3A-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00E20000
+// Image base: 0x057D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
index b8e01faca51..8063658cca6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.SteppingMatch09
 {
-  // Offset: 0x00000218 Length: 0x00000002
+  // Offset: 0x00000310 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.SteppingMatch09
 {
-  // Offset: 0x00000310 Length: 0x000000EB
+  // Offset: 0x00000318 Length: 0x000000EB
 }
 .module SteppingMatch09.dll
-// MVID: {60B68B90-4935-D6AC-A745-0383908BB660}
+// MVID: {60BF8367-4935-D6AC-A745-03836783BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06A70000
+// Image base: 0x06ED0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
index b3bb8d0a49b..c572d1a20e6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000203
 }
+.mresource public FSharpSignatureDataB.TestFunction13
+{
+  // Offset: 0x00000208 Length: 0x00000001
+}
 .mresource public FSharpOptimizationData.TestFunction13
 {
-  // Offset: 0x00000208 Length: 0x00000072
+  // Offset: 0x00000210 Length: 0x00000072
 }
 .module TestFunction13.exe
-// MVID: {60B68B97-A624-451C-A745-0383978BB660}
+// MVID: {60BF836C-A624-451C-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00EC0000
+// Image base: 0x050A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
index 25a67922af0..bff27b9f312 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000683
 }
+.mresource public FSharpSignatureDataB.TestFunction16
+{
+  // Offset: 0x00000688 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.TestFunction16
 {
-  // Offset: 0x00000688 Length: 0x000001CD
+  // Offset: 0x00000690 Length: 0x000001CD
 }
 .module TestFunction16.exe
-// MVID: {60B68B97-A624-45C5-A745-0383978BB660}
+// MVID: {60BF836C-A624-45C5-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00E30000
+// Image base: 0x05370000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
index 02a8fa33560..75708ea8f31 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x0000066E
 }
+.mresource public FSharpSignatureDataB.TestFunction17
+{
+  // Offset: 0x00000678 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.TestFunction17
 {
-  // Offset: 0x00000678 Length: 0x000001CD
+  // Offset: 0x00000680 Length: 0x000001CD
 }
 .module TestFunction17.exe
-// MVID: {60B68B97-A624-45A8-A745-0383978BB660}
+// MVID: {60BF836C-A624-45A8-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06AA0000
+// Image base: 0x07130000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
index 752ef0b375b..83b984ffeb8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000675
 }
+.mresource public FSharpSignatureDataB.TestFunction21
+{
+  // Offset: 0x00000680 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.TestFunction21
 {
-  // Offset: 0x00000680 Length: 0x000001CD
+  // Offset: 0x00000688 Length: 0x000001CD
 }
 .module TestFunction21.exe
-// MVID: {60B68B97-A643-45E6-A745-0383978BB660}
+// MVID: {60BF836C-A643-45E6-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05500000
+// Image base: 0x07000000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
index 177dcde63e7..cb58ea7bcb3 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureDataB.TestFunction23
 {
-  // Offset: 0x00000218 Length: 0x00000002
+  // Offset: 0x00000340 Length: 0x00000001
 }
 .mresource public FSharpOptimizationData.TestFunction23
 {
-  // Offset: 0x00000340 Length: 0x000000E3
+  // Offset: 0x00000348 Length: 0x000000E3
 }
 .module TestFunction23.exe
-// MVID: {60B68B97-A643-451C-A745-0383978BB660}
+// MVID: {60BF836C-A643-451C-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07240000
+// Image base: 0x05450000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
index 1063152863a..91571992570 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000742
 }
+.mresource public FSharpSignatureDataB.TestFunction24
+{
+  // Offset: 0x00000748 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.TestFunction24
 {
-  // Offset: 0x00000748 Length: 0x00000228
+  // Offset: 0x00000750 Length: 0x00000228
 }
 .module TestFunction24.exe
-// MVID: {60B68B97-A643-4587-A745-0383978BB660}
+// MVID: {60BF836C-A643-4587-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06EA0000
+// Image base: 0x06B10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
index 3c3c35b89af..f967e6d3608 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00000240
 }
+.mresource public FSharpSignatureDataB.TestFunction9b4
+{
+  // Offset: 0x00000248 Length: 0x00000001
+}
 .mresource public FSharpOptimizationData.TestFunction9b4
 {
-  // Offset: 0x00000248 Length: 0x00000085
+  // Offset: 0x00000250 Length: 0x00000085
 }
 .module TestFunction9b4.exe
-// MVID: {60B68B97-A091-56C1-A745-0383978BB660}
+// MVID: {60BF836C-A091-56C1-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06CC0000
+// Image base: 0x00B90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
index 17e117dad82..68d32353eaf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x000001E1
 }
+.mresource public FSharpSignatureDataB.TestFunction18
+{
+  // Offset: 0x000001E8 Length: 0x00000001
+}
 .mresource public FSharpOptimizationData.TestFunction18
 {
-  // Offset: 0x000001E8 Length: 0x00000072
+  // Offset: 0x000001F0 Length: 0x00000072
 }
 .module TestFunction18.exe
-// MVID: {60B68B97-A624-4603-A745-0383978BB660}
+// MVID: {60BF836C-A624-4603-A745-03836C83BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09850000
+// Image base: 0x06560000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
index 164a3ee6567..f1fbce49cfa 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
@@ -27,18 +27,22 @@
 {
   // Offset: 0x00000000 Length: 0x0000087A
 }
+.mresource public FSharpSignatureDataB.StructUnion01
+{
+  // Offset: 0x00000880 Length: 0x00000002
+}
 .mresource public FSharpOptimizationData.StructUnion01
 {
-  // Offset: 0x00000880 Length: 0x00000421
+  // Offset: 0x00000888 Length: 0x00000421
 }
 .module StructUnion01.dll
-// MVID: {60B6A4C9-D3E9-6B24-A745-0383C9A4B660}
+// MVID: {60BF84F6-D3E9-6B24-A745-0383F684BF60}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06CE0000
+// Image base: 0x07080000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================

From dfe60b3b96dcb27b41c128ab3342ee973ce8c388 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 10 Jun 2021 20:34:03 +0100
Subject: [PATCH 050/112] fix tests

---
 .../SerializableAttribute/ToplevelModule.il.bsl        | 10 +++++++---
 .../SerializableAttribute/ToplevelNamespace.il.bsl     | 10 +++++++---
 .../CodeGen/EmittedIL/SerializableAttribute/env.lst    |  4 ++--
 3 files changed, 16 insertions(+), 8 deletions(-)

diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
index d5c4f162088..b98c2b29932 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x0000113D
 }
+.mresource public FSharpSignatureDataB.TopLevelModule
+{
+  // Offset: 0x00001148 Length: 0x00000004
+}
 .mresource public FSharpOptimizationData.TopLevelModule
 {
-  // Offset: 0x00001148 Length: 0x000003FD
+  // Offset: 0x00001150 Length: 0x000003FD
 }
 .module TopLevelModule.dll
-// MVID: {60BE3D8A-37F5-C118-A745-03838A3DBE60}
+// MVID: {60C0F26A-37F5-C118-A745-03836AF2C060}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07250000
+// Image base: 0x04E10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
index 38632dbe761..41b1f720c77 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
@@ -31,18 +31,22 @@
 {
   // Offset: 0x00000000 Length: 0x00001848
 }
+.mresource public FSharpSignatureDataB.ToplevelNamespace
+{
+  // Offset: 0x00001850 Length: 0x00000006
+}
 .mresource public FSharpOptimizationData.ToplevelNamespace
 {
-  // Offset: 0x00001850 Length: 0x0000055C
+  // Offset: 0x00001860 Length: 0x0000055C
 }
 .module ToplevelNamespace.dll
-// MVID: {60BE3D8D-218B-729A-A745-03838D3DBE60}
+// MVID: {60C0F26C-218B-729A-A745-03836CF2C060}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BA0000
+// Image base: 0x05A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/env.lst b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/env.lst
index 3a3631b97e8..02b9c03bb30 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/env.lst
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/env.lst
@@ -1,5 +1,5 @@
-	SOURCE=ToplevelModule.fs    SCFLAGS="-a -g --out:desktop\\TopLevelModule.dll --test:EmitFeeFeeAs100001 --optimize-" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ToplevelModule.dll NetFx20 desktop"		# ToplevelModule.fs - Desktop
-	SOURCE=ToplevelNamespace.fs SCFLAGS="-a -g --out:desktop\\ToplevelNamespace.dll --test:EmitFeeFeeAs100001 --optimize-" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ToplevelNamespace.dll NetFx20 desktop"		# ToplevelNamespace.fs - Desktop
+	SOURCE=ToplevelModule.fs    SCFLAGS="-a -g --out:TopLevelModule.dll --test:EmitFeeFeeAs100001 --optimize-" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ToplevelModule.dll"		# ToplevelModule.fs - Desktop
+	SOURCE=ToplevelNamespace.fs SCFLAGS="-a -g --out:ToplevelNamespace.dll --test:EmitFeeFeeAs100001 --optimize-" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ToplevelNamespace.dll"		# ToplevelNamespace.fs - Desktop
 
 
 

From a296b610416b5a33195974b7eadc2c661e5fdd61 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 24 Jun 2021 22:01:40 +0100
Subject: [PATCH 051/112] fix build

---
 src/fsharp/TypedTreePickle.fs | 24 +++++++++++++++---------
 1 file changed, 15 insertions(+), 9 deletions(-)

diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index bcf00e652cd..ef18e484212 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -799,8 +799,7 @@ let p_simpletyp x st = p_int (encode_simpletyp st.occus st.ostrings st.onlerefs
 let PickleBufferCapacity = 100000
 
 let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x =
-  let ccuNameTab,(ntycons, ntypars, nvals, nanoninfos),stringTab,pubpathTab,nlerefTab,simpleTyTab,phase1bytes,phase1bytesB =
-    let st1 =
+  let st1 =
       { os = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
         osB = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
         oscope=scope
@@ -817,16 +816,17 @@ let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x =
         ofile=file
         oInMem=inMem
         isStructThisArgPos = false }
+
+  let ccuNameTab,(ntycons, ntypars, nvals, nanoninfos),stringTab,pubpathTab,nlerefTab,simpleTyTab,phase1bytes,phase1bytesB =
     p x st1
     let sizes =
       st1.oentities.Size,
       st1.otypars.Size,
       st1.ovals.Size,
       st1.oanoninfos.Size 
-    st1.occus, sizes, st1.ostrings, st1.opubpaths,st1.onlerefs, st1.osimpletys, st1.os.Close(), st1.osB.Close()
+    st1.occus, sizes, st1.ostrings, st1.opubpaths,st1.onlerefs, st1.osimpletys, st1.os.AsMemory(), st1.osB
 
-  let phase2bytes, phase2bytesB = 
-    let st2 = 
+  let st2 = 
      { os = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
        osB = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
        oscope=scope
@@ -843,7 +843,8 @@ let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x =
        ofile=file
        oInMem=inMem
        isStructThisArgPos = false }
-  let phase2bytes =
+
+  let phase2bytes = 
     p_array p_encoded_ccuref ccuNameTab.AsArray st2
 
     // For F# 5.0 and beyond we add a 4th integer for nanoninfos, indicated by a negative 1st integer
@@ -863,9 +864,14 @@ let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x =
         p_memory
         (stringTab.AsArray, pubpathTab.AsArray, nlerefTab.AsArray, simpleTyTab.AsArray, phase1bytes)
         st2
-    st2.os.Close(), st2.osB.Close()
-
-  if phase2bytesB.Length <> 0 then failwith "expected phase2bytesB.Length = 0"
+    
+    // The B stream should be empty in the second phase
+    let phase2bytesB = st2.osB.AsMemory()
+    if phase2bytesB.Length <> 0 then failwith "expected phase2bytesB.Length = 0"
+    (st2.osB :> System.IDisposable).Dispose()
+    st2.os
+
+  (st1.os :> System.IDisposable).Dispose()
 
   phase2bytes, phase1bytesB
   

From 791ac886ce01b60bc6bbb3ca0744f5aa32fc5c84 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 24 Jun 2021 22:54:09 +0100
Subject: [PATCH 052/112] fix build

---
 src/fsharp/CompilerImports.fs | 8 +++++---
 src/fsharp/SyntaxTree.fs      | 1 +
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index f7184634044..3d6a8a41ec0 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -108,9 +108,11 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
 
     let byteStorageB =
         if inMem then
-            ByteStorage.FromByteArrayAndCopy(bytesB, useBackingMemoryMappedFile = true)
+            ByteStorage.FromByteArrayAndCopy(bytesB.AsMemory(), useBackingMemoryMappedFile = true)
         else
-            ByteStorage.FromByteArray(bytesB)
+            ByteStorage.FromByteArray(bytesB.AsMemory().ToArray())
+
+    (bytesB :> IDisposable).Dispose()
 
     let resource =
         { Name = rName
@@ -194,7 +196,7 @@ let EncodeOptimizationData(tcGlobals, tcConfig: TcConfig, outfile, exportRemappi
             let ccu, modulInfo = data
             let bytes, _bytesB = TypedTreePickle.pickleObjWithDanglingCcus isIncrementalBuild outfile tcGlobals ccu Optimizer.p_CcuOptimizationInfo modulInfo
             let optDataFileName = (FileSystemUtils.chopExtension outfile)+".optdata"
-            File.WriteAllBytes(optDataFileName, bytes)
+            File.WriteAllBytes(optDataFileName, bytes.AsMemory().ToArray())
         let (ccu, optData) =
             if tcConfig.onlyEssentialOptimizationData then
                 map2Of2 Optimizer.AbstractOptimizationInfoToEssentials data
diff --git a/src/fsharp/SyntaxTree.fs b/src/fsharp/SyntaxTree.fs
index 4ec4de26468..7f34ba3fc8a 100644
--- a/src/fsharp/SyntaxTree.fs
+++ b/src/fsharp/SyntaxTree.fs
@@ -313,6 +313,7 @@ type SynTypeConstraint =
         | WhereTyparIsReferenceType(range=range)
         | WhereTyparIsUnmanaged(range=range)
         | WhereTyparSupportsNull(range=range)
+        | WhereTyparNotSupportsNull(range=range)
         | WhereTyparIsComparable(range=range)
         | WhereTyparIsEquatable(range=range)
         | WhereTyparDefaultsToType(range=range)

From 97567a9c004fa69081ba176d49004769e6347dba Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 25 Jun 2021 14:38:29 +0100
Subject: [PATCH 053/112] fix build

---
 src/fsharp/CompilerImports.fs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 3d6a8a41ec0..029714dfdce 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -108,7 +108,7 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
 
     let byteStorageB =
         if inMem then
-            ByteStorage.FromByteArrayAndCopy(bytesB.AsMemory(), useBackingMemoryMappedFile = true)
+            ByteStorage.FromMemoryAndCopy(bytesB.AsMemory(), useBackingMemoryMappedFile = true)
         else
             ByteStorage.FromByteArray(bytesB.AsMemory().ToArray())
 
@@ -120,6 +120,7 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
           Access = ILResourceAccess.Public
           CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
           MetadataIndex = NoMetadataIdx }
+
     let resourceB = 
         if bytesB.Length > 0 then 
             Some 

From 7aba706b665af050d91028cd60a4f772f538fc6b Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 25 Jun 2021 14:54:17 +0100
Subject: [PATCH 054/112] fix build

---
 src/fsharp/CompilerImports.fs | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 029714dfdce..3116b57b500 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -112,8 +112,6 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
         else
             ByteStorage.FromByteArray(bytesB.AsMemory().ToArray())
 
-    (bytesB :> IDisposable).Dispose()
-
     let resource =
         { Name = rName
           Location = ILResourceLocation.Local(byteStorage)
@@ -122,7 +120,7 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
           MetadataIndex = NoMetadataIdx }
 
     let resourceB = 
-        if bytesB.Length > 0 then 
+        if bytesB.AsMemory().Length > 0 then 
             Some 
               { Name = rNameB
                 Location = ILResourceLocation.Local(byteStorageB)
@@ -132,6 +130,9 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
               }
         else
             None
+
+    (bytesB :> IDisposable).Dispose()
+
     resource, resourceB
           
 let GetSignatureData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) : PickledDataWithReferences =

From c8075cd83dcd43f7f47dd9e84af19b16338f1c69 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 4 Mar 2022 13:54:06 +0000
Subject: [PATCH 055/112] reset baselines before merge

---
 .../AsyncExpressionSteppingTest1.il.bsl       |   14 +-
 .../AsyncExpressionSteppingTest2.il.bsl       |   14 +-
 .../AsyncExpressionSteppingTest3.il.bsl       |   14 +-
 .../AsyncExpressionSteppingTest4.il.bsl       |   14 +-
 .../AsyncExpressionSteppingTest5.il.bsl       |   14 +-
 .../AsyncExpressionSteppingTest6.il.bsl       |  226 +-
 .../EmittedIL/AttributeTargets/Default.il.bsl |   16 +-
 .../EmittedIL/AttributeTargets/Field.il.bsl   |   22 +-
 .../AttributeTargets/Property.il.bsl          |   24 +-
 .../CCtorDUWithMember01.il.bsl                |   10 +-
 .../CCtorDUWithMember02.il.bsl                |    4 +-
 .../CCtorDUWithMember03.il.bsl                |    4 +-
 .../CCtorDUWithMember04.il.bsl                |    4 +-
 .../CompiledNameAttribute01.il.bsl            |   16 +-
 .../CompiledNameAttribute02.il.bsl            |   14 +-
 .../CompiledNameAttribute03.il.bsl            |   18 +-
 .../CompiledNameAttribute04.il.bsl            |   20 +-
 .../ComputationExpr01.il.bsl                  |   14 +-
 .../ComputationExpr02.il.bsl                  |   14 +-
 .../ComputationExpr03.il.bsl                  |   34 +-
 .../ComputationExpr04.il.bsl                  |   14 +-
 .../ComputationExpr05.il.bsl                  |   14 +-
 .../ComputationExpr06.il.bsl                  |   14 +-
 .../ComputationExpr07.il.bsl                  |   14 +-
 ...tBoxStruct_ArrayOfArray_CSInterface.il.bsl |   16 +-
 ...tBoxStruct_ArrayOfArray_FSInterface.il.bsl |    6 +-
 ..._ArrayOfArray_FSInterface_NoExtMeth.il.bsl |   16 +-
 .../DoNotBoxStruct_Array_CSInterface.il.bsl   |   16 +-
 .../DoNotBoxStruct_Array_FSInterface.il.bsl   |    6 +-
 ...xStruct_Array_FSInterface_NoExtMeth.il.bsl |   16 +-
 .../DoNotBoxStruct_MDArray_CSInterface.il.bsl |   18 +-
 .../DoNotBoxStruct_MDArray_FSInterface.il.bsl |    4 -
 ...truct_MDArray_FSInterface_NoExtMeth.il.bsl |   16 +-
 .../DoNotBoxStruct_NoArray_CSInterface.il.bsl |   18 +-
 .../DoNotBoxStruct_NoArray_FSInterface.il.bsl |    4 -
 ...truct_NoArray_FSInterface_NoExtMeth.il.bsl |   16 +-
 .../DoNotBoxStruct_ToString.il.bsl            |   16 +-
 .../GeneratedIterators/GenIter01.il.bsl       |    4 +-
 .../GeneratedIterators/GenIter02.il.bsl       |    4 +-
 .../GeneratedIterators/GenIter03.il.bsl       |    4 +-
 .../GeneratedIterators/GenIter04.il.bsl       |    4 +-
 .../InequalityComparison01.il.bsl             |    4 +-
 .../InequalityComparison02.il.bsl             |    4 +-
 .../InequalityComparison03.il.bsl             |    4 +-
 .../InequalityComparison04.il.bsl             |    4 +-
 .../InequalityComparison05.il.bsl             |    8 +-
 .../ListExpressionSteppingTest1.il.bsl        |    4 +-
 .../ListExpressionSteppingTest2.il.bsl        |    4 +-
 .../ListExpressionSteppingTest3.il.bsl        |    4 +-
 .../ListExpressionSteppingTest4.il.bsl        |    4 +-
 .../ListExpressionSteppingTest5.il.bsl        |    4 +-
 .../ListExpressionSteppingTest6.il.bsl        |    4 +-
 ...hodImplAttribute.AggressiveInlining.il.bsl |   12 +-
 .../MethodImplAttribute.ForwardRef.il.bsl     |   12 +-
 .../MethodImplAttribute.InternalCall.il.bsl   |   12 +-
 .../MethodImplAttribute.NoInlining.il.bsl     |   12 +-
 .../MethodImplAttribute.NoOptimization.il.bsl |   14 +-
 .../MethodImplAttribute.PreserveSig.il.bsl    |   14 +-
 .../MethodImplAttribute.Synchronized.il.bsl   |   14 +-
 .../MethodImplAttribute.Unmanaged.il.bsl      |   14 +-
 .../EmittedIL/Misc/AbstractClass.il.bsl       |    4 +-
 .../CodeGen/EmittedIL/Misc/AnonRecd.il.bsl    |   10 +-
 .../EmittedIL/Misc/CodeGenRenamings01.il.bsl  |    4 +-
 .../CustomAttributeGenericParameter01.il.bsl  |   10 +-
 .../CodeGen/EmittedIL/Misc/Decimal01.il.bsl   |    7 +-
 .../EmittedIL/Misc/EntryPoint01.il.bsl        |    4 +-
 .../EmittedIL/Misc/EqualsOnUnions01.il.bsl    |   10 +-
 .../CodeGen/EmittedIL/Misc/ForLoop01.il.bsl   |    4 +-
 .../CodeGen/EmittedIL/Misc/ForLoop02.il.bsl   |    4 +-
 .../CodeGen/EmittedIL/Misc/ForLoop03.il.bsl   |    4 +-
 .../Misc/GeneralizationOnUnions01.il.bsl      |   10 +-
 .../Misc/GenericTypeStaticField01.il.bsl      |   12 +-
 .../EmittedIL/Misc/LetIfThenElse01.il.bsl     |   10 +-
 .../CodeGen/EmittedIL/Misc/Marshal.il.bsl     |    4 +-
 .../EmittedIL/Misc/MethodImplNoInline.il.bsl  |    4 +-
 .../Misc/MethodImplNoInline02.il.bsl          |    4 +-
 .../Misc/ModuleWithExpression01.il.bsl        |    4 +-
 .../EmittedIL/Misc/NoBoxingOnDispose01.il.bsl |   10 +-
 .../Misc/NonEscapingArguments02.il.bsl        |   14 +-
 .../CodeGen/EmittedIL/Misc/PreserveSig.il.bsl |    4 +-
 .../CodeGen/EmittedIL/Misc/Structs01.il.bsl   |   10 +-
 .../CodeGen/EmittedIL/Misc/Structs02.il.bsl   |   10 +-
 .../Misc/StructsAsArrayElements01.il.bsl      |    8 +-
 .../Misc/TryWith_NoFilterBlocks01.il.bsl      |    4 +-
 .../Source/CodeGen/EmittedIL/Misc/cas.il.bsl  |    4 +-
 .../Operators/comparison_decimal01.il.bsl     |    8 +-
 .../SeqExpressionSteppingTest1.il.bsl         |    4 +-
 .../SeqExpressionSteppingTest2.il.bsl         |    4 +-
 .../SeqExpressionSteppingTest3.il.bsl         |    4 +-
 .../SeqExpressionSteppingTest4.il.bsl         |    4 +-
 .../SeqExpressionSteppingTest5.il.bsl         |    4 +-
 .../SeqExpressionSteppingTest6.il.bsl         |    4 +-
 .../SeqExpressionSteppingTest7.il.bsl         |   10 +-
 .../SeqExpressionTailCalls01.il.bsl           |    4 +-
 .../SeqExpressionTailCalls02.il.bsl           |    4 +-
 .../ToplevelModule.il.bsl                     | 1675 +----------
 .../ToplevelNamespace.il.bsl                  | 2437 +----------------
 .../EmittedIL/StaticInit/LetBinding01.il.bsl  |    4 +-
 .../StaticInit/StaticInit_Class01.il.bsl      |    4 +-
 .../StaticInit/StaticInit_Module01.il.bsl     |    4 +-
 .../StaticInit/StaticInit_Struct01.il.bsl     |    6 +-
 .../SteppingMatch/SteppingMatch01.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch02.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch03.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch04.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch05.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch06.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch07.il.bsl      |   10 +-
 .../SteppingMatch/SteppingMatch08.il.bsl      |    4 +-
 .../SteppingMatch/SteppingMatch09.il.bsl      |   10 +-
 .../TestFunctions/TestFunction13.il.bsl       |   10 +-
 .../TestFunctions/TestFunction16.il.bsl       |   10 +-
 .../TestFunctions/TestFunction17.il.bsl       |   10 +-
 .../TestFunctions/TestFunction21.il.bsl       |   10 +-
 .../TestFunctions/TestFunction23.il.bsl       |   10 +-
 .../TestFunctions/TestFunction24.il.bsl       |   10 +-
 .../TestFunctions/TestFunction9b4.il.bsl      |   10 +-
 .../TestFunctions/Testfunction18.il.bsl       |   10 +-
 .../Source/CodeGen/LazyNoInline01.il.bsl      |    8 -
 .../fsc/help/help40.437.1033.bsl              |    2 -
 .../fsc/nologo/logo.437.1033.bsl              |    2 +-
 .../fsi/exename/help40.437.1033.bsl           |    2 -
 .../fsi/help/help40-nologo.437.1033.bsl       |    2 -
 .../fsi/help/help40.437.1033.bsl              |    2 -
 .../ForLoop/ForEachOnArray01.il.bsl           |   14 +-
 .../ForLoop/NoAllocationOfTuple01.il.bsl      |   14 +-
 .../ForLoop/NoIEnumerable01.il.bsl            |   10 +-
 .../ForLoop/NoIEnumerable02.il.bsl            |   10 +-
 .../ForLoop/NoIEnumerable03.il.bsl            |    8 +-
 .../ForLoop/ZeroToArrLength01.il.bsl          |   14 +-
 .../ForLoop/ZeroToArrLength02.il.bsl          |   12 +-
 .../GenericComparison/Compare01.il.bsl        |   14 +-
 .../GenericComparison/Compare02.il.bsl        |   12 +-
 .../GenericComparison/Compare03.il.bsl        |    8 +-
 .../GenericComparison/Compare04.il.bsl        |    8 +-
 .../GenericComparison/Compare05.il.bsl        |   18 +-
 .../GenericComparison/Compare06.il.bsl        |   18 +-
 .../GenericComparison/Compare07.il.bsl        |   22 +-
 .../GenericComparison/Compare08.il.bsl        |   14 +-
 .../GenericComparison/Compare09.il.bsl        |   14 +-
 .../GenericComparison/Compare10.il.bsl        |   18 +-
 .../GenericComparison/Compare11.il.bsl        |   14 +-
 .../GenericComparison/Equals01.il.bsl         |   12 +-
 .../GenericComparison/Equals02.il.bsl         |    8 +-
 .../GenericComparison/Equals03.il.bsl         |    8 +-
 .../GenericComparison/Equals04.il.bsl         |   18 +-
 .../GenericComparison/Equals05.il.bsl         |   18 +-
 .../GenericComparison/Equals06.il.bsl         |   22 +-
 .../GenericComparison/Equals07.il.bsl         |   14 +-
 .../GenericComparison/Equals08.il.bsl         |   14 +-
 .../GenericComparison/Equals09.il.bsl         |   18 +-
 .../GenericComparison/Hash01.il.bsl           |   12 +-
 .../GenericComparison/Hash02.il.bsl           |   14 +-
 .../GenericComparison/Hash03.il.bsl           |    8 +-
 .../GenericComparison/Hash04.il.bsl           |    6 +-
 .../GenericComparison/Hash05.il.bsl           |   18 +-
 .../GenericComparison/Hash06.il.bsl           |   18 +-
 .../GenericComparison/Hash07.il.bsl           |   12 +-
 .../GenericComparison/Hash08.il.bsl           |   18 +-
 .../GenericComparison/Hash09.il.bsl           |   22 +-
 .../GenericComparison/Hash10.il.bsl           |   12 +-
 .../GenericComparison/Hash11.il.bsl           |   12 +-
 .../GenericComparison/Hash12.il.bsl           |   18 +-
 .../Optimizations/Inlining/Match01.il.bsl     |   16 +-
 .../Optimizations/Inlining/Match02.il.bsl     |   18 +-
 .../Inlining/StructUnion01.il.bsl             |   10 +-
 166 files changed, 806 insertions(+), 5219 deletions(-)

diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
index b2f7c4caff8..3e69ae4967f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest1.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:3:0
 }
 .assembly AsyncExpressionSteppingTest1
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest1
 {
-  // Offset: 0x00000000 Length: 0x00000260
+  // Offset: 0x00000000 Length: 0x0000026C
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest1
 {
-  // Offset: 0x00000268 Length: 0x000000B1
+  // Offset: 0x00000270 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest1.dll
-// MVID: {5F972A55-6394-B5D4-A745-0383552A975F}
+// MVID: {5AF5DDAE-6394-B5D4-A745-0383AEDDF55A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06830000
+// Image base: 0x02880000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +83,7 @@
         // Code size       62 (0x3e)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 6,6 : 17,32 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest1.fs'
+        .line 6,6 : 17,32 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest1.fs'
         IL_0000:  ldstr      "hello"
         IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
         IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
index 647f0b9921e..7bdb6a074c0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest2.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:3:0
 }
 .assembly AsyncExpressionSteppingTest2
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest2
 {
-  // Offset: 0x00000000 Length: 0x00000260
+  // Offset: 0x00000000 Length: 0x0000026C
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest2
 {
-  // Offset: 0x00000268 Length: 0x000000B1
+  // Offset: 0x00000270 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest2.dll
-// MVID: {5F972A55-6394-D499-A745-0383552A975F}
+// MVID: {5AF5DDAE-6394-D499-A745-0383AEDDF55A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x068B0000
+// Image base: 0x04520000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -80,7 +80,7 @@
         // Code size       15 (0xf)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 6,6 : 23,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest2.fs'
+        .line 6,6 : 23,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest2.fs'
         IL_0000:  ldarg.0
         IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest2/AsyncExpressionSteppingTest2/'f2@6-1'::x
         IL_0006:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::op_Dereference(class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
index bce144589e7..6dfebd88b1e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest3.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:3:0
 }
 .assembly AsyncExpressionSteppingTest3
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest3
 {
-  // Offset: 0x00000000 Length: 0x0000026B
+  // Offset: 0x00000000 Length: 0x00000277
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest3
 {
-  // Offset: 0x00000270 Length: 0x000000B1
+  // Offset: 0x00000280 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest3.dll
-// MVID: {5F972A55-6394-F35E-A745-0383552A975F}
+// MVID: {5AF5DDAE-6394-F35E-A745-0383AEDDF55A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06C50000
+// Image base: 0x04650000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +83,7 @@
         // Code size       14 (0xe)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest3.fs'
+        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest3.fs'
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
         IL_0003:  ldfld      int32 AsyncExpressionSteppingTest3/AsyncExpressionSteppingTest3/'f3@10-1'::'value'
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
index c2c8261a44f..ce54bd4945d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest4.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:3:0
 }
 .assembly AsyncExpressionSteppingTest4
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest4
 {
-  // Offset: 0x00000000 Length: 0x0000026B
+  // Offset: 0x00000000 Length: 0x00000277
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest4
 {
-  // Offset: 0x00000270 Length: 0x000000B1
+  // Offset: 0x00000280 Length: 0x000000B1
 }
 .module AsyncExpressionSteppingTest4.dll
-// MVID: {5F972A55-6394-6D4B-A745-0383552A975F}
+// MVID: {5AF5DDAE-6394-6D4B-A745-0383AEDDF55A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06980000
+// Image base: 0x028F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +83,7 @@
         // Code size       14 (0xe)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 10,10 : 21,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest4.fs'
+        .line 10,10 : 21,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest4.fs'
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
         IL_0003:  ldfld      int32 AsyncExpressionSteppingTest4/AsyncExpressionSteppingTest4/'f4@10-2'::'value'
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
index 5f7de40ef2a..da554a3adf4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest5.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:3:0
 }
 .assembly AsyncExpressionSteppingTest5
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest5
 {
-  // Offset: 0x00000000 Length: 0x000002AC
+  // Offset: 0x00000000 Length: 0x000002B8
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest5
 {
-  // Offset: 0x000002B0 Length: 0x000000BE
+  // Offset: 0x000002C0 Length: 0x000000BE
 }
 .module AsyncExpressionSteppingTest5.dll
-// MVID: {5F972A55-6394-30E8-A745-0383552A975F}
+// MVID: {5AF5DDAE-6394-30E8-A745-0383AEDDF55A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06DD0000
+// Image base: 0x04430000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -84,7 +84,7 @@
         .maxstack  5
         .locals init ([0] int32 x)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 6,6 : 17,31 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest5.fs'
+        .line 6,6 : 17,31 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest5.fs'
         IL_0000:  ldarg.1
         IL_0001:  stloc.0
         .line 7,7 : 20,35 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
index 561c0296597..379ad6bbe7c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AsyncExpressionStepping/AsyncExpressionSteppingTest6.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:3:0
 }
 .assembly AsyncExpressionSteppingTest6
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.AsyncExpressionSteppingTest6
 {
-  // Offset: 0x00000000 Length: 0x00000297
+  // Offset: 0x00000000 Length: 0x000002A3
 }
 .mresource public FSharpOptimizationData.AsyncExpressionSteppingTest6
 {
-  // Offset: 0x000002A0 Length: 0x000000BE
+  // Offset: 0x000002A8 Length: 0x000000BE
 }
 .module AsyncExpressionSteppingTest6.dll
-// MVID: {5F972A55-6394-4FAD-A745-0383552A975F}
+// MVID: {5AF5DDAE-6394-4FAD-A745-0383AEDDF55A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08DA0000
+// Image base: 0x04C40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -55,7 +55,7 @@
          extends [mscorlib]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 'f2@10-1'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f2@10-4'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public int32 'value'
@@ -73,9 +73,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-1'::'value'
+        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-4'::'value'
         IL_000d:  ret
-      } // end of method 'f2@10-1'::.ctor
+      } // end of method 'f2@10-4'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -83,17 +83,17 @@
         // Code size       14 (0xe)
         .maxstack  8
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest6.fs'
+        .line 10,10 : 17,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AsyncExpressionStepping\\AsyncExpressionSteppingTest6.fs'
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-1'::'value'
+        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-4'::'value'
         IL_0008:  call       instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1::OnSuccess(!0)
         IL_000d:  ret
-      } // end of method 'f2@10-1'::Invoke
+      } // end of method 'f2@10-4'::Invoke
 
-    } // end of class 'f2@10-1'
+    } // end of class 'f2@10-4'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit f2@5
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f2@5-3'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -111,9 +111,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f2@5::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@5-3'::builder@
         IL_000d:  ret
-      } // end of method f2@5::.ctor
+      } // end of method 'f2@5-3'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(class [FSharp.Core]Microsoft.FSharp.Core.Unit unitVar) cil managed
@@ -150,20 +150,20 @@
         IL_0029:  stloc.2
         .line 10,10 : 17,25 ''
         IL_002a:  ldarg.0
-        IL_002b:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f2@5::builder@
+        IL_002b:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@5-3'::builder@
         IL_0030:  stloc.3
         IL_0031:  ldloc.2
         IL_0032:  stloc.s    V_4
         IL_0034:  ldloc.s    V_4
-        IL_0036:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-1'::.ctor(int32)
+        IL_0036:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@10-4'::.ctor(int32)
         IL_003b:  tail.
         IL_003d:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_0042:  ret
-      } // end of method f2@5::Invoke
+      } // end of method 'f2@5-3'::Invoke
 
-    } // end of class f2@5
+    } // end of class 'f2@5-3'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@20-5'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@20-7'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public int32 'value'
@@ -181,9 +181,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-5'::'value'
+        IL_0008:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-7'::'value'
         IL_000d:  ret
-      } // end of method 'f3@20-5'::.ctor
+      } // end of method 'f3@20-7'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -193,14 +193,14 @@
         .line 20,20 : 17,25 ''
         IL_0000:  ldarga.s   ctxt
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-5'::'value'
+        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-7'::'value'
         IL_0008:  call       instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1::OnSuccess(!0)
         IL_000d:  ret
-      } // end of method 'f3@20-5'::Invoke
+      } // end of method 'f3@20-7'::Invoke
 
-    } // end of class 'f3@20-5'
+    } // end of class 'f3@20-7'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@19-4'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@19-6'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -222,15 +222,15 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::builder@
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::x1
+        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::x1
         IL_0014:  ldarg.0
         IL_0015:  ldarg.3
-        IL_0016:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::y
+        IL_0016:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::y
         IL_001b:  ret
-      } // end of method 'f3@19-4'::.ctor
+      } // end of method 'f3@19-6'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg4) cil managed
@@ -246,9 +246,9 @@
         IL_0001:  stloc.0
         .line 19,19 : 17,37 ''
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::x1
+        IL_0003:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::x1
         IL_0008:  ldarg.0
-        IL_0009:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::y
+        IL_0009:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::y
         IL_000e:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::op_Dereference(class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
         IL_0013:  add
         IL_0014:  ldloc.0
@@ -256,20 +256,20 @@
         IL_0016:  stloc.1
         .line 20,20 : 17,25 ''
         IL_0017:  ldarg.0
-        IL_0018:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::builder@
+        IL_0018:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::builder@
         IL_001d:  stloc.2
         IL_001e:  ldloc.1
         IL_001f:  stloc.3
         IL_0020:  ldloc.3
-        IL_0021:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-5'::.ctor(int32)
+        IL_0021:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@20-7'::.ctor(int32)
         IL_0026:  tail.
         IL_0028:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_002d:  ret
-      } // end of method 'f3@19-4'::Invoke
+      } // end of method 'f3@19-6'::Invoke
 
-    } // end of class 'f3@19-4'
+    } // end of class 'f3@19-6'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@18-6'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@18-8'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -292,12 +292,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::binder
         IL_0014:  ret
-      } // end of method 'f3@18-6'::.ctor
+      } // end of method 'f3@18-8'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -307,19 +307,19 @@
         .line 18,18 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@18-6'::Invoke
+      } // end of method 'f3@18-8'::Invoke
 
-    } // end of class 'f3@18-6'
+    } // end of class 'f3@18-8'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@16-3'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@16-5'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -339,12 +339,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::builder@
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::x1
+        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::x1
         IL_0014:  ret
-      } // end of method 'f3@16-3'::.ctor
+      } // end of method 'f3@16-5'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg3) cil managed
@@ -369,31 +369,31 @@
         IL_000f:  nop
         .line 18,18 : 17,31 ''
         IL_0010:  ldarg.0
-        IL_0011:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::builder@
+        IL_0011:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::builder@
         IL_0016:  stloc.2
         IL_0017:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_001c:  stloc.3
         IL_001d:  ldarg.0
-        IL_001e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::builder@
+        IL_001e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::builder@
         IL_0023:  ldarg.0
-        IL_0024:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::x1
+        IL_0024:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::x1
         IL_0029:  ldloc.1
-        IL_002a:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-4'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
+        IL_002a:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@19-6'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
                                                                                                                       int32,
                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
         IL_002f:  stloc.s    V_4
         IL_0031:  ldloc.3
         IL_0032:  ldloc.s    V_4
-        IL_0034:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-6'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+        IL_0034:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@18-8'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0039:  tail.
         IL_003b:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_0040:  ret
-      } // end of method 'f3@16-3'::Invoke
+      } // end of method 'f3@16-5'::Invoke
 
-    } // end of class 'f3@16-3'
+    } // end of class 'f3@16-5'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-7'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-9'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -416,12 +416,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::binder
         IL_0014:  ret
-      } // end of method 'f3@15-7'::.ctor
+      } // end of method 'f3@15-9'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -431,19 +431,19 @@
         .line 15,15 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@15-7'::Invoke
+      } // end of method 'f3@15-9'::Invoke
 
-    } // end of class 'f3@15-7'
+    } // end of class 'f3@15-9'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-2'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@15-4'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -463,12 +463,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::builder@
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::x1
+        IL_000f:  stfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::x1
         IL_0014:  ret
-      } // end of method 'f3@15-2'::.ctor
+      } // end of method 'f3@15-4'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg2) cil managed
@@ -484,29 +484,29 @@
         IL_0001:  stloc.0
         .line 15,15 : 17,31 ''
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::builder@
+        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::builder@
         IL_0008:  stloc.1
         IL_0009:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_000e:  stloc.2
         IL_000f:  ldarg.0
-        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::builder@
+        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::builder@
         IL_0015:  ldarg.0
-        IL_0016:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::x1
-        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
+        IL_0016:  ldfld      int32 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::x1
+        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@16-5'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
                                                                                                                       int32)
         IL_0020:  stloc.3
         IL_0021:  ldloc.2
         IL_0022:  ldloc.3
-        IL_0023:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-7'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+        IL_0023:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-9'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0028:  tail.
         IL_002a:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_002f:  ret
-      } // end of method 'f3@15-2'::Invoke
+      } // end of method 'f3@15-4'::Invoke
 
-    } // end of class 'f3@15-2'
+    } // end of class 'f3@15-4'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-8'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-10'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -529,12 +529,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::binder
         IL_0014:  ret
-      } // end of method 'f3@14-8'::.ctor
+      } // end of method 'f3@14-10'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -544,19 +544,19 @@
         .line 14,14 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@14-8'::Invoke
+      } // end of method 'f3@14-10'::Invoke
 
-    } // end of class 'f3@14-8'
+    } // end of class 'f3@14-10'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-1'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@14-3'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -574,9 +574,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::builder@
         IL_000d:  ret
-      } // end of method 'f3@14-1'::.ctor
+      } // end of method 'f3@14-3'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(int32 _arg1) cil managed
@@ -592,28 +592,28 @@
         IL_0001:  stloc.0
         .line 14,14 : 17,31 ''
         IL_0002:  ldarg.0
-        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::builder@
+        IL_0003:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::builder@
         IL_0008:  stloc.1
         IL_0009:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_000e:  stloc.2
         IL_000f:  ldarg.0
-        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::builder@
+        IL_0010:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::builder@
         IL_0015:  ldloc.0
-        IL_0016:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-2'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
+        IL_0016:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@15-4'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder,
                                                                                                                       int32)
         IL_001b:  stloc.3
         IL_001c:  ldloc.2
         IL_001d:  ldloc.3
-        IL_001e:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-8'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
-                                                                                                                      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
+        IL_001e:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-10'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0023:  tail.
         IL_0025:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_002a:  ret
-      } // end of method 'f3@14-1'::Invoke
+      } // end of method 'f3@14-3'::Invoke
 
-    } // end of class 'f3@14-1'
+    } // end of class 'f3@14-3'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@13-9'
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@13-11'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 computation
@@ -636,12 +636,12 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::computation
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::computation
         IL_000d:  ldarg.0
         IL_000e:  ldarg.2
-        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::binder
+        IL_000f:  stfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::binder
         IL_0014:  ret
-      } // end of method 'f3@13-9'::.ctor
+      } // end of method 'f3@13-11'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn 
               Invoke(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1 ctxt) cil managed
@@ -651,19 +651,19 @@
         .line 13,13 : 17,31 ''
         IL_0000:  ldarg.1
         IL_0001:  ldarg.0
-        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::computation
+        IL_0002:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::computation
         IL_0007:  ldarg.0
-        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::binder
+        IL_0008:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::binder
         IL_000d:  tail.
         IL_000f:  call       class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::Bind(valuetype [FSharp.Core]Microsoft.FSharp.Control.AsyncActivation`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
                                                                                                                                                               class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0014:  ret
-      } // end of method 'f3@13-9'::Invoke
+      } // end of method 'f3@13-11'::Invoke
 
-    } // end of class 'f3@13-9'
+    } // end of class 'f3@13-11'
 
-    .class auto ansi serializable sealed nested assembly beforefieldinit f3@13
+    .class auto ansi serializable sealed nested assembly beforefieldinit 'f3@13-2'
            extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
     {
       .field public class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder builder@
@@ -681,9 +681,9 @@
         IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
         IL_0006:  ldarg.0
         IL_0007:  ldarg.1
-        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::builder@
+        IL_0008:  stfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::builder@
         IL_000d:  ret
-      } // end of method f3@13::.ctor
+      } // end of method 'f3@13-2'::.ctor
 
       .method public strict virtual instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
               Invoke(class [FSharp.Core]Microsoft.FSharp.Core.Unit unitVar) cil managed
@@ -695,24 +695,24 @@
                  [2] class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2> V_2)
         .line 13,13 : 17,31 ''
         IL_0000:  ldarg.0
-        IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::builder@
+        IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::builder@
         IL_0006:  stloc.0
         IL_0007:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6::f2()
         IL_000c:  stloc.1
         IL_000d:  ldarg.0
-        IL_000e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::builder@
-        IL_0013:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-1'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
+        IL_000e:  ldfld      class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::builder@
+        IL_0013:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@14-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
         IL_0018:  stloc.2
         IL_0019:  ldloc.1
         IL_001a:  ldloc.2
-        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-9'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
-                                                                                                                      class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
+        IL_001b:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-11'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1,
+                                                                                                                       class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
         IL_0020:  tail.
         IL_0022:  call       class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.AsyncPrimitives::MakeAsync(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2,class [FSharp.Core]Microsoft.FSharp.Control.AsyncReturn>)
         IL_0027:  ret
-      } // end of method f3@13::Invoke
+      } // end of method 'f3@13-2'::Invoke
 
-    } // end of class f3@13
+    } // end of class 'f3@13-2'
 
     .method public static class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 
             f2() cil managed
@@ -725,7 +725,7 @@
       IL_0005:  stloc.0
       IL_0006:  ldloc.0
       IL_0007:  ldloc.0
-      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f2@5::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
+      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f2@5-3'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
       IL_000d:  tail.
       IL_000f:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder::Delay(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
       IL_0014:  ret
@@ -742,7 +742,7 @@
       IL_0005:  stloc.0
       IL_0006:  ldloc.0
       IL_0007:  ldloc.0
-      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/f3@13::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
+      IL_0008:  newobj     instance void AsyncExpressionSteppingTest6/AsyncExpressionSteppingTest6/'f3@13-2'::.ctor(class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder)
       IL_000d:  tail.
       IL_000f:  callvirt   instance class [FSharp.Core]Microsoft.FSharp.Control.FSharpAsync`1 [FSharp.Core]Microsoft.FSharp.Control.FSharpAsyncBuilder::Delay(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
       IL_0014:  ret
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
index 8c9dd21d4da..bbe5b40ba64 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Default.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Default
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Default
 {
-  // Offset: 0x00000000 Length: 0x000003F0
-}
-.mresource public FSharpSignatureDataB.Default
-{
-  // Offset: 0x000003F8 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x000003FA
 }
 .mresource public FSharpOptimizationData.Default
 {
   // Offset: 0x00000400 Length: 0x000000BA
 }
 .module Default.dll
-// MVID: {5F972A55-AAA9-67BB-A745-0383552A975F}
+// MVID: {59B19208-AAA9-67BB-A745-03830892B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09620000
+// Image base: 0x00E30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AttributeTargets\\Default.fs'
+      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AttributeTargets\\Default.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Attribute::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
index 13c7da2bc61..6d4d86af42b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Field.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Field
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Field
 {
-  // Offset: 0x00000000 Length: 0x000003EA
-}
-.mresource public FSharpSignatureDataB.Field
-{
-  // Offset: 0x000003F0 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x000003F4
 }
 .mresource public FSharpOptimizationData.Field
 {
   // Offset: 0x000003F8 Length: 0x000000B8
 }
 .module Field.dll
-// MVID: {5F972A55-96F8-CD6E-A745-0383552A975F}
+// MVID: {59B19208-96F8-CD6E-A745-03830892B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069B0000
+// Image base: 0x00F60000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AttributeTargets\\Field.fs'
+      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AttributeTargets\\Field.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Attribute::.ctor()
       IL_0006:  ldarg.0
@@ -82,7 +78,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     int32 ''.$M::T@12
+    IL_0000:  ldsfld     int32 ''.$M::'T@12-2'
     IL_0005:  ret
   } // end of method M::get_T
 
@@ -96,7 +92,7 @@
 .class private abstract auto ansi sealed ''.$M
        extends [mscorlib]System.Object
 {
-  .field static assembly initonly int32 T@12
+  .field static assembly initonly int32 'T@12-2'
   .custom instance void M/ExportAttribute::.ctor() = ( 01 00 00 00 ) 
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 init@
@@ -117,7 +113,7 @@
     .line 12,12 : 27,28 ''
     IL_0010:  ldc.i4.1
     IL_0011:  dup
-    IL_0012:  stsfld     int32 ''.$M::T@12
+    IL_0012:  stsfld     int32 ''.$M::'T@12-2'
     IL_0017:  stloc.0
     IL_0018:  ret
   } // end of method $M::.cctor
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
index 79e1268210d..eb0160f0a01 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/AttributeTargets/Property.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Property
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Property
 {
-  // Offset: 0x00000000 Length: 0x000003F3
-}
-.mresource public FSharpSignatureDataB.Property
-{
-  // Offset: 0x000003F8 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x000003FD
 }
 .mresource public FSharpOptimizationData.Property
 {
-  // Offset: 0x00000400 Length: 0x000000BB
+  // Offset: 0x00000408 Length: 0x000000BB
 }
 .module Property.dll
-// MVID: {5F972A55-9B5C-7949-A745-0383552A975F}
+// MVID: {59B19208-9B5C-7949-A745-03830892B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06790000
+// Image base: 0x02E80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\AttributeTargets\\Property.fs'
+      .line 9,9 : 4,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\AttributeTargets\\Property.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Attribute::.ctor()
       IL_0006:  ldarg.0
@@ -82,7 +78,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     int32 ''.$M::T@12
+    IL_0000:  ldsfld     int32 ''.$M::'T@12-4'
     IL_0005:  ret
   } // end of method M::get_T
 
@@ -97,7 +93,7 @@
 .class private abstract auto ansi sealed ''.$M
        extends [mscorlib]System.Object
 {
-  .field static assembly initonly int32 T@12
+  .field static assembly initonly int32 'T@12-4'
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly int32 init@
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -117,7 +113,7 @@
     .line 12,12 : 27,28 ''
     IL_0010:  ldc.i4.1
     IL_0011:  dup
-    IL_0012:  stsfld     int32 ''.$M::T@12
+    IL_0012:  stsfld     int32 ''.$M::'T@12-4'
     IL_0017:  stloc.0
     IL_0018:  ret
   } // end of method $M::.cctor
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
index 7222b9f2842..b07afd62275 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000077A
 }
-.mresource public FSharpSignatureDataB.CCtorDUWithMember01
-{
-  // Offset: 0x00000780 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.CCtorDUWithMember01
 {
-  // Offset: 0x00000788 Length: 0x00000227
+  // Offset: 0x00000780 Length: 0x00000227
 }
 .module CCtorDUWithMember01.exe
-// MVID: {5F972A55-26F1-14EE-A745-0383552A975F}
+// MVID: {60B68B7E-26F1-14EE-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E20000
+// Image base: 0x06D80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
index 79da48b37ed..10cb539ef09 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember02.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000308 Length: 0x000000E4
 }
 .module CCtorDUWithMember02.exe
-// MVID: {5F972A55-D176-C99D-A745-0383552A975F}
+// MVID: {60B68B7E-D176-C99D-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BB0000
+// Image base: 0x06BF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
index 8a28cad710d..6f45553c0ec 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember03.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000298 Length: 0x000000B2
 }
 .module CCtorDUWithMember03.exe
-// MVID: {5F972A55-C97B-D207-A745-0383552A975F}
+// MVID: {60B68B7E-C97B-D207-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x065A0000
+// Image base: 0x05970000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
index e7d837dfe3d..0813094fef6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CCtorDUWithMember/CCtorDUWithMember04.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000298 Length: 0x000000B2
 }
 .module CCtorDUWithMember04.exe
-// MVID: {5F972A55-CF28-717B-A745-0383552A975F}
+// MVID: {60B68B7E-CF28-717B-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E80000
+// Image base: 0x07050000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
index 36f788dd567..0b9f0b91042 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly CompiledNameAttribute01
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute01
 {
-  // Offset: 0x00000000 Length: 0x00000266
-}
-.mresource public FSharpSignatureDataB.CompiledNameAttribute01
-{
-  // Offset: 0x00000270 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x00000272
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute01
 {
   // Offset: 0x00000278 Length: 0x00000086
 }
 .module CompiledNameAttribute01.exe
-// MVID: {5F972A55-EF5A-FC2A-A745-0383552A975F}
+// MVID: {59B1923F-EF5A-FC2A-A745-03833F92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06C20000
+// Image base: 0x00ED0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +57,7 @@
     // Code size       2 (0x2)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 11,12 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute01.fs'
+    .line 4,4 : 11,12 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute01.fs'
     IL_0000:  ldarg.0
     IL_0001:  ret
   } // end of method CompiledNameAttribute01::SomeCompiledName
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
index 4a1bb05f81d..6adf54e44d5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly CompiledNameAttribute02
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute02
 {
-  // Offset: 0x00000000 Length: 0x000002E4
+  // Offset: 0x00000000 Length: 0x000002E8
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute02
 {
-  // Offset: 0x000002E8 Length: 0x000000CD
+  // Offset: 0x000002F0 Length: 0x000000CD
 }
 .module CompiledNameAttribute02.exe
-// MVID: {5F972A55-F755-F3C0-A745-0383552A975F}
+// MVID: {59B1923F-F755-F3C0-A745-03833F92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06AD0000
+// Image base: 0x018A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +63,7 @@
       // Code size       4 (0x4)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 34,39 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute02.fs'
+      .line 5,5 : 34,39 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute02.fs'
       IL_0000:  ldarg.1
       IL_0001:  ldarg.2
       IL_0002:  add
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
index ab7e55430cf..228aa3dd3bb 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly CompiledNameAttribute03
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute03
 {
-  // Offset: 0x00000000 Length: 0x00000271
-}
-.mresource public FSharpSignatureDataB.CompiledNameAttribute03
-{
-  // Offset: 0x00000278 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x0000027D
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute03
 {
-  // Offset: 0x00000280 Length: 0x00000086
+  // Offset: 0x00000288 Length: 0x00000086
 }
 .module CompiledNameAttribute03.exe
-// MVID: {5F972A55-2CE4-60B9-A745-0383552A975F}
+// MVID: {59B1923F-2CE4-60B9-A745-03833F92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x067F0000
+// Image base: 0x03120000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +57,7 @@
     // Code size       7 (0x7)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 15,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute03.fs'
+    .line 4,4 : 15,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute03.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.1
     IL_0002:  sub
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
index 2be23266ea6..71f865a4cfa 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly CompiledNameAttribute04
 {
@@ -29,28 +29,20 @@
 }
 .mresource public FSharpSignatureData.CompiledNameAttribute04
 {
-  // Offset: 0x00000000 Length: 0x00000CD9
-}
-.mresource public FSharpSignatureDataB.CompiledNameAttribute04
-{
-  // Offset: 0x00000CE0 Length: 0x00000007
+  // Offset: 0x00000000 Length: 0x00000CE9
 }
 .mresource public FSharpOptimizationData.CompiledNameAttribute04
 {
   // Offset: 0x00000CF0 Length: 0x000002CB
 }
-.mresource public FSharpOptimizationDataB.CompiledNameAttribute04
-{
-  // Offset: 0x00000FC0 Length: 0x00000002
-}
 .module CompiledNameAttribute04.exe
-// MVID: {5F972A55-34DF-584F-A745-0383552A975F}
+// MVID: {59B1923F-34DF-584F-A745-03833F92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E70000
+// Image base: 0x01680000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -82,7 +74,7 @@
       // Code size       9 (0x9)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute04.fs'
+      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\CompiledNameAttribute\\CompiledNameAttribute04.fs'
       IL_0000:  ldarg.0
       IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
       IL_0006:  ldarg.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
index 6f458f11610..056640724cf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr01
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x000001F8
 }
 .mresource public FSharpOptimizationData.ComputationExpr01
 {
-  // Offset: 0x00000218 Length: 0x0000007D
+  // Offset: 0x00000200 Length: 0x0000007D
 }
 .module ComputationExpr01.exe
-// MVID: {5F972A55-3703-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-3703-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06740000
+// Image base: 0x007B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -83,7 +83,7 @@
       // Code size       15 (0xf)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 8,8 : 9,17 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr01.fs'
+      .line 8,8 : 9,17 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr01.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr01/res1@8::builder@
       IL_0006:  ldc.i4.1
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
index bd87c2a8946..80dd23ca0b0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr02
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x000001F8
 }
 .mresource public FSharpOptimizationData.ComputationExpr02
 {
-  // Offset: 0x00000218 Length: 0x0000007D
+  // Offset: 0x00000200 Length: 0x0000007D
 }
 .module ComputationExpr02.exe
-// MVID: {5F972A55-3624-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-3624-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08EF0000
+// Image base: 0x01010000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -84,7 +84,7 @@
       .maxstack  7
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 8,8 : 18,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr02.fs'
+      .line 8,8 : 18,33 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr02.fs'
       IL_0000:  ldstr      "hello"
       IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
       IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
index f5d12cafea8..46926f5d00e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr03.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr03
 {
-  // Offset: 0x00000000 Length: 0x00000238
+  // Offset: 0x00000000 Length: 0x00000222
 }
 .mresource public FSharpOptimizationData.ComputationExpr03
 {
-  // Offset: 0x00000240 Length: 0x0000008C
+  // Offset: 0x00000228 Length: 0x0000008C
 }
 .module ComputationExpr03.exe
-// MVID: {5F972A55-3649-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-3649-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06650000
+// Image base: 0x00BF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -55,7 +55,7 @@
        extends [mscorlib]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 res2@8
+  .class auto ansi serializable sealed nested assembly beforefieldinit 'res2@8-1'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
   {
     .field public class [ComputationExprLibrary]Library.EventuallyBuilder builder@
@@ -73,9 +73,9 @@
       IL_0001:  call       instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>::.ctor()
       IL_0006:  ldarg.0
       IL_0007:  ldarg.1
-      IL_0008:  stfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/res2@8::builder@
+      IL_0008:  stfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/'res2@8-1'::builder@
       IL_000d:  ret
-    } // end of method res2@8::.ctor
+    } // end of method 'res2@8-1'::.ctor
 
     .method public strict virtual instance class [ComputationExprLibrary]Library.Eventually`1 
             Invoke(class [FSharp.Core]Microsoft.FSharp.Core.Unit unitVar) cil managed
@@ -84,7 +84,7 @@
       .maxstack  7
       .locals init ([0] int32 x)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 8,8 : 18,33 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr03.fs'
+      .line 8,8 : 18,33 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr03.fs'
       IL_0000:  ldstr      "hello"
       IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
       IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
@@ -95,16 +95,16 @@
       IL_001a:  stloc.0
       .line 9,9 : 9,21 ''
       IL_001b:  ldarg.0
-      IL_001c:  ldfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/res2@8::builder@
+      IL_001c:  ldfld      class [ComputationExprLibrary]Library.EventuallyBuilder ComputationExpr03/'res2@8-1'::builder@
       IL_0021:  ldloc.0
       IL_0022:  ldloc.0
       IL_0023:  add
       IL_0024:  tail.
       IL_0026:  callvirt   instance class [ComputationExprLibrary]Library.Eventually`1 [ComputationExprLibrary]Library.EventuallyBuilder::Return(!!0)
       IL_002b:  ret
-    } // end of method res2@8::Invoke
+    } // end of method 'res2@8-1'::Invoke
 
-  } // end of class res2@8
+  } // end of class 'res2@8-1'
 
   .class auto ansi serializable sealed nested assembly beforefieldinit 'res3@17-2'
          extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>
@@ -295,7 +295,7 @@
   {
     // Code size       6 (0x6)
     .maxstack  8
-    IL_0000:  ldsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::res2@6
+    IL_0000:  ldsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::'res2@6-2'
     IL_0005:  ret
   } // end of method ComputationExpr03::get_res2
 
@@ -325,7 +325,7 @@
 .class private abstract auto ansi sealed ''.$ComputationExpr03
        extends [mscorlib]System.Object
 {
-  .field static assembly class [ComputationExprLibrary]Library.Eventually`1 res2@6
+  .field static assembly class [ComputationExprLibrary]Library.Eventually`1 'res2@6-2'
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
   .field static assembly class [ComputationExprLibrary]Library.Eventually`1 res3@12
   .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
@@ -347,10 +347,10 @@
     IL_0005:  stloc.2
     IL_0006:  ldloc.2
     IL_0007:  ldloc.2
-    IL_0008:  newobj     instance void ComputationExpr03/res2@8::.ctor(class [ComputationExprLibrary]Library.EventuallyBuilder)
+    IL_0008:  newobj     instance void ComputationExpr03/'res2@8-1'::.ctor(class [ComputationExprLibrary]Library.EventuallyBuilder)
     IL_000d:  callvirt   instance class [ComputationExprLibrary]Library.Eventually`1 [ComputationExprLibrary]Library.EventuallyBuilder::Delay(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2>)
     IL_0012:  dup
-    IL_0013:  stsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::res2@6
+    IL_0013:  stsfld     class [ComputationExprLibrary]Library.Eventually`1 ''.$ComputationExpr03::'res2@6-2'
     IL_0018:  stloc.0
     .line 10,10 : 1,25 ''
     IL_0019:  call       class [ComputationExprLibrary]Library.Eventually`1 ComputationExpr03::get_res2()
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
index f98d58ba46b..6f211063ee2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr04
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x000001F8
 }
 .mresource public FSharpOptimizationData.ComputationExpr04
 {
-  // Offset: 0x00000218 Length: 0x0000007D
+  // Offset: 0x00000200 Length: 0x0000007D
 }
 .module ComputationExpr04.exe
-// MVID: {5F972A55-366A-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-366A-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B10000
+// Image base: 0x04DD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -85,7 +85,7 @@
       .locals init ([0] int32 x,
                [1] string V_1)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 7,7 : 22,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr04.fs'
+      .line 7,7 : 22,37 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr04.fs'
       IL_0000:  ldstr      "hello"
       IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string)
       IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
index 3d5d1d04f80..02f3be89cbd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr05
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x000001F8
 }
 .mresource public FSharpOptimizationData.ComputationExpr05
 {
-  // Offset: 0x00000218 Length: 0x0000007D
+  // Offset: 0x00000200 Length: 0x0000007D
 }
 .module ComputationExpr05.exe
-// MVID: {5F972A55-3687-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-3687-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07140000
+// Image base: 0x039D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -79,7 +79,7 @@
       // Code size       1 (0x1)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 68,70 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr05.fs'
+      .line 9,9 : 68,70 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr05.fs'
       IL_0000:  ret
     } // end of method 'res5@9-1'::System.IDisposable.Dispose
 
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
index 54e07a12562..93152a9b90f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr06
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x000001F8
 }
 .mresource public FSharpOptimizationData.ComputationExpr06
 {
-  // Offset: 0x00000218 Length: 0x0000007D
+  // Offset: 0x00000200 Length: 0x0000007D
 }
 .module ComputationExpr06.exe
-// MVID: {5F972A55-35A8-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-35A8-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06AA0000
+// Image base: 0x00DD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -80,7 +80,7 @@
       // Code size       15 (0xf)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 15,21 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr06.fs'
+      .line 9,9 : 15,21 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr06.fs'
       IL_0000:  ldarg.0
       IL_0001:  ldfld      class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1 ComputationExpr06/'res6@9-1'::x
       IL_0006:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::op_Dereference(class [FSharp.Core]Microsoft.FSharp.Core.FSharpRef`1)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
index e5ec63dc3af..2e07f1e3d66 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ComputationExpressions/ComputationExpr07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly extern ComputationExprLibrary
 {
@@ -33,20 +33,20 @@
 }
 .mresource public FSharpSignatureData.ComputationExpr07
 {
-  // Offset: 0x00000000 Length: 0x0000020E
+  // Offset: 0x00000000 Length: 0x000001F8
 }
 .mresource public FSharpOptimizationData.ComputationExpr07
 {
-  // Offset: 0x00000218 Length: 0x0000007D
+  // Offset: 0x00000200 Length: 0x0000007D
 }
 .module ComputationExpr07.exe
-// MVID: {5F972A55-35BD-E566-A745-0383552A975F}
+// MVID: {5A1F62A7-35BD-E566-A745-0383A7621F5A}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06600000
+// Image base: 0x03800000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -89,7 +89,7 @@
       .maxstack  7
       .locals init ([0] int32 v)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 9,9 : 9,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr07.fs'
+      .line 9,9 : 9,29 'C:\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\ComputationExpressions\\ComputationExpr07.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 10,10 : 13,24 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
index f4105d64e9a..70c28499d91 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_CSInterface
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ArrayOfArray_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x0000026A
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_CSInterface
-{
-  // Offset: 0x00000270 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x0000026E
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_CSInterface
 {
   // Offset: 0x00000278 Length: 0x000000A6
 }
 .module DoNotBoxStruct_ArrayOfArray_CSInterface.exe
-// MVID: {5F972A55-FF24-C89E-A745-0383552A975F}
+// MVID: {59B1920A-FF24-C89E-A745-03830A92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069F0000
+// Image base: 0x015B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +56,7 @@
     // Code size       27 (0x1b)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 55,74 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_CSInterface.fs'
+    .line 5,5 : 55,74 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.0
     IL_0002:  ldelem     !!T[]
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
index 99a945167fb..9b45e6d76b1 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface.il.bsl
@@ -31,13 +31,9 @@
 {
   // Offset: 0x00000000 Length: 0x0000026E
 }
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface
-{
-  // Offset: 0x00000278 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface
 {
-  // Offset: 0x00000280 Length: 0x000000A6
+  // Offset: 0x00000278 Length: 0x000000A6
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface.exe
 // MVID: {5FCFFD0B-8A45-C8A0-A745-03830BFDCF5F}
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
index 18cc350c253..9787389574a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x0000028D
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000298 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x0000027A
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x000002A0 Length: 0x000000BA
+  // Offset: 0x00000280 Length: 0x000000BA
 }
 .module DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.exe
-// MVID: {5F972A55-1475-D984-A745-0383552A975F}
+// MVID: {5EAD3E33-1475-D984-A745-0383333EAD5E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04CB0000
+// Image base: 0x00B10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ArrayOfArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 80,82 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
index a12395112cc..ca6aa2077fe 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly DoNotBoxStruct_Array_CSInterface
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_Array_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000251
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_CSInterface
-{
-  // Offset: 0x00000258 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x00000255
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_CSInterface
 {
   // Offset: 0x00000260 Length: 0x00000098
 }
 .module DoNotBoxStruct_Array_CSInterface.exe
-// MVID: {5F972A55-1735-654E-A745-0383552A975F}
+// MVID: {59B1920A-1735-654E-A745-03830A92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BF0000
+// Image base: 0x031D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +56,7 @@
     // Code size       21 (0x15)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 53,68 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_CSInterface.fs'
+    .line 5,5 : 53,68 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.0
     IL_0002:  readonly.
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
index b042651f9ef..ac37c4ffa3f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface.il.bsl
@@ -31,13 +31,9 @@
 {
   // Offset: 0x00000000 Length: 0x00000255
 }
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface
-{
-  // Offset: 0x00000260 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface
 {
-  // Offset: 0x00000268 Length: 0x00000098
+  // Offset: 0x00000260 Length: 0x00000098
 }
 .module DoNotBoxStruct_Array_FSInterface.exe
 // MVID: {5FCFFD0B-1737-9DA5-A745-03830BFDCF5F}
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
index 18813f1cf97..d290e0a4db4 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_Array_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x00000273
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_Array_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000278 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x00000261
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_Array_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000280 Length: 0x000000AC
+  // Offset: 0x00000268 Length: 0x000000AC
 }
 .module DoNotBoxStruct_Array_FSInterface_NoExtMeth.exe
-// MVID: {5F972A55-8127-3EE3-A745-0383552A975F}
+// MVID: {5EAD3E33-8127-3EE3-A745-0383333EAD5E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08DD0000
+// Image base: 0x00AF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_Array_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 74,76 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
index a48c67cc25f..cfeba995ccf 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly DoNotBoxStruct_MDArray_CSInterface
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_MDArray_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000258
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_CSInterface
-{
-  // Offset: 0x00000260 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x0000025C
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_CSInterface
 {
-  // Offset: 0x00000268 Length: 0x0000009C
+  // Offset: 0x00000260 Length: 0x0000009C
 }
 .module DoNotBoxStruct_MDArray_CSInterface.exe
-// MVID: {5F972A55-24A8-8796-A745-0383552A975F}
+// MVID: {59B1920A-24A8-8796-A745-03830A92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06900000
+// Image base: 0x00DD0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +56,7 @@
     // Code size       22 (0x16)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 54,71 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_CSInterface.fs'
+    .line 5,5 : 54,71 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldc.i4.0
     IL_0002:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
index e2e612a7e51..f2c29723485 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface.il.bsl
@@ -31,10 +31,6 @@
 {
   // Offset: 0x00000000 Length: 0x0000025C
 }
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface
-{
-  // Offset: 0x00000260 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface
 {
   // Offset: 0x00000260 Length: 0x0000009C
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
index 0b0c726fbfd..141bc712cf0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x0000027A
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000280 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x00000268
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_MDArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000288 Length: 0x000000B0
+  // Offset: 0x00000270 Length: 0x000000B0
 }
 .module DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.exe
-// MVID: {5F972A55-A67D-867A-A745-0383552A975F}
+// MVID: {5EAD3E33-A67D-867A-A745-0383333EAD5E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06CE0000
+// Image base: 0x06A00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_MDArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 77,79 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
index c22f8f080da..4b9a226ab6a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_CSInterface.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly DoNotBoxStruct_NoArray_CSInterface
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_NoArray_CSInterface
 {
-  // Offset: 0x00000000 Length: 0x00000248
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_CSInterface
-{
-  // Offset: 0x00000250 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x0000024C
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_CSInterface
 {
-  // Offset: 0x00000258 Length: 0x0000009C
+  // Offset: 0x00000250 Length: 0x0000009C
 }
 .module DoNotBoxStruct_NoArray_CSInterface.exe
-// MVID: {5F972A55-5654-8082-A745-0383552A975F}
+// MVID: {59B1920A-5654-8082-A745-03830A92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09AA0000
+// Image base: 0x00B50000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +57,7 @@
     .maxstack  3
     .locals init ([0] !!T V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 51,62 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_CSInterface.fs'
+    .line 5,5 : 51,62 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_CSInterface.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloca.s   V_0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
index 15f0685883d..4df05e344dd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface.il.bsl
@@ -31,10 +31,6 @@
 {
   // Offset: 0x00000000 Length: 0x0000024C
 }
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface
-{
-  // Offset: 0x00000250 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface
 {
   // Offset: 0x00000250 Length: 0x0000009C
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
index 5733a2d8340..959a5180d76 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.il.bsl
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:7:0:0
 }
 .assembly DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000000 Length: 0x0000026A
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
-{
-  // Offset: 0x00000270 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x00000258
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_NoArray_FSInterface_NoExtMeth
 {
-  // Offset: 0x00000278 Length: 0x000000B0
+  // Offset: 0x00000260 Length: 0x000000B0
 }
 .module DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.exe
-// MVID: {5F972A55-CD0A-F713-A745-0383552A975F}
+// MVID: {5EAD3E33-CD0A-F713-A745-0383333EAD5E}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07240000
+// Image base: 0x05780000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +62,7 @@
       .maxstack  5
       .locals init ([0] int32 V_0)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
+      .line 100001,100001 : 0,0 'C:\\dev\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_NoArray_FSInterface_NoExtMeth.fs'
       IL_0000:  ldarg.1
       IL_0001:  stloc.0
       .line 6,6 : 68,70 ''
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
index 89dab1650f2..2faba000cc7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/DoNotBoxStruct/DoNotBoxStruct_ToString.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly DoNotBoxStruct_ToString
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.DoNotBoxStruct_ToString
 {
-  // Offset: 0x00000000 Length: 0x00000204
-}
-.mresource public FSharpSignatureDataB.DoNotBoxStruct_ToString
-{
-  // Offset: 0x00000208 Length: 0x00000001
+  // Offset: 0x00000000 Length: 0x00000208
 }
 .mresource public FSharpOptimizationData.DoNotBoxStruct_ToString
 {
   // Offset: 0x00000210 Length: 0x00000086
 }
 .module DoNotBoxStruct_ToString.exe
-// MVID: {5F972A55-8D34-C606-A745-0383552A975F}
+// MVID: {59B1920A-8D34-C606-A745-03830A92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06750000
+// Image base: 0x02CC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -61,7 +57,7 @@
     .maxstack  3
     .locals init ([0] !!T V_0)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 22,34 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ToString.fs'
+    .line 5,5 : 22,34 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\DoNotBoxStruct\\DoNotBoxStruct_ToString.fs'
     IL_0000:  ldarg.0
     IL_0001:  stloc.0
     IL_0002:  ldloca.s   V_0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
index bf34216b3df..91a0b81b6ca 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001F8 Length: 0x0000007A
 }
 .module GenIter01.exe
-// MVID: {60B8D5B8-F836-DC98-A745-0383B8D5B860}
+// MVID: {60B78A57-F836-DC98-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05990000
+// Image base: 0x04D30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
index 3115cfb0eba..e9ec641157f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter02.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001F8 Length: 0x0000007B
 }
 .module GenIter02.exe
-// MVID: {60B8D5B8-F857-DC98-A745-0383B8D5B860}
+// MVID: {60B78A57-F857-DC98-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05000000
+// Image base: 0x066F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
index a4d78b7471a..b649a939686 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter03.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001F8 Length: 0x0000007B
 }
 .module GenIter03.exe
-// MVID: {60B8D5B8-F77C-DC98-A745-0383B8D5B860}
+// MVID: {60B78A57-F77C-DC98-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00BB0000
+// Image base: 0x057E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
index 2ae2e6ec97f..c3401ee5341 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/GeneratedIterators/GenIter04.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001E8 Length: 0x0000007B
 }
 .module GenIter04.exe
-// MVID: {60B8D5B8-F79D-DC98-A745-0383B8D5B860}
+// MVID: {60B78A57-F79D-DC98-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00C50000
+// Image base: 0x06F10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
index 09fc1e215ff..bc1449351fd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison01.exe
-// MVID: {5F972A55-263A-E6D5-A745-0383552A975F}
+// MVID: {60B68B7E-263A-E6D5-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08D40000
+// Image base: 0x074E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
index 95b56faed4d..ca23c28d8a2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison02.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison02.exe
-// MVID: {5F972A55-263A-E72C-A745-0383552A975F}
+// MVID: {60B68B7E-263A-E72C-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07420000
+// Image base: 0x07180000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
index 5bc7287e3f5..4fd361bb957 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison03.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison03.exe
-// MVID: {5F972A55-263A-E70B-A745-0383552A975F}
+// MVID: {60B68B7E-263A-E70B-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06970000
+// Image base: 0x06510000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
index b51da8b0c4a..988eae50727 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison04.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000210 Length: 0x00000085
 }
 .module InequalityComparison04.exe
-// MVID: {5F972A55-263A-E772-A745-0383552A975F}
+// MVID: {60B68B7E-263A-E772-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08E40000
+// Image base: 0x07590000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
index b0276b628bf..d0f9c71afb5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/InequalityComparison/InequalityComparison05.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000232
 }
-.mresource public FSharpSignatureDataB.InequalityComparison05
-{
-  // Offset: 0x00000238 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.InequalityComparison05
 {
   // Offset: 0x00000238 Length: 0x00000085
 }
 .module InequalityComparison05.exe
-// MVID: {5F972A55-263A-E751-A745-0383552A975F}
+// MVID: {60B68B7E-263A-E751-A745-03837E8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x092C0000
+// Image base: 0x07350000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
index cb99db2405a..0ee5384e72f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest1.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest1.exe
-// MVID: {60B8D5B8-50CF-F6CE-A745-0383B8D5B860}
+// MVID: {60B78A57-50CF-F6CE-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07050000
+// Image base: 0x07190000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
index bb574ed910e..8b7a79bdaab 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest2.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest2.exe
-// MVID: {60B8D5B8-D3DE-B780-A745-0383B8D5B860}
+// MVID: {60B78A57-D3DE-B780-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00C60000
+// Image base: 0x094E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
index c04d92037cd..92f1f9b3632 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest3.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000280 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest3.exe
-// MVID: {60B8D5B8-AE45-39B4-A745-0383B8D5B860}
+// MVID: {60B78A57-AE45-39B4-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06FC0000
+// Image base: 0x06EB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
index 58870a562ae..a3ae5487968 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest4.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest4.exe
-// MVID: {60B8D5B8-3154-FA67-A745-0383B8D5B860}
+// MVID: {60B78A57-3154-FA67-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070D0000
+// Image base: 0x06700000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
index e9cb7e555e8..92dd8b4cd4d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest5.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000270 Length: 0x000000AF
 }
 .module ListExpressionSteppingTest5.exe
-// MVID: {60B8D5B8-CBE3-BFEA-A745-0383B8D5B860}
+// MVID: {60B78A57-CBE3-BFEA-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07020000
+// Image base: 0x06C00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
index de3533100a8..bfa33913669 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/ListExpressionStepping/ListExpressionSteppingTest6.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000298 Length: 0x000000BC
 }
 .module ListExpressionSteppingTest6.exe
-// MVID: {60B8D5B8-98A2-AB14-A745-0383B8D5B860}
+// MVID: {60B78A57-98A2-AB14-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x056B0000
+// Image base: 0x06F80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
index 96e21af823e..af04f94f49e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.AggressiveInlining.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.AggressiveInlining
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.AggressiveInlining
 {
-  // Offset: 0x00000000 Length: 0x00000347
+  // Offset: 0x00000000 Length: 0x0000034C
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.AggressiveInlining
 {
   // Offset: 0x00000350 Length: 0x00000085
 }
 .module MethodImplAttribute.AggressiveInlining.dll
-// MVID: {5F972A55-66DC-14D3-A745-0383552A975F}
+// MVID: {59B1920C-66DC-14D3-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09520000
+// Image base: 0x02B20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.AggressiveInlining.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.AggressiveInlining.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
index 68b09878223..b37321a6b45 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.ForwardRef.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.ForwardRef
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.ForwardRef
 {
-  // Offset: 0x00000000 Length: 0x0000032D
+  // Offset: 0x00000000 Length: 0x00000331
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.ForwardRef
 {
   // Offset: 0x00000338 Length: 0x0000007D
 }
 .module MethodImplAttribute.ForwardRef.dll
-// MVID: {5F972A55-C517-03FF-A745-0383552A975F}
+// MVID: {59B1920C-C517-03FF-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06900000
+// Image base: 0x002E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.ForwardRef.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.ForwardRef.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
index 6e8e67e1e20..5695375e4e0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.InternalCall.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.InternalCall
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.InternalCall
 {
-  // Offset: 0x00000000 Length: 0x00000335
+  // Offset: 0x00000000 Length: 0x00000339
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.InternalCall
 {
   // Offset: 0x00000340 Length: 0x0000007F
 }
 .module MethodImplAttribute.InternalCall.dll
-// MVID: {5F972A55-FBF7-6A35-A745-0383552A975F}
+// MVID: {59B1920C-FBF7-6A35-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06770000
+// Image base: 0x015B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.InternalCall.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.InternalCall.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
index 6b732c3239e..6801bbb4405 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoInlining.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.NoInlining
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.NoInlining
 {
-  // Offset: 0x00000000 Length: 0x0000032D
+  // Offset: 0x00000000 Length: 0x00000331
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.NoInlining
 {
   // Offset: 0x00000338 Length: 0x0000007D
 }
 .module MethodImplAttribute.NoInlining.dll
-// MVID: {5F972A55-F47B-58B3-A745-0383552A975F}
+// MVID: {59B1920C-F47B-58B3-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x091F0000
+// Image base: 0x012B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoInlining.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoInlining.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
index 162f0931376..37557234689 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.NoOptimization.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.NoOptimization
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.NoOptimization
 {
-  // Offset: 0x00000000 Length: 0x00000339
+  // Offset: 0x00000000 Length: 0x0000033D
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.NoOptimization
 {
-  // Offset: 0x00000340 Length: 0x00000081
+  // Offset: 0x00000348 Length: 0x00000081
 }
 .module MethodImplAttribute.NoOptimization.dll
-// MVID: {5F972A55-D394-5177-A745-0383552A975F}
+// MVID: {59B1920C-D394-5177-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06900000
+// Image base: 0x006A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoOptimization.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.NoOptimization.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
index 57f9944a1f6..6ded00a8d83 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.PreserveSig.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.PreserveSig
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.PreserveSig
 {
-  // Offset: 0x00000000 Length: 0x00000332
+  // Offset: 0x00000000 Length: 0x00000336
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.PreserveSig
 {
-  // Offset: 0x00000338 Length: 0x0000007E
+  // Offset: 0x00000340 Length: 0x0000007E
 }
 .module MethodImplAttribute.PreserveSig.dll
-// MVID: {5F972A55-0C64-31CC-A745-0383552A975F}
+// MVID: {59B1920C-0C64-31CC-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06BE0000
+// Image base: 0x00D30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.PreserveSig.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.PreserveSig.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
index d0f4e1ead51..4fbf40b8d9e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Synchronized.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.Synchronized
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.Synchronized
 {
-  // Offset: 0x00000000 Length: 0x00000333
+  // Offset: 0x00000000 Length: 0x00000337
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.Synchronized
 {
-  // Offset: 0x00000338 Length: 0x0000007F
+  // Offset: 0x00000340 Length: 0x0000007F
 }
 .module MethodImplAttribute.Synchronized.dll
-// MVID: {5F972A55-D8F1-2CC7-A745-0383552A975F}
+// MVID: {59B1920C-D8F1-2CC7-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08DD0000
+// Image base: 0x002E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Synchronized.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Synchronized.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
index 7d23ef8c645..15db6ae085e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/MethodImplAttribute/MethodImplAttribute.Unmanaged.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly MethodImplAttribute.Unmanaged
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.MethodImplAttribute.Unmanaged
 {
-  // Offset: 0x00000000 Length: 0x0000032A
+  // Offset: 0x00000000 Length: 0x0000032E
 }
 .mresource public FSharpOptimizationData.MethodImplAttribute.Unmanaged
 {
-  // Offset: 0x00000330 Length: 0x0000007C
+  // Offset: 0x00000338 Length: 0x0000007C
 }
 .module MethodImplAttribute.Unmanaged.dll
-// MVID: {5F972A55-FF34-309C-A745-0383552A975F}
+// MVID: {59B1920C-FF34-309C-A745-03830C92B159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08E40000
+// Image base: 0x013D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -56,7 +56,7 @@
     // Code size       9 (0x9)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Unmanaged.fs'
+    .line 5,5 : 34,37 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\MethodImplAttribute\\MethodImplAttribute.Unmanaged.fs'
     IL_0000:  ldarg.0
     IL_0001:  ldnull
     IL_0002:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
index f2cc7cd2a65..4c8bea58a08 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AbstractClass.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000308 Length: 0x000000B1
 }
 .module AbstractClass.exe
-// MVID: {5F972A55-333C-8BAF-A745-0383552A975F}
+// MVID: {60B68B7F-333C-8BAF-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06900000
+// Image base: 0x07500000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
index 4dfc3e5f48c..23db70c3a45 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/AnonRecd.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001C2
 }
-.mresource public FSharpSignatureDataB.AnonRecd
-{
-  // Offset: 0x000001C8 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.AnonRecd
 {
-  // Offset: 0x000001D0 Length: 0x0000006B
+  // Offset: 0x000001C8 Length: 0x0000006B
 }
 .module AnonRecd.exe
-// MVID: {5F972A55-C42F-5208-A745-0383552A975F}
+// MVID: {60B68B7F-C42F-5208-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09940000
+// Image base: 0x05160000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
index c3d52c59f16..08a6e0020c2 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CodeGenRenamings01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000003D0 Length: 0x0000011B
 }
 .module CodeGenRenamings01.exe
-// MVID: {60BF835E-8173-986B-A745-03835E83BF60}
+// MVID: {60B78A57-8173-986B-A745-0383578AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06920000
+// Image base: 0x06CA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
index dd4e879cce2..f3c32848290 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/CustomAttributeGenericParameter01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000002BE
 }
-.mresource public FSharpSignatureDataB.CustomAttributeGenericParameter01
-{
-  // Offset: 0x000002C8 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.CustomAttributeGenericParameter01
 {
-  // Offset: 0x000002D0 Length: 0x0000007A
+  // Offset: 0x000002C8 Length: 0x0000007A
 }
 .module CustomAttributeGenericParameter01.exe
-// MVID: {5F972A55-F08A-F524-A745-0383552A975F}
+// MVID: {60B68B7F-F08A-F524-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07000000
+// Image base: 0x05340000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
index b9d513d6517..b0c34bdda4a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Decimal01.il.bsl
@@ -41,12 +41,17 @@
   // Offset: 0x00000140 Length: 0x00000050
 }
 .module Decimal01.exe
-// MVID: {5F972A55-F150-FA46-A745-0383552A975F}
+// MVID: {60B68B7F-F150-FA46-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
+// Image base: 0x05600000
+
+
+// =============== CLASS MEMBERS DECLARATION ===================
+
 .class public abstract auto ansi sealed Decimal01
        extends [mscorlib]System.Object
 {
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
index b96ee278bea..4afe8d6966b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EntryPoint01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000258 Length: 0x00000090
 }
 .module EntryPoint01.exe
-// MVID: {5F972A55-9846-72C1-A745-0383552A975F}
+// MVID: {60B68B7F-9846-72C1-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F10000
+// Image base: 0x071C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
index 374f312cf30..f1c372c2645 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/EqualsOnUnions01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000063B
 }
-.mresource public FSharpSignatureDataB.EqualsOnUnions01
-{
-  // Offset: 0x00000640 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.EqualsOnUnions01
 {
-  // Offset: 0x00000648 Length: 0x000001C7
+  // Offset: 0x00000640 Length: 0x000001C7
 }
 .module EqualsOnUnions01.exe
-// MVID: {5F972A55-BBFB-14A0-A745-0383552A975F}
+// MVID: {60B68B7F-BBFB-14A0-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06760000
+// Image base: 0x07200000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
index a1330e858cd..1cbb7d93ca5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x00000050
 }
 .module ForLoop01.exe
-// MVID: {5F972A55-1795-791C-A745-0383552A975F}
+// MVID: {60B68B7F-1795-791C-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06870000
+// Image base: 0x05340000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
index e9d441d8400..d40f24fed45 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop02.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000140 Length: 0x00000050
 }
 .module ForLoop02.exe
-// MVID: {5F972A55-1736-791C-A745-0383552A975F}
+// MVID: {60B68B7F-1736-791C-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06730000
+// Image base: 0x05980000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
index f776a6d1f6c..61f328b715c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ForLoop03.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000200 Length: 0x0000007B
 }
 .module ForLoop03.exe
-// MVID: {5F972A55-1757-791C-A745-0383552A975F}
+// MVID: {60B68B7F-1757-791C-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x067C0000
+// Image base: 0x07280000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
index c32219b7f39..70bbfca2a6f 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GeneralizationOnUnions01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000689
 }
-.mresource public FSharpSignatureDataB.GeneralizationOnUnions01
-{
-  // Offset: 0x00000690 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.GeneralizationOnUnions01
 {
-  // Offset: 0x00000698 Length: 0x000001F4
+  // Offset: 0x00000690 Length: 0x000001F4
 }
 .module GeneralizationOnUnions01.exe
-// MVID: {5F972A55-4CA2-8CD1-A745-0383552A975F}
+// MVID: {60B68B7F-4CA2-8CD1-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x068C0000
+// Image base: 0x06C00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
index 2d5197b7477..928e00e3cfd 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/GenericTypeStaticField01.il.bsl
@@ -31,20 +31,12 @@
 {
   // Offset: 0x00000000 Length: 0x00000604
 }
-.mresource public FSharpSignatureDataB.GenericTypeStaticField01
-{
-  // Offset: 0x00000608 Length: 0x00000015
-}
 .mresource public FSharpOptimizationData.GenericTypeStaticField01
 {
-  // Offset: 0x00000628 Length: 0x000001E1
-}
-.mresource public FSharpOptimizationDataB.GenericTypeStaticField01
-{
-  // Offset: 0x00000810 Length: 0x00000006
+  // Offset: 0x00000608 Length: 0x000001E1
 }
 .module GenericTypeStaticField01.exe
-// MVID: {5F972A55-1E75-7E6B-A745-0383552A975F}
+// MVID: {60B68B7F-1E75-7E6B-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
index 7d3fa34c01d..4fd045b7168 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/LetIfThenElse01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001D9
 }
-.mresource public FSharpSignatureDataB.LetIfThenElse01
-{
-  // Offset: 0x000001E0 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.LetIfThenElse01
 {
-  // Offset: 0x000001E8 Length: 0x00000076
+  // Offset: 0x000001E0 Length: 0x00000076
 }
 .module LetIfThenElse01.exe
-// MVID: {5F972A55-BE5A-D8FD-A745-0383552A975F}
+// MVID: {60B68B7F-BE5A-D8FD-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09140000
+// Image base: 0x06AF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
index cdc029a6bc3..a72c99aedd5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Marshal.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000510 Length: 0x0000004E
 }
 .module Marshal.exe
-// MVID: {5F972A55-7500-369C-A745-0383552A975F}
+// MVID: {60B68B7F-7500-369C-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x058B0000
+// Image base: 0x068F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
index 2773eb1e52f..ebeebd6525a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline.il.bsl
@@ -37,13 +37,13 @@
   // Offset: 0x00000300 Length: 0x000000F5
 }
 .module MethodImplNoInline.exe
-// MVID: {5F972A55-4480-09E2-A745-0383552A975F}
+// MVID: {60B68B7F-4480-09E2-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08F70000
+// Image base: 0x06DC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
index 86679759817..607b8bf6f14 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/MethodImplNoInline02.il.bsl
@@ -37,13 +37,13 @@
   // Offset: 0x00000308 Length: 0x000000F9
 }
 .module MethodImplNoInline02.exe
-// MVID: {5F972A55-084F-1A8E-A745-0383552A975F}
+// MVID: {60B68B7F-084F-1A8E-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x072F0000
+// Image base: 0x05140000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
index ca2aaeddef8..4dbdb7783fe 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/ModuleWithExpression01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000210 Length: 0x000000A6
 }
 .module ModuleWithExpression01.exe
-// MVID: {5F972A55-CD1E-A8B4-A745-0383552A975F}
+// MVID: {60B68B7F-CD1E-A8B4-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x067B0000
+// Image base: 0x07550000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
index c20e6d78d11..1c571a25e0b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NoBoxingOnDispose01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000216
 }
-.mresource public FSharpSignatureDataB.NoBoxingOnDispose01
-{
-  // Offset: 0x00000220 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.NoBoxingOnDispose01
 {
-  // Offset: 0x00000228 Length: 0x0000007F
+  // Offset: 0x00000220 Length: 0x0000007F
 }
 .module NoBoxingOnDispose01.exe
-// MVID: {5F972A55-4EA9-C934-A745-0383552A975F}
+// MVID: {60B68B7F-4EA9-C934-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07350000
+// Image base: 0x06C40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
index efededb5d58..a20d0205daa 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/NonEscapingArguments02.il.bsl
@@ -31,26 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000355
 }
-.mresource public FSharpSignatureDataB.NonEscapingArguments02
-{
-  // Offset: 0x00000360 Length: 0x00000005
-}
 .mresource public FSharpOptimizationData.NonEscapingArguments02
 {
-  // Offset: 0x00000370 Length: 0x0000019E
-}
-.mresource public FSharpOptimizationDataB.NonEscapingArguments02
-{
-  // Offset: 0x00000518 Length: 0x00000002
+  // Offset: 0x00000360 Length: 0x0000019E
 }
 .module NonEscapingArguments02.dll
-// MVID: {5F972A55-BB56-6582-A745-0383552A975F}
+// MVID: {60B68B7F-BB56-6582-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06900000
+// Image base: 0x06B40000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
index 6fafbfec224..bbd2fc4fee7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/PreserveSig.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000002F8 Length: 0x0000004A
 }
 .module PreserveSig.dll
-// MVID: {5F972A55-E8CC-64FE-A745-0383552A975F}
+// MVID: {60B68B7F-E8CC-64FE-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069E0000
+// Image base: 0x05120000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
index 0bdc978fe38..1d930ea81ac 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000073D
 }
-.mresource public FSharpSignatureDataB.Structs01
-{
-  // Offset: 0x00000748 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.Structs01
 {
-  // Offset: 0x00000750 Length: 0x00000231
+  // Offset: 0x00000748 Length: 0x00000231
 }
 .module Structs01.exe
-// MVID: {5F972A55-701F-5E27-A745-0383552A975F}
+// MVID: {60B68B7F-701F-5E27-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x067B0000
+// Image base: 0x07280000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
index 16e188c5b12..d22541e0303 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/Structs02.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000777
 }
-.mresource public FSharpSignatureDataB.Structs02
-{
-  // Offset: 0x00000780 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.Structs02
 {
-  // Offset: 0x00000788 Length: 0x00000237
+  // Offset: 0x00000780 Length: 0x00000237
 }
 .module Structs02.exe
-// MVID: {5F972A55-7040-5E27-A745-0383552A975F}
+// MVID: {60B68B7F-7040-5E27-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F90000
+// Image base: 0x05320000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
index 9600f918cb0..7beca501cef 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/StructsAsArrayElements01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000754
 }
-.mresource public FSharpSignatureDataB.StructsAsArrayElements01
-{
-  // Offset: 0x00000758 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.StructsAsArrayElements01
 {
   // Offset: 0x00000758 Length: 0x0000022C
 }
 .module StructsAsArrayElements01.dll
-// MVID: {5F972A55-29F3-6E68-A745-0383552A975F}
+// MVID: {60B68B7F-29F3-6E68-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x071A0000
+// Image base: 0x06A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
index 86c73fdf1d5..d053449a8d5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/TryWith_NoFilterBlocks01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000160 Length: 0x0000005F
 }
 .module TryWith_NoFilterBlocks01.exe
-// MVID: {5F972A55-3DEF-9A40-A745-0383552A975F}
+// MVID: {60B68B7F-3DEF-9A40-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08D00000
+// Image base: 0x00F10000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
index 4f4d5ce1fe6..301f28d9b64 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/cas.il.bsl
@@ -43,13 +43,13 @@
   // Offset: 0x00000620 Length: 0x000000F3
 }
 .module cas.exe
-// MVID: {5F972A55-35EA-18E3-A745-0383552A975F}
+// MVID: {60B68B7F-35EA-18E3-A745-03837F8BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06D40000
+// Image base: 0x05250000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
index 4e3706a5e70..fefd5e583ba 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/Operators/comparison_decimal01.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.comparison_decimal01
 {
-  // Offset: 0x00000000 Length: 0x00000172
+  // Offset: 0x00000000 Length: 0x00000170
 }
 .mresource public FSharpOptimizationData.comparison_decimal01
 {
   // Offset: 0x00000178 Length: 0x0000005B
 }
 .module comparison_decimal01.exe
-// MVID: {5F972A55-76D8-7EE3-A745-0383552A975F}
+// MVID: {5F1FA087-76D8-7EE3-A745-038387A01F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08E40000
+// Image base: 0x06BE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,7 +71,7 @@
     // Code size       228 (0xe4)
     .maxstack  8
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 4,4 : 9,20 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
+    .line 4,4 : 9,20 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\Operators\\comparison_decimal01.fs'
     IL_0000:  ldc.i4.s   10
     IL_0002:  ldc.i4.0
     IL_0003:  ldc.i4.0
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
index 86800390e7c..7ea3b26508c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest1.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest1.exe
-// MVID: {60B8D5B9-2432-947D-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-947D-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x071D0000
+// Image base: 0x06A30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
index d002fceb2e2..f061027f197 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest2.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest2.exe
-// MVID: {60B8D5B9-2432-951E-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-951E-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06420000
+// Image base: 0x06BF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
index 078735460f6..d227238134d 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest3.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000278 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest3.exe
-// MVID: {60B8D5B9-2432-943F-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-943F-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05780000
+// Image base: 0x065D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
index bb536c41a96..91921e1a0f6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest4.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest4.exe
-// MVID: {60B8D5B9-2432-93E0-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-93E0-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06710000
+// Image base: 0x06580000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
index 5a009c6fd32..a3ce205c086 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest5.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000268 Length: 0x000000AD
 }
 .module SeqExpressionSteppingTest5.exe
-// MVID: {60B8D5B9-2432-9401-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-9401-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x068C0000
+// Image base: 0x05A80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
index 3650dad705d..75fbbcc82e7 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest6.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000002A0 Length: 0x000000BA
 }
 .module SeqExpressionSteppingTest6.exe
-// MVID: {60B8D5B9-2432-94A2-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-94A2-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07000000
+// Image base: 0x06B30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
index 5a1112543aa..a193421655c 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionStepping/SeqExpressionSteppingTest7.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000266
 }
-.mresource public FSharpSignatureDataB.SeqExpressionSteppingTest7
-{
-  // Offset: 0x00000270 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.SeqExpressionSteppingTest7
 {
-  // Offset: 0x00000278 Length: 0x00000098
+  // Offset: 0x00000270 Length: 0x00000098
 }
 .module SeqExpressionSteppingTest7.exe
-// MVID: {60B8D5B9-2432-93C3-A745-0383B9D5B860}
+// MVID: {60B78A59-2432-93C3-A745-0383598AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x051C0000
+// Image base: 0x054A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
index e6557ee596c..79a56d68ab0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000220 Length: 0x0000008C
 }
 .module SeqExpressionTailCalls01.exe
-// MVID: {60B8D5B8-093A-A6BE-A745-0383B8D5B860}
+// MVID: {60B78A58-093A-A6BE-A745-0383588AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05840000
+// Image base: 0x06850000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
index b63bca7e523..1a661c56fba 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SeqExpressionTailCalls/SeqExpressionTailCalls02.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000258 Length: 0x0000009E
 }
 .module SeqExpressionTailCalls02.exe
-// MVID: {60B8D5B8-093A-EC43-A745-0383B8D5B860}
+// MVID: {60B78A58-093A-EC43-A745-0383588AB760}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F70000
+// Image base: 0x066C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
index b98c2b29932..bf83c61d107 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelModule.il.bsl
@@ -1,1677 +1,4 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
-
-
-// Metadata version: v4.0.30319
-.assembly extern mscorlib
-{
-  .publickeytoken = (B7 7A 5C 56 19 34 E0 89 )                         // .z\V.4..
-  .ver 4:0:0:0
-}
-.assembly extern FSharp.Core
-{
-  .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
-}
-.assembly TopLevelModule
-{
-  .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 ) 
-
-  // --- The following custom attribute is added automatically, do not uncomment -------
-  //  .custom instance void [mscorlib]System.Diagnostics.DebuggableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggableAttribute/DebuggingModes) = ( 01 00 01 01 00 00 00 00 ) 
-
-  .hash algorithm 0x00008004
-  .ver 0:0:0:0
-}
-.mresource public FSharpSignatureData.TopLevelModule
-{
-  // Offset: 0x00000000 Length: 0x0000113D
-}
-.mresource public FSharpSignatureDataB.TopLevelModule
-{
-  // Offset: 0x00001148 Length: 0x00000004
-}
-.mresource public FSharpOptimizationData.TopLevelModule
-{
-  // Offset: 0x00001150 Length: 0x000003FD
-}
-.module TopLevelModule.dll
-// MVID: {60C0F26A-37F5-C118-A745-03836AF2C060}
-.imagebase 0x00400000
-.file alignment 0x00000200
-.stackreserve 0x00100000
-.subsystem 0x0003       // WINDOWS_CUI
-.corflags 0x00000001    //  ILONLY
-// Image base: 0x04E10000
-
-
-// =============== CLASS MEMBERS DECLARATION ===================
-
-.class public abstract auto ansi sealed ABC
-       extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
-         extends [mscorlib]System.Object
-         implements class [mscorlib]System.IEquatable`1,
-                    [mscorlib]System.Collections.IStructuralEquatable,
-                    class [mscorlib]System.IComparable`1,
-                    [mscorlib]System.IComparable,
-                    [mscorlib]System.Collections.IStructuralComparable
-  {
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
-                                                                                                   61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
-    .field assembly initonly int32 item
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    .method public static class ABC/Expr 
-            NewNum(int32 item) cil managed
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                  int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  newobj     instance void ABC/Expr::.ctor(int32)
-      IL_0006:  ret
-    } // end of method Expr::NewNum
-
-    .method assembly specialname rtspecialname 
-            instance void  .ctor(int32 item) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       14 (0xe)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ldarg.0
-      IL_0007:  ldarg.1
-      IL_0008:  stfld      int32 ABC/Expr::item
-      IL_000d:  ret
-    } // end of method Expr::.ctor
-
-    .method public hidebysig instance int32 
-            get_Item() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 ABC/Expr::item
-      IL_0006:  ret
-    } // end of method Expr::get_Item
-
-    .method public hidebysig instance int32 
-            get_Tag() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       4 (0x4)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  pop
-      IL_0002:  ldc.i4.0
-      IL_0003:  ret
-    } // end of method Expr::get_Tag
-
-    .method assembly hidebysig specialname 
-            instance object  __DebugDisplay() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       22 (0x16)
-      .maxstack  8
-      IL_0000:  ldstr      "%+0.8A"
-      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
-      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-      IL_000f:  ldarg.0
-      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-      IL_0015:  ret
-    } // end of method Expr::__DebugDisplay
-
-    .method public strict virtual instance string 
-            ToString() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       22 (0x16)
-      .maxstack  8
-      IL_0000:  ldstr      "%+A"
-      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class ABC/Expr>::.ctor(string)
-      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-      IL_000f:  ldarg.0
-      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-      IL_0015:  ret
-    } // end of method Expr::ToString
-
-    .method public hidebysig virtual final 
-            instance int32  CompareTo(class ABC/Expr obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       64 (0x40)
-      .maxstack  4
-      .locals init ([0] class ABC/Expr V_0,
-               [1] class ABC/Expr V_1,
-               [2] class [mscorlib]System.Collections.IComparer V_2,
-               [3] int32 V_3,
-               [4] int32 V_4)
-      .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SerializableAttribute\\ToplevelModule.fs'
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0036
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  ldnull
-      IL_0008:  cgt.un
-      IL_000a:  brfalse.s  IL_0034
-
-      .line 100001,100001 : 0,0 ''
-      IL_000c:  ldarg.0
-      IL_000d:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_000e:  ldarg.0
-      IL_000f:  stloc.0
-      IL_0010:  ldarg.1
-      IL_0011:  stloc.1
-      IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
-      IL_0017:  stloc.2
-      IL_0018:  ldloc.0
-      IL_0019:  ldfld      int32 ABC/Expr::item
-      IL_001e:  stloc.3
-      IL_001f:  ldloc.1
-      IL_0020:  ldfld      int32 ABC/Expr::item
-      IL_0025:  stloc.s    V_4
-      IL_0027:  ldloc.3
-      IL_0028:  ldloc.s    V_4
-      IL_002a:  bge.s      IL_002e
-
-      .line 100001,100001 : 0,0 ''
-      IL_002c:  ldc.i4.m1
-      IL_002d:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002e:  ldloc.3
-      IL_002f:  ldloc.s    V_4
-      IL_0031:  cgt
-      IL_0033:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0034:  ldc.i4.1
-      IL_0035:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0036:  ldarg.1
-      IL_0037:  ldnull
-      IL_0038:  cgt.un
-      IL_003a:  brfalse.s  IL_003e
-
-      .line 100001,100001 : 0,0 ''
-      IL_003c:  ldc.i4.m1
-      IL_003d:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_003e:  ldc.i4.0
-      IL_003f:  ret
-    } // end of method Expr::CompareTo
-
-    .method public hidebysig virtual final 
-            instance int32  CompareTo(object obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       13 (0xd)
-      .maxstack  8
-      .line 6,6 : 14,18 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldarg.1
-      IL_0002:  unbox.any  ABC/Expr
-      IL_0007:  callvirt   instance int32 ABC/Expr::CompareTo(class ABC/Expr)
-      IL_000c:  ret
-    } // end of method Expr::CompareTo
-
-    .method public hidebysig virtual final 
-            instance int32  CompareTo(object obj,
-                                      class [mscorlib]System.Collections.IComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       80 (0x50)
-      .maxstack  4
-      .locals init ([0] class ABC/Expr V_0,
-               [1] class ABC/Expr V_1,
-               [2] class ABC/Expr V_2,
-               [3] class [mscorlib]System.Collections.IComparer V_3,
-               [4] int32 V_4,
-               [5] int32 V_5)
-      .line 6,6 : 14,18 ''
-      IL_0000:  ldarg.1
-      IL_0001:  unbox.any  ABC/Expr
-      IL_0006:  stloc.0
-      IL_0007:  ldarg.0
-      IL_0008:  ldnull
-      IL_0009:  cgt.un
-      IL_000b:  brfalse.s  IL_0041
-
-      .line 100001,100001 : 0,0 ''
-      IL_000d:  ldarg.1
-      IL_000e:  unbox.any  ABC/Expr
-      IL_0013:  ldnull
-      IL_0014:  cgt.un
-      IL_0016:  brfalse.s  IL_003f
-
-      .line 100001,100001 : 0,0 ''
-      IL_0018:  ldarg.0
-      IL_0019:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_001a:  ldarg.0
-      IL_001b:  stloc.1
-      IL_001c:  ldloc.0
-      IL_001d:  stloc.2
-      IL_001e:  ldarg.2
-      IL_001f:  stloc.3
-      IL_0020:  ldloc.1
-      IL_0021:  ldfld      int32 ABC/Expr::item
-      IL_0026:  stloc.s    V_4
-      IL_0028:  ldloc.2
-      IL_0029:  ldfld      int32 ABC/Expr::item
-      IL_002e:  stloc.s    V_5
-      IL_0030:  ldloc.s    V_4
-      IL_0032:  ldloc.s    V_5
-      IL_0034:  bge.s      IL_0038
-
-      .line 100001,100001 : 0,0 ''
-      IL_0036:  ldc.i4.m1
-      IL_0037:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0038:  ldloc.s    V_4
-      IL_003a:  ldloc.s    V_5
-      IL_003c:  cgt
-      IL_003e:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_003f:  ldc.i4.1
-      IL_0040:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0041:  ldarg.1
-      IL_0042:  unbox.any  ABC/Expr
-      IL_0047:  ldnull
-      IL_0048:  cgt.un
-      IL_004a:  brfalse.s  IL_004e
-
-      .line 100001,100001 : 0,0 ''
-      IL_004c:  ldc.i4.m1
-      IL_004d:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_004e:  ldc.i4.0
-      IL_004f:  ret
-    } // end of method Expr::CompareTo
-
-    .method public hidebysig virtual final 
-            instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       41 (0x29)
-      .maxstack  7
-      .locals init ([0] int32 V_0,
-               [1] class ABC/Expr V_1,
-               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0027
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldc.i4.0
-      IL_0007:  stloc.0
-      IL_0008:  ldarg.0
-      IL_0009:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_000a:  ldarg.0
-      IL_000b:  stloc.1
-      IL_000c:  ldc.i4.0
-      IL_000d:  stloc.0
-      IL_000e:  ldc.i4     0x9e3779b9
-      IL_0013:  ldarg.1
-      IL_0014:  stloc.2
-      IL_0015:  ldloc.1
-      IL_0016:  ldfld      int32 ABC/Expr::item
-      IL_001b:  ldloc.0
-      IL_001c:  ldc.i4.6
-      IL_001d:  shl
-      IL_001e:  ldloc.0
-      IL_001f:  ldc.i4.2
-      IL_0020:  shr
-      IL_0021:  add
-      IL_0022:  add
-      IL_0023:  add
-      IL_0024:  stloc.0
-      IL_0025:  ldloc.0
-      IL_0026:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0027:  ldc.i4.0
-      IL_0028:  ret
-    } // end of method Expr::GetHashCode
-
-    .method public hidebysig virtual final 
-            instance int32  GetHashCode() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       12 (0xc)
-      .maxstack  8
-      .line 6,6 : 14,18 ''
-      IL_0000:  ldarg.0
-      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-      IL_0006:  callvirt   instance int32 ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-      IL_000b:  ret
-    } // end of method Expr::GetHashCode
-
-    .method public hidebysig virtual final 
-            instance bool  Equals(object obj,
-                                  class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       52 (0x34)
-      .maxstack  4
-      .locals init ([0] class ABC/Expr V_0,
-               [1] class ABC/Expr V_1,
-               [2] class ABC/Expr V_2,
-               [3] class ABC/Expr V_3,
-               [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_002c
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  isinst     ABC/Expr
-      IL_000c:  stloc.0
-      IL_000d:  ldloc.0
-      IL_000e:  brfalse.s  IL_002a
-
-      .line 100001,100001 : 0,0 ''
-      IL_0010:  ldloc.0
-      IL_0011:  stloc.1
-      IL_0012:  ldarg.0
-      IL_0013:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_0014:  ldarg.0
-      IL_0015:  stloc.2
-      IL_0016:  ldloc.1
-      IL_0017:  stloc.3
-      IL_0018:  ldarg.2
-      IL_0019:  stloc.s    V_4
-      IL_001b:  ldloc.2
-      IL_001c:  ldfld      int32 ABC/Expr::item
-      IL_0021:  ldloc.3
-      IL_0022:  ldfld      int32 ABC/Expr::item
-      IL_0027:  ceq
-      IL_0029:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002a:  ldc.i4.0
-      IL_002b:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002c:  ldarg.1
-      IL_002d:  ldnull
-      IL_002e:  cgt.un
-      IL_0030:  ldc.i4.0
-      IL_0031:  ceq
-      IL_0033:  ret
-    } // end of method Expr::Equals
-
-    .method public hidebysig virtual final 
-            instance bool  Equals(class ABC/Expr obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       43 (0x2b)
-      .maxstack  4
-      .locals init ([0] class ABC/Expr V_0,
-               [1] class ABC/Expr V_1)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0023
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  ldnull
-      IL_0008:  cgt.un
-      IL_000a:  brfalse.s  IL_0021
-
-      .line 100001,100001 : 0,0 ''
-      IL_000c:  ldarg.0
-      IL_000d:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_000e:  ldarg.0
-      IL_000f:  stloc.0
-      IL_0010:  ldarg.1
-      IL_0011:  stloc.1
-      IL_0012:  ldloc.0
-      IL_0013:  ldfld      int32 ABC/Expr::item
-      IL_0018:  ldloc.1
-      IL_0019:  ldfld      int32 ABC/Expr::item
-      IL_001e:  ceq
-      IL_0020:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0021:  ldc.i4.0
-      IL_0022:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0023:  ldarg.1
-      IL_0024:  ldnull
-      IL_0025:  cgt.un
-      IL_0027:  ldc.i4.0
-      IL_0028:  ceq
-      IL_002a:  ret
-    } // end of method Expr::Equals
-
-    .method public hidebysig virtual final 
-            instance bool  Equals(object obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       20 (0x14)
-      .maxstack  4
-      .locals init ([0] class ABC/Expr V_0)
-      .line 6,6 : 14,18 ''
-      IL_0000:  ldarg.1
-      IL_0001:  isinst     ABC/Expr
-      IL_0006:  stloc.0
-      IL_0007:  ldloc.0
-      IL_0008:  brfalse.s  IL_0012
-
-      .line 100001,100001 : 0,0 ''
-      IL_000a:  ldarg.0
-      IL_000b:  ldloc.0
-      IL_000c:  callvirt   instance bool ABC/Expr::Equals(class ABC/Expr)
-      IL_0011:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0012:  ldc.i4.0
-      IL_0013:  ret
-    } // end of method Expr::Equals
-
-    .property instance int32 Tag()
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-      .get instance int32 ABC/Expr::get_Tag()
-    } // end of property Expr::Tag
-    .property instance int32 Item()
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                  int32,
-                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      .get instance int32 ABC/Expr::get_Item()
-    } // end of property Expr::Item
-  } // end of class Expr
-
-  .class auto ansi serializable nested public beforefieldinit MyExn
-         extends [mscorlib]System.Exception
-         implements [mscorlib]System.Collections.IStructuralEquatable
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
-    .field assembly int32 Data0@
-    .method public specialname rtspecialname 
-            instance void  .ctor(int32 data0) cil managed
-    {
-      // Code size       14 (0xe)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-      IL_0006:  ldarg.0
-      IL_0007:  ldarg.1
-      IL_0008:  stfld      int32 ABC/MyExn::Data0@
-      IL_000d:  ret
-    } // end of method MyExn::.ctor
-
-    .method public specialname rtspecialname 
-            instance void  .ctor() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-      IL_0006:  ret
-    } // end of method MyExn::.ctor
-
-    .method family specialname rtspecialname 
-            instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
-                                 valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
-    {
-      // Code size       9 (0x9)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  ldarg.1
-      IL_0002:  ldarg.2
-      IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
-                                                                           valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
-      IL_0008:  ret
-    } // end of method MyExn::.ctor
-
-    .method public hidebysig specialname 
-            instance int32  get_Data0() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 ABC/MyExn::Data0@
-      IL_0006:  ret
-    } // end of method MyExn::get_Data0
-
-    .method public hidebysig virtual instance int32 
-            GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       40 (0x28)
-      .maxstack  7
-      .locals init ([0] int32 V_0,
-               [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0026
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldc.i4.0
-      IL_0007:  stloc.0
-      IL_0008:  ldc.i4     0x9e3779b9
-      IL_000d:  ldarg.1
-      IL_000e:  stloc.1
-      IL_000f:  ldarg.0
-      IL_0010:  castclass  ABC/MyExn
-      IL_0015:  call       instance int32 ABC/MyExn::get_Data0()
-      IL_001a:  ldloc.0
-      IL_001b:  ldc.i4.6
-      IL_001c:  shl
-      IL_001d:  ldloc.0
-      IL_001e:  ldc.i4.2
-      IL_001f:  shr
-      IL_0020:  add
-      IL_0021:  add
-      IL_0022:  add
-      IL_0023:  stloc.0
-      IL_0024:  ldloc.0
-      IL_0025:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0026:  ldc.i4.0
-      IL_0027:  ret
-    } // end of method MyExn::GetHashCode
-
-    .method public hidebysig virtual instance int32 
-            GetHashCode() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       12 (0xc)
-      .maxstack  8
-      .line 7,7 : 19,24 ''
-      IL_0000:  ldarg.0
-      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-      IL_0006:  callvirt   instance int32 ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-      IL_000b:  ret
-    } // end of method MyExn::GetHashCode
-
-    .method public hidebysig virtual instance bool 
-            Equals(object obj,
-                   class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       67 (0x43)
-      .maxstack  4
-      .locals init ([0] class [mscorlib]System.Exception V_0,
-               [1] class [mscorlib]System.Exception V_1,
-               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_003b
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  isinst     [mscorlib]System.Exception
-      IL_000c:  stloc.0
-      IL_000d:  ldloc.0
-      IL_000e:  brfalse.s  IL_0039
-
-      .line 100001,100001 : 0,0 ''
-      IL_0010:  ldloc.0
-      IL_0011:  stloc.1
-      IL_0012:  ldloc.0
-      IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-      IL_0018:  brtrue.s   IL_001c
-
-      IL_001a:  br.s       IL_0037
-
-      .line 100001,100001 : 0,0 ''
-      IL_001c:  ldarg.2
-      IL_001d:  stloc.2
-      IL_001e:  ldarg.0
-      IL_001f:  castclass  ABC/MyExn
-      IL_0024:  call       instance int32 ABC/MyExn::get_Data0()
-      IL_0029:  ldloc.1
-      IL_002a:  castclass  ABC/MyExn
-      IL_002f:  call       instance int32 ABC/MyExn::get_Data0()
-      IL_0034:  ceq
-      IL_0036:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0037:  ldc.i4.0
-      IL_0038:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0039:  ldc.i4.0
-      IL_003a:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_003b:  ldarg.1
-      IL_003c:  ldnull
-      IL_003d:  cgt.un
-      IL_003f:  ldc.i4.0
-      IL_0040:  ceq
-      IL_0042:  ret
-    } // end of method MyExn::Equals
-
-    .method public hidebysig instance bool 
-            Equals(class [mscorlib]System.Exception obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       59 (0x3b)
-      .maxstack  8
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0033
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  ldnull
-      IL_0008:  cgt.un
-      IL_000a:  brfalse.s  IL_0031
-
-      .line 100001,100001 : 0,0 ''
-      IL_000c:  ldarg.1
-      IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-      IL_0012:  brtrue.s   IL_0016
-
-      IL_0014:  br.s       IL_002f
-
-      .line 100001,100001 : 0,0 ''
-      IL_0016:  ldarg.0
-      IL_0017:  castclass  ABC/MyExn
-      IL_001c:  call       instance int32 ABC/MyExn::get_Data0()
-      IL_0021:  ldarg.1
-      IL_0022:  castclass  ABC/MyExn
-      IL_0027:  call       instance int32 ABC/MyExn::get_Data0()
-      IL_002c:  ceq
-      IL_002e:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002f:  ldc.i4.0
-      IL_0030:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0031:  ldc.i4.0
-      IL_0032:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0033:  ldarg.1
-      IL_0034:  ldnull
-      IL_0035:  cgt.un
-      IL_0037:  ldc.i4.0
-      IL_0038:  ceq
-      IL_003a:  ret
-    } // end of method MyExn::Equals
-
-    .method public hidebysig virtual instance bool 
-            Equals(object obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       20 (0x14)
-      .maxstack  4
-      .locals init ([0] class [mscorlib]System.Exception V_0)
-      .line 7,7 : 19,24 ''
-      IL_0000:  ldarg.1
-      IL_0001:  isinst     [mscorlib]System.Exception
-      IL_0006:  stloc.0
-      IL_0007:  ldloc.0
-      IL_0008:  brfalse.s  IL_0012
-
-      .line 100001,100001 : 0,0 ''
-      IL_000a:  ldarg.0
-      IL_000b:  ldloc.0
-      IL_000c:  callvirt   instance bool ABC/MyExn::Equals(class [mscorlib]System.Exception)
-      IL_0011:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0012:  ldc.i4.0
-      IL_0013:  ret
-    } // end of method MyExn::Equals
-
-    .property instance int32 Data0()
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
-      .get instance int32 ABC/MyExn::get_Data0()
-    } // end of property MyExn::Data0
-  } // end of class MyExn
-
-  .class auto ansi serializable nested public A
-         extends [mscorlib]System.Object
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
-    .field assembly string x
-    .method public specialname rtspecialname 
-            instance void  .ctor(string x) cil managed
-    {
-      // Code size       16 (0x10)
-      .maxstack  8
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ldarg.0
-      IL_0007:  pop
-      .line 8,8 : 16,17 ''
-      IL_0008:  ldarg.0
-      IL_0009:  ldarg.1
-      IL_000a:  stfld      string ABC/A::x
-      .line 8,8 : 14,15 ''
-      IL_000f:  ret
-    } // end of method A::.ctor
-
-    .method public hidebysig specialname 
-            instance string  get_X() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      .line 8,8 : 42,43 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldfld      string ABC/A::x
-      IL_0006:  ret
-    } // end of method A::get_X
-
-    .property instance string X()
-    {
-      .get instance string ABC/A::get_X()
-    } // end of property A::X
-  } // end of class A
-
-  .class abstract auto ansi sealed nested public ABC
-         extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
-           extends [mscorlib]System.Object
-           implements class [mscorlib]System.IEquatable`1,
-                      [mscorlib]System.Collections.IStructuralEquatable,
-                      class [mscorlib]System.IComparable`1,
-                      [mscorlib]System.IComparable,
-                      [mscorlib]System.Collections.IStructuralComparable
-    {
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
-                                                                                                     61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
-      .field assembly initonly int32 item
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      .method public static class ABC/ABC/Expr 
-              NewNum(int32 item) cil managed
-      {
-        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                    int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  newobj     instance void ABC/ABC/Expr::.ctor(int32)
-        IL_0006:  ret
-      } // end of method Expr::NewNum
-
-      .method assembly specialname rtspecialname 
-              instance void  .ctor(int32 item) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       14 (0xe)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-        IL_0006:  ldarg.0
-        IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 ABC/ABC/Expr::item
-        IL_000d:  ret
-      } // end of method Expr::.ctor
-
-      .method public hidebysig instance int32 
-              get_Item() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  ldfld      int32 ABC/ABC/Expr::item
-        IL_0006:  ret
-      } // end of method Expr::get_Item
-
-      .method public hidebysig instance int32 
-              get_Tag() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       4 (0x4)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  pop
-        IL_0002:  ldc.i4.0
-        IL_0003:  ret
-      } // end of method Expr::get_Tag
-
-      .method assembly hidebysig specialname 
-              instance object  __DebugDisplay() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       22 (0x16)
-        .maxstack  8
-        IL_0000:  ldstr      "%+0.8A"
-        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
-        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-        IL_000f:  ldarg.0
-        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-        IL_0015:  ret
-      } // end of method Expr::__DebugDisplay
-
-      .method public strict virtual instance string 
-              ToString() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       22 (0x16)
-        .maxstack  8
-        IL_0000:  ldstr      "%+A"
-        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class ABC/ABC/Expr>::.ctor(string)
-        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-        IL_000f:  ldarg.0
-        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-        IL_0015:  ret
-      } // end of method Expr::ToString
-
-      .method public hidebysig virtual final 
-              instance int32  CompareTo(class ABC/ABC/Expr obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       64 (0x40)
-        .maxstack  4
-        .locals init ([0] class ABC/ABC/Expr V_0,
-                 [1] class ABC/ABC/Expr V_1,
-                 [2] class [mscorlib]System.Collections.IComparer V_2,
-                 [3] int32 V_3,
-                 [4] int32 V_4)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0036
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  ldnull
-        IL_0008:  cgt.un
-        IL_000a:  brfalse.s  IL_0034
-
-        .line 100001,100001 : 0,0 ''
-        IL_000c:  ldarg.0
-        IL_000d:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_000e:  ldarg.0
-        IL_000f:  stloc.0
-        IL_0010:  ldarg.1
-        IL_0011:  stloc.1
-        IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
-        IL_0017:  stloc.2
-        IL_0018:  ldloc.0
-        IL_0019:  ldfld      int32 ABC/ABC/Expr::item
-        IL_001e:  stloc.3
-        IL_001f:  ldloc.1
-        IL_0020:  ldfld      int32 ABC/ABC/Expr::item
-        IL_0025:  stloc.s    V_4
-        IL_0027:  ldloc.3
-        IL_0028:  ldloc.s    V_4
-        IL_002a:  bge.s      IL_002e
-
-        .line 100001,100001 : 0,0 ''
-        IL_002c:  ldc.i4.m1
-        IL_002d:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002e:  ldloc.3
-        IL_002f:  ldloc.s    V_4
-        IL_0031:  cgt
-        IL_0033:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0034:  ldc.i4.1
-        IL_0035:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0036:  ldarg.1
-        IL_0037:  ldnull
-        IL_0038:  cgt.un
-        IL_003a:  brfalse.s  IL_003e
-
-        .line 100001,100001 : 0,0 ''
-        IL_003c:  ldc.i4.m1
-        IL_003d:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_003e:  ldc.i4.0
-        IL_003f:  ret
-      } // end of method Expr::CompareTo
-
-      .method public hidebysig virtual final 
-              instance int32  CompareTo(object obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       13 (0xd)
-        .maxstack  8
-        .line 16,16 : 18,22 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldarg.1
-        IL_0002:  unbox.any  ABC/ABC/Expr
-        IL_0007:  callvirt   instance int32 ABC/ABC/Expr::CompareTo(class ABC/ABC/Expr)
-        IL_000c:  ret
-      } // end of method Expr::CompareTo
-
-      .method public hidebysig virtual final 
-              instance int32  CompareTo(object obj,
-                                        class [mscorlib]System.Collections.IComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       80 (0x50)
-        .maxstack  4
-        .locals init ([0] class ABC/ABC/Expr V_0,
-                 [1] class ABC/ABC/Expr V_1,
-                 [2] class ABC/ABC/Expr V_2,
-                 [3] class [mscorlib]System.Collections.IComparer V_3,
-                 [4] int32 V_4,
-                 [5] int32 V_5)
-        .line 16,16 : 18,22 ''
-        IL_0000:  ldarg.1
-        IL_0001:  unbox.any  ABC/ABC/Expr
-        IL_0006:  stloc.0
-        IL_0007:  ldarg.0
-        IL_0008:  ldnull
-        IL_0009:  cgt.un
-        IL_000b:  brfalse.s  IL_0041
-
-        .line 100001,100001 : 0,0 ''
-        IL_000d:  ldarg.1
-        IL_000e:  unbox.any  ABC/ABC/Expr
-        IL_0013:  ldnull
-        IL_0014:  cgt.un
-        IL_0016:  brfalse.s  IL_003f
-
-        .line 100001,100001 : 0,0 ''
-        IL_0018:  ldarg.0
-        IL_0019:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_001a:  ldarg.0
-        IL_001b:  stloc.1
-        IL_001c:  ldloc.0
-        IL_001d:  stloc.2
-        IL_001e:  ldarg.2
-        IL_001f:  stloc.3
-        IL_0020:  ldloc.1
-        IL_0021:  ldfld      int32 ABC/ABC/Expr::item
-        IL_0026:  stloc.s    V_4
-        IL_0028:  ldloc.2
-        IL_0029:  ldfld      int32 ABC/ABC/Expr::item
-        IL_002e:  stloc.s    V_5
-        IL_0030:  ldloc.s    V_4
-        IL_0032:  ldloc.s    V_5
-        IL_0034:  bge.s      IL_0038
-
-        .line 100001,100001 : 0,0 ''
-        IL_0036:  ldc.i4.m1
-        IL_0037:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0038:  ldloc.s    V_4
-        IL_003a:  ldloc.s    V_5
-        IL_003c:  cgt
-        IL_003e:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_003f:  ldc.i4.1
-        IL_0040:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0041:  ldarg.1
-        IL_0042:  unbox.any  ABC/ABC/Expr
-        IL_0047:  ldnull
-        IL_0048:  cgt.un
-        IL_004a:  brfalse.s  IL_004e
-
-        .line 100001,100001 : 0,0 ''
-        IL_004c:  ldc.i4.m1
-        IL_004d:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_004e:  ldc.i4.0
-        IL_004f:  ret
-      } // end of method Expr::CompareTo
-
-      .method public hidebysig virtual final 
-              instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       41 (0x29)
-        .maxstack  7
-        .locals init ([0] int32 V_0,
-                 [1] class ABC/ABC/Expr V_1,
-                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0027
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldc.i4.0
-        IL_0007:  stloc.0
-        IL_0008:  ldarg.0
-        IL_0009:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_000a:  ldarg.0
-        IL_000b:  stloc.1
-        IL_000c:  ldc.i4.0
-        IL_000d:  stloc.0
-        IL_000e:  ldc.i4     0x9e3779b9
-        IL_0013:  ldarg.1
-        IL_0014:  stloc.2
-        IL_0015:  ldloc.1
-        IL_0016:  ldfld      int32 ABC/ABC/Expr::item
-        IL_001b:  ldloc.0
-        IL_001c:  ldc.i4.6
-        IL_001d:  shl
-        IL_001e:  ldloc.0
-        IL_001f:  ldc.i4.2
-        IL_0020:  shr
-        IL_0021:  add
-        IL_0022:  add
-        IL_0023:  add
-        IL_0024:  stloc.0
-        IL_0025:  ldloc.0
-        IL_0026:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0027:  ldc.i4.0
-        IL_0028:  ret
-      } // end of method Expr::GetHashCode
-
-      .method public hidebysig virtual final 
-              instance int32  GetHashCode() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       12 (0xc)
-        .maxstack  8
-        .line 16,16 : 18,22 ''
-        IL_0000:  ldarg.0
-        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-        IL_0006:  callvirt   instance int32 ABC/ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-        IL_000b:  ret
-      } // end of method Expr::GetHashCode
-
-      .method public hidebysig virtual final 
-              instance bool  Equals(object obj,
-                                    class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       52 (0x34)
-        .maxstack  4
-        .locals init ([0] class ABC/ABC/Expr V_0,
-                 [1] class ABC/ABC/Expr V_1,
-                 [2] class ABC/ABC/Expr V_2,
-                 [3] class ABC/ABC/Expr V_3,
-                 [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_002c
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  isinst     ABC/ABC/Expr
-        IL_000c:  stloc.0
-        IL_000d:  ldloc.0
-        IL_000e:  brfalse.s  IL_002a
-
-        .line 100001,100001 : 0,0 ''
-        IL_0010:  ldloc.0
-        IL_0011:  stloc.1
-        IL_0012:  ldarg.0
-        IL_0013:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_0014:  ldarg.0
-        IL_0015:  stloc.2
-        IL_0016:  ldloc.1
-        IL_0017:  stloc.3
-        IL_0018:  ldarg.2
-        IL_0019:  stloc.s    V_4
-        IL_001b:  ldloc.2
-        IL_001c:  ldfld      int32 ABC/ABC/Expr::item
-        IL_0021:  ldloc.3
-        IL_0022:  ldfld      int32 ABC/ABC/Expr::item
-        IL_0027:  ceq
-        IL_0029:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002a:  ldc.i4.0
-        IL_002b:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002c:  ldarg.1
-        IL_002d:  ldnull
-        IL_002e:  cgt.un
-        IL_0030:  ldc.i4.0
-        IL_0031:  ceq
-        IL_0033:  ret
-      } // end of method Expr::Equals
-
-      .method public hidebysig virtual final 
-              instance bool  Equals(class ABC/ABC/Expr obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       43 (0x2b)
-        .maxstack  4
-        .locals init ([0] class ABC/ABC/Expr V_0,
-                 [1] class ABC/ABC/Expr V_1)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0023
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  ldnull
-        IL_0008:  cgt.un
-        IL_000a:  brfalse.s  IL_0021
-
-        .line 100001,100001 : 0,0 ''
-        IL_000c:  ldarg.0
-        IL_000d:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_000e:  ldarg.0
-        IL_000f:  stloc.0
-        IL_0010:  ldarg.1
-        IL_0011:  stloc.1
-        IL_0012:  ldloc.0
-        IL_0013:  ldfld      int32 ABC/ABC/Expr::item
-        IL_0018:  ldloc.1
-        IL_0019:  ldfld      int32 ABC/ABC/Expr::item
-        IL_001e:  ceq
-        IL_0020:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0021:  ldc.i4.0
-        IL_0022:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0023:  ldarg.1
-        IL_0024:  ldnull
-        IL_0025:  cgt.un
-        IL_0027:  ldc.i4.0
-        IL_0028:  ceq
-        IL_002a:  ret
-      } // end of method Expr::Equals
-
-      .method public hidebysig virtual final 
-              instance bool  Equals(object obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       20 (0x14)
-        .maxstack  4
-        .locals init ([0] class ABC/ABC/Expr V_0)
-        .line 16,16 : 18,22 ''
-        IL_0000:  ldarg.1
-        IL_0001:  isinst     ABC/ABC/Expr
-        IL_0006:  stloc.0
-        IL_0007:  ldloc.0
-        IL_0008:  brfalse.s  IL_0012
-
-        .line 100001,100001 : 0,0 ''
-        IL_000a:  ldarg.0
-        IL_000b:  ldloc.0
-        IL_000c:  callvirt   instance bool ABC/ABC/Expr::Equals(class ABC/ABC/Expr)
-        IL_0011:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0012:  ldc.i4.0
-        IL_0013:  ret
-      } // end of method Expr::Equals
-
-      .property instance int32 Tag()
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-        .get instance int32 ABC/ABC/Expr::get_Tag()
-      } // end of property Expr::Tag
-      .property instance int32 Item()
-      {
-        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                    int32,
-                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        .get instance int32 ABC/ABC/Expr::get_Item()
-      } // end of property Expr::Item
-    } // end of class Expr
-
-    .class auto ansi serializable nested public beforefieldinit MyExn
-           extends [mscorlib]System.Exception
-           implements [mscorlib]System.Collections.IStructuralEquatable
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
-      .field assembly int32 Data0@
-      .method public specialname rtspecialname 
-              instance void  .ctor(int32 data0) cil managed
-      {
-        // Code size       14 (0xe)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-        IL_0006:  ldarg.0
-        IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 ABC/ABC/MyExn::Data0@
-        IL_000d:  ret
-      } // end of method MyExn::.ctor
-
-      .method public specialname rtspecialname 
-              instance void  .ctor() cil managed
-      {
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-        IL_0006:  ret
-      } // end of method MyExn::.ctor
-
-      .method family specialname rtspecialname 
-              instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
-                                   valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
-      {
-        // Code size       9 (0x9)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  ldarg.1
-        IL_0002:  ldarg.2
-        IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
-                                                                             valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
-        IL_0008:  ret
-      } // end of method MyExn::.ctor
-
-      .method public hidebysig specialname 
-              instance int32  get_Data0() cil managed
-      {
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  ldfld      int32 ABC/ABC/MyExn::Data0@
-        IL_0006:  ret
-      } // end of method MyExn::get_Data0
-
-      .method public hidebysig virtual instance int32 
-              GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       40 (0x28)
-        .maxstack  7
-        .locals init ([0] int32 V_0,
-                 [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0026
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldc.i4.0
-        IL_0007:  stloc.0
-        IL_0008:  ldc.i4     0x9e3779b9
-        IL_000d:  ldarg.1
-        IL_000e:  stloc.1
-        IL_000f:  ldarg.0
-        IL_0010:  castclass  ABC/ABC/MyExn
-        IL_0015:  call       instance int32 ABC/ABC/MyExn::get_Data0()
-        IL_001a:  ldloc.0
-        IL_001b:  ldc.i4.6
-        IL_001c:  shl
-        IL_001d:  ldloc.0
-        IL_001e:  ldc.i4.2
-        IL_001f:  shr
-        IL_0020:  add
-        IL_0021:  add
-        IL_0022:  add
-        IL_0023:  stloc.0
-        IL_0024:  ldloc.0
-        IL_0025:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0026:  ldc.i4.0
-        IL_0027:  ret
-      } // end of method MyExn::GetHashCode
-
-      .method public hidebysig virtual instance int32 
-              GetHashCode() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       12 (0xc)
-        .maxstack  8
-        .line 17,17 : 23,28 ''
-        IL_0000:  ldarg.0
-        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-        IL_0006:  callvirt   instance int32 ABC/ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-        IL_000b:  ret
-      } // end of method MyExn::GetHashCode
-
-      .method public hidebysig virtual instance bool 
-              Equals(object obj,
-                     class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       67 (0x43)
-        .maxstack  4
-        .locals init ([0] class [mscorlib]System.Exception V_0,
-                 [1] class [mscorlib]System.Exception V_1,
-                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_003b
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  isinst     [mscorlib]System.Exception
-        IL_000c:  stloc.0
-        IL_000d:  ldloc.0
-        IL_000e:  brfalse.s  IL_0039
-
-        .line 100001,100001 : 0,0 ''
-        IL_0010:  ldloc.0
-        IL_0011:  stloc.1
-        IL_0012:  ldloc.0
-        IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-        IL_0018:  brtrue.s   IL_001c
-
-        IL_001a:  br.s       IL_0037
-
-        .line 100001,100001 : 0,0 ''
-        IL_001c:  ldarg.2
-        IL_001d:  stloc.2
-        IL_001e:  ldarg.0
-        IL_001f:  castclass  ABC/ABC/MyExn
-        IL_0024:  call       instance int32 ABC/ABC/MyExn::get_Data0()
-        IL_0029:  ldloc.1
-        IL_002a:  castclass  ABC/ABC/MyExn
-        IL_002f:  call       instance int32 ABC/ABC/MyExn::get_Data0()
-        IL_0034:  ceq
-        IL_0036:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0037:  ldc.i4.0
-        IL_0038:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0039:  ldc.i4.0
-        IL_003a:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_003b:  ldarg.1
-        IL_003c:  ldnull
-        IL_003d:  cgt.un
-        IL_003f:  ldc.i4.0
-        IL_0040:  ceq
-        IL_0042:  ret
-      } // end of method MyExn::Equals
-
-      .method public hidebysig instance bool 
-              Equals(class [mscorlib]System.Exception obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       59 (0x3b)
-        .maxstack  8
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0033
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  ldnull
-        IL_0008:  cgt.un
-        IL_000a:  brfalse.s  IL_0031
-
-        .line 100001,100001 : 0,0 ''
-        IL_000c:  ldarg.1
-        IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-        IL_0012:  brtrue.s   IL_0016
-
-        IL_0014:  br.s       IL_002f
-
-        .line 100001,100001 : 0,0 ''
-        IL_0016:  ldarg.0
-        IL_0017:  castclass  ABC/ABC/MyExn
-        IL_001c:  call       instance int32 ABC/ABC/MyExn::get_Data0()
-        IL_0021:  ldarg.1
-        IL_0022:  castclass  ABC/ABC/MyExn
-        IL_0027:  call       instance int32 ABC/ABC/MyExn::get_Data0()
-        IL_002c:  ceq
-        IL_002e:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002f:  ldc.i4.0
-        IL_0030:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0031:  ldc.i4.0
-        IL_0032:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0033:  ldarg.1
-        IL_0034:  ldnull
-        IL_0035:  cgt.un
-        IL_0037:  ldc.i4.0
-        IL_0038:  ceq
-        IL_003a:  ret
-      } // end of method MyExn::Equals
-
-      .method public hidebysig virtual instance bool 
-              Equals(object obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       20 (0x14)
-        .maxstack  4
-        .locals init ([0] class [mscorlib]System.Exception V_0)
-        .line 17,17 : 23,28 ''
-        IL_0000:  ldarg.1
-        IL_0001:  isinst     [mscorlib]System.Exception
-        IL_0006:  stloc.0
-        IL_0007:  ldloc.0
-        IL_0008:  brfalse.s  IL_0012
-
-        .line 100001,100001 : 0,0 ''
-        IL_000a:  ldarg.0
-        IL_000b:  ldloc.0
-        IL_000c:  callvirt   instance bool ABC/ABC/MyExn::Equals(class [mscorlib]System.Exception)
-        IL_0011:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0012:  ldc.i4.0
-        IL_0013:  ret
-      } // end of method MyExn::Equals
-
-      .property instance int32 Data0()
-      {
-        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
-        .get instance int32 ABC/ABC/MyExn::get_Data0()
-      } // end of property MyExn::Data0
-    } // end of class MyExn
-
-    .class auto ansi serializable nested public A
-           extends [mscorlib]System.Object
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
-      .field assembly string x
-      .method public specialname rtspecialname 
-              instance void  .ctor(string x) cil managed
-      {
-        // Code size       16 (0x10)
-        .maxstack  8
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
-        IL_0006:  ldarg.0
-        IL_0007:  pop
-        .line 18,18 : 20,21 ''
-        IL_0008:  ldarg.0
-        IL_0009:  ldarg.1
-        IL_000a:  stfld      string ABC/ABC/A::x
-        .line 18,18 : 18,19 ''
-        IL_000f:  ret
-      } // end of method A::.ctor
-
-      .method public hidebysig specialname 
-              instance string  get_X() cil managed
-      {
-        // Code size       7 (0x7)
-        .maxstack  8
-        .line 18,18 : 46,47 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldfld      string ABC/ABC/A::x
-        IL_0006:  ret
-      } // end of method A::get_X
-
-      .property instance string X()
-      {
-        .get instance string ABC/ABC/A::get_X()
-      } // end of property A::X
-    } // end of class A
-
-    .method public static int32  'add'(int32 x,
-                                       int32 y) 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 ) 
-      // Code size       4 (0x4)
-      .maxstack  8
-      .line 21,21 : 27,32 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldarg.1
-      IL_0002:  add
-      IL_0003:  ret
-    } // end of method ABC::'add'
-
-    .method public specialname static string 
-            get_greeting() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       6 (0x6)
-      .maxstack  8
-      IL_0000:  ldstr      "hello"
-      IL_0005:  ret
-    } // end of method ABC::get_greeting
-
-    .property string greeting()
-    {
-      .get string ABC/ABC::get_greeting()
-    } // end of property ABC::greeting
-  } // end of class ABC
-
-  .method public static int32  'add'(int32 x,
-                                     int32 y) 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 ) 
-    // Code size       4 (0x4)
-    .maxstack  8
-    .line 11,11 : 23,28 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldarg.1
-    IL_0002:  add
-    IL_0003:  ret
-  } // end of method ABC::'add'
-
-  .method public specialname static string 
-          get_greeting() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       6 (0x6)
-    .maxstack  8
-    IL_0000:  ldstr      "hello"
-    IL_0005:  ret
-  } // end of method ABC::get_greeting
-
-  .property string greeting()
-  {
-    .get string ABC::get_greeting()
-  } // end of property ABC::greeting
-} // end of class ABC
-
-.class private abstract auto ansi sealed ''.$ABC
-       extends [mscorlib]System.Object
-{
-  .field static assembly int32 init@
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-  .method private specialname rtspecialname static 
-          void  .cctor() cil managed
-  {
-    // Code size       13 (0xd)
-    .maxstack  3
-    .locals init ([0] string greeting,
-             [1] string V_1)
-    .line 12,12 : 9,31 ''
-    IL_0000:  call       string ABC::get_greeting()
-    IL_0005:  stloc.0
-    .line 22,22 : 13,35 ''
-    IL_0006:  call       string ABC/ABC::get_greeting()
-    IL_000b:  stloc.1
-    IL_000c:  ret
-  } // end of method $ABC::.cctor
-
-} // end of class ''.$ABC
-
-
-// =============================================================
-
-// *********** DISASSEMBLY COMPLETE ***********************
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
index 41b1f720c77..bf83c61d107 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SerializableAttribute/ToplevelNamespace.il.bsl
@@ -1,2439 +1,4 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
-
-
-// Metadata version: v4.0.30319
-.assembly extern mscorlib
-{
-  .publickeytoken = (B7 7A 5C 56 19 34 E0 89 )                         // .z\V.4..
-  .ver 4:0:0:0
-}
-.assembly extern FSharp.Core
-{
-  .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
-}
-.assembly ToplevelNamespace
-{
-  .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 ) 
-
-  // --- The following custom attribute is added automatically, do not uncomment -------
-  //  .custom instance void [mscorlib]System.Diagnostics.DebuggableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggableAttribute/DebuggingModes) = ( 01 00 01 01 00 00 00 00 ) 
-
-  .hash algorithm 0x00008004
-  .ver 0:0:0:0
-}
-.mresource public FSharpSignatureData.ToplevelNamespace
-{
-  // Offset: 0x00000000 Length: 0x00001848
-}
-.mresource public FSharpSignatureDataB.ToplevelNamespace
-{
-  // Offset: 0x00001850 Length: 0x00000006
-}
-.mresource public FSharpOptimizationData.ToplevelNamespace
-{
-  // Offset: 0x00001860 Length: 0x0000055C
-}
-.module ToplevelNamespace.dll
-// MVID: {60C0F26C-218B-729A-A745-03836CF2C060}
-.imagebase 0x00400000
-.file alignment 0x00000200
-.stackreserve 0x00100000
-.subsystem 0x0003       // WINDOWS_CUI
-.corflags 0x00000001    //  ILONLY
-// Image base: 0x05A80000
-
-
-// =============== CLASS MEMBERS DECLARATION ===================
-
-.class public auto autochar serializable sealed beforefieldinit XYZ.Expr
-       extends [mscorlib]System.Object
-       implements class [mscorlib]System.IEquatable`1,
-                  [mscorlib]System.Collections.IStructuralEquatable,
-                  class [mscorlib]System.IComparable`1,
-                  [mscorlib]System.IComparable,
-                  [mscorlib]System.Collections.IStructuralComparable
-{
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
-                                                                                                 61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
-  .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
-  .field assembly initonly int32 item
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-  .method public static class XYZ.Expr  NewNum(int32 item) cil managed
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
-    // Code size       7 (0x7)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  newobj     instance void XYZ.Expr::.ctor(int32)
-    IL_0006:  ret
-  } // end of method Expr::NewNum
-
-  .method assembly specialname rtspecialname 
-          instance void  .ctor(int32 item) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       14 (0xe)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-    IL_0006:  ldarg.0
-    IL_0007:  ldarg.1
-    IL_0008:  stfld      int32 XYZ.Expr::item
-    IL_000d:  ret
-  } // end of method Expr::.ctor
-
-  .method public hidebysig instance int32 
-          get_Item() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       7 (0x7)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  ldfld      int32 XYZ.Expr::item
-    IL_0006:  ret
-  } // end of method Expr::get_Item
-
-  .method public hidebysig instance int32 
-          get_Tag() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       4 (0x4)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  pop
-    IL_0002:  ldc.i4.0
-    IL_0003:  ret
-  } // end of method Expr::get_Tag
-
-  .method assembly hidebysig specialname 
-          instance object  __DebugDisplay() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       22 (0x16)
-    .maxstack  8
-    IL_0000:  ldstr      "%+0.8A"
-    IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
-    IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-    IL_000f:  ldarg.0
-    IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-    IL_0015:  ret
-  } // end of method Expr::__DebugDisplay
-
-  .method public strict virtual instance string 
-          ToString() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       22 (0x16)
-    .maxstack  8
-    IL_0000:  ldstr      "%+A"
-    IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class XYZ.Expr>::.ctor(string)
-    IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-    IL_000f:  ldarg.0
-    IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-    IL_0015:  ret
-  } // end of method Expr::ToString
-
-  .method public hidebysig virtual final 
-          instance int32  CompareTo(class XYZ.Expr obj) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       64 (0x40)
-    .maxstack  4
-    .locals init ([0] class XYZ.Expr V_0,
-             [1] class XYZ.Expr V_1,
-             [2] class [mscorlib]System.Collections.IComparer V_2,
-             [3] int32 V_3,
-             [4] int32 V_4)
-    .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 100001,100001 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\CodeGen\\EmittedIL\\SerializableAttribute\\ToplevelNamespace.fs'
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_0036
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldarg.1
-    IL_0007:  ldnull
-    IL_0008:  cgt.un
-    IL_000a:  brfalse.s  IL_0034
-
-    .line 100001,100001 : 0,0 ''
-    IL_000c:  ldarg.0
-    IL_000d:  pop
-    .line 100001,100001 : 0,0 ''
-    IL_000e:  ldarg.0
-    IL_000f:  stloc.0
-    IL_0010:  ldarg.1
-    IL_0011:  stloc.1
-    IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
-    IL_0017:  stloc.2
-    IL_0018:  ldloc.0
-    IL_0019:  ldfld      int32 XYZ.Expr::item
-    IL_001e:  stloc.3
-    IL_001f:  ldloc.1
-    IL_0020:  ldfld      int32 XYZ.Expr::item
-    IL_0025:  stloc.s    V_4
-    IL_0027:  ldloc.3
-    IL_0028:  ldloc.s    V_4
-    IL_002a:  bge.s      IL_002e
-
-    .line 100001,100001 : 0,0 ''
-    IL_002c:  ldc.i4.m1
-    IL_002d:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_002e:  ldloc.3
-    IL_002f:  ldloc.s    V_4
-    IL_0031:  cgt
-    IL_0033:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0034:  ldc.i4.1
-    IL_0035:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0036:  ldarg.1
-    IL_0037:  ldnull
-    IL_0038:  cgt.un
-    IL_003a:  brfalse.s  IL_003e
-
-    .line 100001,100001 : 0,0 ''
-    IL_003c:  ldc.i4.m1
-    IL_003d:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_003e:  ldc.i4.0
-    IL_003f:  ret
-  } // end of method Expr::CompareTo
-
-  .method public hidebysig virtual final 
-          instance int32  CompareTo(object obj) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       13 (0xd)
-    .maxstack  8
-    .line 7,7 : 10,14 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldarg.1
-    IL_0002:  unbox.any  XYZ.Expr
-    IL_0007:  callvirt   instance int32 XYZ.Expr::CompareTo(class XYZ.Expr)
-    IL_000c:  ret
-  } // end of method Expr::CompareTo
-
-  .method public hidebysig virtual final 
-          instance int32  CompareTo(object obj,
-                                    class [mscorlib]System.Collections.IComparer comp) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       80 (0x50)
-    .maxstack  4
-    .locals init ([0] class XYZ.Expr V_0,
-             [1] class XYZ.Expr V_1,
-             [2] class XYZ.Expr V_2,
-             [3] class [mscorlib]System.Collections.IComparer V_3,
-             [4] int32 V_4,
-             [5] int32 V_5)
-    .line 7,7 : 10,14 ''
-    IL_0000:  ldarg.1
-    IL_0001:  unbox.any  XYZ.Expr
-    IL_0006:  stloc.0
-    IL_0007:  ldarg.0
-    IL_0008:  ldnull
-    IL_0009:  cgt.un
-    IL_000b:  brfalse.s  IL_0041
-
-    .line 100001,100001 : 0,0 ''
-    IL_000d:  ldarg.1
-    IL_000e:  unbox.any  XYZ.Expr
-    IL_0013:  ldnull
-    IL_0014:  cgt.un
-    IL_0016:  brfalse.s  IL_003f
-
-    .line 100001,100001 : 0,0 ''
-    IL_0018:  ldarg.0
-    IL_0019:  pop
-    .line 100001,100001 : 0,0 ''
-    IL_001a:  ldarg.0
-    IL_001b:  stloc.1
-    IL_001c:  ldloc.0
-    IL_001d:  stloc.2
-    IL_001e:  ldarg.2
-    IL_001f:  stloc.3
-    IL_0020:  ldloc.1
-    IL_0021:  ldfld      int32 XYZ.Expr::item
-    IL_0026:  stloc.s    V_4
-    IL_0028:  ldloc.2
-    IL_0029:  ldfld      int32 XYZ.Expr::item
-    IL_002e:  stloc.s    V_5
-    IL_0030:  ldloc.s    V_4
-    IL_0032:  ldloc.s    V_5
-    IL_0034:  bge.s      IL_0038
-
-    .line 100001,100001 : 0,0 ''
-    IL_0036:  ldc.i4.m1
-    IL_0037:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0038:  ldloc.s    V_4
-    IL_003a:  ldloc.s    V_5
-    IL_003c:  cgt
-    IL_003e:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_003f:  ldc.i4.1
-    IL_0040:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0041:  ldarg.1
-    IL_0042:  unbox.any  XYZ.Expr
-    IL_0047:  ldnull
-    IL_0048:  cgt.un
-    IL_004a:  brfalse.s  IL_004e
-
-    .line 100001,100001 : 0,0 ''
-    IL_004c:  ldc.i4.m1
-    IL_004d:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_004e:  ldc.i4.0
-    IL_004f:  ret
-  } // end of method Expr::CompareTo
-
-  .method public hidebysig virtual final 
-          instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       41 (0x29)
-    .maxstack  7
-    .locals init ([0] int32 V_0,
-             [1] class XYZ.Expr V_1,
-             [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_0027
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldc.i4.0
-    IL_0007:  stloc.0
-    IL_0008:  ldarg.0
-    IL_0009:  pop
-    .line 100001,100001 : 0,0 ''
-    IL_000a:  ldarg.0
-    IL_000b:  stloc.1
-    IL_000c:  ldc.i4.0
-    IL_000d:  stloc.0
-    IL_000e:  ldc.i4     0x9e3779b9
-    IL_0013:  ldarg.1
-    IL_0014:  stloc.2
-    IL_0015:  ldloc.1
-    IL_0016:  ldfld      int32 XYZ.Expr::item
-    IL_001b:  ldloc.0
-    IL_001c:  ldc.i4.6
-    IL_001d:  shl
-    IL_001e:  ldloc.0
-    IL_001f:  ldc.i4.2
-    IL_0020:  shr
-    IL_0021:  add
-    IL_0022:  add
-    IL_0023:  add
-    IL_0024:  stloc.0
-    IL_0025:  ldloc.0
-    IL_0026:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0027:  ldc.i4.0
-    IL_0028:  ret
-  } // end of method Expr::GetHashCode
-
-  .method public hidebysig virtual final 
-          instance int32  GetHashCode() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       12 (0xc)
-    .maxstack  8
-    .line 7,7 : 10,14 ''
-    IL_0000:  ldarg.0
-    IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-    IL_0006:  callvirt   instance int32 XYZ.Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-    IL_000b:  ret
-  } // end of method Expr::GetHashCode
-
-  .method public hidebysig virtual final 
-          instance bool  Equals(object obj,
-                                class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       52 (0x34)
-    .maxstack  4
-    .locals init ([0] class XYZ.Expr V_0,
-             [1] class XYZ.Expr V_1,
-             [2] class XYZ.Expr V_2,
-             [3] class XYZ.Expr V_3,
-             [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_002c
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldarg.1
-    IL_0007:  isinst     XYZ.Expr
-    IL_000c:  stloc.0
-    IL_000d:  ldloc.0
-    IL_000e:  brfalse.s  IL_002a
-
-    .line 100001,100001 : 0,0 ''
-    IL_0010:  ldloc.0
-    IL_0011:  stloc.1
-    IL_0012:  ldarg.0
-    IL_0013:  pop
-    .line 100001,100001 : 0,0 ''
-    IL_0014:  ldarg.0
-    IL_0015:  stloc.2
-    IL_0016:  ldloc.1
-    IL_0017:  stloc.3
-    IL_0018:  ldarg.2
-    IL_0019:  stloc.s    V_4
-    IL_001b:  ldloc.2
-    IL_001c:  ldfld      int32 XYZ.Expr::item
-    IL_0021:  ldloc.3
-    IL_0022:  ldfld      int32 XYZ.Expr::item
-    IL_0027:  ceq
-    IL_0029:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_002a:  ldc.i4.0
-    IL_002b:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_002c:  ldarg.1
-    IL_002d:  ldnull
-    IL_002e:  cgt.un
-    IL_0030:  ldc.i4.0
-    IL_0031:  ceq
-    IL_0033:  ret
-  } // end of method Expr::Equals
-
-  .method public hidebysig virtual final 
-          instance bool  Equals(class XYZ.Expr obj) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       43 (0x2b)
-    .maxstack  4
-    .locals init ([0] class XYZ.Expr V_0,
-             [1] class XYZ.Expr V_1)
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_0023
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldarg.1
-    IL_0007:  ldnull
-    IL_0008:  cgt.un
-    IL_000a:  brfalse.s  IL_0021
-
-    .line 100001,100001 : 0,0 ''
-    IL_000c:  ldarg.0
-    IL_000d:  pop
-    .line 100001,100001 : 0,0 ''
-    IL_000e:  ldarg.0
-    IL_000f:  stloc.0
-    IL_0010:  ldarg.1
-    IL_0011:  stloc.1
-    IL_0012:  ldloc.0
-    IL_0013:  ldfld      int32 XYZ.Expr::item
-    IL_0018:  ldloc.1
-    IL_0019:  ldfld      int32 XYZ.Expr::item
-    IL_001e:  ceq
-    IL_0020:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0021:  ldc.i4.0
-    IL_0022:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0023:  ldarg.1
-    IL_0024:  ldnull
-    IL_0025:  cgt.un
-    IL_0027:  ldc.i4.0
-    IL_0028:  ceq
-    IL_002a:  ret
-  } // end of method Expr::Equals
-
-  .method public hidebysig virtual final 
-          instance bool  Equals(object obj) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       20 (0x14)
-    .maxstack  4
-    .locals init ([0] class XYZ.Expr V_0)
-    .line 7,7 : 10,14 ''
-    IL_0000:  ldarg.1
-    IL_0001:  isinst     XYZ.Expr
-    IL_0006:  stloc.0
-    IL_0007:  ldloc.0
-    IL_0008:  brfalse.s  IL_0012
-
-    .line 100001,100001 : 0,0 ''
-    IL_000a:  ldarg.0
-    IL_000b:  ldloc.0
-    IL_000c:  callvirt   instance bool XYZ.Expr::Equals(class XYZ.Expr)
-    IL_0011:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0012:  ldc.i4.0
-    IL_0013:  ret
-  } // end of method Expr::Equals
-
-  .property instance int32 Tag()
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-    .get instance int32 XYZ.Expr::get_Tag()
-  } // end of property Expr::Tag
-  .property instance int32 Item()
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                int32,
-                                                                                                int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    .get instance int32 XYZ.Expr::get_Item()
-  } // end of property Expr::Item
-} // end of class XYZ.Expr
-
-.class public auto ansi serializable beforefieldinit XYZ.MyExn
-       extends [mscorlib]System.Exception
-       implements [mscorlib]System.Collections.IStructuralEquatable
-{
-  .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
-  .field assembly int32 Data0@
-  .method public specialname rtspecialname 
-          instance void  .ctor(int32 data0) cil managed
-  {
-    // Code size       14 (0xe)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-    IL_0006:  ldarg.0
-    IL_0007:  ldarg.1
-    IL_0008:  stfld      int32 XYZ.MyExn::Data0@
-    IL_000d:  ret
-  } // end of method MyExn::.ctor
-
-  .method public specialname rtspecialname 
-          instance void  .ctor() cil managed
-  {
-    // Code size       7 (0x7)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-    IL_0006:  ret
-  } // end of method MyExn::.ctor
-
-  .method family specialname rtspecialname 
-          instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
-                               valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
-  {
-    // Code size       9 (0x9)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  ldarg.1
-    IL_0002:  ldarg.2
-    IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
-                                                                         valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
-    IL_0008:  ret
-  } // end of method MyExn::.ctor
-
-  .method public hidebysig specialname instance int32 
-          get_Data0() cil managed
-  {
-    // Code size       7 (0x7)
-    .maxstack  8
-    IL_0000:  ldarg.0
-    IL_0001:  ldfld      int32 XYZ.MyExn::Data0@
-    IL_0006:  ret
-  } // end of method MyExn::get_Data0
-
-  .method public hidebysig virtual instance int32 
-          GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       40 (0x28)
-    .maxstack  7
-    .locals init ([0] int32 V_0,
-             [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_0026
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldc.i4.0
-    IL_0007:  stloc.0
-    IL_0008:  ldc.i4     0x9e3779b9
-    IL_000d:  ldarg.1
-    IL_000e:  stloc.1
-    IL_000f:  ldarg.0
-    IL_0010:  castclass  XYZ.MyExn
-    IL_0015:  call       instance int32 XYZ.MyExn::get_Data0()
-    IL_001a:  ldloc.0
-    IL_001b:  ldc.i4.6
-    IL_001c:  shl
-    IL_001d:  ldloc.0
-    IL_001e:  ldc.i4.2
-    IL_001f:  shr
-    IL_0020:  add
-    IL_0021:  add
-    IL_0022:  add
-    IL_0023:  stloc.0
-    IL_0024:  ldloc.0
-    IL_0025:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0026:  ldc.i4.0
-    IL_0027:  ret
-  } // end of method MyExn::GetHashCode
-
-  .method public hidebysig virtual instance int32 
-          GetHashCode() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       12 (0xc)
-    .maxstack  8
-    .line 8,8 : 15,20 ''
-    IL_0000:  ldarg.0
-    IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-    IL_0006:  callvirt   instance int32 XYZ.MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-    IL_000b:  ret
-  } // end of method MyExn::GetHashCode
-
-  .method public hidebysig virtual instance bool 
-          Equals(object obj,
-                 class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       67 (0x43)
-    .maxstack  4
-    .locals init ([0] class [mscorlib]System.Exception V_0,
-             [1] class [mscorlib]System.Exception V_1,
-             [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_003b
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldarg.1
-    IL_0007:  isinst     [mscorlib]System.Exception
-    IL_000c:  stloc.0
-    IL_000d:  ldloc.0
-    IL_000e:  brfalse.s  IL_0039
-
-    .line 100001,100001 : 0,0 ''
-    IL_0010:  ldloc.0
-    IL_0011:  stloc.1
-    IL_0012:  ldloc.0
-    IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-    IL_0018:  brtrue.s   IL_001c
-
-    IL_001a:  br.s       IL_0037
-
-    .line 100001,100001 : 0,0 ''
-    IL_001c:  ldarg.2
-    IL_001d:  stloc.2
-    IL_001e:  ldarg.0
-    IL_001f:  castclass  XYZ.MyExn
-    IL_0024:  call       instance int32 XYZ.MyExn::get_Data0()
-    IL_0029:  ldloc.1
-    IL_002a:  castclass  XYZ.MyExn
-    IL_002f:  call       instance int32 XYZ.MyExn::get_Data0()
-    IL_0034:  ceq
-    IL_0036:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0037:  ldc.i4.0
-    IL_0038:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0039:  ldc.i4.0
-    IL_003a:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_003b:  ldarg.1
-    IL_003c:  ldnull
-    IL_003d:  cgt.un
-    IL_003f:  ldc.i4.0
-    IL_0040:  ceq
-    IL_0042:  ret
-  } // end of method MyExn::Equals
-
-  .method public hidebysig instance bool 
-          Equals(class [mscorlib]System.Exception obj) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       59 (0x3b)
-    .maxstack  8
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldnull
-    IL_0002:  cgt.un
-    IL_0004:  brfalse.s  IL_0033
-
-    .line 100001,100001 : 0,0 ''
-    IL_0006:  ldarg.1
-    IL_0007:  ldnull
-    IL_0008:  cgt.un
-    IL_000a:  brfalse.s  IL_0031
-
-    .line 100001,100001 : 0,0 ''
-    IL_000c:  ldarg.1
-    IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-    IL_0012:  brtrue.s   IL_0016
-
-    IL_0014:  br.s       IL_002f
-
-    .line 100001,100001 : 0,0 ''
-    IL_0016:  ldarg.0
-    IL_0017:  castclass  XYZ.MyExn
-    IL_001c:  call       instance int32 XYZ.MyExn::get_Data0()
-    IL_0021:  ldarg.1
-    IL_0022:  castclass  XYZ.MyExn
-    IL_0027:  call       instance int32 XYZ.MyExn::get_Data0()
-    IL_002c:  ceq
-    IL_002e:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_002f:  ldc.i4.0
-    IL_0030:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0031:  ldc.i4.0
-    IL_0032:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0033:  ldarg.1
-    IL_0034:  ldnull
-    IL_0035:  cgt.un
-    IL_0037:  ldc.i4.0
-    IL_0038:  ceq
-    IL_003a:  ret
-  } // end of method MyExn::Equals
-
-  .method public hidebysig virtual instance bool 
-          Equals(object obj) cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       20 (0x14)
-    .maxstack  4
-    .locals init ([0] class [mscorlib]System.Exception V_0)
-    .line 8,8 : 15,20 ''
-    IL_0000:  ldarg.1
-    IL_0001:  isinst     [mscorlib]System.Exception
-    IL_0006:  stloc.0
-    IL_0007:  ldloc.0
-    IL_0008:  brfalse.s  IL_0012
-
-    .line 100001,100001 : 0,0 ''
-    IL_000a:  ldarg.0
-    IL_000b:  ldloc.0
-    IL_000c:  callvirt   instance bool XYZ.MyExn::Equals(class [mscorlib]System.Exception)
-    IL_0011:  ret
-
-    .line 100001,100001 : 0,0 ''
-    IL_0012:  ldc.i4.0
-    IL_0013:  ret
-  } // end of method MyExn::Equals
-
-  .property instance int32 Data0()
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
-    .get instance int32 XYZ.MyExn::get_Data0()
-  } // end of property MyExn::Data0
-} // end of class XYZ.MyExn
-
-.class public auto ansi serializable XYZ.A
-       extends [mscorlib]System.Object
-{
-  .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
-  .field assembly string x
-  .method public specialname rtspecialname 
-          instance void  .ctor(string x) cil managed
-  {
-    // Code size       16 (0x10)
-    .maxstack  8
-    .line 100001,100001 : 0,0 ''
-    IL_0000:  ldarg.0
-    IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
-    IL_0006:  ldarg.0
-    IL_0007:  pop
-    .line 9,9 : 12,13 ''
-    IL_0008:  ldarg.0
-    IL_0009:  ldarg.1
-    IL_000a:  stfld      string XYZ.A::x
-    .line 9,9 : 10,11 ''
-    IL_000f:  ret
-  } // end of method A::.ctor
-
-  .method public hidebysig specialname instance string 
-          get_X() cil managed
-  {
-    // Code size       7 (0x7)
-    .maxstack  8
-    .line 9,9 : 38,39 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldfld      string XYZ.A::x
-    IL_0006:  ret
-  } // end of method A::get_X
-
-  .property instance string X()
-  {
-    .get instance string XYZ.A::get_X()
-  } // end of property A::X
-} // end of class XYZ.A
-
-.class public abstract auto ansi sealed XYZ.ABC
-       extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
-         extends [mscorlib]System.Object
-         implements class [mscorlib]System.IEquatable`1,
-                    [mscorlib]System.Collections.IStructuralEquatable,
-                    class [mscorlib]System.IComparable`1,
-                    [mscorlib]System.IComparable,
-                    [mscorlib]System.Collections.IStructuralComparable
-  {
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
-                                                                                                   61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
-    .field assembly initonly int32 item
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    .method public static class XYZ.ABC/Expr 
-            NewNum(int32 item) cil managed
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                  int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  newobj     instance void XYZ.ABC/Expr::.ctor(int32)
-      IL_0006:  ret
-    } // end of method Expr::NewNum
-
-    .method assembly specialname rtspecialname 
-            instance void  .ctor(int32 item) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       14 (0xe)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ldarg.0
-      IL_0007:  ldarg.1
-      IL_0008:  stfld      int32 XYZ.ABC/Expr::item
-      IL_000d:  ret
-    } // end of method Expr::.ctor
-
-    .method public hidebysig instance int32 
-            get_Item() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_0006:  ret
-    } // end of method Expr::get_Item
-
-    .method public hidebysig instance int32 
-            get_Tag() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       4 (0x4)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  pop
-      IL_0002:  ldc.i4.0
-      IL_0003:  ret
-    } // end of method Expr::get_Tag
-
-    .method assembly hidebysig specialname 
-            instance object  __DebugDisplay() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       22 (0x16)
-      .maxstack  8
-      IL_0000:  ldstr      "%+0.8A"
-      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
-      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-      IL_000f:  ldarg.0
-      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-      IL_0015:  ret
-    } // end of method Expr::__DebugDisplay
-
-    .method public strict virtual instance string 
-            ToString() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       22 (0x16)
-      .maxstack  8
-      IL_0000:  ldstr      "%+A"
-      IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class XYZ.ABC/Expr>::.ctor(string)
-      IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-      IL_000f:  ldarg.0
-      IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-      IL_0015:  ret
-    } // end of method Expr::ToString
-
-    .method public hidebysig virtual final 
-            instance int32  CompareTo(class XYZ.ABC/Expr obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       64 (0x40)
-      .maxstack  4
-      .locals init ([0] class XYZ.ABC/Expr V_0,
-               [1] class XYZ.ABC/Expr V_1,
-               [2] class [mscorlib]System.Collections.IComparer V_2,
-               [3] int32 V_3,
-               [4] int32 V_4)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0036
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  ldnull
-      IL_0008:  cgt.un
-      IL_000a:  brfalse.s  IL_0034
-
-      .line 100001,100001 : 0,0 ''
-      IL_000c:  ldarg.0
-      IL_000d:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_000e:  ldarg.0
-      IL_000f:  stloc.0
-      IL_0010:  ldarg.1
-      IL_0011:  stloc.1
-      IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
-      IL_0017:  stloc.2
-      IL_0018:  ldloc.0
-      IL_0019:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_001e:  stloc.3
-      IL_001f:  ldloc.1
-      IL_0020:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_0025:  stloc.s    V_4
-      IL_0027:  ldloc.3
-      IL_0028:  ldloc.s    V_4
-      IL_002a:  bge.s      IL_002e
-
-      .line 100001,100001 : 0,0 ''
-      IL_002c:  ldc.i4.m1
-      IL_002d:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002e:  ldloc.3
-      IL_002f:  ldloc.s    V_4
-      IL_0031:  cgt
-      IL_0033:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0034:  ldc.i4.1
-      IL_0035:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0036:  ldarg.1
-      IL_0037:  ldnull
-      IL_0038:  cgt.un
-      IL_003a:  brfalse.s  IL_003e
-
-      .line 100001,100001 : 0,0 ''
-      IL_003c:  ldc.i4.m1
-      IL_003d:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_003e:  ldc.i4.0
-      IL_003f:  ret
-    } // end of method Expr::CompareTo
-
-    .method public hidebysig virtual final 
-            instance int32  CompareTo(object obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       13 (0xd)
-      .maxstack  8
-      .line 13,13 : 14,18 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldarg.1
-      IL_0002:  unbox.any  XYZ.ABC/Expr
-      IL_0007:  callvirt   instance int32 XYZ.ABC/Expr::CompareTo(class XYZ.ABC/Expr)
-      IL_000c:  ret
-    } // end of method Expr::CompareTo
-
-    .method public hidebysig virtual final 
-            instance int32  CompareTo(object obj,
-                                      class [mscorlib]System.Collections.IComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       80 (0x50)
-      .maxstack  4
-      .locals init ([0] class XYZ.ABC/Expr V_0,
-               [1] class XYZ.ABC/Expr V_1,
-               [2] class XYZ.ABC/Expr V_2,
-               [3] class [mscorlib]System.Collections.IComparer V_3,
-               [4] int32 V_4,
-               [5] int32 V_5)
-      .line 13,13 : 14,18 ''
-      IL_0000:  ldarg.1
-      IL_0001:  unbox.any  XYZ.ABC/Expr
-      IL_0006:  stloc.0
-      IL_0007:  ldarg.0
-      IL_0008:  ldnull
-      IL_0009:  cgt.un
-      IL_000b:  brfalse.s  IL_0041
-
-      .line 100001,100001 : 0,0 ''
-      IL_000d:  ldarg.1
-      IL_000e:  unbox.any  XYZ.ABC/Expr
-      IL_0013:  ldnull
-      IL_0014:  cgt.un
-      IL_0016:  brfalse.s  IL_003f
-
-      .line 100001,100001 : 0,0 ''
-      IL_0018:  ldarg.0
-      IL_0019:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_001a:  ldarg.0
-      IL_001b:  stloc.1
-      IL_001c:  ldloc.0
-      IL_001d:  stloc.2
-      IL_001e:  ldarg.2
-      IL_001f:  stloc.3
-      IL_0020:  ldloc.1
-      IL_0021:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_0026:  stloc.s    V_4
-      IL_0028:  ldloc.2
-      IL_0029:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_002e:  stloc.s    V_5
-      IL_0030:  ldloc.s    V_4
-      IL_0032:  ldloc.s    V_5
-      IL_0034:  bge.s      IL_0038
-
-      .line 100001,100001 : 0,0 ''
-      IL_0036:  ldc.i4.m1
-      IL_0037:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0038:  ldloc.s    V_4
-      IL_003a:  ldloc.s    V_5
-      IL_003c:  cgt
-      IL_003e:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_003f:  ldc.i4.1
-      IL_0040:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0041:  ldarg.1
-      IL_0042:  unbox.any  XYZ.ABC/Expr
-      IL_0047:  ldnull
-      IL_0048:  cgt.un
-      IL_004a:  brfalse.s  IL_004e
-
-      .line 100001,100001 : 0,0 ''
-      IL_004c:  ldc.i4.m1
-      IL_004d:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_004e:  ldc.i4.0
-      IL_004f:  ret
-    } // end of method Expr::CompareTo
-
-    .method public hidebysig virtual final 
-            instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       41 (0x29)
-      .maxstack  7
-      .locals init ([0] int32 V_0,
-               [1] class XYZ.ABC/Expr V_1,
-               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0027
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldc.i4.0
-      IL_0007:  stloc.0
-      IL_0008:  ldarg.0
-      IL_0009:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_000a:  ldarg.0
-      IL_000b:  stloc.1
-      IL_000c:  ldc.i4.0
-      IL_000d:  stloc.0
-      IL_000e:  ldc.i4     0x9e3779b9
-      IL_0013:  ldarg.1
-      IL_0014:  stloc.2
-      IL_0015:  ldloc.1
-      IL_0016:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_001b:  ldloc.0
-      IL_001c:  ldc.i4.6
-      IL_001d:  shl
-      IL_001e:  ldloc.0
-      IL_001f:  ldc.i4.2
-      IL_0020:  shr
-      IL_0021:  add
-      IL_0022:  add
-      IL_0023:  add
-      IL_0024:  stloc.0
-      IL_0025:  ldloc.0
-      IL_0026:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0027:  ldc.i4.0
-      IL_0028:  ret
-    } // end of method Expr::GetHashCode
-
-    .method public hidebysig virtual final 
-            instance int32  GetHashCode() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       12 (0xc)
-      .maxstack  8
-      .line 13,13 : 14,18 ''
-      IL_0000:  ldarg.0
-      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-      IL_0006:  callvirt   instance int32 XYZ.ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-      IL_000b:  ret
-    } // end of method Expr::GetHashCode
-
-    .method public hidebysig virtual final 
-            instance bool  Equals(object obj,
-                                  class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       52 (0x34)
-      .maxstack  4
-      .locals init ([0] class XYZ.ABC/Expr V_0,
-               [1] class XYZ.ABC/Expr V_1,
-               [2] class XYZ.ABC/Expr V_2,
-               [3] class XYZ.ABC/Expr V_3,
-               [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_002c
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  isinst     XYZ.ABC/Expr
-      IL_000c:  stloc.0
-      IL_000d:  ldloc.0
-      IL_000e:  brfalse.s  IL_002a
-
-      .line 100001,100001 : 0,0 ''
-      IL_0010:  ldloc.0
-      IL_0011:  stloc.1
-      IL_0012:  ldarg.0
-      IL_0013:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_0014:  ldarg.0
-      IL_0015:  stloc.2
-      IL_0016:  ldloc.1
-      IL_0017:  stloc.3
-      IL_0018:  ldarg.2
-      IL_0019:  stloc.s    V_4
-      IL_001b:  ldloc.2
-      IL_001c:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_0021:  ldloc.3
-      IL_0022:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_0027:  ceq
-      IL_0029:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002a:  ldc.i4.0
-      IL_002b:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002c:  ldarg.1
-      IL_002d:  ldnull
-      IL_002e:  cgt.un
-      IL_0030:  ldc.i4.0
-      IL_0031:  ceq
-      IL_0033:  ret
-    } // end of method Expr::Equals
-
-    .method public hidebysig virtual final 
-            instance bool  Equals(class XYZ.ABC/Expr obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       43 (0x2b)
-      .maxstack  4
-      .locals init ([0] class XYZ.ABC/Expr V_0,
-               [1] class XYZ.ABC/Expr V_1)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0023
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  ldnull
-      IL_0008:  cgt.un
-      IL_000a:  brfalse.s  IL_0021
-
-      .line 100001,100001 : 0,0 ''
-      IL_000c:  ldarg.0
-      IL_000d:  pop
-      .line 100001,100001 : 0,0 ''
-      IL_000e:  ldarg.0
-      IL_000f:  stloc.0
-      IL_0010:  ldarg.1
-      IL_0011:  stloc.1
-      IL_0012:  ldloc.0
-      IL_0013:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_0018:  ldloc.1
-      IL_0019:  ldfld      int32 XYZ.ABC/Expr::item
-      IL_001e:  ceq
-      IL_0020:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0021:  ldc.i4.0
-      IL_0022:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0023:  ldarg.1
-      IL_0024:  ldnull
-      IL_0025:  cgt.un
-      IL_0027:  ldc.i4.0
-      IL_0028:  ceq
-      IL_002a:  ret
-    } // end of method Expr::Equals
-
-    .method public hidebysig virtual final 
-            instance bool  Equals(object obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       20 (0x14)
-      .maxstack  4
-      .locals init ([0] class XYZ.ABC/Expr V_0)
-      .line 13,13 : 14,18 ''
-      IL_0000:  ldarg.1
-      IL_0001:  isinst     XYZ.ABC/Expr
-      IL_0006:  stloc.0
-      IL_0007:  ldloc.0
-      IL_0008:  brfalse.s  IL_0012
-
-      .line 100001,100001 : 0,0 ''
-      IL_000a:  ldarg.0
-      IL_000b:  ldloc.0
-      IL_000c:  callvirt   instance bool XYZ.ABC/Expr::Equals(class XYZ.ABC/Expr)
-      IL_0011:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0012:  ldc.i4.0
-      IL_0013:  ret
-    } // end of method Expr::Equals
-
-    .property instance int32 Tag()
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-      .get instance int32 XYZ.ABC/Expr::get_Tag()
-    } // end of property Expr::Tag
-    .property instance int32 Item()
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                  int32,
-                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      .get instance int32 XYZ.ABC/Expr::get_Item()
-    } // end of property Expr::Item
-  } // end of class Expr
-
-  .class auto ansi serializable nested public beforefieldinit MyExn
-         extends [mscorlib]System.Exception
-         implements [mscorlib]System.Collections.IStructuralEquatable
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
-    .field assembly int32 Data0@
-    .method public specialname rtspecialname 
-            instance void  .ctor(int32 data0) cil managed
-    {
-      // Code size       14 (0xe)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-      IL_0006:  ldarg.0
-      IL_0007:  ldarg.1
-      IL_0008:  stfld      int32 XYZ.ABC/MyExn::Data0@
-      IL_000d:  ret
-    } // end of method MyExn::.ctor
-
-    .method public specialname rtspecialname 
-            instance void  .ctor() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-      IL_0006:  ret
-    } // end of method MyExn::.ctor
-
-    .method family specialname rtspecialname 
-            instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
-                                 valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
-    {
-      // Code size       9 (0x9)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  ldarg.1
-      IL_0002:  ldarg.2
-      IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
-                                                                           valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
-      IL_0008:  ret
-    } // end of method MyExn::.ctor
-
-    .method public hidebysig specialname 
-            instance int32  get_Data0() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      IL_0000:  ldarg.0
-      IL_0001:  ldfld      int32 XYZ.ABC/MyExn::Data0@
-      IL_0006:  ret
-    } // end of method MyExn::get_Data0
-
-    .method public hidebysig virtual instance int32 
-            GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       40 (0x28)
-      .maxstack  7
-      .locals init ([0] int32 V_0,
-               [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0026
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldc.i4.0
-      IL_0007:  stloc.0
-      IL_0008:  ldc.i4     0x9e3779b9
-      IL_000d:  ldarg.1
-      IL_000e:  stloc.1
-      IL_000f:  ldarg.0
-      IL_0010:  castclass  XYZ.ABC/MyExn
-      IL_0015:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
-      IL_001a:  ldloc.0
-      IL_001b:  ldc.i4.6
-      IL_001c:  shl
-      IL_001d:  ldloc.0
-      IL_001e:  ldc.i4.2
-      IL_001f:  shr
-      IL_0020:  add
-      IL_0021:  add
-      IL_0022:  add
-      IL_0023:  stloc.0
-      IL_0024:  ldloc.0
-      IL_0025:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0026:  ldc.i4.0
-      IL_0027:  ret
-    } // end of method MyExn::GetHashCode
-
-    .method public hidebysig virtual instance int32 
-            GetHashCode() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       12 (0xc)
-      .maxstack  8
-      .line 14,14 : 19,24 ''
-      IL_0000:  ldarg.0
-      IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-      IL_0006:  callvirt   instance int32 XYZ.ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-      IL_000b:  ret
-    } // end of method MyExn::GetHashCode
-
-    .method public hidebysig virtual instance bool 
-            Equals(object obj,
-                   class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       67 (0x43)
-      .maxstack  4
-      .locals init ([0] class [mscorlib]System.Exception V_0,
-               [1] class [mscorlib]System.Exception V_1,
-               [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_003b
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  isinst     [mscorlib]System.Exception
-      IL_000c:  stloc.0
-      IL_000d:  ldloc.0
-      IL_000e:  brfalse.s  IL_0039
-
-      .line 100001,100001 : 0,0 ''
-      IL_0010:  ldloc.0
-      IL_0011:  stloc.1
-      IL_0012:  ldloc.0
-      IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-      IL_0018:  brtrue.s   IL_001c
-
-      IL_001a:  br.s       IL_0037
-
-      .line 100001,100001 : 0,0 ''
-      IL_001c:  ldarg.2
-      IL_001d:  stloc.2
-      IL_001e:  ldarg.0
-      IL_001f:  castclass  XYZ.ABC/MyExn
-      IL_0024:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
-      IL_0029:  ldloc.1
-      IL_002a:  castclass  XYZ.ABC/MyExn
-      IL_002f:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
-      IL_0034:  ceq
-      IL_0036:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0037:  ldc.i4.0
-      IL_0038:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0039:  ldc.i4.0
-      IL_003a:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_003b:  ldarg.1
-      IL_003c:  ldnull
-      IL_003d:  cgt.un
-      IL_003f:  ldc.i4.0
-      IL_0040:  ceq
-      IL_0042:  ret
-    } // end of method MyExn::Equals
-
-    .method public hidebysig instance bool 
-            Equals(class [mscorlib]System.Exception obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       59 (0x3b)
-      .maxstack  8
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldnull
-      IL_0002:  cgt.un
-      IL_0004:  brfalse.s  IL_0033
-
-      .line 100001,100001 : 0,0 ''
-      IL_0006:  ldarg.1
-      IL_0007:  ldnull
-      IL_0008:  cgt.un
-      IL_000a:  brfalse.s  IL_0031
-
-      .line 100001,100001 : 0,0 ''
-      IL_000c:  ldarg.1
-      IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-      IL_0012:  brtrue.s   IL_0016
-
-      IL_0014:  br.s       IL_002f
-
-      .line 100001,100001 : 0,0 ''
-      IL_0016:  ldarg.0
-      IL_0017:  castclass  XYZ.ABC/MyExn
-      IL_001c:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
-      IL_0021:  ldarg.1
-      IL_0022:  castclass  XYZ.ABC/MyExn
-      IL_0027:  call       instance int32 XYZ.ABC/MyExn::get_Data0()
-      IL_002c:  ceq
-      IL_002e:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_002f:  ldc.i4.0
-      IL_0030:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0031:  ldc.i4.0
-      IL_0032:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0033:  ldarg.1
-      IL_0034:  ldnull
-      IL_0035:  cgt.un
-      IL_0037:  ldc.i4.0
-      IL_0038:  ceq
-      IL_003a:  ret
-    } // end of method MyExn::Equals
-
-    .method public hidebysig virtual instance bool 
-            Equals(object obj) cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       20 (0x14)
-      .maxstack  4
-      .locals init ([0] class [mscorlib]System.Exception V_0)
-      .line 14,14 : 19,24 ''
-      IL_0000:  ldarg.1
-      IL_0001:  isinst     [mscorlib]System.Exception
-      IL_0006:  stloc.0
-      IL_0007:  ldloc.0
-      IL_0008:  brfalse.s  IL_0012
-
-      .line 100001,100001 : 0,0 ''
-      IL_000a:  ldarg.0
-      IL_000b:  ldloc.0
-      IL_000c:  callvirt   instance bool XYZ.ABC/MyExn::Equals(class [mscorlib]System.Exception)
-      IL_0011:  ret
-
-      .line 100001,100001 : 0,0 ''
-      IL_0012:  ldc.i4.0
-      IL_0013:  ret
-    } // end of method MyExn::Equals
-
-    .property instance int32 Data0()
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                  int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
-      .get instance int32 XYZ.ABC/MyExn::get_Data0()
-    } // end of property MyExn::Data0
-  } // end of class MyExn
-
-  .class auto ansi serializable nested public A
-         extends [mscorlib]System.Object
-  {
-    .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
-    .field assembly string x
-    .method public specialname rtspecialname 
-            instance void  .ctor(string x) cil managed
-    {
-      // Code size       16 (0x10)
-      .maxstack  8
-      .line 100001,100001 : 0,0 ''
-      IL_0000:  ldarg.0
-      IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
-      IL_0006:  ldarg.0
-      IL_0007:  pop
-      .line 15,15 : 16,17 ''
-      IL_0008:  ldarg.0
-      IL_0009:  ldarg.1
-      IL_000a:  stfld      string XYZ.ABC/A::x
-      .line 15,15 : 14,15 ''
-      IL_000f:  ret
-    } // end of method A::.ctor
-
-    .method public hidebysig specialname 
-            instance string  get_X() cil managed
-    {
-      // Code size       7 (0x7)
-      .maxstack  8
-      .line 15,15 : 42,43 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldfld      string XYZ.ABC/A::x
-      IL_0006:  ret
-    } // end of method A::get_X
-
-    .property instance string X()
-    {
-      .get instance string XYZ.ABC/A::get_X()
-    } // end of property A::X
-  } // end of class A
-
-  .class abstract auto ansi sealed nested public ABC
-         extends [mscorlib]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 autochar serializable sealed nested public beforefieldinit Expr
-           extends [mscorlib]System.Object
-           implements class [mscorlib]System.IEquatable`1,
-                      [mscorlib]System.Collections.IStructuralEquatable,
-                      class [mscorlib]System.IComparable`1,
-                      [mscorlib]System.IComparable,
-                      [mscorlib]System.Collections.IStructuralComparable
-    {
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerDisplayAttribute::.ctor(string) = ( 01 00 15 7B 5F 5F 44 65 62 75 67 44 69 73 70 6C   // ...{__DebugDispl
-                                                                                                     61 79 28 29 2C 6E 71 7D 00 00 )                   // ay(),nq}..
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 01 00 00 00 00 00 ) 
-      .field assembly initonly int32 item
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      .method public static class XYZ.ABC/ABC/Expr 
-              NewNum(int32 item) cil managed
-      {
-        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                    int32) = ( 01 00 08 00 00 00 00 00 00 00 00 00 ) 
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  newobj     instance void XYZ.ABC/ABC/Expr::.ctor(int32)
-        IL_0006:  ret
-      } // end of method Expr::NewNum
-
-      .method assembly specialname rtspecialname 
-              instance void  .ctor(int32 item) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       14 (0xe)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  call       instance void [mscorlib]System.Object::.ctor()
-        IL_0006:  ldarg.0
-        IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_000d:  ret
-      } // end of method Expr::.ctor
-
-      .method public hidebysig instance int32 
-              get_Item() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_0006:  ret
-      } // end of method Expr::get_Item
-
-      .method public hidebysig instance int32 
-              get_Tag() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       4 (0x4)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  pop
-        IL_0002:  ldc.i4.0
-        IL_0003:  ret
-      } // end of method Expr::get_Tag
-
-      .method assembly hidebysig specialname 
-              instance object  __DebugDisplay() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       22 (0x16)
-        .maxstack  8
-        IL_0000:  ldstr      "%+0.8A"
-        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,string>::.ctor(string)
-        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-        IL_000f:  ldarg.0
-        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-        IL_0015:  ret
-      } // end of method Expr::__DebugDisplay
-
-      .method public strict virtual instance string 
-              ToString() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       22 (0x16)
-        .maxstack  8
-        IL_0000:  ldstr      "%+A"
-        IL_0005:  newobj     instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string,string,class XYZ.ABC/ABC/Expr>::.ctor(string)
-        IL_000a:  call       !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatToString>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4)
-        IL_000f:  ldarg.0
-        IL_0010:  callvirt   instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0)
-        IL_0015:  ret
-      } // end of method Expr::ToString
-
-      .method public hidebysig virtual final 
-              instance int32  CompareTo(class XYZ.ABC/ABC/Expr obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       64 (0x40)
-        .maxstack  4
-        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
-                 [1] class XYZ.ABC/ABC/Expr V_1,
-                 [2] class [mscorlib]System.Collections.IComparer V_2,
-                 [3] int32 V_3,
-                 [4] int32 V_4)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0036
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  ldnull
-        IL_0008:  cgt.un
-        IL_000a:  brfalse.s  IL_0034
-
-        .line 100001,100001 : 0,0 ''
-        IL_000c:  ldarg.0
-        IL_000d:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_000e:  ldarg.0
-        IL_000f:  stloc.0
-        IL_0010:  ldarg.1
-        IL_0011:  stloc.1
-        IL_0012:  call       class [mscorlib]System.Collections.IComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericComparer()
-        IL_0017:  stloc.2
-        IL_0018:  ldloc.0
-        IL_0019:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_001e:  stloc.3
-        IL_001f:  ldloc.1
-        IL_0020:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_0025:  stloc.s    V_4
-        IL_0027:  ldloc.3
-        IL_0028:  ldloc.s    V_4
-        IL_002a:  bge.s      IL_002e
-
-        .line 100001,100001 : 0,0 ''
-        IL_002c:  ldc.i4.m1
-        IL_002d:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002e:  ldloc.3
-        IL_002f:  ldloc.s    V_4
-        IL_0031:  cgt
-        IL_0033:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0034:  ldc.i4.1
-        IL_0035:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0036:  ldarg.1
-        IL_0037:  ldnull
-        IL_0038:  cgt.un
-        IL_003a:  brfalse.s  IL_003e
-
-        .line 100001,100001 : 0,0 ''
-        IL_003c:  ldc.i4.m1
-        IL_003d:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_003e:  ldc.i4.0
-        IL_003f:  ret
-      } // end of method Expr::CompareTo
-
-      .method public hidebysig virtual final 
-              instance int32  CompareTo(object obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       13 (0xd)
-        .maxstack  8
-        .line 23,23 : 18,22 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldarg.1
-        IL_0002:  unbox.any  XYZ.ABC/ABC/Expr
-        IL_0007:  callvirt   instance int32 XYZ.ABC/ABC/Expr::CompareTo(class XYZ.ABC/ABC/Expr)
-        IL_000c:  ret
-      } // end of method Expr::CompareTo
-
-      .method public hidebysig virtual final 
-              instance int32  CompareTo(object obj,
-                                        class [mscorlib]System.Collections.IComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       80 (0x50)
-        .maxstack  4
-        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
-                 [1] class XYZ.ABC/ABC/Expr V_1,
-                 [2] class XYZ.ABC/ABC/Expr V_2,
-                 [3] class [mscorlib]System.Collections.IComparer V_3,
-                 [4] int32 V_4,
-                 [5] int32 V_5)
-        .line 23,23 : 18,22 ''
-        IL_0000:  ldarg.1
-        IL_0001:  unbox.any  XYZ.ABC/ABC/Expr
-        IL_0006:  stloc.0
-        IL_0007:  ldarg.0
-        IL_0008:  ldnull
-        IL_0009:  cgt.un
-        IL_000b:  brfalse.s  IL_0041
-
-        .line 100001,100001 : 0,0 ''
-        IL_000d:  ldarg.1
-        IL_000e:  unbox.any  XYZ.ABC/ABC/Expr
-        IL_0013:  ldnull
-        IL_0014:  cgt.un
-        IL_0016:  brfalse.s  IL_003f
-
-        .line 100001,100001 : 0,0 ''
-        IL_0018:  ldarg.0
-        IL_0019:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_001a:  ldarg.0
-        IL_001b:  stloc.1
-        IL_001c:  ldloc.0
-        IL_001d:  stloc.2
-        IL_001e:  ldarg.2
-        IL_001f:  stloc.3
-        IL_0020:  ldloc.1
-        IL_0021:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_0026:  stloc.s    V_4
-        IL_0028:  ldloc.2
-        IL_0029:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_002e:  stloc.s    V_5
-        IL_0030:  ldloc.s    V_4
-        IL_0032:  ldloc.s    V_5
-        IL_0034:  bge.s      IL_0038
-
-        .line 100001,100001 : 0,0 ''
-        IL_0036:  ldc.i4.m1
-        IL_0037:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0038:  ldloc.s    V_4
-        IL_003a:  ldloc.s    V_5
-        IL_003c:  cgt
-        IL_003e:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_003f:  ldc.i4.1
-        IL_0040:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0041:  ldarg.1
-        IL_0042:  unbox.any  XYZ.ABC/ABC/Expr
-        IL_0047:  ldnull
-        IL_0048:  cgt.un
-        IL_004a:  brfalse.s  IL_004e
-
-        .line 100001,100001 : 0,0 ''
-        IL_004c:  ldc.i4.m1
-        IL_004d:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_004e:  ldc.i4.0
-        IL_004f:  ret
-      } // end of method Expr::CompareTo
-
-      .method public hidebysig virtual final 
-              instance int32  GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       41 (0x29)
-        .maxstack  7
-        .locals init ([0] int32 V_0,
-                 [1] class XYZ.ABC/ABC/Expr V_1,
-                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0027
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldc.i4.0
-        IL_0007:  stloc.0
-        IL_0008:  ldarg.0
-        IL_0009:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_000a:  ldarg.0
-        IL_000b:  stloc.1
-        IL_000c:  ldc.i4.0
-        IL_000d:  stloc.0
-        IL_000e:  ldc.i4     0x9e3779b9
-        IL_0013:  ldarg.1
-        IL_0014:  stloc.2
-        IL_0015:  ldloc.1
-        IL_0016:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_001b:  ldloc.0
-        IL_001c:  ldc.i4.6
-        IL_001d:  shl
-        IL_001e:  ldloc.0
-        IL_001f:  ldc.i4.2
-        IL_0020:  shr
-        IL_0021:  add
-        IL_0022:  add
-        IL_0023:  add
-        IL_0024:  stloc.0
-        IL_0025:  ldloc.0
-        IL_0026:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0027:  ldc.i4.0
-        IL_0028:  ret
-      } // end of method Expr::GetHashCode
-
-      .method public hidebysig virtual final 
-              instance int32  GetHashCode() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       12 (0xc)
-        .maxstack  8
-        .line 23,23 : 18,22 ''
-        IL_0000:  ldarg.0
-        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-        IL_0006:  callvirt   instance int32 XYZ.ABC/ABC/Expr::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-        IL_000b:  ret
-      } // end of method Expr::GetHashCode
-
-      .method public hidebysig virtual final 
-              instance bool  Equals(object obj,
-                                    class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       52 (0x34)
-        .maxstack  4
-        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
-                 [1] class XYZ.ABC/ABC/Expr V_1,
-                 [2] class XYZ.ABC/ABC/Expr V_2,
-                 [3] class XYZ.ABC/ABC/Expr V_3,
-                 [4] class [mscorlib]System.Collections.IEqualityComparer V_4)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_002c
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  isinst     XYZ.ABC/ABC/Expr
-        IL_000c:  stloc.0
-        IL_000d:  ldloc.0
-        IL_000e:  brfalse.s  IL_002a
-
-        .line 100001,100001 : 0,0 ''
-        IL_0010:  ldloc.0
-        IL_0011:  stloc.1
-        IL_0012:  ldarg.0
-        IL_0013:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_0014:  ldarg.0
-        IL_0015:  stloc.2
-        IL_0016:  ldloc.1
-        IL_0017:  stloc.3
-        IL_0018:  ldarg.2
-        IL_0019:  stloc.s    V_4
-        IL_001b:  ldloc.2
-        IL_001c:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_0021:  ldloc.3
-        IL_0022:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_0027:  ceq
-        IL_0029:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002a:  ldc.i4.0
-        IL_002b:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002c:  ldarg.1
-        IL_002d:  ldnull
-        IL_002e:  cgt.un
-        IL_0030:  ldc.i4.0
-        IL_0031:  ceq
-        IL_0033:  ret
-      } // end of method Expr::Equals
-
-      .method public hidebysig virtual final 
-              instance bool  Equals(class XYZ.ABC/ABC/Expr obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       43 (0x2b)
-        .maxstack  4
-        .locals init ([0] class XYZ.ABC/ABC/Expr V_0,
-                 [1] class XYZ.ABC/ABC/Expr V_1)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0023
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  ldnull
-        IL_0008:  cgt.un
-        IL_000a:  brfalse.s  IL_0021
-
-        .line 100001,100001 : 0,0 ''
-        IL_000c:  ldarg.0
-        IL_000d:  pop
-        .line 100001,100001 : 0,0 ''
-        IL_000e:  ldarg.0
-        IL_000f:  stloc.0
-        IL_0010:  ldarg.1
-        IL_0011:  stloc.1
-        IL_0012:  ldloc.0
-        IL_0013:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_0018:  ldloc.1
-        IL_0019:  ldfld      int32 XYZ.ABC/ABC/Expr::item
-        IL_001e:  ceq
-        IL_0020:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0021:  ldc.i4.0
-        IL_0022:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0023:  ldarg.1
-        IL_0024:  ldnull
-        IL_0025:  cgt.un
-        IL_0027:  ldc.i4.0
-        IL_0028:  ceq
-        IL_002a:  ret
-      } // end of method Expr::Equals
-
-      .method public hidebysig virtual final 
-              instance bool  Equals(object obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       20 (0x14)
-        .maxstack  4
-        .locals init ([0] class XYZ.ABC/ABC/Expr V_0)
-        .line 23,23 : 18,22 ''
-        IL_0000:  ldarg.1
-        IL_0001:  isinst     XYZ.ABC/ABC/Expr
-        IL_0006:  stloc.0
-        IL_0007:  ldloc.0
-        IL_0008:  brfalse.s  IL_0012
-
-        .line 100001,100001 : 0,0 ''
-        IL_000a:  ldarg.0
-        IL_000b:  ldloc.0
-        IL_000c:  callvirt   instance bool XYZ.ABC/ABC/Expr::Equals(class XYZ.ABC/ABC/Expr)
-        IL_0011:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0012:  ldc.i4.0
-        IL_0013:  ret
-      } // end of method Expr::Equals
-
-      .property instance int32 Tag()
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-        .get instance int32 XYZ.ABC/ABC/Expr::get_Tag()
-      } // end of property Expr::Tag
-      .property instance int32 Item()
-      {
-        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                    int32,
-                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ) 
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-        .get instance int32 XYZ.ABC/ABC/Expr::get_Item()
-      } // end of property Expr::Item
-    } // end of class Expr
-
-    .class auto ansi serializable nested public beforefieldinit MyExn
-           extends [mscorlib]System.Exception
-           implements [mscorlib]System.Collections.IStructuralEquatable
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 05 00 00 00 00 00 ) 
-      .field assembly int32 Data0@
-      .method public specialname rtspecialname 
-              instance void  .ctor(int32 data0) cil managed
-      {
-        // Code size       14 (0xe)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-        IL_0006:  ldarg.0
-        IL_0007:  ldarg.1
-        IL_0008:  stfld      int32 XYZ.ABC/ABC/MyExn::Data0@
-        IL_000d:  ret
-      } // end of method MyExn::.ctor
-
-      .method public specialname rtspecialname 
-              instance void  .ctor() cil managed
-      {
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  call       instance void [mscorlib]System.Exception::.ctor()
-        IL_0006:  ret
-      } // end of method MyExn::.ctor
-
-      .method family specialname rtspecialname 
-              instance void  .ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo info,
-                                   valuetype [mscorlib]System.Runtime.Serialization.StreamingContext context) cil managed
-      {
-        // Code size       9 (0x9)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  ldarg.1
-        IL_0002:  ldarg.2
-        IL_0003:  call       instance void [mscorlib]System.Exception::.ctor(class [mscorlib]System.Runtime.Serialization.SerializationInfo,
-                                                                             valuetype [mscorlib]System.Runtime.Serialization.StreamingContext)
-        IL_0008:  ret
-      } // end of method MyExn::.ctor
-
-      .method public hidebysig specialname 
-              instance int32  get_Data0() cil managed
-      {
-        // Code size       7 (0x7)
-        .maxstack  8
-        IL_0000:  ldarg.0
-        IL_0001:  ldfld      int32 XYZ.ABC/ABC/MyExn::Data0@
-        IL_0006:  ret
-      } // end of method MyExn::get_Data0
-
-      .method public hidebysig virtual instance int32 
-              GetHashCode(class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       40 (0x28)
-        .maxstack  7
-        .locals init ([0] int32 V_0,
-                 [1] class [mscorlib]System.Collections.IEqualityComparer V_1)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0026
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldc.i4.0
-        IL_0007:  stloc.0
-        IL_0008:  ldc.i4     0x9e3779b9
-        IL_000d:  ldarg.1
-        IL_000e:  stloc.1
-        IL_000f:  ldarg.0
-        IL_0010:  castclass  XYZ.ABC/ABC/MyExn
-        IL_0015:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
-        IL_001a:  ldloc.0
-        IL_001b:  ldc.i4.6
-        IL_001c:  shl
-        IL_001d:  ldloc.0
-        IL_001e:  ldc.i4.2
-        IL_001f:  shr
-        IL_0020:  add
-        IL_0021:  add
-        IL_0022:  add
-        IL_0023:  stloc.0
-        IL_0024:  ldloc.0
-        IL_0025:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0026:  ldc.i4.0
-        IL_0027:  ret
-      } // end of method MyExn::GetHashCode
-
-      .method public hidebysig virtual instance int32 
-              GetHashCode() cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       12 (0xc)
-        .maxstack  8
-        .line 24,24 : 23,28 ''
-        IL_0000:  ldarg.0
-        IL_0001:  call       class [mscorlib]System.Collections.IEqualityComparer [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives::get_GenericEqualityComparer()
-        IL_0006:  callvirt   instance int32 XYZ.ABC/ABC/MyExn::GetHashCode(class [mscorlib]System.Collections.IEqualityComparer)
-        IL_000b:  ret
-      } // end of method MyExn::GetHashCode
-
-      .method public hidebysig virtual instance bool 
-              Equals(object obj,
-                     class [mscorlib]System.Collections.IEqualityComparer comp) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       67 (0x43)
-        .maxstack  4
-        .locals init ([0] class [mscorlib]System.Exception V_0,
-                 [1] class [mscorlib]System.Exception V_1,
-                 [2] class [mscorlib]System.Collections.IEqualityComparer V_2)
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_003b
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  isinst     [mscorlib]System.Exception
-        IL_000c:  stloc.0
-        IL_000d:  ldloc.0
-        IL_000e:  brfalse.s  IL_0039
-
-        .line 100001,100001 : 0,0 ''
-        IL_0010:  ldloc.0
-        IL_0011:  stloc.1
-        IL_0012:  ldloc.0
-        IL_0013:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-        IL_0018:  brtrue.s   IL_001c
-
-        IL_001a:  br.s       IL_0037
-
-        .line 100001,100001 : 0,0 ''
-        IL_001c:  ldarg.2
-        IL_001d:  stloc.2
-        IL_001e:  ldarg.0
-        IL_001f:  castclass  XYZ.ABC/ABC/MyExn
-        IL_0024:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
-        IL_0029:  ldloc.1
-        IL_002a:  castclass  XYZ.ABC/ABC/MyExn
-        IL_002f:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
-        IL_0034:  ceq
-        IL_0036:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0037:  ldc.i4.0
-        IL_0038:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0039:  ldc.i4.0
-        IL_003a:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_003b:  ldarg.1
-        IL_003c:  ldnull
-        IL_003d:  cgt.un
-        IL_003f:  ldc.i4.0
-        IL_0040:  ceq
-        IL_0042:  ret
-      } // end of method MyExn::Equals
-
-      .method public hidebysig instance bool 
-              Equals(class [mscorlib]System.Exception obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       59 (0x3b)
-        .maxstack  8
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldnull
-        IL_0002:  cgt.un
-        IL_0004:  brfalse.s  IL_0033
-
-        .line 100001,100001 : 0,0 ''
-        IL_0006:  ldarg.1
-        IL_0007:  ldnull
-        IL_0008:  cgt.un
-        IL_000a:  brfalse.s  IL_0031
-
-        .line 100001,100001 : 0,0 ''
-        IL_000c:  ldarg.1
-        IL_000d:  call       bool [FSharp.Core]Microsoft.FSharp.Core.LanguagePrimitives/IntrinsicFunctions::TypeTestGeneric(object)
-        IL_0012:  brtrue.s   IL_0016
-
-        IL_0014:  br.s       IL_002f
-
-        .line 100001,100001 : 0,0 ''
-        IL_0016:  ldarg.0
-        IL_0017:  castclass  XYZ.ABC/ABC/MyExn
-        IL_001c:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
-        IL_0021:  ldarg.1
-        IL_0022:  castclass  XYZ.ABC/ABC/MyExn
-        IL_0027:  call       instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
-        IL_002c:  ceq
-        IL_002e:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_002f:  ldc.i4.0
-        IL_0030:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0031:  ldc.i4.0
-        IL_0032:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0033:  ldarg.1
-        IL_0034:  ldnull
-        IL_0035:  cgt.un
-        IL_0037:  ldc.i4.0
-        IL_0038:  ceq
-        IL_003a:  ret
-      } // end of method MyExn::Equals
-
-      .method public hidebysig virtual instance bool 
-              Equals(object obj) cil managed
-      {
-        .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-        // Code size       20 (0x14)
-        .maxstack  4
-        .locals init ([0] class [mscorlib]System.Exception V_0)
-        .line 24,24 : 23,28 ''
-        IL_0000:  ldarg.1
-        IL_0001:  isinst     [mscorlib]System.Exception
-        IL_0006:  stloc.0
-        IL_0007:  ldloc.0
-        IL_0008:  brfalse.s  IL_0012
-
-        .line 100001,100001 : 0,0 ''
-        IL_000a:  ldarg.0
-        IL_000b:  ldloc.0
-        IL_000c:  callvirt   instance bool XYZ.ABC/ABC/MyExn::Equals(class [mscorlib]System.Exception)
-        IL_0011:  ret
-
-        .line 100001,100001 : 0,0 ''
-        IL_0012:  ldc.i4.0
-        IL_0013:  ret
-      } // end of method MyExn::Equals
-
-      .property instance int32 Data0()
-      {
-        .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags,
-                                                                                                    int32) = ( 01 00 04 00 00 00 00 00 00 00 00 00 ) 
-        .get instance int32 XYZ.ABC/ABC/MyExn::get_Data0()
-      } // end of property MyExn::Data0
-    } // end of class MyExn
-
-    .class auto ansi serializable nested public A
-           extends [mscorlib]System.Object
-    {
-      .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 ) 
-      .field assembly string x
-      .method public specialname rtspecialname 
-              instance void  .ctor(string x) cil managed
-      {
-        // Code size       16 (0x10)
-        .maxstack  8
-        .line 100001,100001 : 0,0 ''
-        IL_0000:  ldarg.0
-        IL_0001:  callvirt   instance void [mscorlib]System.Object::.ctor()
-        IL_0006:  ldarg.0
-        IL_0007:  pop
-        .line 25,25 : 20,21 ''
-        IL_0008:  ldarg.0
-        IL_0009:  ldarg.1
-        IL_000a:  stfld      string XYZ.ABC/ABC/A::x
-        .line 25,25 : 18,19 ''
-        IL_000f:  ret
-      } // end of method A::.ctor
-
-      .method public hidebysig specialname 
-              instance string  get_X() cil managed
-      {
-        // Code size       7 (0x7)
-        .maxstack  8
-        .line 25,25 : 46,47 ''
-        IL_0000:  ldarg.0
-        IL_0001:  ldfld      string XYZ.ABC/ABC/A::x
-        IL_0006:  ret
-      } // end of method A::get_X
-
-      .property instance string X()
-      {
-        .get instance string XYZ.ABC/ABC/A::get_X()
-      } // end of property A::X
-    } // end of class A
-
-    .method public static int32  'add'(int32 x,
-                                       int32 y) 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 ) 
-      // Code size       4 (0x4)
-      .maxstack  8
-      .line 28,28 : 27,32 ''
-      IL_0000:  ldarg.0
-      IL_0001:  ldarg.1
-      IL_0002:  add
-      IL_0003:  ret
-    } // end of method ABC::'add'
-
-    .method public specialname static string 
-            get_greeting() cil managed
-    {
-      .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-      .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-      // Code size       6 (0x6)
-      .maxstack  8
-      IL_0000:  ldstr      "hello"
-      IL_0005:  ret
-    } // end of method ABC::get_greeting
-
-    .property string greeting()
-    {
-      .get string XYZ.ABC/ABC::get_greeting()
-    } // end of property ABC::greeting
-  } // end of class ABC
-
-  .method public static int32  'add'(int32 x,
-                                     int32 y) 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 ) 
-    // Code size       4 (0x4)
-    .maxstack  8
-    .line 18,18 : 23,28 ''
-    IL_0000:  ldarg.0
-    IL_0001:  ldarg.1
-    IL_0002:  add
-    IL_0003:  ret
-  } // end of method ABC::'add'
-
-  .method public specialname static string 
-          get_greeting() cil managed
-  {
-    .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-    .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-    // Code size       6 (0x6)
-    .maxstack  8
-    IL_0000:  ldstr      "hello"
-    IL_0005:  ret
-  } // end of method ABC::get_greeting
-
-  .property string greeting()
-  {
-    .get string XYZ.ABC::get_greeting()
-  } // end of property ABC::greeting
-} // end of class XYZ.ABC
-
-.class private abstract auto ansi sealed ''.$ToplevelNamespace
-       extends [mscorlib]System.Object
-{
-  .field static assembly int32 init@
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState) = ( 01 00 00 00 00 00 00 00 ) 
-  .custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) 
-  .custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) 
-  .method private specialname rtspecialname static 
-          void  .cctor() cil managed
-  {
-    // Code size       13 (0xd)
-    .maxstack  3
-    .locals init ([0] string greeting,
-             [1] string V_1)
-    .line 19,19 : 9,31 ''
-    IL_0000:  call       string XYZ.ABC::get_greeting()
-    IL_0005:  stloc.0
-    .line 29,29 : 13,35 ''
-    IL_0006:  call       string XYZ.ABC/ABC::get_greeting()
-    IL_000b:  stloc.1
-    IL_000c:  ret
-  } // end of method $ToplevelNamespace::.cctor
-
-} // end of class ''.$ToplevelNamespace
-
-
-// =============================================================
-
-// *********** DISASSEMBLY COMPLETE ***********************
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
index 3a2b12606bc..5af7ea86311 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/LetBinding01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001B8 Length: 0x00000070
 }
 .module LetBinding01.exe
-// MVID: {5F972A68-269D-BEEF-A745-0383682A975F}
+// MVID: {60B68B90-269D-BEEF-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09810000
+// Image base: 0x06AB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
index 0bd503f755b..aa250d3a1d8 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Class01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x00000338 Length: 0x000000AD
 }
 .module StaticInit_Class01.dll
-// MVID: {5F972A68-EC34-E66E-A745-0383682A975F}
+// MVID: {60B68B90-EC34-E66E-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x068D0000
+// Image base: 0x06F70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
index dff3712ca51..bbe78bc0de6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Module01.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000002A8 Length: 0x000000DF
 }
 .module StaticInit_Module01.dll
-// MVID: {5F972A68-705F-DF4F-A745-0383682A975F}
+// MVID: {60B68B90-705F-DF4F-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08EC0000
+// Image base: 0x050C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
index 1ce6d409172..a0fdade3853 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/StaticInit/StaticInit_Struct01.il.bsl
@@ -36,13 +36,9 @@
 {
   // Offset: 0x00000000 Length: 0x000007A1
 }
-.mresource public FSharpSignatureDataB.StaticInit_Struct01
-{
-  // Offset: 0x000007A8 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.StaticInit_Struct01
 {
-  // Offset: 0x000007B0 Length: 0x0000021F
+  // Offset: 0x000007A8 Length: 0x0000021F
 }
 .module StaticInit_Struct01.dll
 // MVID: {60B68B90-05F6-D6CB-A745-0383908BB660}
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
index 2634d93ba08..c3bb349428a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch01.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000210
 }
-.mresource public FSharpSignatureDataB.SteppingMatch01
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.SteppingMatch01
 {
-  // Offset: 0x00000220 Length: 0x0000007A
+  // Offset: 0x00000218 Length: 0x0000007A
 }
 .module SteppingMatch01.dll
-// MVID: {60BF8367-ABFD-13F6-A745-03836783BF60}
+// MVID: {60B68B90-ABFD-13F6-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07340000
+// Image base: 0x06940000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
index f5412aba138..21138ae19ab 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch02.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000210
 }
-.mresource public FSharpSignatureDataB.SteppingMatch02
-{
-  // Offset: 0x00000218 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.SteppingMatch02
 {
-  // Offset: 0x00000220 Length: 0x0000007A
+  // Offset: 0x00000218 Length: 0x0000007A
 }
 .module SteppingMatch02.dll
-// MVID: {60BF8367-CAC2-C63D-A745-03836783BF60}
+// MVID: {60B68B90-CAC2-C63D-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07340000
+// Image base: 0x05330000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
index 54bb689193d..2413a566d87 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch03.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000225
 }
-.mresource public FSharpSignatureDataB.SteppingMatch03
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.SteppingMatch03
 {
-  // Offset: 0x00000238 Length: 0x0000007A
+  // Offset: 0x00000230 Length: 0x0000007A
 }
 .module SteppingMatch03.dll
-// MVID: {60BF8367-4E87-D110-A745-03836783BF60}
+// MVID: {60B68B90-4E87-D110-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04DA0000
+// Image base: 0x07380000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
index 67cca9075a7..df2a0c23809 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch04.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000226
 }
-.mresource public FSharpSignatureDataB.SteppingMatch04
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.SteppingMatch04
 {
-  // Offset: 0x00000238 Length: 0x0000007B
+  // Offset: 0x00000230 Length: 0x0000007B
 }
 .module SteppingMatch04.dll
-// MVID: {60BF8367-6D4C-8357-A745-03836783BF60}
+// MVID: {60B68B90-6D4C-8357-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05210000
+// Image base: 0x073C0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
index 00f380c8635..6f851d8245e 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch05.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000226
 }
-.mresource public FSharpSignatureDataB.SteppingMatch05
-{
-  // Offset: 0x00000230 Length: 0x00000003
-}
 .mresource public FSharpOptimizationData.SteppingMatch05
 {
-  // Offset: 0x00000238 Length: 0x0000007B
+  // Offset: 0x00000230 Length: 0x0000007B
 }
 .module SteppingMatch05.dll
-// MVID: {60BF8367-30E9-4ADA-A745-03836783BF60}
+// MVID: {60B68B90-30E9-4ADA-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070C0000
+// Image base: 0x072E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
index 92bf13d5bf8..da1fa20a676 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch06.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000675
 }
-.mresource public FSharpSignatureDataB.SteppingMatch06
-{
-  // Offset: 0x00000680 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.SteppingMatch06
 {
-  // Offset: 0x00000688 Length: 0x000001D9
+  // Offset: 0x00000680 Length: 0x000001D9
 }
 .module SteppingMatch06.dll
-// MVID: {60BF8367-4FAE-FD21-A745-03836783BF60}
+// MVID: {60B68B90-4FAE-FD21-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E50000
+// Image base: 0x05BB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
index 3f1f99134b2..d91371610a6 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch07.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000675
 }
-.mresource public FSharpSignatureDataB.SteppingMatch07
-{
-  // Offset: 0x00000680 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.SteppingMatch07
 {
-  // Offset: 0x00000688 Length: 0x000001D9
+  // Offset: 0x00000680 Length: 0x000001D9
 }
 .module SteppingMatch07.dll
-// MVID: {60BF8367-D373-07F3-A745-03836783BF60}
+// MVID: {60B68B90-D373-07F3-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05510000
+// Image base: 0x07270000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
index a90158b270a..76a265460b5 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch08.il.bsl
@@ -36,13 +36,13 @@
   // Offset: 0x000001E0 Length: 0x00000079
 }
 .module SteppingMatch08.dll
-// MVID: {60BF8367-F238-BA3A-A745-03836783BF60}
+// MVID: {60B68B90-F238-BA3A-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x057D0000
+// Image base: 0x00E20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
index 8063658cca6..3d11c8b1b67 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/SteppingMatch/SteppingMatch09.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000030C
 }
-.mresource public FSharpSignatureDataB.SteppingMatch09
-{
-  // Offset: 0x00000310 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.SteppingMatch09
 {
-  // Offset: 0x00000318 Length: 0x000000EB
+  // Offset: 0x00000310 Length: 0x000000EB
 }
 .module SteppingMatch09.dll
-// MVID: {60BF8367-4935-D6AC-A745-03836783BF60}
+// MVID: {60B68B90-4935-D6AC-A745-0383908BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06ED0000
+// Image base: 0x06A70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
index c572d1a20e6..b3bb8d0a49b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction13.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000203
 }
-.mresource public FSharpSignatureDataB.TestFunction13
-{
-  // Offset: 0x00000208 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.TestFunction13
 {
-  // Offset: 0x00000210 Length: 0x00000072
+  // Offset: 0x00000208 Length: 0x00000072
 }
 .module TestFunction13.exe
-// MVID: {60BF836C-A624-451C-A745-03836C83BF60}
+// MVID: {60B68B97-A624-451C-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x050A0000
+// Image base: 0x00EC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
index bff27b9f312..25a67922af0 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction16.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000683
 }
-.mresource public FSharpSignatureDataB.TestFunction16
-{
-  // Offset: 0x00000688 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.TestFunction16
 {
-  // Offset: 0x00000690 Length: 0x000001CD
+  // Offset: 0x00000688 Length: 0x000001CD
 }
 .module TestFunction16.exe
-// MVID: {60BF836C-A624-45C5-A745-03836C83BF60}
+// MVID: {60B68B97-A624-45C5-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05370000
+// Image base: 0x00E30000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
index 75708ea8f31..02a8fa33560 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction17.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000066E
 }
-.mresource public FSharpSignatureDataB.TestFunction17
-{
-  // Offset: 0x00000678 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.TestFunction17
 {
-  // Offset: 0x00000680 Length: 0x000001CD
+  // Offset: 0x00000678 Length: 0x000001CD
 }
 .module TestFunction17.exe
-// MVID: {60BF836C-A624-45A8-A745-03836C83BF60}
+// MVID: {60B68B97-A624-45A8-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07130000
+// Image base: 0x06AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
index 83b984ffeb8..752ef0b375b 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction21.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000675
 }
-.mresource public FSharpSignatureDataB.TestFunction21
-{
-  // Offset: 0x00000680 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.TestFunction21
 {
-  // Offset: 0x00000688 Length: 0x000001CD
+  // Offset: 0x00000680 Length: 0x000001CD
 }
 .module TestFunction21.exe
-// MVID: {60BF836C-A643-45E6-A745-03836C83BF60}
+// MVID: {60B68B97-A643-45E6-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07000000
+// Image base: 0x05500000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
index cb58ea7bcb3..7f88a4908a9 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction23.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000033A
 }
-.mresource public FSharpSignatureDataB.TestFunction23
-{
-  // Offset: 0x00000340 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.TestFunction23
 {
-  // Offset: 0x00000348 Length: 0x000000E3
+  // Offset: 0x00000340 Length: 0x000000E3
 }
 .module TestFunction23.exe
-// MVID: {60BF836C-A643-451C-A745-03836C83BF60}
+// MVID: {60B68B97-A643-451C-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05450000
+// Image base: 0x07240000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
index 91571992570..1063152863a 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction24.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000742
 }
-.mresource public FSharpSignatureDataB.TestFunction24
-{
-  // Offset: 0x00000748 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.TestFunction24
 {
-  // Offset: 0x00000750 Length: 0x00000228
+  // Offset: 0x00000748 Length: 0x00000228
 }
 .module TestFunction24.exe
-// MVID: {60BF836C-A643-4587-A745-03836C83BF60}
+// MVID: {60B68B97-A643-4587-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B10000
+// Image base: 0x06EA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
index f967e6d3608..3c3c35b89af 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/TestFunction9b4.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x00000240
 }
-.mresource public FSharpSignatureDataB.TestFunction9b4
-{
-  // Offset: 0x00000248 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.TestFunction9b4
 {
-  // Offset: 0x00000250 Length: 0x00000085
+  // Offset: 0x00000248 Length: 0x00000085
 }
 .module TestFunction9b4.exe
-// MVID: {60BF836C-A091-56C1-A745-03836C83BF60}
+// MVID: {60B68B97-A091-56C1-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x00B90000
+// Image base: 0x06CC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
index 68d32353eaf..17e117dad82 100644
--- a/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/EmittedIL/TestFunctions/Testfunction18.il.bsl
@@ -31,22 +31,18 @@
 {
   // Offset: 0x00000000 Length: 0x000001E1
 }
-.mresource public FSharpSignatureDataB.TestFunction18
-{
-  // Offset: 0x000001E8 Length: 0x00000001
-}
 .mresource public FSharpOptimizationData.TestFunction18
 {
-  // Offset: 0x000001F0 Length: 0x00000072
+  // Offset: 0x000001E8 Length: 0x00000072
 }
 .module TestFunction18.exe
-// MVID: {60BF836C-A624-4603-A745-03836C83BF60}
+// MVID: {60B68B97-A624-4603-A745-0383978BB660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06560000
+// Image base: 0x09850000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl b/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl
index d45a480f910..54cc47dfc7d 100644
--- a/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl
+++ b/tests/fsharpqa/Source/CodeGen/LazyNoInline01.il.bsl
@@ -31,18 +31,10 @@
 {
   // Offset: 0x00000000 Length: 0x000001A8
 }
-.mresource public FSharpSignatureDataB.LazyNoInline01
-{
-  // Offset: 0x00000000 Length: 0x000001A8
-}
 .mresource public FSharpOptimizationData.LazyNoInline01
 {
   // Offset: 0x000001B0 Length: 0x00000074
 }
-.mresource public FSharpOptimizationDataB.LazyNoInline01
-{
-  // Offset: 0x000001B0 Length: 0x00000074
-}
 .module LazyNoInline01.exe
 // MVID: {4CDA515D-3328-E592-A745-03835D51DA4C}
 .imagebase 0x00400000
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl
index 2c6be1b1e0d..853541eca4d 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsc/help/help40.437.1033.bsl
@@ -99,8 +99,6 @@ Copyright (c) Microsoft Corporation. All Rights Reserved.
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
---checknulls[+|-]                        Enable nullness declarations and
-                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl
index aa3952904d4..7f0560a46c0 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsc/nologo/logo.437.1033.bsl
@@ -1,4 +1,4 @@
-Microsoft (R) F# Compiler version 10.2.3 for F# 4.5
+Microsoft (R) F# Compiler version 11.0.50518.0
 Copyright (c) Microsoft Corporation. All Rights Reserved.
 
 error FS0207: No inputs specified
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl
index d04d5e69f82..b4c1b490400 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/exename/help40.437.1033.bsl
@@ -47,8 +47,6 @@ Usage: fsharpi  [script.fsx []]
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
---checknulls[+|-]                        Enable nullness declarations and
-                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
index f22601aafbb..d95678648c7 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40-nologo.437.1033.bsl
@@ -47,8 +47,6 @@ Usage: fsiAnyCpu  [script.fsx []]
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
---checknulls[+|-]                        Enable nullness declarations and
-                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
index ea4ca992051..cbedecea482 100644
--- a/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
+++ b/tests/fsharpqa/Source/CompilerOptions/fsi/help/help40.437.1033.bsl
@@ -49,8 +49,6 @@ Usage: fsiAnyCpu  [script.fsx []]
 --nowarn:                      Disable specific warning messages
 --warnon:                      Enable specific warnings that may be
                                          off by default
---checknulls[+|-]                        Enable nullness declarations and
-                                         checks
 --consolecolors[+|-]                     Output warning and error messages in
                                          color
 
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
index 51e164b3723..38b3a3aa80c 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ForEachOnArray01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly ForEachOnArray01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.ForEachOnArray01
 {
-  // Offset: 0x00000000 Length: 0x000001DC
+  // Offset: 0x00000000 Length: 0x000001E0
 }
 .mresource public FSharpOptimizationData.ForEachOnArray01
 {
-  // Offset: 0x000001E0 Length: 0x0000007C
+  // Offset: 0x000001E8 Length: 0x0000007C
 }
 .module ForEachOnArray01.dll
-// MVID: {5F972DEC-7E2E-D3AE-A745-0383EC2D975F}
+// MVID: {59B18AEE-7E2E-D3AE-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06590000
+// Image base: 0x00D00000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -59,7 +59,7 @@
              [1] int32 V_1,
              [2] int32 x)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 6,23 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ForEachOnArray01.fs'
+    .line 6,6 : 6,23 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ForEachOnArray01.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     .line 7,7 : 6,21 ''
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
index 8f6df7005de..4dd6df631f0 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoAllocationOfTuple01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly NoAllocationOfTuple01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.NoAllocationOfTuple01
 {
-  // Offset: 0x00000000 Length: 0x000001DC
+  // Offset: 0x00000000 Length: 0x000001E0
 }
 .mresource public FSharpOptimizationData.NoAllocationOfTuple01
 {
-  // Offset: 0x000001E0 Length: 0x00000085
+  // Offset: 0x000001E8 Length: 0x00000085
 }
 .module NoAllocationOfTuple01.dll
-// MVID: {5F972DEC-13B5-F699-A745-0383EC2D975F}
+// MVID: {59B18AEE-13B5-F699-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06A10000
+// Image base: 0x03460000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +60,7 @@
              [2] int32 V_2,
              [3] int32 j)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 5,31 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoAllocationOfTuple01.fs'
+    .line 6,6 : 5,31 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\NoAllocationOfTuple01.fs'
     IL_0000:  ldarg.0
     IL_0001:  call       !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::ZeroCreate(int32)
     IL_0006:  stloc.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
index a58a000f4cb..a56c18506ea 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable01.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable01
 {
-  // Offset: 0x00000000 Length: 0x000001CD
+  // Offset: 0x00000000 Length: 0x000001CB
 }
 .mresource public FSharpOptimizationData.NoIEnumerable01
 {
-  // Offset: 0x000001D8 Length: 0x0000006C
+  // Offset: 0x000001D0 Length: 0x0000006C
 }
 .module NoIEnumerable01.dll
-// MVID: {5F972DEC-31A1-8DCB-A745-0383EC2D975F}
+// MVID: {5F1FBE49-31A1-8DCB-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06E60000
+// Image base: 0x07010000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable01.fsx'
+    .line 7,7 : 4,22 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable01.fsx'
     IL_0000:  ldc.i4.1
     IL_0001:  stloc.1
     IL_0002:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
index d34ecc4f73a..80a2f8d02da 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable02.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable02
 {
-  // Offset: 0x00000000 Length: 0x000001CD
+  // Offset: 0x00000000 Length: 0x000001CB
 }
 .mresource public FSharpOptimizationData.NoIEnumerable02
 {
-  // Offset: 0x000001D8 Length: 0x0000006C
+  // Offset: 0x000001D0 Length: 0x0000006C
 }
 .module NoIEnumerable02.dll
-// MVID: {5F972DEC-5066-4012-A745-0383EC2D975F}
+// MVID: {5F1FBE49-5066-4012-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06990000
+// Image base: 0x07280000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 7,7 : 4,24 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable02.fsx'
+    .line 7,7 : 4,24 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable02.fsx'
     IL_0000:  ldc.i4.s   100
     IL_0002:  stloc.1
     IL_0003:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
index 51341a836da..7e4eeb1fcb7 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/NoIEnumerable03.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.NoIEnumerable03
 {
-  // Offset: 0x00000000 Length: 0x000001DB
+  // Offset: 0x00000000 Length: 0x000001D9
 }
 .mresource public FSharpOptimizationData.NoIEnumerable03
 {
   // Offset: 0x000001E0 Length: 0x0000006C
 }
 .module NoIEnumerable03.dll
-// MVID: {5F972DEC-7903-6020-A745-0383EC2D975F}
+// MVID: {5F1FBE49-7903-6020-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x08E40000
+// Image base: 0x070D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -66,7 +66,7 @@
              [1] int32 i,
              [2] class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 7,7 : 4,22 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable03.fsx'
+    .line 7,7 : 4,22 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\NoIEnumerable03.fsx'
     IL_0000:  ldarg.0
     IL_0001:  stloc.1
     IL_0002:  ldarg.1
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
index 4785aec3051..a27da5651f5 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly ZeroToArrLength01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.ZeroToArrLength01
 {
-  // Offset: 0x00000000 Length: 0x000001DC
+  // Offset: 0x00000000 Length: 0x000001E0
 }
 .mresource public FSharpOptimizationData.ZeroToArrLength01
 {
-  // Offset: 0x000001E0 Length: 0x0000007B
+  // Offset: 0x000001E8 Length: 0x0000007B
 }
 .module ZeroToArrLength01.dll
-// MVID: {5F972DEC-A3D0-03A7-A745-0383EC2D975F}
+// MVID: {59B18AEE-A3D0-03A7-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x069D0000
+// Image base: 0x02E70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -57,7 +57,7 @@
     .maxstack  5
     .locals init ([0] int32 i)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 5,35 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ZeroToArrLength01.fs'
+    .line 6,6 : 5,35 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\ForLoop\\ZeroToArrLength01.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.0
     IL_0002:  br.s       IL_0010
diff --git a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
index c4b3bf92137..253d6843729 100644
--- a/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/ForLoop/ZeroToArrLength02.il.bsl
@@ -24,22 +24,20 @@
 }
 .mresource public FSharpSignatureData.ZeroToArrLength02
 {
-  // Offset: 0x00000000 Length: 0x000001DC
+  // Offset: 0x00000000 Length: 0x0000020E
 }
 .mresource public FSharpOptimizationData.ZeroToArrLength02
 {
-  // Offset: 0x000001E0 Length: 0x0000007B
+  // Offset: 0x00000218 Length: 0x0000007B
 }
 .module ZeroToArrLength02.dll
-// MVID: {5F972DEC-A36B-03A7-A745-0383EC2D975F}
+// MVID: {5F9557F9-A36B-03A7-A745-0383F957955F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06750000
-
-
+// Image base: 0x04D90000
 // =============== CLASS MEMBERS DECLARATION ===================
 .class public abstract auto ansi sealed ZeroToArrLength02
        extends [mscorlib]System.Object
@@ -52,7 +50,7 @@
     .locals init ([0] int32 V_0,
              [1] int32 i)
     .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-    .line 6,6 : 5,41 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ZeroToArrLength02.fs'
+    .line 6,6 : 5,41 'C:\\Users\\Michelle\\Desktop\\Personal\\Repos\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\ForLoop\\ZeroToArrLength02.fs'
     IL_0000:  ldc.i4.0
     IL_0001:  stloc.1
     IL_0002:  ldarg.0
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
index 827e881efc9..974905405eb 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare01
 {
-  // Offset: 0x00000000 Length: 0x00000221
+  // Offset: 0x00000000 Length: 0x00000225
 }
 .mresource public FSharpOptimizationData.Compare01
 {
-  // Offset: 0x00000228 Length: 0x000000B2
+  // Offset: 0x00000230 Length: 0x000000B2
 }
 .module Compare01.dll
-// MVID: {5F972DF5-04A0-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-04A0-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06770000
+// Image base: 0x00FF0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +63,7 @@
                [1] int32 i,
                [2] int32 V_2)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare01.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare01.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 9,9 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
index 14be69ba17e..74bd16af665 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare02
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare02
 {
-  // Offset: 0x00000000 Length: 0x00000228
+  // Offset: 0x00000000 Length: 0x0000022C
 }
 .mresource public FSharpOptimizationData.Compare02
 {
   // Offset: 0x00000230 Length: 0x000000B9
 }
 .module Compare02.dll
-// MVID: {5F972DF5-0481-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-0481-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09700000
+// Image base: 0x00BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
                [2] int32 V_2,
                [3] int32 V_3)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare02.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare02.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
index dee5dedafe7..6bc3566d45e 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare03.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.Compare03
 {
-  // Offset: 0x00000000 Length: 0x00000233
+  // Offset: 0x00000000 Length: 0x00000231
 }
 .mresource public FSharpOptimizationData.Compare03
 {
   // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare03.dll
-// MVID: {5F972DF5-0562-F88E-A745-0383F52D975F}
+// MVID: {5F1FBE49-0562-F88E-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06A60000
+// Image base: 0x06C20000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -70,7 +70,7 @@
                [3] int32 V_3,
                [4] int32 V_4)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare03.fsx'
+      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare03.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
index 648b1011ff8..a48aceacf7b 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare04.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.Compare04
 {
-  // Offset: 0x00000000 Length: 0x00000233
+  // Offset: 0x00000000 Length: 0x00000231
 }
 .mresource public FSharpOptimizationData.Compare04
 {
   // Offset: 0x00000238 Length: 0x000000B9
 }
 .module Compare04.dll
-// MVID: {5F972DF5-053B-F88E-A745-0383F52D975F}
+// MVID: {5F1FBE49-053B-F88E-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06870000
+// Image base: 0x06750000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -71,7 +71,7 @@
                [4] int32 V_4,
                [5] int32 V_5)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare04.fsx'
+      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare04.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
index 3552b7964bd..1b66e37d298 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare05
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare05
 {
-  // Offset: 0x00000000 Length: 0x000006DC
-}
-.mresource public FSharpSignatureDataB.Compare05
-{
-  // Offset: 0x000006E0 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006EC
 }
 .mresource public FSharpOptimizationData.Compare05
 {
-  // Offset: 0x000006E8 Length: 0x000003BA
+  // Offset: 0x000006F0 Length: 0x000003BA
 }
 .module Compare05.dll
-// MVID: {5F972DF5-051C-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-051C-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x071B0000
+// Image base: 0x002D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare05.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare05.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
index ac0893f6196..49c709033de 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare06
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare06
 {
-  // Offset: 0x00000000 Length: 0x000006CF
-}
-.mresource public FSharpSignatureDataB.Compare06
-{
-  // Offset: 0x000006D8 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006DF
 }
 .mresource public FSharpOptimizationData.Compare06
 {
-  // Offset: 0x000006E0 Length: 0x000003BC
+  // Offset: 0x000006E8 Length: 0x000003BC
 }
 .module Compare06.dll
-// MVID: {5F972DF5-04FD-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-04FD-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09B00000
+// Image base: 0x02E80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -134,7 +130,7 @@
                  [2] int32 V_2,
                  [3] int32 V_3)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare06.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare06.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
index 4899aa9e4d8..70335b05d20 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare07
 {
@@ -29,28 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare07
 {
-  // Offset: 0x00000000 Length: 0x0000088A
-}
-.mresource public FSharpSignatureDataB.Compare07
-{
-  // Offset: 0x00000890 Length: 0x00000013
+  // Offset: 0x00000000 Length: 0x0000089A
 }
 .mresource public FSharpOptimizationData.Compare07
 {
-  // Offset: 0x000008A8 Length: 0x0000068C
-}
-.mresource public FSharpOptimizationDataB.Compare07
-{
-  // Offset: 0x00000F38 Length: 0x00000014
+  // Offset: 0x000008A0 Length: 0x00000692
 }
 .module Compare07.dll
-// MVID: {5F972DF5-05DE-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-05DE-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06CE0000
+// Image base: 0x02BA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -195,7 +187,7 @@
                  [4] !a V_4,
                  [5] !a V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare07.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare07.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
index 8b7dfbb568d..29f55a0cb58 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare08
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare08
 {
-  // Offset: 0x00000000 Length: 0x0000022C
+  // Offset: 0x00000000 Length: 0x00000230
 }
 .mresource public FSharpOptimizationData.Compare08
 {
-  // Offset: 0x00000230 Length: 0x000000B2
+  // Offset: 0x00000238 Length: 0x000000B2
 }
 .module Compare08.dll
-// MVID: {5F972DF5-03E7-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-03E7-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x066E0000
+// Image base: 0x01590000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
                [2] uint8[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare08.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare08.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,35 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
index 259d4a880d0..4d890783eed 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare09
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare09
 {
-  // Offset: 0x00000000 Length: 0x0000022C
+  // Offset: 0x00000000 Length: 0x00000230
 }
 .mresource public FSharpOptimizationData.Compare09
 {
-  // Offset: 0x00000230 Length: 0x000000B2
+  // Offset: 0x00000238 Length: 0x000000B2
 }
 .module Compare09.dll
-// MVID: {5F972DF5-03C8-F88E-A745-0383F52D975F}
+// MVID: {59B18AEE-03C8-F88E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x073D0000
+// Image base: 0x01020000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
                [2] int32[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare09.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare09.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,31 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
index cf8e4b2b4dc..16bada503c5 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare10
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare10
 {
-  // Offset: 0x00000000 Length: 0x00000A94
-}
-.mresource public FSharpSignatureDataB.Compare10
-{
-  // Offset: 0x00000A98 Length: 0x00000004
+  // Offset: 0x00000000 Length: 0x00000AA4
 }
 .mresource public FSharpOptimizationData.Compare10
 {
-  // Offset: 0x00000AA0 Length: 0x0000058E
+  // Offset: 0x00000AA8 Length: 0x0000058E
 }
 .module Compare10.dll
-// MVID: {5F972DF5-04BF-1753-A745-0383F52D975F}
+// MVID: {59B18AEE-04BF-1753-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B80000
+// Image base: 0x002E0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare10.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare10.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
index 0698ea16ee2..7f37b719bb4 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Compare11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Compare11
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Compare11
 {
-  // Offset: 0x00000000 Length: 0x0000022C
+  // Offset: 0x00000000 Length: 0x00000230
 }
 .mresource public FSharpOptimizationData.Compare11
 {
-  // Offset: 0x00000230 Length: 0x000000B1
+  // Offset: 0x00000238 Length: 0x000000B1
 }
 .module Compare11.dll
-// MVID: {5F972DF5-04A0-1753-A745-0383F52D975F}
+// MVID: {59B18AEE-04A0-1753-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F00000
+// Image base: 0x010A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +62,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Compare11.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Compare11.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 9,9 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
index 34df2e24fe2..c722fc2d31f 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals01
 {
-  // Offset: 0x00000000 Length: 0x00000230
+  // Offset: 0x00000000 Length: 0x00000234
 }
 .mresource public FSharpOptimizationData.Equals01
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals01.dll
-// MVID: {5F972DF5-0759-50B1-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-50B1-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x068B0000
+// Image base: 0x02D70000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +62,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals01.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals01.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
index 60c10646543..93aa98ffb94 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals02.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.Equals02
 {
-  // Offset: 0x00000000 Length: 0x00000230
+  // Offset: 0x00000000 Length: 0x0000022E
 }
 .mresource public FSharpOptimizationData.Equals02
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals02.dll
-// MVID: {5F972DF5-0759-B6D8-A745-0383F52D975F}
+// MVID: {5F1FBE49-0759-B6D8-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x094C0000
+// Image base: 0x054B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -67,7 +67,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals02.fsx'
+      .line 5,5 : 8,29 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals02.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
index bba9c379b76..84da5e6eb5d 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals03.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.Equals03
 {
-  // Offset: 0x00000000 Length: 0x00000230
+  // Offset: 0x00000000 Length: 0x0000022E
 }
 .mresource public FSharpOptimizationData.Equals03
 {
   // Offset: 0x00000238 Length: 0x000000B6
 }
 .module Equals03.dll
-// MVID: {5F972DF5-0759-3313-A745-0383F52D975F}
+// MVID: {5F1FBE49-0759-3313-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06AD0000
+// Image base: 0x071F0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -67,7 +67,7 @@
       .locals init ([0] bool x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals03.fsx'
+      .line 5,5 : 8,29 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals03.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 8,8 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
index 00822024268..6ad198b4879 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals04.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals04
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals04
 {
-  // Offset: 0x00000000 Length: 0x000006D8
-}
-.mresource public FSharpSignatureDataB.Equals04
-{
-  // Offset: 0x000006E0 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006E8
 }
 .mresource public FSharpOptimizationData.Equals04
 {
-  // Offset: 0x000006E8 Length: 0x000003B7
+  // Offset: 0x000006F0 Length: 0x000003B7
 }
 .module Equals04.dll
-// MVID: {5F972DF5-0759-EA8A-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-EA8A-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x071D0000
+// Image base: 0x002D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals04.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals04.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
index 6650b729857..ecc013d450a 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals05
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals05
 {
-  // Offset: 0x00000000 Length: 0x000006CB
-}
-.mresource public FSharpSignatureDataB.Equals05
-{
-  // Offset: 0x000006D0 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006DB
 }
 .mresource public FSharpOptimizationData.Equals05
 {
-  // Offset: 0x000006D8 Length: 0x000003B9
+  // Offset: 0x000006E0 Length: 0x000003B9
 }
 .module Equals05.dll
-// MVID: {5F972DF5-0759-CBC5-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-CBC5-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06FD0000
+// Image base: 0x033B0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -134,7 +130,7 @@
                  [2] int32 V_2,
                  [3] int32 V_3)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals05.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals05.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
index 4595bb50dd5..91247bff24d 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals06
 {
@@ -29,28 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals06
 {
-  // Offset: 0x00000000 Length: 0x00000886
-}
-.mresource public FSharpSignatureDataB.Equals06
-{
-  // Offset: 0x00000890 Length: 0x00000013
+  // Offset: 0x00000000 Length: 0x00000896
 }
 .mresource public FSharpOptimizationData.Equals06
 {
-  // Offset: 0x000008A8 Length: 0x00000688
-}
-.mresource public FSharpOptimizationDataB.Equals06
-{
-  // Offset: 0x00000F38 Length: 0x00000014
+  // Offset: 0x000008A0 Length: 0x0000068E
 }
 .module Equals06.dll
-// MVID: {5F972DF5-0759-31EC-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-31EC-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06820000
+// Image base: 0x01B90000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -195,7 +187,7 @@
                  [4] !a V_4,
                  [5] !a V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals06.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals06.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
index 3338309635f..91f97c289a2 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals07
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals07
 {
-  // Offset: 0x00000000 Length: 0x00000229
+  // Offset: 0x00000000 Length: 0x0000022D
 }
 .mresource public FSharpOptimizationData.Equals07
 {
-  // Offset: 0x00000230 Length: 0x000000AF
+  // Offset: 0x00000238 Length: 0x000000AF
 }
 .module Equals07.dll
-// MVID: {5F972DF5-0759-AE27-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-AE27-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07040000
+// Image base: 0x01C80000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
                [2] uint8[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals07.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals07.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 6,6 : 8,35 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
index 098cc93dfc5..55da6ee102e 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals08
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals08
 {
-  // Offset: 0x00000000 Length: 0x00000229
+  // Offset: 0x00000000 Length: 0x0000022D
 }
 .mresource public FSharpOptimizationData.Equals08
 {
-  // Offset: 0x00000230 Length: 0x000000AF
+  // Offset: 0x00000238 Length: 0x000000AF
 }
 .module Equals08.dll
-// MVID: {5F972DF5-0759-659E-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-659E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x05190000
+// Image base: 0x01090000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -64,7 +64,7 @@
                [2] int32[] t2,
                [3] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals08.fsx'
+      .line 5,5 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals08.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  stloc.0
       .line 6,6 : 8,31 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
index b348e90e427..8985acaa02b 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Equals09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Equals09
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Equals09
 {
-  // Offset: 0x00000000 Length: 0x00000A90
-}
-.mresource public FSharpSignatureDataB.Equals09
-{
-  // Offset: 0x00000A98 Length: 0x00000004
+  // Offset: 0x00000000 Length: 0x00000AA0
 }
 .mresource public FSharpOptimizationData.Equals09
 {
-  // Offset: 0x00000AA0 Length: 0x0000058B
+  // Offset: 0x00000AA8 Length: 0x0000058B
 }
 .module Equals09.dll
-// MVID: {5F972DF5-0759-46D9-A745-0383F52D975F}
+// MVID: {59B18AEE-0759-46D9-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06B00000
+// Image base: 0x02720000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Equals09.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Equals09.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
index 273784d12fb..cb63a42741b 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash01
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash01
 {
-  // Offset: 0x00000000 Length: 0x00000215
+  // Offset: 0x00000000 Length: 0x00000219
 }
 .mresource public FSharpOptimizationData.Hash01
 {
   // Offset: 0x00000220 Length: 0x000000A9
 }
 .module Hash01.dll
-// MVID: {5F972DF5-9642-78D3-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-78D3-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x070B0000
+// Image base: 0x02FB0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +62,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash01.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash01.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
index 98a71f7f131..985bcae6f37 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash02
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash02
 {
-  // Offset: 0x00000000 Length: 0x0000021C
+  // Offset: 0x00000000 Length: 0x00000220
 }
 .mresource public FSharpOptimizationData.Hash02
 {
-  // Offset: 0x00000220 Length: 0x0000010B
+  // Offset: 0x00000228 Length: 0x0000010B
 }
 .module Hash02.dll
-// MVID: {5F972DF5-9642-796E-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-796E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09610000
+// Image base: 0x01920000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -60,7 +60,7 @@
       // Code size       1 (0x1)
       .maxstack  8
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 7,8 : 8,29 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash02.fsx'
+      .line 7,8 : 8,29 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash02.fsx'
       IL_0000:  ret
     } // end of method HashMicroPerfAndCodeGenerationTests::f4_triple
 
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
index 474d7c5a102..e9e9c2049d8 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash03.il.bsl
@@ -34,20 +34,20 @@
 }
 .mresource public FSharpSignatureData.Hash03
 {
-  // Offset: 0x00000000 Length: 0x0000021C
+  // Offset: 0x00000000 Length: 0x0000021A
 }
 .mresource public FSharpOptimizationData.Hash03
 {
   // Offset: 0x00000220 Length: 0x000000B0
 }
 .module Hash03.dll
-// MVID: {5F972DF5-9642-788D-A745-0383F52D975F}
+// MVID: {5F1FBE49-9642-788D-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06F30000
+// Image base: 0x05560000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -67,7 +67,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash03.fsx'
+      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash03.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 7,7 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
index 2141a337ca5..5c6850db0a8 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash04.il.bsl
@@ -34,14 +34,14 @@
 }
 .mresource public FSharpSignatureData.Hash04
 {
-  // Offset: 0x00000000 Length: 0x0000021C
+  // Offset: 0x00000000 Length: 0x0000021A
 }
 .mresource public FSharpOptimizationData.Hash04
 {
   // Offset: 0x00000220 Length: 0x000000B0
 }
 .module Hash04.dll
-// MVID: {5F972DF5-9642-7838-A745-0383F52D975F}
+// MVID: {5F1FBE49-9642-7838-A745-038349BE1F5F}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
@@ -67,7 +67,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash04.fsx'
+      .line 5,5 : 8,25 'C:\\kevinransom\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash04.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 7,7 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
index eaeede41b36..50ea47e8580 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash05.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash05
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash05
 {
-  // Offset: 0x00000000 Length: 0x000006D0
-}
-.mresource public FSharpSignatureDataB.Hash05
-{
-  // Offset: 0x000006D8 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006E0
 }
 .mresource public FSharpOptimizationData.Hash05
 {
-  // Offset: 0x000006E0 Length: 0x000003B1
+  // Offset: 0x000006E8 Length: 0x000003B1
 }
 .module Hash05.dll
-// MVID: {5F972DF5-9642-7857-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-7857-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07220000
+// Image base: 0x01AC0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash05.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash05.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
index 57cb6d3dc74..df45d5ddbdb 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash06.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash06
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash06
 {
-  // Offset: 0x00000000 Length: 0x000006D1
-}
-.mresource public FSharpSignatureDataB.Hash06
-{
-  // Offset: 0x000006D8 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006E1
 }
 .mresource public FSharpOptimizationData.Hash06
 {
-  // Offset: 0x000006E0 Length: 0x000003B2
+  // Offset: 0x000006E8 Length: 0x000003B2
 }
 .module Hash06.dll
-// MVID: {5F972DF5-9642-78F2-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-78F2-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09150000
+// Image base: 0x01040000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash06.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash06.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
index d242f694522..b57640a2818 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash07.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash07
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash07
 {
-  // Offset: 0x00000000 Length: 0x00000216
+  // Offset: 0x00000000 Length: 0x0000021A
 }
 .mresource public FSharpOptimizationData.Hash07
 {
   // Offset: 0x00000220 Length: 0x000000AA
 }
 .module Hash07.dll
-// MVID: {5F972DF5-9642-7811-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-7811-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07330000
+// Image base: 0x010A0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -62,7 +62,7 @@
       .locals init ([0] int32 x,
                [1] int32 i)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash07.fsx'
+      .line 5,5 : 8,25 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash07.fsx'
       IL_0000:  ldc.i4.1
       IL_0001:  stloc.0
       .line 6,6 : 8,32 ''
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
index dd9a84ace05..a0945b3885d 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash08.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash08
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash08
 {
-  // Offset: 0x00000000 Length: 0x000006C3
-}
-.mresource public FSharpSignatureDataB.Hash08
-{
-  // Offset: 0x000006C8 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006D3
 }
 .mresource public FSharpOptimizationData.Hash08
 {
-  // Offset: 0x000006D0 Length: 0x000003B3
+  // Offset: 0x000006D8 Length: 0x000003B3
 }
 .module Hash08.dll
-// MVID: {5F972DF5-9642-77BC-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-77BC-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x04E60000
+// Image base: 0x01AA0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -134,7 +130,7 @@
                  [2] int32 V_2,
                  [3] int32 V_3)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash08.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash08.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
index ae8871f1827..df7b115d207 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash09.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash09
 {
@@ -29,28 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash09
 {
-  // Offset: 0x00000000 Length: 0x0000087E
-}
-.mresource public FSharpSignatureDataB.Hash09
-{
-  // Offset: 0x00000888 Length: 0x00000013
+  // Offset: 0x00000000 Length: 0x0000088E
 }
 .mresource public FSharpOptimizationData.Hash09
 {
-  // Offset: 0x000008A0 Length: 0x00000680
-}
-.mresource public FSharpOptimizationDataB.Hash09
-{
-  // Offset: 0x00000F28 Length: 0x00000014
+  // Offset: 0x00000898 Length: 0x00000686
 }
 .module Hash09.dll
-// MVID: {5F972DF5-9642-77DB-A745-0383F52D975F}
+// MVID: {59B18AEE-9642-77DB-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07090000
+// Image base: 0x00690000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -195,7 +187,7 @@
                  [4] !a V_4,
                  [5] !a V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash09.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash09.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
index f5b8e0f56a2..20c3ceeb8f6 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash10.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash10
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash10
 {
-  // Offset: 0x00000000 Length: 0x00000215
+  // Offset: 0x00000000 Length: 0x00000219
 }
 .mresource public FSharpOptimizationData.Hash10
 {
   // Offset: 0x00000220 Length: 0x000000A9
 }
 .module Hash10.dll
-// MVID: {5F972DF5-9661-78B4-A745-0383F52D975F}
+// MVID: {59B18AEE-9661-78B4-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06FA0000
+// Image base: 0x01080000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +63,7 @@
                [1] int32 i,
                [2] int32 V_2)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 6,6 : 8,36 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash10.fsx'
+      .line 6,6 : 8,36 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash10.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  ldc.i4.1
       IL_0002:  ldc.i4.s   100
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
index fa463d9760d..f4eb5020175 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash11.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash11
 {
@@ -29,20 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash11
 {
-  // Offset: 0x00000000 Length: 0x00000215
+  // Offset: 0x00000000 Length: 0x00000219
 }
 .mresource public FSharpOptimizationData.Hash11
 {
   // Offset: 0x00000220 Length: 0x000000A9
 }
 .module Hash11.dll
-// MVID: {5F972DF5-9661-78D3-A745-0383F52D975F}
+// MVID: {59B18AEE-9661-78D3-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x09360000
+// Image base: 0x002D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -63,7 +63,7 @@
                [1] int32 i,
                [2] int32 V_2)
       .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-      .line 6,6 : 8,32 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash11.fsx'
+      .line 6,6 : 8,32 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash11.fsx'
       IL_0000:  ldc.i4.0
       IL_0001:  ldc.i4.1
       IL_0002:  ldc.i4.s   100
diff --git a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
index 8d5dada4db0..9c5bfb73cf3 100644
--- a/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/GenericComparison/Hash12.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Hash12
 {
@@ -29,24 +29,20 @@
 }
 .mresource public FSharpSignatureData.Hash12
 {
-  // Offset: 0x00000000 Length: 0x00000A88
-}
-.mresource public FSharpSignatureDataB.Hash12
-{
-  // Offset: 0x00000A90 Length: 0x00000004
+  // Offset: 0x00000000 Length: 0x00000A98
 }
 .mresource public FSharpOptimizationData.Hash12
 {
-  // Offset: 0x00000A98 Length: 0x00000585
+  // Offset: 0x00000AA0 Length: 0x00000585
 }
 .module Hash12.dll
-// MVID: {5F972DF5-9661-796E-A745-0383F52D975F}
+// MVID: {59B18AEE-9661-796E-A745-0383EE8AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06AA0000
+// Image base: 0x01080000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
@@ -191,7 +187,7 @@
                  [4] int32 V_4,
                  [5] int32 V_5)
         .language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
-        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\fsharp\\tests\\fsharpqa\\source\\Optimizations\\GenericComparison\\Hash12.fsx'
+        .line 16707566,16707566 : 0,0 'C:\\GitHub\\dsyme\\visualfsharp\\tests\\fsharpqa\\Source\\Optimizations\\GenericComparison\\Hash12.fsx'
         IL_0000:  ldarg.0
         IL_0001:  ldnull
         IL_0002:  cgt.un
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
index 622c3adbaa4..aa979cf89ae 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/Match01.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Match01
 {
@@ -25,24 +25,20 @@
 }
 .mresource public FSharpSignatureData.Match01
 {
-  // Offset: 0x00000000 Length: 0x000006E6
-}
-.mresource public FSharpSignatureDataB.Match01
-{
-  // Offset: 0x000006F0 Length: 0x00000002
+  // Offset: 0x00000000 Length: 0x000006F6
 }
 .mresource public FSharpOptimizationData.Match01
 {
-  // Offset: 0x000006F8 Length: 0x000003B7
+  // Offset: 0x00000700 Length: 0x000003B7
 }
 .module Match01.dll
-// MVID: {5F972DF5-FAFE-C8E4-A745-0383F52D975F}
+// MVID: {59B18AF8-FAFE-C8E4-A745-0383F88AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x072A0000
+// Image base: 0x01790000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
index 6618f57ab26..a22def741ec 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/Match02.il.bsl
@@ -1,5 +1,5 @@
 
-//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.8.3928.0
+//  Microsoft (R) .NET Framework IL Disassembler.  Version 4.6.1055.0
 //  Copyright (c) Microsoft Corporation.  All rights reserved.
 
 
@@ -13,7 +13,7 @@
 .assembly extern FSharp.Core
 {
   .publickeytoken = (B0 3F 5F 7F 11 D5 0A 3A )                         // .?_....:
-  .ver 5:0:0:0
+  .ver 4:4:1:0
 }
 .assembly Match02
 {
@@ -25,28 +25,20 @@
 }
 .mresource public FSharpSignatureData.Match02
 {
-  // Offset: 0x00000000 Length: 0x00000484
-}
-.mresource public FSharpSignatureDataB.Match02
-{
-  // Offset: 0x00000488 Length: 0x00000008
+  // Offset: 0x00000000 Length: 0x00000490
 }
 .mresource public FSharpOptimizationData.Match02
 {
   // Offset: 0x00000498 Length: 0x000002EE
 }
-.mresource public FSharpOptimizationDataB.Match02
-{
-  // Offset: 0x00000790 Length: 0x0000000C
-}
 .module Match02.dll
-// MVID: {5F972DF5-6125-4D81-A745-0383F52D975F}
+// MVID: {59B18AF8-6125-4D81-A745-0383F88AB159}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x06930000
+// Image base: 0x015D0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================
diff --git a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
index f1fbce49cfa..164a3ee6567 100644
--- a/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
+++ b/tests/fsharpqa/Source/Optimizations/Inlining/StructUnion01.il.bsl
@@ -27,22 +27,18 @@
 {
   // Offset: 0x00000000 Length: 0x0000087A
 }
-.mresource public FSharpSignatureDataB.StructUnion01
-{
-  // Offset: 0x00000880 Length: 0x00000002
-}
 .mresource public FSharpOptimizationData.StructUnion01
 {
-  // Offset: 0x00000888 Length: 0x00000421
+  // Offset: 0x00000880 Length: 0x00000421
 }
 .module StructUnion01.dll
-// MVID: {60BF84F6-D3E9-6B24-A745-0383F684BF60}
+// MVID: {60B6A4C9-D3E9-6B24-A745-0383C9A4B660}
 .imagebase 0x00400000
 .file alignment 0x00000200
 .stackreserve 0x00100000
 .subsystem 0x0003       // WINDOWS_CUI
 .corflags 0x00000001    //  ILONLY
-// Image base: 0x07080000
+// Image base: 0x06CE0000
 
 
 // =============== CLASS MEMBERS DECLARATION ===================

From a93eb24ea0b58dca346d28e0fb9e6d139af72df7 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 4 Mar 2022 14:01:05 +0000
Subject: [PATCH 056/112] reset baselines before merge

---
 src/fsharp/xlf/FSComp.txt.cs.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.de.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.es.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.fr.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.it.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.ja.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.ko.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.pl.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.pt-BR.xlf   | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.ru.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.tr.xlf      | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.zh-Hans.xlf | 60 ---------------------------
 src/fsharp/xlf/FSComp.txt.zh-Hant.xlf | 60 ---------------------------
 src/fsharp/xlf/FSStrings.cs.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.de.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.es.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.fr.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.it.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.ja.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.ko.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.pl.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.pt-BR.xlf    | 20 ---------
 src/fsharp/xlf/FSStrings.ru.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.tr.xlf       | 20 ---------
 src/fsharp/xlf/FSStrings.zh-Hans.xlf  | 20 ---------
 src/fsharp/xlf/FSStrings.zh-Hant.xlf  | 20 ---------
 26 files changed, 1040 deletions(-)

diff --git a/src/fsharp/xlf/FSComp.txt.cs.xlf b/src/fsharp/xlf/FSComp.txt.cs.xlf
index a3664e27d50..b311718f0be 100644
--- a/src/fsharp/xlf/FSComp.txt.cs.xlf
+++ b/src/fsharp/xlf/FSComp.txt.cs.xlf
@@ -17,11 +17,6 @@
         Funkce {0} vyžaduje knihovnu F# pro verzi jazyka {1} nebo novější.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         Atribut AssemblyKeyNameAttribute je zastaralý. Použijte místo něj AssemblyKeyFileAttribute.
@@ -37,11 +32,6 @@
         Dostupná přetížení:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Obecná konstrukce vyžaduje, aby byl parametr obecného typu známý jako typ struct nebo reference. Zvažte možnost přidat anotaci typu.
@@ -72,11 +62,6 @@
         Známý typ parametru: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         Argument na indexu {0} neodpovídá
@@ -87,21 +72,6 @@
         Argument {0} neodpovídá
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Navržené sestavení poskytovatele typu {0} nešlo načíst ze složky {1}, protože chyběla závislost nebo ji nešlo načíst. Všechny závislosti tohoto sestavení se musí nacházet ve stejné složce jako toto sestavení. Ohlášená výjimka: {2} – {3}
@@ -117,11 +87,6 @@
         Atribut sestavení {0} odkazuje na navržené sestavení {1}, které se nedá načíst nebo neexistuje. Ohlášená výjimka: {2} – {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         aplikativní výpočetní výrazy
@@ -182,11 +147,6 @@
         nepovinný zprostředkovatel komunikace s možnou hodnotou null
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         Otevřít deklaraci typu
@@ -307,11 +267,6 @@
         Hlavička zdroje začínající na posunu {0} má chybný formát.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Vytiskněte odvozená rozhraní všech kompilovaných souborů do přidružených souborů podpisu.
@@ -442,11 +397,6 @@
         Atributy nejde použít pro rozšíření typů.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Typy Byref nejsou v deklaraci otevřeného typu povolené.
@@ -487,21 +437,11 @@
         K hodnotě označené jako literál se {0} nedá přiřadit.
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Konstrukt let! ... and! ... se dá použít jen v případě, že tvůrce výpočetních výrazů definuje buď metodu {0}, nebo vhodné metody MergeSource a Bind.
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Neplatný interpolovaný řetězec. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.de.xlf b/src/fsharp/xlf/FSComp.txt.de.xlf
index ef38ba19595..5ec3872f51f 100644
--- a/src/fsharp/xlf/FSComp.txt.de.xlf
+++ b/src/fsharp/xlf/FSComp.txt.de.xlf
@@ -17,11 +17,6 @@
         Für das Feature "{0}" ist die F#-Bibliothek für die Sprachversion {1} oder höher erforderlich.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         "AssemblyKeyNameAttribute" gilt als veraltet. Verwenden Sie stattdessen "AssemblyKeyFileAttribute".
@@ -37,11 +32,6 @@
         Verfügbare Überladungen:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Für ein generisches Konstrukt muss ein generischer Typparameter als Struktur- oder Verweistyp bekannt sein. Erwägen Sie das Hinzufügen einer Typanmerkung.
@@ -72,11 +62,6 @@
         Bekannter Typparameter: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         Das Argument bei Index {0} stimmt nicht überein.
@@ -87,21 +72,6 @@
         Das Argument "{0}" stimmt nicht überein.
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Die Typanbieter-Designerassembly "{0}" konnte aus dem Ordner "{1}" nicht geladen werden, weil eine Abhängigkeit fehlte oder nicht geladen werden konnte. Alle Abhängigkeiten der Typanbieter-Designerassembly müssen sich in demselben Ordner wie die Assembly befinden. Gemeldete Ausnahme: {2} – {3}
@@ -117,11 +87,6 @@
         Das Assemblyattribut "{0}" verweist auf eine Designerassembly "{1}", die entweder nicht geladen werden kann oder nicht vorhanden ist. Gemeldete Ausnahme: {2} – {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         applikative Berechnungsausdrücke
@@ -182,11 +147,6 @@
         Interop, NULL-Werte zulassend, optional
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         Deklaration für offene Typen
@@ -307,11 +267,6 @@
         Der Ressourcenheader, der am Offset {0} beginnt, ist fehlerhaft formatiert.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Drucken der abgeleiteten Schnittstellen aller Dateien an zugehörige Signaturdateien
@@ -442,11 +397,6 @@
         Attribute können nicht auf Typerweiterungen angewendet werden.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Byref-Typen sind in einer Deklaration für offene Typen nicht zulässig.
@@ -487,21 +437,11 @@
         "{0}" kann keinem als Literal markierten Wert zugewiesen werden.
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Das Konstrukt "let! ... and! ..." kann nur verwendet werden, wenn der Berechnungsausdrucks-Generator entweder eine {0}-Methode oder geeignete MergeSource- und Bind-Methoden definiert.
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Ungültige interpolierte Zeichenfolge. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.es.xlf b/src/fsharp/xlf/FSComp.txt.es.xlf
index 47075786386..4b591533961 100644
--- a/src/fsharp/xlf/FSComp.txt.es.xlf
+++ b/src/fsharp/xlf/FSComp.txt.es.xlf
@@ -17,11 +17,6 @@
         La característica "{0}" requiere la biblioteca de F# para la versión de lenguaje {1} o superior.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         El elemento "AssemblyKeyNameAttribute" está en desuso. Use "AssemblyKeyFileAttribute" en su lugar.
@@ -37,11 +32,6 @@
         Sobrecargas disponibles:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Una construcción genérica requiere que un parámetro de tipo genérico se conozca como tipo de referencia o estructura. Puede agregar una anotación de tipo.
@@ -72,11 +62,6 @@
         Parámetro de tipo conocido: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         El argumento del índice {0} no coincide.
@@ -87,21 +72,6 @@
         El argumento "{0}" no coincide.
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         No se pudo cargar el ensamblado del diseñador de proveedores de tipos "{0}" desde la carpeta "{1}" porque falta una dependencia o no se pudo cargar. Todas las dependencias del ensamblado del diseñador de proveedores de tipos deben encontrarse en la misma carpeta que el ensamblado. Se notificó la excepción: {2} - {3}.
@@ -117,11 +87,6 @@
         El atributo de ensamblado "{0}" hace referencia a un ensamblado de diseñador "{1}" que no se puede cargar o no existe. Se notificó la excepción: {2} - {3}.
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         expresiones de cálculo aplicativas
@@ -182,11 +147,6 @@
         interoperabilidad opcional que admite valores NULL
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         declaración de tipo abierto
@@ -307,11 +267,6 @@
         El encabezado de los recursos que comienza en el desplazamiento {0} está mal formado.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Imprimir las interfaces deducidas de todos los archivos de compilación en los archivos de signatura asociados
@@ -442,11 +397,6 @@
         Los atributos no se pueden aplicar a las extensiones de tipo.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         No se permiten tipos byref en una declaración de tipo abierto.
@@ -487,21 +437,11 @@
         No se puede asignar "{0}" a un valor marcado como literal
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         La construcción "let! ... and! ..." solo se puede usar si el generador de expresiones de cálculo define un método "{0}" o bien los métodos "MergeSource" y "Bind" adecuados.
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Cadena interpolada no válida. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.fr.xlf b/src/fsharp/xlf/FSComp.txt.fr.xlf
index ac7ebc9a5e9..a22a2e8c4ed 100644
--- a/src/fsharp/xlf/FSComp.txt.fr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.fr.xlf
@@ -17,11 +17,6 @@
         La fonctionnalité '{0}' nécessite la bibliothèque F# pour le langage version {1} ou ultérieure.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' a été déprécié. Utilisez 'AssemblyKeyFileAttribute' à la place.
@@ -37,11 +32,6 @@
         Surcharges disponibles :\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         L'utilisation d'une construction générique est possible uniquement si un paramètre de type générique est connu en tant que type struct ou type référence. Ajoutez une annotation de type.
@@ -72,11 +62,6 @@
         Paramètre de type connu : {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         L'argument à l'index {0} ne correspond pas
@@ -87,21 +72,6 @@
         L'argument '{0}' ne correspond pas
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Impossible de charger l'assembly de concepteur de fournisseur de type '{0}' à partir du dossier '{1}', car une dépendance est manquante ou n'a pas pu être chargée. Toutes les dépendances de l'assembly de concepteur de fournisseur de type doivent se trouver dans le même dossier que cet assembly. Exception signalée : {2} - {3}
@@ -117,11 +87,6 @@
         L'attribut d'assembly '{0}' fait référence à un assembly de concepteur '{1}' qui ne peut pas être chargé ou qui n'existe pas. Exception signalée : {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         expressions de calcul applicatives
@@ -182,11 +147,6 @@
         interopérabilité facultative pouvant accepter une valeur null
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         déclaration de type ouverte
@@ -307,11 +267,6 @@
         L'en-tête de ressource commençant au décalage {0} est mal formé.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Imprimer les interfaces inférées de tous les fichiers de compilation sur les fichiers de signature associés
@@ -442,11 +397,6 @@
         Impossible d'appliquer des attributs aux extensions de type.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Les types Byref ne sont pas autorisés dans une déclaration de type ouverte.
@@ -487,21 +437,11 @@
         Impossible d'affecter '{0}' à une valeur marquée comme littérale
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         La construction 'let! ... and! ...' peut uniquement être utilisée si le générateur d'expressions de calcul définit une méthode '{0}' ou les méthodes 'MergeSource' et 'Bind' appropriées
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Chaîne interpolée non valide. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index 248b87cf1c8..e6fdc8e9747 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -17,11 +17,6 @@
         Con la funzionalità '{0}' è richiesta la libreria F# per la versione {1} o successiva del linguaggio.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         L'attributo 'AssemblyKeyNameAttribute' è deprecato. In alternativa, usare 'AssemblyKeyFileAttribute'.
@@ -37,11 +32,6 @@
         Overload disponibili:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Un costrutto generico richiede che un parametro di tipo generico sia noto come tipo riferimento o struct. Provare ad aggiungere un'annotazione di tipo.
@@ -72,11 +62,6 @@
         Parametro di tipo noto: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         L'argomento alla posizione di indice {0} non corrisponde
@@ -87,21 +72,6 @@
         L'argomento '{0}' non corrisponde
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Non è stato possibile caricare l'assembly '{0}' della finestra di progettazione del provider di tipi dalla cartella '{1}' perché una dipendenza non è presente o non è stato possibile caricarla. Tutte le dipendenze dell'assembly della finestra di progettazione del provider di tipi devono trovarsi nella stessa cartella dell'assembly. L'eccezione restituita è {2} - {3}
@@ -117,11 +87,6 @@
         L'attributo di assembly '{0}' fa riferimento a un assembly '{1}' della finestra di progettazione che non è stato caricato o non esiste. L'eccezione restituita è {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         espressioni di calcolo applicativo
@@ -182,11 +147,6 @@
         Interop facoltativo nullable
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         dichiarazione di tipo aperto
@@ -307,11 +267,6 @@
         L'intestazione di risorsa che inizia a partire dall'offset {0} non è valida.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Stampare le interfacce derivate di tutti i file di compilazione nei file di firma associati
@@ -442,11 +397,6 @@
         Gli attributi non possono essere applicati a estensioni di tipo.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         I tipi byref non sono consentiti in una dichiarazione di tipo aperto.
@@ -487,21 +437,11 @@
         Non è possibile assegnare '{0}' a un valore contrassegnato come letterale
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         È possibile usare il costrutto 'let! ... and! ...' solo se il generatore di espressioni di calcolo definisce un metodo '{0}' o metodi 'MergeSource' e 'Bind' appropriati
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         La stringa interpolata non è valida. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index a71dc33e2b5..71ebb5903bb 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -17,11 +17,6 @@
         機能 '{0}' を使用するには、言語バージョン {1} 以上の F# ライブラリが必要です。
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' は非推奨になりました。代わりに 'AssemblyKeyFileAttribute' を使用してください。
@@ -37,11 +32,6 @@
         使用可能なオーバーロード:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         ジェネリック コンストラクトでは、ジェネリック型パラメーターが構造体または参照型として認識されている必要があります。型の注釈の追加を検討してください。
@@ -72,11 +62,6 @@
         既知の型パラメーター: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         インデックス {0} の引数が一致しません
@@ -87,21 +72,6 @@
         引数 '{0}' が一致しません
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         依存関係がないか、または読み込めなかったため、型プロバイダーのデザイナー アセンブリ '{0}' をフォルダー '{1}' から読み込めませんでした。型プロバイダーのデザイナー アセンブリのすべての依存関係は、そのアセンブリと同じフォルダーに配置されている必要があります。次の例外が報告されました: {2} - {3}
@@ -117,11 +87,6 @@
         アセンブリ属性 '{0}' は、デザイナー アセンブリ '{1}' を参照していますが、これは読み込むことができないか、存在していません。報告された例外: {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         適用できる計算式
@@ -182,11 +147,6 @@
         Null 許容のオプションの相互運用
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         オープン型宣言
@@ -307,11 +267,6 @@
         オフセット {0} で始まるリソース ヘッダーの形式に誤りがあります。
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         すべてのコンパイル ファイルの推定されたインターフェイスを関連する署名ファイルに印刷します
@@ -442,11 +397,6 @@
         属性を型拡張に適用することはできません。
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Byref 型は、オープン型宣言では使用できません。
@@ -487,21 +437,11 @@
         リテラルとしてマークされた値に '{0}' を割り当てることはできません
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         'let! ... and! ...' コンストラクトは、コンピュテーション式ビルダーが '{0}' メソッドまたは適切な 'MergeSource' および 'Bind' メソッドのいずれかを定義している場合にのみ使用できます
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         補間された文字列が無効です。{0}
diff --git a/src/fsharp/xlf/FSComp.txt.ko.xlf b/src/fsharp/xlf/FSComp.txt.ko.xlf
index 36166e1502b..63dc47b59cd 100644
--- a/src/fsharp/xlf/FSComp.txt.ko.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ko.xlf
@@ -17,11 +17,6 @@
         언어 버전 {1} 이상에서 '{0}' 기능을 사용하려면 F# 라이브러리가 필요합니다.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute'는 사용되지 않습니다. 대신 'AssemblyKeyFileAttribute'를 사용하세요.
@@ -37,11 +32,6 @@
         사용 가능한 오버로드:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         제네릭 구문을 사용하려면 구조체 또는 참조 형식의 제네릭 형식 매개 변수가 필요합니다. 형식 주석을 추가하세요.
@@ -72,11 +62,6 @@
         알려진 형식 매개 변수: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         인덱스 {0}의 인수가 일치하지 않습니다.
@@ -87,21 +72,6 @@
         '{0}' 인수가 일치하지 않습니다.
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         종속성이 없거나 로드되지 않았으므로 '{0}' 형식 공급자 디자이너 어셈블리를 '{1}' 폴더에서 로드할 수 없습니다. 형식 공급자 디자이너 어셈블리의 모든 종속성은 해당 어셈블리와 동일한 폴더에 있어야 합니다. 보고된 예외: {2} - {3}
@@ -117,11 +87,6 @@
         '{0}' 어셈블리 특성이 로드할 수 없거나 존재하지 않는 디자이너 어셈블리'{1}'을(를) 참조합니다. 보고된 예외: {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         적용 가능한 계산 식
@@ -182,11 +147,6 @@
         nullable 선택적 interop
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         개방형 형식 선언
@@ -307,11 +267,6 @@
         오프셋 {0}에서 시작하는 리소스 헤더의 형식이 잘못되었습니다.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         모든 컴파일 파일의 유추된 인터페이스를 관련 서명 파일로 인쇄합니다.
@@ -442,11 +397,6 @@
         형식 확장에 특성을 적용할 수 없습니다.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Byref 형식은 개방형 형식 선언에서 허용되지 않습니다.
@@ -487,21 +437,11 @@
         리터럴로 표시된 값에 '{0}'을(를) 할당할 수 없습니다.
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         'let! ... and! ...' 구문은 계산 식 작성기에서 '{0}' 메서드 또는 적절한 'MergeSource' 및 'Bind' 메서드를 정의한 경우에만 사용할 수 있습니다.
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         잘못된 보간 문자열. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.pl.xlf b/src/fsharp/xlf/FSComp.txt.pl.xlf
index 14d24c76ad1..fc3a8c6b017 100644
--- a/src/fsharp/xlf/FSComp.txt.pl.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pl.xlf
@@ -17,11 +17,6 @@
         Funkcja „{0}” wymaga biblioteki języka F# dla wersji językowej {1} lub nowszej.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         Element „AssemblyKeyNameAttribute” jest przestarzały. Zamiast niego użyj elementu „AssemblyKeyFileAttribute”.
@@ -37,11 +32,6 @@
         Dostępne przeciążenia:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Konstrukcja ogólna wymaga, aby parametr typu ogólnego był znany jako struktura lub typ referencyjny. Rozważ dodanie adnotacji typu.
@@ -72,11 +62,6 @@
         Parametr znanego typu: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         Argument pod indeksem {0} nie jest zgodny
@@ -87,21 +72,6 @@
         Argument „{0}” nie jest zgodny
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Nie można załadować zestawu projektanta dostawców typów „{0}” z folderu „{1}”, ponieważ brakuje zależności lub nie można jej załadować. Wszystkie zależności zestawu projektanta dostawców typów muszą znajdować się w tym samym folderze co ten zestaw. Zgłoszony wyjątek: {2} — {3}
@@ -117,11 +87,6 @@
         Atrybut zestawu „{0}” odwołuje się do zestawu projektanta „{1}”, którego nie można załadować lub który nie istnieje. Zgłoszony wyjątek: {2} — {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         praktyczne wyrażenia obliczeniowe
@@ -182,11 +147,6 @@
         opcjonalna międzyoperacyjność dopuszczająca wartość null
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         deklaracja typu otwartego
@@ -307,11 +267,6 @@
         Nagłówek zasobu rozpoczynający się od przesunięcia {0} jest nieprawidłowo sformułowany.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Drukowanie wywnioskowanych interfejsów wszystkich plików kompilacji do skojarzonych plików sygnatur
@@ -442,11 +397,6 @@
         Atrybutów nie można stosować do rozszerzeń typu.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Typy ByRef są niedozwolone w deklaracji typu otwartego.
@@ -487,21 +437,11 @@
         Nie można przypisać elementu „{0}” do wartości oznaczonej jako literał
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Konstrukcji „let! ... and! ...” można użyć tylko wtedy, gdy konstruktor wyrażeń obliczeniowych definiuje metodę „{0}” lub odpowiednie metody „MergeSource” i „Bind”
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Nieprawidłowy ciąg interpolowany. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
index 13160440561..65d87f2f881 100644
--- a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
@@ -17,11 +17,6 @@
         O recurso '{0}' exige a biblioteca F# para a versão da linguagem {1} ou posterior.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         O 'AssemblyKeyNameAttribute' foi preterido. Use o 'AssemblyKeyFileAttribute'.
@@ -37,11 +32,6 @@
         Sobrecargas disponíveis:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Um constructo genérico exige que um parâmetro de tipo genérico seja conhecido como um tipo de referência ou struct. Considere adicionar uma anotação de tipo.
@@ -72,11 +62,6 @@
         Parâmetro de tipo conhecido: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         O argumento no índice {0} não corresponde
@@ -87,21 +72,6 @@
         O argumento '{0}' não corresponde
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Não foi possível carregar o assembly do designer do provedor de tipos '{0}' da pasta '{1}' porque uma dependência estava ausente ou não pôde ser carregada. Todas as dependências do assembly do designer do provedor de tipos precisam estar localizadas na mesma pasta que esse assembly. A exceção relatada foi: {2} – {3}
@@ -117,11 +87,6 @@
         O atributo de assembly '{0}' refere-se a um assembly de designer '{1}' que não pode ser carregado ou que não existe. A exceção relatada foi {2} – {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         expressões de computação aplicáveis
@@ -182,11 +147,6 @@
         interoperabilidade opcional anulável
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         declaração de tipo aberto
@@ -307,11 +267,6 @@
         O cabeçalho do recurso que começa no deslocamento {0} está malformado.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Imprimir as interfaces inferidas de todos os arquivos de compilação para os arquivos de assinatura associados
@@ -442,11 +397,6 @@
         Os atributos não podem ser aplicados às extensões de tipo.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Os tipos Byref não são permitidos em uma declaração de tipo aberto.
@@ -487,21 +437,11 @@
         Não é possível atribuir '{0}' a um valor marcado como literal
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         O constructo 'let! ... and! ...' só pode ser usado se o construtor de expressões de computação definir um método '{0}' ou um método 'MergeSource' ou 'Bind' apropriado
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Cadeia de caracteres interpolada inválida. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.ru.xlf b/src/fsharp/xlf/FSComp.txt.ru.xlf
index 3ffd89c0bde..ba4f66224d0 100644
--- a/src/fsharp/xlf/FSComp.txt.ru.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ru.xlf
@@ -17,11 +17,6 @@
         Компоненту "{0}" требуется библиотека F# для языка версии {1} или более поздней.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         Атрибут "AssemblyKeyNameAttribute" является устаревшим. Используйте вместо него атрибут "AssemblyKeyFileAttribute".
@@ -37,11 +32,6 @@
         Доступные перегрузки:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         В универсальной конструкции требуется использовать параметр универсального типа, известный как структура или ссылочный тип. Рекомендуется добавить заметку с типом.
@@ -72,11 +62,6 @@
         Известный параметр типа: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         Аргумент в индексе {0} не соответствует
@@ -87,21 +72,6 @@
         Аргумент "{0}" не соответствует
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Не удалось загрузить сборку конструктора поставщика типа "{0}" из папки "{1}", так как зависимость отсутствует или не может быть загружена. Все зависимости для сборки конструктора поставщика типа должны находиться в папке сборки. Получено исключение: {2} — {3}
@@ -117,11 +87,6 @@
         Атрибут сборки "{0}" ссылается на сборку конструктора "{1}", которая не может быть загружена или не существует. Получено исключение: {2} — {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         применимые вычислительные выражения
@@ -182,11 +147,6 @@
         необязательное взаимодействие, допускающее значение NULL
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         объявление открытого типа
@@ -307,11 +267,6 @@
         Заголовок ресурса некорректен начиная со смещения {0}.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Печать определяемых интерфейсов всех файлов компиляции в связанные файлы подписей
@@ -442,11 +397,6 @@
         Атрибуты не могут быть применены к расширениям типа.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Типы ByRef запрещены в объявлении открытого типа.
@@ -487,21 +437,11 @@
         Невозможно присвоить "{0}" значению, помеченному как литерал
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         Конструкцию "let! ... and! ..." можно использовать только в том случае, если построитель выражений с вычислениями определяет либо метод "{0}", либо соответствующие методы "MergeSource" и "Bind"
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Недопустимая интерполированная строка. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index f4d143db620..ea5cce4499b 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -17,11 +17,6 @@
         '{0}' özelliği için F# kitaplığının {1} veya üstü dil sürümü gerekir.
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' kullanım dışı bırakıldı. Bunun yerine 'AssemblyKeyFileAttribute' kullanın.
@@ -37,11 +32,6 @@
         Kullanılabilir aşırı yüklemeler:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Genel yapı, genel bir tür parametresinin yapı veya başvuru türü olarak bilinmesini gerektirir. Tür ek açıklaması eklemeyi düşünün.
@@ -72,11 +62,6 @@
         Bilinen tür parametresi: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         {0} dizinindeki bağımsız değişken eşleşmiyor
@@ -87,21 +72,6 @@
         '{0}' bağımsız değişkeni eşleşmiyor
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         '{0}' tür sağlayıcısı tasarımcı bütünleştirilmiş kodu, bir bağımlılık eksik olduğundan veya yüklenemediğinden '{1}' klasöründen yüklenemedi. Tür sağlayıcısı tasarımcısı bütünleştirilmiş kodunun tüm bağımlılıkları, ilgili bütünleştirilmiş kodun bulunduğu klasörde bulunmalıdır. Bildirilen özel durum: {2} - {3}
@@ -117,11 +87,6 @@
         '{0}' bütünleştirilmiş kod özniteliği, yüklenemeyen veya mevcut olmayan '{1}' tasarımcı bütünleştirilmiş koduna başvuruyor. Bildirilen özel durum: {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         uygulama hesaplama ifadeleri
@@ -182,11 +147,6 @@
         null atanabilir isteğe bağlı birlikte çalışma
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         açık tür bildirimi
@@ -307,11 +267,6 @@
         {0} uzaklığında başlayan kaynak üst bilgisi hatalı biçimlendirilmiş.
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         Tüm derleme dosyalarının çıkarsanan arabirimlerini ilişkili imza dosyalarına yazdır
@@ -442,11 +397,6 @@
         Öznitelikler tür uzantılarına uygulanamaz.
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         Açık tür bildiriminde Byref türlerine izin verilmez.
@@ -487,21 +437,11 @@
         Sabit değer olarak işaretlenen bir değere '{0}' atanamaz
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         'let! ... and! ...' yapısı, yalnızca hesaplama ifadesi oluşturucu bir '{0}' metodunu ya da uygun 'MergeSource' ve 'Bind' metotlarını tanımlarsa kullanılabilir
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         Geçersiz düz metin arasına kod eklenmiş dize. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
index aa3c4b9fa03..3f3fc9f5827 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
@@ -17,11 +17,6 @@
         功能“{0}”需要 {1} 或更高语言版本的 F# 库。
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         "AssemblyKeyNameAttribute" 已被弃用。请改为使用 "AssemblyKeyFileAttribute"。
@@ -37,11 +32,6 @@
         可用重载:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         泛型构造要求泛型类型参数被视为结构或引用类型。请考虑添加类型注释。
@@ -72,11 +62,6 @@
         已知类型参数: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         索引 {0} 处的参数不匹配
@@ -87,21 +72,6 @@
         参数 "{0}" 不匹配
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         无法从文件夹“{1}”加载类型提供程序设计器程序集“{0}”，因为依赖项缺失或无法加载。类型提供程序设计器程序集的所有依赖项必须与该程序集位于同一文件夹中。报告的异常是: {2} - {3}
@@ -117,11 +87,6 @@
         程序集属性“{0}”引用了无法加载或不存在的设计器程序集“{1}”。报告的异常是: {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         适用的计算表达式
@@ -182,11 +147,6 @@
         可以为 null 的可选互操作
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         开放类型声明
@@ -307,11 +267,6 @@
         以偏移量 {0} 开始的资源标头格式不正确。
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         将所有编译文件的推断接口打印到关联的签名文件
@@ -442,11 +397,6 @@
         属性不可应用于类型扩展。
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         在开放类型声明中不允许使用 Byref 类型。
@@ -487,21 +437,11 @@
         无法将“{0}”分配给标记为文本的值
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         仅当计算表达式生成器定义了 "{0}" 方法或适当的 "MergeSource" 和 "Bind" 方法时，才可以使用 "let! ... and! ..." 构造
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         内插字符串无效。{0}
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
index 3a2bac42c19..eb1b81feffc 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
@@ -17,11 +17,6 @@
         功能 '{0}' 需要語言版本 {1} 或更高的 F# 程式庫。
         
       
-      
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
-        
-      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' 已淘汰。請改用 'AssemblyKeyFileAttribute'。
@@ -37,11 +32,6 @@
         可用的多載:\n{0}
         
       
-      
-        The constraints 'delegate' and 'comparison' are inconsistent
-        The constraints 'delegate' and 'comparison' are inconsistent
-        
-      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         泛型建構要求泛型型別參數必須指定為結構或參考型別。請考慮新增型別註解。
@@ -72,11 +62,6 @@
         已知的型別參數: {0}
         
       
-      
-        The constraints 'null' and 'not null' are inconsistent
-        The constraints 'null' and 'not null' are inconsistent
-        
-      
       
         Argument at index {0} doesn't match
         位於索引 {0} 的引數不相符
@@ -87,21 +72,6 @@
         引數 '{0}' 不相符
         
       
-      
-        The constraints 'struct' and 'null' are inconsistent
-        The constraints 'struct' and 'null' are inconsistent
-        
-      
-      
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        The type '{0}' has 'null' as an extra value but a constraint does not permit this
-        
-      
-      
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-        
-      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         因為缺少相依性或相依性無法載入，導致無法從資料夾 '{1}' 載入類型提供者設計工具組件 '{0}'。類型提供者設計工具組件的所有相依性都必須位於該組件所在的資料夾內。回報的例外狀況: {2} - {3}
@@ -117,11 +87,6 @@
         無法載入組件屬性 '{0}' 參考的設計工具組件 '{1}' 或其不存在。回報的例外狀況: {2} - {3}
         
       
-      
-        {0} for F# {1}
-        {0} for F# {1}
-        
-      
       
         applicative computation expressions
         適用的計算運算式
@@ -182,11 +147,6 @@
         可為 Null 的選擇性 Interop
         
       
-      
-        nullness checking
-        nullness checking
-        
-      
       
         open type declaration
         開放式類型宣告
@@ -307,11 +267,6 @@
         從位移 {0} 開始的資源標頭格式錯誤。
         
       
-      
-        Enable nullness declarations and checks
-        Enable nullness declarations and checks
-        
-      
       
         Print the inferred interfaces of all compilation files to associated signature files
         將所有編譯檔案的推斷介面列印至相關聯的簽章檔案
@@ -442,11 +397,6 @@
         屬性無法套用到類型延伸模組。
         
       
-      
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
-        
-      
       
         Byref types are not allowed in an open type declaration.
         開放式類型宣告中不允許 Byref 類型。
@@ -487,21 +437,11 @@
         無法將 '{0}' 指派給標記為常值的值
         
       
-      
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
-        
-      
       
         The 'let! ... and! ...' construct may only be used if the computation expression builder defines either a '{0}' method or appropriate 'MergeSource' and 'Bind' methods
         只有在計算運算式產生器定義 '{0}' 方法或正確的 'MergeSource' 和 'Bind' 方法時，才可使用 'let! ... and! ...' 建構
         
       
-      
-        The type '{0}' does not support a nullness qualitification.
-        The type '{0}' does not support a nullness qualitification.
-        
-      
       
         Invalid interpolated string. {0}
         插補字串無效。{0}
diff --git a/src/fsharp/xlf/FSStrings.cs.xlf b/src/fsharp/xlf/FSStrings.cs.xlf
index cfbfd70f3af..e037aa4e939 100644
--- a/src/fsharp/xlf/FSStrings.cs.xlf
+++ b/src/fsharp/xlf/FSStrings.cs.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         symbol ..^
diff --git a/src/fsharp/xlf/FSStrings.de.xlf b/src/fsharp/xlf/FSStrings.de.xlf
index 517abb9fe0a..7d294c02120 100644
--- a/src/fsharp/xlf/FSStrings.de.xlf
+++ b/src/fsharp/xlf/FSStrings.de.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         Symbol "..^"
diff --git a/src/fsharp/xlf/FSStrings.es.xlf b/src/fsharp/xlf/FSStrings.es.xlf
index 96cd4e2bc4a..e6b066ca7b7 100644
--- a/src/fsharp/xlf/FSStrings.es.xlf
+++ b/src/fsharp/xlf/FSStrings.es.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         símbolo "..^"
diff --git a/src/fsharp/xlf/FSStrings.fr.xlf b/src/fsharp/xlf/FSStrings.fr.xlf
index d4b3498a7b5..1ab6695127c 100644
--- a/src/fsharp/xlf/FSStrings.fr.xlf
+++ b/src/fsharp/xlf/FSStrings.fr.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         symbole '..^'
diff --git a/src/fsharp/xlf/FSStrings.it.xlf b/src/fsharp/xlf/FSStrings.it.xlf
index 5604f20d29b..bb3b19df630 100644
--- a/src/fsharp/xlf/FSStrings.it.xlf
+++ b/src/fsharp/xlf/FSStrings.it.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         simbolo '..^'
diff --git a/src/fsharp/xlf/FSStrings.ja.xlf b/src/fsharp/xlf/FSStrings.ja.xlf
index 45201a7b38f..a4c18ff3a40 100644
--- a/src/fsharp/xlf/FSStrings.ja.xlf
+++ b/src/fsharp/xlf/FSStrings.ja.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         シンボル '..^'
diff --git a/src/fsharp/xlf/FSStrings.ko.xlf b/src/fsharp/xlf/FSStrings.ko.xlf
index c7df1b65a0b..6990bd92495 100644
--- a/src/fsharp/xlf/FSStrings.ko.xlf
+++ b/src/fsharp/xlf/FSStrings.ko.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         기호 '..^'
diff --git a/src/fsharp/xlf/FSStrings.pl.xlf b/src/fsharp/xlf/FSStrings.pl.xlf
index f7223ca6220..5c982a8eea1 100644
--- a/src/fsharp/xlf/FSStrings.pl.xlf
+++ b/src/fsharp/xlf/FSStrings.pl.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         symbol „..^”
diff --git a/src/fsharp/xlf/FSStrings.pt-BR.xlf b/src/fsharp/xlf/FSStrings.pt-BR.xlf
index 393572d553e..3872b793e67 100644
--- a/src/fsharp/xlf/FSStrings.pt-BR.xlf
+++ b/src/fsharp/xlf/FSStrings.pt-BR.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         símbolo '..^'
diff --git a/src/fsharp/xlf/FSStrings.ru.xlf b/src/fsharp/xlf/FSStrings.ru.xlf
index 51d37a54d5d..c6c5f4c7424 100644
--- a/src/fsharp/xlf/FSStrings.ru.xlf
+++ b/src/fsharp/xlf/FSStrings.ru.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         символ "..^"
diff --git a/src/fsharp/xlf/FSStrings.tr.xlf b/src/fsharp/xlf/FSStrings.tr.xlf
index 5ccd3d70685..4c85830388a 100644
--- a/src/fsharp/xlf/FSStrings.tr.xlf
+++ b/src/fsharp/xlf/FSStrings.tr.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         '..^' sembolü
diff --git a/src/fsharp/xlf/FSStrings.zh-Hans.xlf b/src/fsharp/xlf/FSStrings.zh-Hans.xlf
index f90f00b2de4..d41bd6d0c5a 100644
--- a/src/fsharp/xlf/FSStrings.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSStrings.zh-Hans.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         符号 "..^"
diff --git a/src/fsharp/xlf/FSStrings.zh-Hant.xlf b/src/fsharp/xlf/FSStrings.zh-Hant.xlf
index 4c5f941ebda..6a61a91c542 100644
--- a/src/fsharp/xlf/FSStrings.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSStrings.zh-Hant.xlf
@@ -2,26 +2,6 @@
 
   
     
-      
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
-        
-      
-      
-        Nullness warning: The type '{0}' does not support nullness.
-        Nullness warning: The type '{0}' does not support nullness.
-        
-      
-      
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
-        
-      
       
         symbol '..^'
         符號 '..^'

From c865d3177c7fcc2c551d262087680acec08e2196 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 4 Mar 2022 16:57:10 +0000
Subject: [PATCH 057/112] fix build, disable feature

---
 FSharp.Profiles.props                         |  9 +-
 src/fsharp/AccessibilityLogic.fs              |  2 +-
 src/fsharp/CheckComputationExpressions.fs     |  4 +-
 src/fsharp/CheckExpressions.fs                | 16 ++--
 src/fsharp/CompilerImports.fs                 |  4 +-
 src/fsharp/ConstraintSolver.fs                | 20 ++---
 .../DependencyManager/DependencyProvider.fs   | 10 +--
 .../DependencyManager/DependencyProvider.fsi  |  8 +-
 src/fsharp/ErrorLogger.fs                     |  2 +-
 src/fsharp/ExtensionTyping.fs                 | 86 +++++++++----------
 src/fsharp/ExtensionTyping.fsi                | 36 ++++----
 .../FSharp.Build/FSharpCommandLineBuilder.fs  |  4 +-
 .../FSharp.Build/FSharpEmbedResXSource.fs     |  2 +-
 .../FSharp.Build/FSharpEmbedResourceText.fs   |  2 +-
 src/fsharp/FSharp.Build/Fsc.fs                |  8 +-
 src/fsharp/FSharp.Build/Fsi.fs                |  4 +-
 src/fsharp/FSharp.Build/SubstituteText.fs     |  2 +-
 src/fsharp/FSharp.Build/WriteCodeFragment.fs  |  6 +-
 src/fsharp/FSharp.Core/array.fs               |  4 +-
 src/fsharp/FSharp.Core/local.fs               |  2 +-
 src/fsharp/FSharp.Core/option.fs              |  4 +-
 src/fsharp/FSharp.Core/option.fsi             |  8 +-
 src/fsharp/FSharp.Core/prim-types.fs          |  6 +-
 src/fsharp/FSharp.Core/prim-types.fsi         | 10 +--
 src/fsharp/FxResolver.fs                      |  4 +-
 src/fsharp/LowerStateMachines.fs              |  4 +-
 src/fsharp/NicePrint.fs                       |  3 +-
 src/fsharp/QuotationTranslator.fs             |  2 +-
 src/fsharp/TcGlobals.fs                       |  4 +-
 src/fsharp/TypedTree.fs                       |  4 +-
 src/fsharp/TypedTreeOps.fs                    |  8 +-
 src/fsharp/TypedTreeOps.fsi                   |  2 +-
 src/fsharp/absil/illib.fs                     |  4 +-
 src/fsharp/absil/illib.fsi                    |  2 +-
 src/fsharp/absil/ilnativeres.fs               |  2 +-
 src/fsharp/absil/ilread.fs                    |  4 +-
 src/fsharp/absil/ilreflect.fs                 |  8 +-
 src/fsharp/absil/ilsign.fs                    |  2 +-
 src/fsharp/absil/ilsupp.fs                    |  2 +-
 src/fsharp/fsi/console.fs                     |  6 +-
 src/fsharp/fsi/fsi.fs                         |  8 +-
 src/fsharp/import.fs                          |  2 +-
 src/fsharp/import.fsi                         |  2 +-
 src/fsharp/infos.fs                           |  2 +-
 src/fsharp/lib.fs                             |  4 +-
 src/fsharp/pars.fsy                           |  2 +-
 src/fsharp/service/QuickParse.fs              |  6 +-
 src/fsharp/service/QuickParse.fsi             |  6 +-
 src/fsharp/symbols/Exprs.fs                   |  2 +-
 src/fsharp/tainted.fs                         |  4 +-
 src/fsharp/tainted.fsi                        |  4 +-
 src/fsharp/utils/CompilerLocationUtils.fs     |  2 +-
 src/fsharp/utils/FileSystem.fs                |  8 +-
 src/fsharp/utils/sformat.fs                   |  2 +-
 src/fsharp/xlf/FSComp.txt.cs.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.de.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.es.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.fr.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.it.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.ja.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.ko.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.pl.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.pt-BR.xlf           | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.ru.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.tr.xlf              | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.zh-Hans.xlf         | 60 +++++++++++++
 src/fsharp/xlf/FSComp.txt.zh-Hant.xlf         | 60 +++++++++++++
 src/fsharp/xlf/FSStrings.cs.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.de.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.es.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.fr.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.it.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.ja.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.ko.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.pl.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.pt-BR.xlf            | 20 +++++
 src/fsharp/xlf/FSStrings.ru.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.tr.xlf               | 20 +++++
 src/fsharp/xlf/FSStrings.zh-Hans.xlf          | 20 +++++
 src/fsharp/xlf/FSStrings.zh-Hant.xlf          | 20 +++++
 80 files changed, 1228 insertions(+), 186 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index b80d1a65b1d..dda1aa3fb4b 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -1,13 +1,16 @@
 
 
 
+  
+    false
+  
   
-    BUILDING_WITH_LKG;$(DefineConstants)
+    NO_CHECKNULLS;$(DefineConstants)
   
 
   
-	$(OtherFlags) /langversion:preview
-	$(OtherFlags) /checknulls
+  	$(OtherFlags) /langversion:preview
+	  $(OtherFlags) /checknulls
   
 
   
diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index ec919374cef..7dafdde8dc4 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -372,7 +372,7 @@ let IsPropInfoAccessible g amap m ad = function
     | ProvidedProp (amap, tppi, m) as pp-> 
         let access = 
             let a = tppi.PUntaint((fun ppi -> 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
                 let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo) =
 #else
                 let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo?) = // TODO NULLNESS: using ProvidedMethodBase? gives a nullness warning
diff --git a/src/fsharp/CheckComputationExpressions.fs b/src/fsharp/CheckComputationExpressions.fs
index b5e08aa7185..bcba2089b6d 100644
--- a/src/fsharp/CheckComputationExpressions.fs
+++ b/src/fsharp/CheckComputationExpressions.fs
@@ -1939,7 +1939,7 @@ let TcSequenceExpression (cenv: cenv) env tpenv comp (overallTy: OverallTy) m =
                 | _ -> guardExprMark
 
             let innerDelayedExpr = mkSeqDelayedExpr mWhile innerExpr
-            Some(mkSeqGenerated cenv env guardExprMark genOuterTy guardLambdaExpr innerDelayedExpr, tpenv)
+            Some(mkSeqFromFunctions cenv env guardExprMark genOuterTy guardLambdaExpr innerDelayedExpr, tpenv)
 
         | SynExpr.TryFinally (innerComp, unwindExpr, mTryToLast, spTry, spFinally, trivia) ->
             let env = { env with eIsControlFlow = true }
@@ -2169,7 +2169,7 @@ let TcArrayOrListComputedExpression (cenv: cenv) env (overallTy: OverallTy) tpen
     // The elaborated form of '[ n .. m ]' is 'List.ofSeq (seq (op_Range n m))' and this shouldn't change
     match RewriteRangeExpr comp with
     | Some replacementExpr -> 
-        let genCollElemTy = NewInferenceType ()
+        let genCollElemTy = NewInferenceType cenv.g
 
         let genCollTy = (if isArray then mkArrayType else mkListTy) cenv.g genCollElemTy
 
diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index cdc341476c4..8d536bce2ac 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -2163,7 +2163,7 @@ module GeneralizationHelpers =
             match tp.Constraints |> List.partition (function (TyparConstraint.CoercesTo _) -> true | _ -> false) with 
             | [TyparConstraint.CoercesTo(cxty, _)], others -> 
                  // Throw away null constraints if they are implied 
-                 if others |> List.exists (function (TyparConstraint.SupportsNull _ -> not (TypeNullIsExtraValueOld cenv.g m cxty) | _ -> true) 
+                 if others |> List.exists (function TyparConstraint.SupportsNull _ -> not (TypeNullIsExtraValueOld cenv.g m cxty) | _ -> true) 
                  then None
                  else Some cxty
             | _ -> None
@@ -5670,7 +5670,7 @@ and TcPossiblyPropogatingExprLeafThenConvert isPropagating cenv (overallTy: Over
     match overallTy with
     | MustConvertTo(_, reqdTy) when cenv.g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions && not (isPropagating reqdTy) ->
         TcNonPropagatingExprLeafThenConvert cenv overallTy env m (fun () ->
-            let exprTy = NewInferenceType()
+            let exprTy = NewInferenceType cenv.g
 
             // Here 'processExpr' will eventually do the unification with exprTy.
             let expr, tpenv = processExpr exprTy
@@ -7430,7 +7430,7 @@ and TcConstExpr cenv (overallTy: OverallTy) env m tpenv c =
 
     | _ ->
       TcNonPropagatingExprLeafThenConvert cenv overallTy env m (fun () ->
-        let cTy = NewInferenceType()
+        let cTy = NewInferenceType cenv.g
         let c' = TcConst cenv cTy m env c
         Expr.Const (c', m, cTy), cTy, tpenv)
 
@@ -8352,7 +8352,7 @@ and TcUnionCaseOrExnCaseOrActivePatternResultItemThen cenv overallTy env item tp
                 mkConstrApp, [ucaseAppTy], [ for s, m in apinfo.ActiveTagsWithRanges -> mkSynId m s ]
             | _ ->
                 let ucref = mkChoiceCaseRef g mItem aparity n
-                let _, _, tinst, _ = FreshenTyconRef2 mItem ucref.TyconRef
+                let _, _, tinst, _ = FreshenTyconRef2 g mItem ucref.TyconRef
                 let ucinfo = UnionCaseInfo (tinst, ucref)
                 ApplyUnionCaseOrExnTypes mItem cenv env ucaseAppTy (Item.UnionCase(ucinfo, false))
         | _ ->
@@ -8427,7 +8427,7 @@ and TcUnionCaseOrExnCaseOrActivePatternResultItemThen cenv overallTy env item tp
                             (currentIndex <> SEEN_NAMED_ARGUMENT) &&
                             (currentIndex < numArgTys) &&
                             match stripTyEqns g argTys.[currentIndex] with
-                            | TType_app(tcref, _) -> tyconRefEq g g.bool_tcr tcref || tyconRefEq g g.system_Bool_tcref tcref
+                            | TType_app(tcref, _, _) -> tyconRefEq g g.bool_tcr tcref || tyconRefEq g g.system_Bool_tcref tcref
                             | TType_var _ -> true
                             | _ -> false
 
@@ -8640,7 +8640,7 @@ and TcImplicitOpItemThen cenv overallTy env id sln tpenv mItem delayed =
     let traitInfo = TTrait(argTys, logicalCompiledName, memberFlags, argTys, Some retTy, sln)
 
     let expr = Expr.Op (TOp.TraitCall traitInfo, [], ves, mItem)
-    let expr = mkLambdas mItem [] vs (expr, retTy)
+    let expr = mkLambdas g mItem [] vs (expr, retTy)
 
     let rec isSimpleArgument e =
         match e with
@@ -8722,7 +8722,7 @@ and TcImplicitOpItemThen cenv overallTy env id sln tpenv mItem delayed =
         let pred = (function DelayedApp (_, _, _, arg, _) -> isSimpleArgument arg | _ -> false)
         List.takeWhile pred delayed, List.skipWhile pred delayed
 
-    let intermediateTy = if isNil delayed2 then overallTy.Commit else NewInferenceType ()
+    let intermediateTy = if isNil delayed2 then overallTy.Commit else NewInferenceType g
 
     let resultExpr, tpenv = TcDelayed cenv (MustEqual intermediateTy) env tpenv mItem (MakeApplicableExprNoFlex cenv expr) (tyOfExpr g expr) ExprAtomicFlag.NonAtomic delayed1
 
@@ -9297,7 +9297,7 @@ and TcMethodApplication
                         curriedCalledArgs.Head |> List.forall isSimpleFormalArg) ->
 
                 // The call lambda has function type
-                let exprTy = mkFunTy (NewInferenceType cenv.g) exprTy.Commit
+                let exprTy = mkFunTy cenv.g (NewInferenceType cenv.g) exprTy.Commit
 
                 (None, Some unnamedCurriedCallerArgs.Head.Head, MustEqual exprTy)
 
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 79f56591644..9fc63ab60e5 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1145,14 +1145,14 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         | _ -> None
 
 #if !NO_EXTENSIONTYPING
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
 #else
     member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
 #endif
         match assembly with
         | Tainted.Null -> false,None
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         | assembly ->
 #else
         | Tainted.NonNull assembly ->
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 88492950918..94971f3f109 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -1234,7 +1234,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
                SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullnessAfterSolution2
             )
 
-    | TType_var (tp1, nullness1), _ when not (IsRigid csenv r) ->
+    | TType_var (tp1, nullness1), _ when not (IsRigid csenv tp1) ->
         match nullness1.TryEvaluate(), (nullnessOfTy g sty2).TryEvaluate() with
         // Unifying 'T1? and 'T2? 
         | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull ->
@@ -1248,7 +1248,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
            SolveNullnessEquiv csenv m2 trace ty1 ty2 nullnessAfterSolution1 (nullnessOfTy g sty2)
         )
 
-    | _, TType_var (tp2, nullness2) when not csenv.MatchingOnly && not (IsRigid csenv r) ->
+    | _, TType_var (tp2, nullness2) when not csenv.MatchingOnly && not (IsRigid csenv tp2) ->
         match (nullnessOfTy g sty1).TryEvaluate(), nullness2.TryEvaluate() with
         // Unifying 'T1? and 'T2? 
         | ValueSome NullnessInfo.WithNull, ValueSome NullnessInfo.WithNull ->
@@ -1398,12 +1398,12 @@ and SolveTypeSubsumesType (csenv: ConstraintSolverEnv) ndeep m2 (trace: Optional
         UnifyMeasures csenv trace ms1 ms2
 
     // Enforce the identities float=float<1>, float32=float32<1> and decimal=decimal<1> 
-    | _, TType_app (tc2, [ms2], nullness2)) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms2]) ->
+    | _, TType_app (tc2, [ms2], nullness2) when tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms2]) ->
         SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms2 (TType_measure Measure.One) ++ (fun () -> 
            SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 (nullnessOfTy g sty1) nullness2
         )
 
-    | TType_app (tc1, [ms1], nullness1), _) when (tc1.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc1 [ms1]) ->
+    | TType_app (tc1, [ms1], nullness1), _ when tc1.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc1 [ms1]) ->
         SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms1 (TType_measure Measure.One) ++ (fun () -> 
            SolveNullnessSubsumesNullness csenv m2 trace ty1 ty2 nullness1 (nullnessOfTy g sty2)
         )
@@ -3613,22 +3613,22 @@ let AddCxMethodConstraint denv css m trace traitInfo  =
 
 let AddCxTypeDefnSupportsNull denv css m trace ty =
     let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv
-    TryD_IgnoreAbortForFailedOverloadResolution
-        (fun () -> SolveTypeDefnSupportsNull csenv 0 m trace ty)
+    PostponeOnFailedMemberConstraintResolution csenv trace
+        (fun csenv -> SolveTypeDefnSupportsNull csenv 0 m trace ty)
         (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m)))
     |> RaiseOperationResult
 
 let AddCxTypeDefnNotSupportsNull denv css m trace ty =
     let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv
-    TryD_IgnoreAbortForFailedOverloadResolution
-        (fun () -> SolveTypeDefnNotSupportsNull csenv 0 m trace ty)
+    PostponeOnFailedMemberConstraintResolution csenv trace
+        (fun csenv -> SolveTypeDefnNotSupportsNull csenv 0 m trace ty)
         (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m)))
     |> RaiseOperationResult
 
 let AddCxTypeUseSupportsNull denv css m trace ty =
     let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv
-    PostponeOnFailedMemberConstraintResolution
-        (fun () -> SolveTypeUseSupportsNull csenv 0 m trace ty)
+    PostponeOnFailedMemberConstraintResolution csenv trace
+        (fun csenv -> SolveTypeUseSupportsNull csenv 0 m trace ty)
         (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m)))
     |> RaiseOperationResult
 
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fs b/src/fsharp/DependencyManager/DependencyProvider.fs
index c646ecfaa17..6d523fb62a7 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/DependencyManager/DependencyProvider.fs
@@ -76,7 +76,7 @@ module ReflectionHelper =
             e.InnerException
         | _ -> e
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     // Shim to match nullness checking library support in preview
     let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
@@ -122,7 +122,7 @@ type IResolveDependenciesResult =
     abstract Roots: seq
 
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 []
 #endif
 type IDependencyManagerProvider =
@@ -379,7 +379,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
         FSComp.SR.packageManagerUnknown(packageManagerKey, String.Join(", ", searchPaths, compilerTools), registeredKeys)
 
     /// Fetch a dependencymanager that supports a specific key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string * IDependencyManagerProvider =
 #else
     member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string? * IDependencyManagerProvider? =
@@ -406,7 +406,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
             null, null
 
     /// Fetch a dependencymanager that supports a specific key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider =
 #else
     member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider? =
@@ -430,7 +430,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                        packageManagerTextLines: (string * string) seq,
                        reportError: ResolvingErrorReport,
                        executionTfm: string,
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
                        []executionRid: string,
 #else
                        []executionRid: string?,
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fsi b/src/fsharp/DependencyManager/DependencyProvider.fsi
index 75e69a1f274..a58dc2cec33 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fsi
+++ b/src/fsharp/DependencyManager/DependencyProvider.fsi
@@ -37,7 +37,7 @@ type IResolveDependenciesResult =
     abstract Roots: seq
 
 /// Wraps access to a DependencyManager implementation
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 []
 #endif
 type IDependencyManagerProvider =
@@ -90,21 +90,21 @@ type DependencyProvider =
     member CreatePackageManagerUnknownError: string seq * string * string * ResolvingErrorReport -> int * string
 
     /// Resolve reference for a list of package manager lines
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
 #else
     member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
 #endif
 
     /// Fetch a dependencymanager that supports a specific key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider
 #else
     member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider?
 #endif
 
     /// TryFindDependencyManagerInPath - given a #r "key:sometext" go and find a DependencyManager that satisfies the key
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string * IDependencyManagerProvider
 #else
     member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string? * IDependencyManagerProvider?
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index 5419377a401..db32d54f354 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -655,7 +655,7 @@ let NewlineifyErrorString (message:string) = message.Replace(stringThatIsAProxyF
 /// fixes given string by replacing all control chars with spaces.
 /// NOTE: newlines are recognized and replaced with stringThatIsAProxyForANewlineInFlatErrors (ASCII 29, the 'group separator'), 
 /// which is decoded by the IDE with 'NewlineifyErrorString' back into newlines, so that multi-line errors can be displayed in QuickInfo
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let NormalizeErrorString (text : string) =
     if isNull text then nullArg "text"
 #else
diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 9ba22e116f6..43ddb469235 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -201,7 +201,7 @@ module internal ExtensionTyping =
             [||]
 
     /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
         match TryTypeMember(st, fullName, memberName, m, recover, f) with 
 #else
@@ -226,7 +226,7 @@ module internal ExtensionTyping =
         resolver.PUntaint((fun tp -> tp.GetType().Name), m)
 
     /// Validate a provided namespace name
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string) =
 #else
     let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string?) =
@@ -324,7 +324,7 @@ module internal ExtensionTyping =
 
     and
       []
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
       []
 #endif
       ProvidedType (x: Type, ctxt: ProvidedTypeContext) =
@@ -349,14 +349,14 @@ module internal ExtensionTyping =
         member _.IsSuppressRelocate = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.SuppressRelocate)) <> enum 0  
         member _.IsErased = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.IsErased)) <> enum 0  
         member _.IsGenericType = x.IsGenericType
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member _.Namespace : string = x.Namespace
 #else
         member _.Namespace : string? = x.Namespace
 #endif
         member _.FullName = x.FullName
         member _.IsArray = x.IsArray
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member _.Assembly: ProvidedAssembly = x.Assembly |> ProvidedAssembly.Create
 #else
         member _.Assembly: ProvidedAssembly? = x.Assembly |> ProvidedAssembly.Create
@@ -378,7 +378,7 @@ module internal ExtensionTyping =
         member _.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
         /// Type.BaseType can be null when Type is interface or object
         member _.BaseType = x.BaseType |> ProvidedType.Create ctxt
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[] = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
 #else
         member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[]? = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
@@ -419,7 +419,7 @@ module internal ExtensionTyping =
 
         member _.AsProvidedVar name = ProvidedVar.CreateNonNull ctxt (Quotations.Var(name, x))
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt x : ProvidedType = 
 #else
         static member Create ctxt x : ProvidedType? = 
@@ -435,7 +435,7 @@ module internal ExtensionTyping =
             | Null -> nullArg name 
             | t -> ProvidedType (t, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt (xs: Type[]) : ProvidedType[] = 
 #else
         static member CreateArray ctxt (xs: Type[]?) : ProvidedType[]? = 
@@ -460,11 +460,11 @@ module internal ExtensionTyping =
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
     and 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         IProvidedCustomAttributeProvider =
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string * int * int) option 
 #else
         abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string? * int * int) option 
@@ -521,7 +521,7 @@ module internal ExtensionTyping =
                         |> Seq.toArray  }
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedMemberInfo (x: MemberInfo, ctxt) = 
@@ -536,7 +536,7 @@ module internal ExtensionTyping =
             member _.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName)
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedParameterInfo (x: ParameterInfo, ctxt) = 
@@ -550,7 +550,7 @@ module internal ExtensionTyping =
         /// ParameterInfo.ParameterType cannot be null
         member _.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType
         
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt (x: ParameterInfo) : ProvidedParameterInfo = 
 #else
         static member Create ctxt (x: ParameterInfo?) : ProvidedParameterInfo? = 
@@ -561,7 +561,7 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
         
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt (xs: ParameterInfo[]) : ProvidedParameterInfo[] = 
 #else
         static member CreateArray ctxt (xs: ParameterInfo[]?) : ProvidedParameterInfo[]? = 
@@ -586,7 +586,7 @@ module internal ExtensionTyping =
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedAssembly (x: Assembly) = 
@@ -597,7 +597,7 @@ module internal ExtensionTyping =
 
         member _.GetManifestModuleContents(provider: ITypeProvider) = provider.GetGeneratedAssemblyContents x
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create x : ProvidedAssembly = match x with null -> null | t -> ProvidedAssembly (t)
 #else
         static member Create x : ProvidedAssembly? = match x with null -> null | t -> ProvidedAssembly (t)
@@ -610,7 +610,7 @@ module internal ExtensionTyping =
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedMethodBase (x: MethodBase, ctxt) = 
@@ -691,7 +691,7 @@ module internal ExtensionTyping =
 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedFieldInfo (x: FieldInfo, ctxt) = 
@@ -699,7 +699,7 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedFieldInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt x : ProvidedFieldInfo = 
 #else
         static member Create ctxt x : ProvidedFieldInfo? = 
@@ -708,7 +708,7 @@ module internal ExtensionTyping =
             | Null -> null 
             | NonNull x -> ProvidedFieldInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt (xs: FieldInfo[]) : ProvidedFieldInfo[] = 
 #else
         static member CreateArray ctxt (xs: FieldInfo[]?) : ProvidedFieldInfo[]? = 
@@ -736,7 +736,7 @@ module internal ExtensionTyping =
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedMethodInfo (x: MethodInfo, ctxt) = 
@@ -747,7 +747,7 @@ module internal ExtensionTyping =
         static member CreateNonNull ctxt (x: MethodInfo) : ProvidedMethodInfo = 
             ProvidedMethodInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt (x: MethodInfo) : ProvidedMethodInfo = 
 #else
         static member Create ctxt (x: MethodInfo?) : ProvidedMethodInfo? = 
@@ -756,7 +756,7 @@ module internal ExtensionTyping =
             | Null -> null
             | NonNull x -> ProvidedMethodInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt (xs: MethodInfo[]) : ProvidedMethodInfo[] = 
 #else
         static member CreateArray ctxt (xs: MethodInfo[]?) : ProvidedMethodInfo[]? = 
@@ -771,7 +771,7 @@ module internal ExtensionTyping =
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedPropertyInfo (x: PropertyInfo, ctxt) = 
@@ -786,7 +786,7 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedPropertyInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt x : ProvidedPropertyInfo = 
 #else
         static member Create ctxt x : ProvidedPropertyInfo? = 
@@ -795,7 +795,7 @@ module internal ExtensionTyping =
             | Null -> null 
             | NonNull x -> ProvidedPropertyInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt xs : ProvidedPropertyInfo[] = 
 #else
         static member CreateArray ctxt (xs: PropertyInfo[]?) : ProvidedPropertyInfo[]? = 
@@ -819,7 +819,7 @@ module internal ExtensionTyping =
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedEventInfo (x: EventInfo, ctxt) = 
@@ -831,7 +831,7 @@ module internal ExtensionTyping =
         
         static member CreateNonNull ctxt x = ProvidedEventInfo (x, ctxt)
         
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt x : ProvidedEventInfo = 
 #else
         static member Create ctxt x : ProvidedEventInfo? = 
@@ -840,7 +840,7 @@ module internal ExtensionTyping =
             | Null -> null 
             | NonNull x -> ProvidedEventInfo (x, ctxt)
         
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt xs : ProvidedEventInfo[] = 
 #else
         static member CreateArray ctxt (xs: EventInfo[]?) : ProvidedEventInfo[]? = 
@@ -864,7 +864,7 @@ module internal ExtensionTyping =
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedConstructorInfo (x: ConstructorInfo, ctxt) = 
@@ -872,7 +872,7 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedConstructorInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt (x: ConstructorInfo) : ProvidedConstructorInfo = 
 #else
         static member Create ctxt (x: ConstructorInfo?) : ProvidedConstructorInfo? = 
@@ -881,7 +881,7 @@ module internal ExtensionTyping =
             | Null -> null 
             | NonNull x -> ProvidedConstructorInfo (x, ctxt)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member CreateArray ctxt xs : ProvidedConstructorInfo[] = 
 #else
         static member CreateArray ctxt (xs: ConstructorInfo[]?) : ProvidedConstructorInfo[]? = 
@@ -919,7 +919,7 @@ module internal ExtensionTyping =
         | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
         | ProvidedVarExpr of ProvidedVar
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     and []
 #else
     and []
@@ -976,7 +976,7 @@ module internal ExtensionTyping =
             | Quotations.Patterns.Var v ->
                 Some (ProvidedVarExpr (ProvidedVar.CreateNonNull ctxt v))
             | _ -> None
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         static member Create ctxt t : ProvidedExpr = 
 #else
         static member Create ctxt t : ProvidedExpr? = 
@@ -997,7 +997,7 @@ module internal ExtensionTyping =
 
         override _.GetHashCode() = x.GetHashCode()
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     and []
 #else
     and []
@@ -1051,7 +1051,7 @@ module internal ExtensionTyping =
         if name <> expectedName then
             raise (TypeProviderError(FSComp.SR.etProvidedTypeHasUnexpectedName(expectedName, name), st.TypeProviderDesignation, m))
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let namespaceName = TryTypeMember(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal
 #else
         let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal // TODO NULLNESS: why is this explicit instantiation needed?
@@ -1078,7 +1078,7 @@ module internal ExtensionTyping =
         // Do all the calling into st up front with recovery
         let fullName, namespaceName, usedMembers =
             let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
             let namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
 #else
             let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
@@ -1187,7 +1187,7 @@ module internal ExtensionTyping =
 
         // Validate the Name, Namespace and FullName properties
         let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let _namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
 #else
         let _namespaceName = TryTypeMember<_, (string?)>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
@@ -1202,7 +1202,7 @@ module internal ExtensionTyping =
         | -1 -> ()
         | n -> errorR(Error(FSComp.SR.etIllegalCharactersInTypeName(string expectedName.[n], expectedName), m))  
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let staticParameters = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
 #else
         let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
@@ -1214,7 +1214,7 @@ module internal ExtensionTyping =
     /// Resolve a (non-nested) provided type given a full namespace name and a type name. 
     /// May throw an exception which will be turned into an error message by one of the 'Try' function below.
     /// If resolution is successful the type is then validated.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
 #else
     let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
@@ -1402,7 +1402,7 @@ module internal ExtensionTyping =
             | None -> None
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let GetPartsOfNamespaceRecover(namespaceName: string) = 
 #else
     let GetPartsOfNamespaceRecover(namespaceName: string?) = 
@@ -1414,7 +1414,7 @@ module internal ExtensionTyping =
             else splitNamespace (nonNull namespaceName)
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string) = 
 #else
     let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string?) = 
@@ -1431,7 +1431,7 @@ module internal ExtensionTyping =
         // Can't use st.Fullname because it may be like IEnumerable
         // We want [System;Collections;Generic]
         let namespaceParts = GetPartsOfNamespaceRecover(st.PUntaint((fun st -> st.Namespace), range))
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let rec walkUpNestedClasses(st: Tainted, soFar) =
 #else
         let rec walkUpNestedClasses(st: Tainted, soFar) =
diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi
index 492d05a6416..65aaaa3e95a 100755
--- a/src/fsharp/ExtensionTyping.fsi
+++ b/src/fsharp/ExtensionTyping.fsi
@@ -87,7 +87,7 @@ module internal ExtensionTyping =
         member RemapTyconRefs : (obj -> obj) -> ProvidedTypeContext 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedType =
@@ -95,7 +95,7 @@ module internal ExtensionTyping =
         member IsSuppressRelocate : bool
         member IsErased : bool
         member IsGenericType : bool
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member Namespace : string
 #else
         member Namespace : string?
@@ -104,7 +104,7 @@ module internal ExtensionTyping =
         member IsArray : bool
         member GetInterfaces : unit -> ProvidedType[]
         member Assembly : ProvidedAssembly
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member BaseType : ProvidedType
 #else
         member BaseType : ProvidedType?
@@ -157,12 +157,12 @@ module internal ExtensionTyping =
         static member TaintedEquals : Tainted * Tainted -> bool 
 
     and 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         IProvidedCustomAttributeProvider =
         abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string * int * int) option 
 #else
         abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string? * int * int) option 
@@ -171,7 +171,7 @@ module internal ExtensionTyping =
         abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
         
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedAssembly = 
@@ -181,12 +181,12 @@ module internal ExtensionTyping =
         member Handle : System.Reflection.Assembly
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedMemberInfo = 
         member Name :string
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member DeclaringType : ProvidedType
 #else
         member DeclaringType : ProvidedType?
@@ -194,7 +194,7 @@ module internal ExtensionTyping =
         interface IProvidedCustomAttributeProvider 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedMethodBase = 
@@ -217,7 +217,7 @@ module internal ExtensionTyping =
         static member TaintedEquals : Tainted * Tainted -> bool 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedMethodInfo = 
@@ -226,7 +226,7 @@ module internal ExtensionTyping =
         member MetadataToken : int
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedParameterInfo = 
@@ -240,7 +240,7 @@ module internal ExtensionTyping =
         interface IProvidedCustomAttributeProvider 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedFieldInfo = 
@@ -259,13 +259,13 @@ module internal ExtensionTyping =
         static member TaintedEquals : Tainted * Tainted -> bool 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedPropertyInfo = 
         inherit ProvidedMemberInfo
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         member GetGetMethod : unit -> ProvidedMethodInfo
 
         member GetSetMethod : unit -> ProvidedMethodInfo
@@ -288,7 +288,7 @@ module internal ExtensionTyping =
         static member TaintedEquals : Tainted * Tainted -> bool 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedEventInfo = 
@@ -300,7 +300,7 @@ module internal ExtensionTyping =
         static member TaintedEquals : Tainted * Tainted -> bool 
 
     and [] 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         []
 #endif
         ProvidedConstructorInfo = 
@@ -331,7 +331,7 @@ module internal ExtensionTyping =
         | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
         | ProvidedVarExpr of ProvidedVar
         
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     and []
 #else
     and []
@@ -342,7 +342,7 @@ module internal ExtensionTyping =
         member UnderlyingExpressionString : string
         member GetExprType : unit -> ProvidedExprType option
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     and []
 #else
     and []
diff --git a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
index 32b07870b59..b725a048c62 100644
--- a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
+++ b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
@@ -50,7 +50,7 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- s :: args
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member x.AppendSwitchIfNotNull(switch:string, value:string, ?metadataNames:string[]) =
 #else
     member x.AppendSwitchIfNotNull(switch:string, value:string?, ?metadataNames:string[]) =
@@ -69,7 +69,7 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- s :: args
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string) =
 #else
     member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string?) =
diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
index 6dc31e6f78b..6118402ae0d 100644
--- a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
+++ b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
@@ -13,7 +13,7 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type FSharpEmbedResXSource() =
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable _buildEngine : IBuildEngine = null
     let mutable _hostObject : ITaskHost = null
 #else
diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
index 2b7b20be228..8d1b6c8e0d0 100644
--- a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
+++ b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
@@ -8,7 +8,7 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type FSharpEmbedResourceText() =
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable _buildEngine : IBuildEngine = null
     let mutable _hostObject : ITaskHost = null
 #else
diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs
index 17dacef9a1f..67a6fa88ef8 100644
--- a/src/fsharp/FSharp.Build/Fsc.fs
+++ b/src/fsharp/FSharp.Build/Fsc.fs
@@ -11,7 +11,7 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 open Internal.Utilities
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 // Shim to match nullness checking library support in preview
 []
 module Utils = 
@@ -62,7 +62,7 @@ type public Fsc () as this =
     let mutable vserrors : bool = false
     let mutable utf8output : bool = false
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable baseAddress : string = null
     let mutable codePage : string = null
     let mutable debugType : string = null
@@ -139,7 +139,7 @@ type public Fsc () as this =
 
     /// Trim whitespace ... spaces, tabs, newlines,returns, Double quotes and single quotes
     let wsCharsToTrim = [| ' '; '\t'; '\"'; '\'' |]
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let splitAndWsTrim (s:string) =
 #else
     let splitAndWsTrim (s:string?) =
@@ -207,7 +207,7 @@ type public Fsc () as this =
         builder.AppendSwitchIfNotNull("--pdb:", pdbFile)
 // Platform
         builder.AppendSwitchIfNotNull("--platform:",
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
             let ToUpperInvariant (s:string) =
 #else
             let ToUpperInvariant (s:string?) =
diff --git a/src/fsharp/FSharp.Build/Fsi.fs b/src/fsharp/FSharp.Build/Fsi.fs
index c2a5ad0b171..ef873597ff2 100644
--- a/src/fsharp/FSharp.Build/Fsi.fs
+++ b/src/fsharp/FSharp.Build/Fsi.fs
@@ -11,7 +11,7 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 open Internal.Utilities
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 []
 // Shim to match nullness checking library support in preview
 module UtilsFsi = 
@@ -54,7 +54,7 @@ type public Fsi () as this =
     let mutable treatWarningsAsErrors : bool = false
     let mutable utf8output : bool = false
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable codePage : string = null
     let mutable disabledWarnings : string = null
     let mutable dotnetFsiCompilerPath : string = null
diff --git a/src/fsharp/FSharp.Build/SubstituteText.fs b/src/fsharp/FSharp.Build/SubstituteText.fs
index 488fe0322cd..1898a295132 100644
--- a/src/fsharp/FSharp.Build/SubstituteText.fs
+++ b/src/fsharp/FSharp.Build/SubstituteText.fs
@@ -10,7 +10,7 @@ open Microsoft.Build.Utilities
 
 type SubstituteText () =
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable _buildEngine : IBuildEngine = null
     let mutable _hostObject : ITaskHost = null
     let mutable embeddedResources : ITaskItem[] = [||]
diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
index 85f9aba848c..aeffde86e41 100644
--- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs
+++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
@@ -12,7 +12,7 @@ open System.Text
 open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 []
 // Shim to match nullness checking library support in preview
 module UtilsWriteCodeFragment = 
@@ -20,7 +20,7 @@ module UtilsWriteCodeFragment =
 #endif
 
 type WriteCodeFragment() =
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable _buildEngine : IBuildEngine = null
     let mutable _hostObject : ITaskHost = null
     let mutable _outputDirectory : ITaskItem = null
@@ -139,7 +139,7 @@ type WriteCodeFragment() =
 
                 if _language.ToLowerInvariant() = "f#" then code.AppendLine("do()") |> ignore
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
                 let fileName = _outputFile.ItemSpec
 
                 let outputFileItem =
diff --git a/src/fsharp/FSharp.Core/array.fs b/src/fsharp/FSharp.Core/array.fs
index f3a4a24b6e7..611a9dc4c59 100644
--- a/src/fsharp/FSharp.Core/array.fs
+++ b/src/fsharp/FSharp.Core/array.fs
@@ -562,7 +562,7 @@ namespace Microsoft.FSharp.Collections
                     maskArray.[maskIdx] <- mask
                 count 
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
             let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref>) (leftoverMaskOut: byref) =
 #else
             let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref?>) (leftoverMaskOut: byref) =
@@ -652,7 +652,7 @@ namespace Microsoft.FSharp.Collections
 
                 dstIdx
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
             let private filterViaMask (maskArray: array) (leftoverMask: uint32) (count: int) (src: array<_>) =
 #else
             let private filterViaMask (maskArray: array?) (leftoverMask: uint32) (count: int) (src: array<_>) =
diff --git a/src/fsharp/FSharp.Core/local.fs b/src/fsharp/FSharp.Core/local.fs
index a6532fa6be3..e6be822811e 100644
--- a/src/fsharp/FSharp.Core/local.fs
+++ b/src/fsharp/FSharp.Core/local.fs
@@ -1087,7 +1087,7 @@ module internal Array =
         if array.Length > 1 then 
             Array.Sort<_>(array, fastComparerForArraySort())
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
 #else
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>?) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
diff --git a/src/fsharp/FSharp.Core/option.fs b/src/fsharp/FSharp.Core/option.fs
index 1c8907810b5..630ff6916fb 100644
--- a/src/fsharp/FSharp.Core/option.fs
+++ b/src/fsharp/FSharp.Core/option.fs
@@ -85,7 +85,7 @@ module Option =
     []
     let ofNullable (value:System.Nullable<'T>) = if value.HasValue then Some value.Value else None
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     []
     let ofObj value = match value with null -> None | _ -> Some value
 
@@ -181,7 +181,7 @@ module ValueOption =
     []
     let ofNullable (value:System.Nullable<'T>) = if value.HasValue then ValueSome value.Value else ValueNone
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     []
     let ofObj value = match value with null -> ValueNone | _ -> ValueSome value
 
diff --git a/src/fsharp/FSharp.Core/option.fsi b/src/fsharp/FSharp.Core/option.fsi
index 5070f2959d1..edceccf09ec 100644
--- a/src/fsharp/FSharp.Core/option.fsi
+++ b/src/fsharp/FSharp.Core/option.fsi
@@ -436,7 +436,7 @@ module Option =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     val ofObj: value: 'T -> 'T option  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -456,7 +456,7 @@ module Option =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     val toObj: value: 'T option -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -889,7 +889,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     val ofObj: value: 'T -> 'T voption  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -909,7 +909,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
     val toObj: value: 'T voption -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index aa4a92c2d37..5e9a1e279c7 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -3843,7 +3843,7 @@ namespace Microsoft.FSharp.Core
             | null -> false 
             | _ -> true
 
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
 
         []
         let inline isNullV (value : Nullable<'T>) = not value.HasValue
@@ -3930,7 +3930,7 @@ namespace Microsoft.FSharp.Core
         let inline nullArg (argumentName:string) = 
             raise (new System.ArgumentNullException(argumentName))        
 
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
         []
         let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : not null) = 
             match value with 
@@ -3999,7 +3999,7 @@ namespace Microsoft.FSharp.Core
         let inline defaultIfNone defaultValue arg = 
             match arg with None -> defaultValue | Some v -> v
         
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
         []
         let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : not null) = 
             match arg with null -> defaultValue | _ -> (# "" arg : 'T #)
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 46c8f5fcfe0..0ec8f107d89 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -1299,7 +1299,7 @@ namespace Microsoft.FSharp.Core
         val inline FastGenericComparer<'T> : System.Collections.Generic.IComparer<'T> when 'T: comparison 
 
         /// Make an F# comparer object for the given type, where it can be null if System.Collections.Generic.Comparer<'T>.Default
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE
+#if NO_CHECKNULLS
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T> when 'T : comparison 
 #else
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T>? when 'T : comparison 
@@ -3067,7 +3067,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline defaultIfNone : defaultValue:'T -> arg:'T option -> 'T 
 
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
         /// Used to specify a default value for a nullable reference argument in the implementation of a function
         /// The default value of the argument.
         /// A nullable value representing the argument.
@@ -3382,7 +3382,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline isNull: value: 'T -> bool when 'T: null
         
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
         /// Determines whether the given value is null.
         /// The value to check.
         /// A choice indicating whether the value is null or not-null.
@@ -3430,7 +3430,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline internal isNotNull : value:'T -> bool when 'T : null
 
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
         /// Get the null value for a value type.
         /// In a future revision of nullness support this may be unified with 'null'.
         /// The null value for a value type.
@@ -3533,7 +3533,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline nullArg: argumentName: string -> 'T 
 
-#if !BUILDING_WITH_LKG && !BUILD_FROM_SOURCE
+#if !NO_CHECKNULLS
         /// Throw a System.ArgumentNullException if the given value is null exception
         /// 
         /// The argument name.
diff --git a/src/fsharp/FxResolver.fs b/src/fsharp/FxResolver.fs
index e2271e9cef7..e9afc142179 100644
--- a/src/fsharp/FxResolver.fs
+++ b/src/fsharp/FxResolver.fs
@@ -48,7 +48,7 @@ type internal FxResolver(assumeDotNetFramework: bool, projectDir: string, useSdk
             let outputList = ResizeArray()
             let mutable errorslock = obj
             let mutable outputlock = obj
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
             let outputDataReceived (message: string) =
 #else
             let outputDataReceived (message: string?) =
@@ -58,7 +58,7 @@ type internal FxResolver(assumeDotNetFramework: bool, projectDir: string, useSdk
                 | NonNull message ->
                     lock outputlock (fun () -> outputList.Add(message))
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
             let errorDataReceived (message: string) =
 #else
             let errorDataReceived (message: string?) =
diff --git a/src/fsharp/LowerStateMachines.fs b/src/fsharp/LowerStateMachines.fs
index b7a05925120..8319045a31d 100644
--- a/src/fsharp/LowerStateMachines.fs
+++ b/src/fsharp/LowerStateMachines.fs
@@ -215,7 +215,7 @@ type LowerStateMachine(g: TcGlobals) =
                 None
             else
                 let macroParams = List.concat macroParamsCurried
-                let macroVal2 = mkLambdas m macroTypars macroParams (macroBody, tyOfExpr g macroBody)
+                let macroVal2 = mkLambdas g m macroTypars macroParams (macroBody, tyOfExpr g macroBody)
                 if args.Length < macroParams.Length then 
                     //warning(Error(FSComp.SR.stateMachineMacroUnderapplied(), m))
                     None
@@ -232,7 +232,7 @@ type LowerStateMachine(g: TcGlobals) =
         | NewDelegateExpr g (_, macroParamsCurried, macroBody, _, _) -> 
             let m = expr.Range
             let macroParams = List.concat macroParamsCurried
-            let macroVal2 = mkLambdas m [] macroParams (macroBody, tyOfExpr g macroBody)
+            let macroVal2 = mkLambdas g m [] macroParams (macroBody, tyOfExpr g macroBody)
             if args.Length < macroParams.Length then 
                 //warning(Error(FSComp.SR.stateMachineMacroUnderapplied(), m))
                 None
diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs
index 99aacc2fed3..bbf5e140470 100755
--- a/src/fsharp/NicePrint.fs
+++ b/src/fsharp/NicePrint.fs
@@ -2126,8 +2126,7 @@ module TastDefinitionPrinting =
                     modNameEqualsL
 
         let headerL =
-            let ty = generalizedTyconRef denv.g (mkLocalEntityRef mspec)
-            layoutAttribs denv None false ty mspec.TypeOrMeasureKind mspec.Attribs headerL
+            layoutAttribs denv None false mspec.TypeOrMeasureKind mspec.Attribs headerL
 
         let shouldShow (v: Val) =
             (denv.showObsoleteMembers || not (CheckFSharpAttributesForObsolete denv.g v.Attribs)) &&
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index e6b599f1d3a..912223b74fc 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -615,7 +615,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
             let propRetTypeR = ConvType cenv env m fspec.FormalType
             let callArgR = ConvExpr cenv env obj
             let exnTypeR = ConvType cenv env m (generalizedTyconRef g tcref)
-            QP.mkPropGet( (parentTyconR, fspec.Name, propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)])
+            QP.mkPropGet( (parentTyconR, fspec.LogicalName, propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)])
 
         | TOp.Coerce, [tgtTy;srcTy], [x]  ->
             let xR = ConvExpr cenv env x
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index 96217336db2..e89c17108e8 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -1071,9 +1071,9 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   member val ArrayCollector_tcr = mk_MFCompilerServices_tcref fslibCcu "ArrayCollector`1"
   member g.mk_GeneratedSequenceBase_ty seqElemTy = TType_app(g.seq_base_tcr, [seqElemTy], v_knownWithoutNull)
   member val ResumableStateMachine_tcr = mk_MFCompilerServices_tcref fslibCcu "ResumableStateMachine`1"
-  member g.mk_ResumableStateMachine_ty dataTy = TType_app(g.ResumableStateMachine_tcr,[dataTy])
+  member g.mk_ResumableStateMachine_ty dataTy = TType_app(g.ResumableStateMachine_tcr,[dataTy], v_knownWithoutNull)
   member val IResumableStateMachine_tcr = mk_MFCompilerServices_tcref fslibCcu "IResumableStateMachine`1"
-  member g.mk_IResumableStateMachine_ty dataTy = TType_app(g.IResumableStateMachine_tcr,[dataTy])
+  member g.mk_IResumableStateMachine_ty dataTy = TType_app(g.IResumableStateMachine_tcr,[dataTy], v_knownWithoutNull)
   member g.mk_ListCollector_ty seqElemTy = TType_app(g.ListCollector_tcr, [seqElemTy], v_knownWithoutNull)
   member g.mk_ArrayCollector_ty seqElemTy = TType_app(g.ArrayCollector_tcr, [seqElemTy], v_knownWithoutNull)
   member val byrefkind_In_tcr =  mkNonLocalTyconRef fslib_MFByRefKinds_nleref "In"
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 982a1d8e4fd..3e4c8fdb8c3 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -5380,7 +5380,7 @@ type CcuThunk =
     {
       /// ccu.target is null when a reference is missing in the transitive closure of static references that
       /// may potentially be required for the metadata of referenced DLLs.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
       mutable target: CcuData
 #else
       mutable target: CcuData?
@@ -5388,7 +5388,7 @@ type CcuThunk =
       name: CcuReference
     }
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     /// Dereference the assembly reference 
     member ccu.Deref = 
         if isNull (box ccu.target) then 
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 36b8173413a..a184cb32591 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -6174,8 +6174,8 @@ let rec tyOfExpr g expr =
     | Expr.Quote (_, _, _, _, ty) 
     | Expr.Const (_, _, ty) -> ty
     | Expr.Val (vref, _, _) -> vref.Type
-    | Expr.Sequential (a, b, k, _, _) -> tyOfExpr g (match k with NormalSeq -> b | ThenDoSeq -> a)
-    | Expr.Lambda (_, _, _, vs, _, _, rty) -> (mkRefTupledVarsTy g vs --> rty)
+    | Expr.Sequential (a, b, k, _) -> tyOfExpr g (match k with NormalSeq -> b | ThenDoSeq -> a)
+    | Expr.Lambda (_, _, _, vs, _, _, rty) -> mkFunTy g (mkRefTupledVarsTy g vs) rty
     | Expr.TyLambda (_, tyvs, _, _, rty) -> (tyvs +-> rty)
     | Expr.Let (_, e, _, _) 
     | Expr.TyChoose (_, e, _)
@@ -7660,7 +7660,7 @@ let mkCompilationMappingAttrForQuotationResource (g: TcGlobals) (nm, tys: ILType
 let isTypeProviderAssemblyAttr (cattr: ILAttribute) = 
     cattr.Method.DeclaringType.BasicQualifiedName = typeof.FullName
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) : string option = 
 #else
 let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) : string? option = 
@@ -9933,7 +9933,7 @@ let (|SequentialResumableCode|_|) (g: TcGlobals) expr =
 
 let mkLabelled m l e = mkCompGenSequential m (Expr.Op (TOp.Label l, [], [], m)) e
 
-let isResumableCodeTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.ResumableCode_tcr | _ -> false)
+let isResumableCodeTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.ResumableCode_tcr | _ -> false)
 
 let rec isReturnsResumableCodeTy g ty = 
     if isFunTy g ty then isReturnsResumableCodeTy g (rangeOfFunTy g ty)
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index 5fa22ff436f..4a9b81b2695 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -2175,7 +2175,7 @@ val TryFindAttributeUsageAttribute: TcGlobals -> range -> TyconRef -> bool optio
 
 #if !NO_EXTENSIONTYPING
 /// returns Some(assemblyName) for success
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string option
 #else
 val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string? option
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index 99bcfda8014..d76c5a52cc3 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -36,7 +36,7 @@ module internal PervasiveAutoOpens =
 
     let inline isNotNull x = not (isNull x)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     // Shim to match nullness checking library support in preview
     let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
     let inline nonNull<'T when 'T : null> (x: 'T) = x
@@ -110,7 +110,7 @@ module internal PervasiveAutoOpens =
 type InlineDelayInit<'T when 'T : not struct> = 
     new (f: unit -> 'T) = {store = Unchecked.defaultof<'T>; func = Func<_>(f) } 
     val mutable store : 'T
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     val mutable func : Func<'T>
 #else
     val mutable func : Func<'T> ?
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index a29f525b0f0..28aad0140d0 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -25,7 +25,7 @@ module internal PervasiveAutoOpens =
 
     val inline isNotNull: x:'a -> bool when 'a: null
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     val inline (|NonNullQuick|): 'T -> 'T when 'T : null
     val inline (|Null|NonNull|): 'T -> Choice when 'T : null
     val inline nonNull: x:'T -> 'T when 'T : null
diff --git a/src/fsharp/absil/ilnativeres.fs b/src/fsharp/absil/ilnativeres.fs
index 8a0ebe60cee..a9fa5ae2a63 100644
--- a/src/fsharp/absil/ilnativeres.fs
+++ b/src/fsharp/absil/ilnativeres.fs
@@ -29,7 +29,7 @@ let inline DWORD s = uint32 s
 let inline WCHAR s = char s
 let inline BYTE s = byte s
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 type ResourceException(name: string, ?inner: Exception) =
 #else
 type ResourceException(name: string, ?inner: Exception?) =
diff --git a/src/fsharp/absil/ilread.fs b/src/fsharp/absil/ilread.fs
index a6abaee5c89..8489dfdc90b 100644
--- a/src/fsharp/absil/ilread.fs
+++ b/src/fsharp/absil/ilread.fs
@@ -732,7 +732,7 @@ type GenericParamsIdx = GenericParamsIdx of numtypars: int * TypeOrMethodDefTag
 
 let mkCacheInt32 lowMem _inbase _nm _sz =
     if lowMem then (fun f x -> f x) else
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable cache = null
 #else
     let mutable cache : ConcurrentDictionary? = null // TODO NULLNESS: this explicit annotation should not be needed
@@ -758,7 +758,7 @@ let mkCacheInt32 lowMem _inbase _nm _sz =
 
 let mkCacheGeneric lowMem _inbase _nm _sz =
     if lowMem then (fun f x -> f x) else
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let mutable cache = null
 #else
     let mutable cache : ConcurrentDictionary<_, _>? = null // TODO NULLNESS: this explicit annotation should not be needed
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 3bf6a124be0..e585e31da58 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -388,7 +388,7 @@ let emEnv0 =
       emEntryPts = []
       delayedFieldInits = [] }
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type, typB, typeDef) =
 #else
 let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type?, typB, typeDef) =
@@ -765,7 +765,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
               parentT.GetMethod(mref.Name, cconv ||| BindingFlags.Public ||| BindingFlags.NonPublic,
                                 null,
                                 argTs,
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
                                 (null: ParameterModifier[]))
 #else
                                 (null:ParameterModifier[]?))
@@ -779,7 +779,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
     else
         queryableTypeGetMethodBySearch cenv emEnv parentT mref
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo =
 #else
 let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo? =
@@ -839,7 +839,7 @@ let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) :
     | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName), range0))
     | NonNull res -> res
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo =
 #else
 let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo? =
diff --git a/src/fsharp/absil/ilsign.fs b/src/fsharp/absil/ilsign.fs
index caf4ae8dbc1..ad802648e2a 100644
--- a/src/fsharp/absil/ilsign.fs
+++ b/src/fsharp/absil/ilsign.fs
@@ -150,7 +150,7 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
 
     let toCLRKeyBlob (rsaParameters: RSAParameters) (algId: int) : byte[] = 
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let validateRSAField (field: byte[]) expected (name: string) =
 #else
         let validateRSAField (field: byte[]?) expected (name: string) =
diff --git a/src/fsharp/absil/ilsupp.fs b/src/fsharp/absil/ilsupp.fs
index cf80049208f..199911ce39d 100644
--- a/src/fsharp/absil/ilsupp.fs
+++ b/src/fsharp/absil/ilsupp.fs
@@ -802,7 +802,7 @@ type ISymUnmanagedWriter2 =
     abstract GetDebugInfo: iDD: ImageDebugDirectory byref *
                           cData: int *
                           pcData: int byref *
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
                           []data : byte[] -> unit
 #else
                           []data : byte[]? -> unit
diff --git a/src/fsharp/fsi/console.fs b/src/fsharp/fsi/console.fs
index 6aff1a1d266..e7e939ae183 100644
--- a/src/fsharp/fsi/console.fs
+++ b/src/fsharp/fsi/console.fs
@@ -13,7 +13,7 @@ open System.Collections.Generic
 []
 module internal ConsoleOptions =
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
   // Shim to match nullness checking library support in preview
   let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #endif
@@ -45,7 +45,7 @@ type internal History() =
 
     member x.Clear() = list.Clear(); current <- -1
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member x.Add (line: string) =
 #else
     member x.Add (line: string?) = 
@@ -54,7 +54,7 @@ type internal History() =
         | Null | "" -> ()
         | NonNull line -> list.Add(line)
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member x.AddLast (line: string) =
 #else
     member x.AddLast (line: string?) =  
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index 1824156d3f0..58d0b4f8231 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -2270,7 +2270,7 @@ module internal MagicAssemblyResolution =
 
     let Install(tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput) =
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, _fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly = 
 #else
         let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, _fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly? = 
@@ -2403,7 +2403,7 @@ type internal FsiStdinLexerProvider
         let initialLightSyntaxStatus = tcConfigB.light <> Some false
         LightSyntaxStatus (initialLightSyntaxStatus, false (* no warnings *))
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string) =
 #else
     let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string?) =
@@ -2417,7 +2417,7 @@ type internal FsiStdinLexerProvider
             |  Some(Null) | None ->
                  if progress then fprintfn fsiConsoleOutput.Out "End of file from TextReader.ReadLine"
                  0
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
             | Some input ->
 #else
             | Some (NonNull input) ->
@@ -2435,7 +2435,7 @@ type internal FsiStdinLexerProvider
     // Reading stdin as a lex stream
     //----------------------------------------------------------------------------
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let removeZeroCharsFromString (str:string) =
 #else
     let removeZeroCharsFromString (str:string?) : string? =
diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs
index 611c890325e..b51cd6780fa 100644
--- a/src/fsharp/import.fs
+++ b/src/fsharp/import.fs
@@ -37,7 +37,7 @@ type AssemblyLoader =
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
 #else
     abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
diff --git a/src/fsharp/import.fsi b/src/fsharp/import.fsi
index c918bb148c2..595e563d3fc 100644
--- a/src/fsharp/import.fsi
+++ b/src/fsharp/import.fsi
@@ -27,7 +27,7 @@ type AssemblyLoader =
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
 #else
     abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index 99e2ed9b846..e49845df751 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -695,7 +695,7 @@ let OptionalArgInfoOfProvidedParameter (amap: Import.ImportMap) m (provParam : T
         NotOptional
 
 /// Compute the ILFieldInit for the given provided constant value for a provided enum type.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo) err = 
     match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase)),m) with 
     | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name),m),mi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m))   
diff --git a/src/fsharp/lib.fs b/src/fsharp/lib.fs
index d006a83a88f..73309884395 100755
--- a/src/fsharp/lib.fs
+++ b/src/fsharp/lib.fs
@@ -25,7 +25,7 @@ let condition s =
 
 let GetEnvInteger e dflt = match Environment.GetEnvironmentVariable(e) with null -> dflt | t -> try int t with _ -> dflt
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 let dispose (x: IDisposable) =
 #else
 let dispose (x: IDisposable?) = 
@@ -472,7 +472,7 @@ module internal AsyncUtil =
                         // Continuations that Async.FromContinuations provide do QUWI/SyncContext.Post,
                         // so the order is not overly relevant but still.
                         List.rev savedConts)
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
             let postOrQueue (sc: SynchronizationContext, cont) =
 #else
             let postOrQueue (sc: SynchronizationContext?, cont) =
diff --git a/src/fsharp/pars.fsy b/src/fsharp/pars.fsy
index fef0d78be34..c5936c8d7b9 100644
--- a/src/fsharp/pars.fsy
+++ b/src/fsharp/pars.fsy
@@ -1633,7 +1633,7 @@ tyconDefn:
        let (tcDefRepr:SynTypeDefnRepr), mWith ,members = $3 nameRange
        let declRange = unionRanges (rhs parseState 1) tcDefRepr.Range
        let mWhole = (declRange, members) ||> unionRangeWithListBy (fun (mem:SynMemberDefn) -> mem.Range)
-       let trivia: SynTypeDefnTrivia = { TypeKeyword = None; EqualsRange = $2; WithKeyword = mWith }
+       let trivia: SynTypeDefnTrivia = { TypeKeyword = None; EqualsRange = Some (rhs parseState 2); WithKeyword = mWith }
        SynTypeDefn($1, tcDefRepr, members, None, mWhole, trivia) }
 
   | typeNameInfo tyconDefnAugmentation
diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs
index 765a2b8c461..c9d5758f985 100644
--- a/src/fsharp/service/QuickParse.fs
+++ b/src/fsharp/service/QuickParse.fs
@@ -71,7 +71,7 @@ module QuickParse =
       | true, _, true when name.Length > 2 -> isValidStrippedName (name.AsSpan(1, name.Length - 2)) 0
       | _ -> false
     
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let GetCompleteIdentifierIslandImpl (lineStr: string) (index: int) : (string * int * bool) option =
 #else
     let GetCompleteIdentifierIslandImpl (lineStr: string?) (index: int) : (string * int * bool) option =
@@ -186,7 +186,7 @@ module QuickParse =
     let private defaultName = [], ""
 
     /// Get the partial long name of the identifier to the left of index.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let GetPartialLongName(lineStr: string, index: int) =
 #else
     let GetPartialLongName(lineStr: string?, index: int) =
@@ -231,7 +231,7 @@ module QuickParse =
 
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let GetPartialLongNameEx(lineStr: string, index: int) : PartialLongName =
 #else
     let GetPartialLongNameEx(lineStr: string?, index: int) : PartialLongName =
diff --git a/src/fsharp/service/QuickParse.fsi b/src/fsharp/service/QuickParse.fsi
index 22b6629cd25..57018400172 100644
--- a/src/fsharp/service/QuickParse.fsi
+++ b/src/fsharp/service/QuickParse.fsi
@@ -71,14 +71,14 @@ module public QuickParse =
     /// a call to `DeclItemsForNamesAtPosition` for intellisense. This will
     /// allow us to use find the correct qualified items rather than resorting
     /// to the more expensive and less accurate environment lookup.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string -> index: int -> (string * int * bool) option
 #else
     val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string? -> index: int -> (string * int * bool) option
 #endif
     
     /// Get the partial long name of the identifier to the left of index.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     val GetPartialLongName : lineStr: string * index: int -> string list * string
 #else
     val GetPartialLongName : lineStr: string? * index: int -> string list * string
@@ -86,7 +86,7 @@ module public QuickParse =
     
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     val GetPartialLongNameEx : lineStr: string * index: int -> PartialLongName
 #else
     val GetPartialLongNameEx : lineStr: string? * index: int -> PartialLongName
diff --git a/src/fsharp/symbols/Exprs.fs b/src/fsharp/symbols/Exprs.fs
index cedf7befe44..2fb76970cc1 100644
--- a/src/fsharp/symbols/Exprs.fs
+++ b/src/fsharp/symbols/Exprs.fs
@@ -523,7 +523,7 @@ module FSharpExprConvert =
     and ConvExprPrim (cenv: SymbolEnv) (env: ExprTranslationEnv) expr = 
         let g = cenv.g
         // Eliminate integer 'for' loops 
-       let expr = DetectAndOptimizeForEachExpression g OptimizeIntRangesOnly expr
+        let expr = DetectAndOptimizeForEachExpression g OptimizeIntRangesOnly expr
 
         // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need
         // complete inference types.
diff --git a/src/fsharp/tainted.fs b/src/fsharp/tainted.fs
index 2bdf6741984..381fb6af6d1 100644
--- a/src/fsharp/tainted.fs
+++ b/src/fsharp/tainted.fs
@@ -132,7 +132,7 @@ type internal Tainted<'T> (context: TaintedContext, value: 'T) =
         Tainted(context, u)
 
     member this.PApplyArray(f, methodName, range:range) =        
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let a : 'U[] = this.Protect f range
 #else
         let a : 'U[]? = this.Protect f range
@@ -168,7 +168,7 @@ type internal Tainted<'T> (context: TaintedContext, value: 'T) =
 
 module internal Tainted =
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure id)
 #else
diff --git a/src/fsharp/tainted.fsi b/src/fsharp/tainted.fsi
index 874a88a224d..c9aedaf6c9e 100644
--- a/src/fsharp/tainted.fsi
+++ b/src/fsharp/tainted.fsi
@@ -78,7 +78,7 @@ type internal Tainted<'T> =
     member PApplyWithProvider : ('T * ITypeProvider -> 'U) * range:range -> Tainted<'U>
 
     /// Apply an operation that returns an array. Unwrap array. Any exception will be attributed to the type provider with an error located at the given range.  String is method name of thing-returning-array, to diagnostically attribute if it is null
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     member PApplyArray : ('T -> 'U[]) * string * range:range -> Tainted<'U>[]
 #else
     member PApplyArray : ('T -> 'U[]?) * string * range:range -> Tainted<'U>[]
@@ -105,7 +105,7 @@ type internal Tainted<'T> =
 module internal Tainted =
 
     /// Test whether the tainted value is null
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
     val (|Null|NonNull|) : Tainted<'T> -> Choice> when 'T : null and 'T : not struct
 #else
     val (|Null|NonNull|) : Tainted<'T?> -> Choice> when 'T : not null and 'T : not struct
diff --git a/src/fsharp/utils/CompilerLocationUtils.fs b/src/fsharp/utils/CompilerLocationUtils.fs
index 9402036a12e..9d73674cc78 100644
--- a/src/fsharp/utils/CompilerLocationUtils.fs
+++ b/src/fsharp/utils/CompilerLocationUtils.fs
@@ -105,7 +105,7 @@ module internal FSharpEnvironment =
                         let mutable uType = REG_SZ;
                         let mutable cbData = maxDataLength;
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
                         let res = RegQueryValueExW(hkey, null, 0u, &uType, pathResult, &cbData);
 #else
                         let res = RegQueryValueExW(hkey, nonNull null, 0u, &uType, pathResult, &cbData); // TODO use of nonNull should not be required
diff --git a/src/fsharp/utils/FileSystem.fs b/src/fsharp/utils/FileSystem.fs
index 4b75721ec1b..0fcb48a4f80 100644
--- a/src/fsharp/utils/FileSystem.fs
+++ b/src/fsharp/utils/FileSystem.fs
@@ -358,7 +358,7 @@ module MemoryMappedFileExtensions =
                     stream.Position <- stream.Position + length
                 )
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 []
 module internal FileSystemHelpers =
     // Shim to match nullness checking library support in preview
@@ -533,7 +533,7 @@ type DefaultFileSystem() as this =
 
     abstract IsInvalidPathShim: path: string -> bool
     default _.IsInvalidPathShim(path: string) =
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let isInvalidPath(p: string) = 
 #else
         let isInvalidPath(p: string?) = 
@@ -542,7 +542,7 @@ type DefaultFileSystem() as this =
             | Null | "" -> true
             | NonNull p -> p.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let isInvalidFilename(p: string) = 
 #else
         let isInvalidFilename(p: string?) = 
@@ -551,7 +551,7 @@ type DefaultFileSystem() as this =
             | Null | "" -> true
             | NonNull p -> p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
         let isInvalidDirectory(d: string) = 
 #else
         let isInvalidDirectory(d: string?) = 
diff --git a/src/fsharp/utils/sformat.fs b/src/fsharp/utils/sformat.fs
index a790130b378..a3dc2a3e5aa 100644
--- a/src/fsharp/utils/sformat.fs
+++ b/src/fsharp/utils/sformat.fs
@@ -116,7 +116,7 @@ type IEnvironment =
     abstract MaxColumns: int
     abstract MaxRows: int
 
-#if BUILDING_WITH_LKG || BUILD_FROM_SOURCE || NO_CHECKNULLS
+#if NO_CHECKNULLS
 []
 module NullShim =
     // Shim to match nullness checking library support in preview
diff --git a/src/fsharp/xlf/FSComp.txt.cs.xlf b/src/fsharp/xlf/FSComp.txt.cs.xlf
index e62f2ee27c9..b1b0d6b7677 100644
--- a/src/fsharp/xlf/FSComp.txt.cs.xlf
+++ b/src/fsharp/xlf/FSComp.txt.cs.xlf
@@ -47,6 +47,11 @@
         Použití incr z knihovny F# je zastaralé. Více informací: https://aka.ms/fsharp-refcell-ops. Změňte prosím například incr cell na cell.Value <- cell.Value + 1.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         Atribut AssemblyKeyNameAttribute je zastaralý. Použijte místo něj AssemblyKeyFileAttribute.
@@ -62,6 +67,11 @@
         Dostupná přetížení:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Obecná konstrukce vyžaduje, aby byl parametr obecného typu známý jako typ struct nebo reference. Zvažte možnost přidat anotaci typu.
@@ -92,6 +102,11 @@
         Známý typ parametru: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Argument na indexu {0} neodpovídá
@@ -102,6 +117,21 @@
         Argument {0} neodpovídá
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Navržené sestavení poskytovatele typu {0} nešlo načíst ze složky {1}, protože chyběla závislost nebo ji nešlo načíst. Všechny závislosti tohoto sestavení se musí nacházet ve stejné složce jako toto sestavení. Ohlášená výjimka: {2} – {3}
@@ -117,6 +147,11 @@
         Atribut sestavení {0} odkazuje na navržené sestavení {1}, které se nedá načíst nebo neexistuje. Ohlášená výjimka: {2} – {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         další převody orientované na typ
@@ -202,6 +237,11 @@
         nepovinný zprostředkovatel komunikace s možnou hodnotou null
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         Otevřít deklaraci typu
@@ -417,6 +457,11 @@
         Vytiskněte odvozená rozhraní všech kompilovaných souborů do přidružených souborů podpisu.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Zobrazte si povolené hodnoty verze jazyka a pak zadejte požadovanou verzi, například latest nebo preview.
@@ -607,6 +652,11 @@
         Atributy nejde použít pro rozšíření typů.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         Syntaxe expr1[expr2] se používá pro indexování. Pokud chcete povolit indexování, zvažte možnost přidat anotaci typu, nebo pokud voláte funkci, přidejte mezeru, třeba expr1 [expr2].
@@ -732,6 +782,11 @@
         Hodnota {0} není funkce a nepodporuje zápis indexu.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         Syntaxe expr1[expr2] je při použití jako argument nejednoznačná. Více informací: https://aka.ms/fsharp-index-notation. Pokud plánujete indexování nebo vytváření řezů, musíte použít expr1.[expr2] na pozici argumentu. Pokud voláte funkci s vícenásobnými curryfikovanými argumenty, přidejte mezi ně mezeru, třeba someFunction expr1 [expr2].
@@ -792,6 +847,11 @@
         Tento výraz implicitně převede typ {0} na typ {1}. Přečtěte si téma https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Neplatný interpolovaný řetězec. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.de.xlf b/src/fsharp/xlf/FSComp.txt.de.xlf
index ba127a65ab8..d60b1b6bf1b 100644
--- a/src/fsharp/xlf/FSComp.txt.de.xlf
+++ b/src/fsharp/xlf/FSComp.txt.de.xlf
@@ -47,6 +47,11 @@
         Die Verwendung von "incr" aus der F#-Bibliothek ist veraltet. Siehe https://aka.ms/fsharp-refcell-ops. Ändern Sie z. B. "incr cell" in "cell.Value <- cell.Value + 1".
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         "AssemblyKeyNameAttribute" gilt als veraltet. Verwenden Sie stattdessen "AssemblyKeyFileAttribute".
@@ -62,6 +67,11 @@
         Verfügbare Überladungen:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Für ein generisches Konstrukt muss ein generischer Typparameter als Struktur- oder Verweistyp bekannt sein. Erwägen Sie das Hinzufügen einer Typanmerkung.
@@ -92,6 +102,11 @@
         Bekannter Typparameter: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Das Argument bei Index {0} stimmt nicht überein.
@@ -102,6 +117,21 @@
         Das Argument "{0}" stimmt nicht überein.
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Die Typanbieter-Designerassembly "{0}" konnte aus dem Ordner "{1}" nicht geladen werden, weil eine Abhängigkeit fehlte oder nicht geladen werden konnte. Alle Abhängigkeiten der Typanbieter-Designerassembly müssen sich in demselben Ordner wie die Assembly befinden. Gemeldete Ausnahme: {2} – {3}
@@ -117,6 +147,11 @@
         Das Assemblyattribut "{0}" verweist auf eine Designerassembly "{1}", die entweder nicht geladen werden kann oder nicht vorhanden ist. Gemeldete Ausnahme: {2} – {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         zusätzliche typgesteuerte Konvertierungen
@@ -202,6 +237,11 @@
         Interop, NULL-Werte zulassend, optional
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         Deklaration für offene Typen
@@ -417,6 +457,11 @@
         Drucken der abgeleiteten Schnittstellen aller Dateien an zugehörige Signaturdateien
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Zeigen Sie die zulässigen Werte für die Sprachversion an. Geben Sie die Sprachversion als "latest" oder "preview" an.
@@ -607,6 +652,11 @@
         Attribute können nicht auf Typerweiterungen angewendet werden.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         Die Syntax "expr1[expr2]" wird für die Indizierung verwendet. Fügen Sie ggf. eine Typanmerkung hinzu, um die Indizierung zu aktivieren, oder fügen Sie beim Aufrufen einer Funktion ein Leerzeichen hinzu, z. B. "expr1 [expr2]".
@@ -732,6 +782,11 @@
         Der Wert "{0}" ist keine Funktion und unterstützt keine Indexnotation.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         Die Syntax "expr1[expr2]" ist mehrdeutig, wenn sie als Argument verwendet wird. Siehe https://aka.ms/fsharp-index-notation. Wenn Sie indizieren oder aufteilen möchten, müssen Sie "expr1.[expr2]' in Argumentposition verwenden. Wenn Sie eine Funktion mit mehreren geschweiften Argumenten aufrufen, fügen Sie ein Leerzeichen dazwischen hinzu, z. B. "someFunction expr1 [expr2]".
@@ -792,6 +847,11 @@
         Dieser Ausdruck konvertiert den Typ "{0}" implizit in den Typ "{1}". Siehe https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Ungültige interpolierte Zeichenfolge. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.es.xlf b/src/fsharp/xlf/FSComp.txt.es.xlf
index c53f9a5af14..d7d389410f5 100644
--- a/src/fsharp/xlf/FSComp.txt.es.xlf
+++ b/src/fsharp/xlf/FSComp.txt.es.xlf
@@ -47,6 +47,11 @@
         El uso de "incr" de la biblioteca de F# está en desuso. Vea https://aka.ms/fsharp-refcell-ops. Por ejemplo, cambie "incr cell" a "cell.Value <- cell.Value + 1".
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         El elemento "AssemblyKeyNameAttribute" está en desuso. Use "AssemblyKeyFileAttribute" en su lugar.
@@ -62,6 +67,11 @@
         Sobrecargas disponibles:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Una construcción genérica requiere que un parámetro de tipo genérico se conozca como tipo de referencia o estructura. Puede agregar una anotación de tipo.
@@ -92,6 +102,11 @@
         Parámetro de tipo conocido: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         El argumento del índice {0} no coincide.
@@ -102,6 +117,21 @@
         El argumento "{0}" no coincide.
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         No se pudo cargar el ensamblado del diseñador de proveedores de tipos "{0}" desde la carpeta "{1}" porque falta una dependencia o no se pudo cargar. Todas las dependencias del ensamblado del diseñador de proveedores de tipos deben encontrarse en la misma carpeta que el ensamblado. Se notificó la excepción: {2} - {3}.
@@ -117,6 +147,11 @@
         El atributo de ensamblado "{0}" hace referencia a un ensamblado de diseñador "{1}" que no se puede cargar o no existe. Se notificó la excepción: {2} - {3}.
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         conversiones adicionales dirigidas a tipos
@@ -202,6 +237,11 @@
         interoperabilidad opcional que admite valores NULL
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         declaración de tipo abierto
@@ -417,6 +457,11 @@
         Imprimir las interfaces deducidas de todos los archivos de compilación en los archivos de signatura asociados
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Mostrar los valores permitidos para la versión de idioma, especificar la versión de idioma como "latest" "preview"
@@ -607,6 +652,11 @@
         Los atributos no se pueden aplicar a las extensiones de tipo.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         La sintaxis "expr1[expr2]" se usa para la indexación. Considere la posibilidad de agregar una anotación de tipo para habilitar la indexación, si se llama a una función, agregue un espacio, por ejemplo, "expr1 [expr2]".
@@ -732,6 +782,11 @@
         El valor "{0}" no es una función y no admite la notación de índices.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         La sintaxis "expr1[expr2]" es ambigua cuando se usa como argumento. Vea https://aka.ms/fsharp-index-notation. Si piensa indexar o segmentar, debe usar "expr1.[expr2]" en la posición del argumento. Si se llama a una función con varios argumentos currificados, se agregará un espacio entre ellos, por ejemplo, "unaFunción expr1 [expr2]".
@@ -792,6 +847,11 @@
         Esta expresión convierte implícitamente el tipo '{0}' al tipo '{1}'. Consulte https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Cadena interpolada no válida. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.fr.xlf b/src/fsharp/xlf/FSComp.txt.fr.xlf
index 7b1783dc3ed..79903dbea99 100644
--- a/src/fsharp/xlf/FSComp.txt.fr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.fr.xlf
@@ -47,6 +47,11 @@
         L’utilisation de « incr » à partir de la bibliothèque F# est déconseillée. Voir https://aka.ms/fsharp-refcell-ops. Par exemple, veuillez remplacer « incr cell » par « cell.Value <- cell.Value + 1 ».
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' a été déprécié. Utilisez 'AssemblyKeyFileAttribute' à la place.
@@ -62,6 +67,11 @@
         Surcharges disponibles :\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         L'utilisation d'une construction générique est possible uniquement si un paramètre de type générique est connu en tant que type struct ou type référence. Ajoutez une annotation de type.
@@ -92,6 +102,11 @@
         Paramètre de type connu : {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         L'argument à l'index {0} ne correspond pas
@@ -102,6 +117,21 @@
         L'argument '{0}' ne correspond pas
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Impossible de charger l'assembly de concepteur de fournisseur de type '{0}' à partir du dossier '{1}', car une dépendance est manquante ou n'a pas pu être chargée. Toutes les dépendances de l'assembly de concepteur de fournisseur de type doivent se trouver dans le même dossier que cet assembly. Exception signalée : {2} - {3}
@@ -117,6 +147,11 @@
         L'attribut d'assembly '{0}' fait référence à un assembly de concepteur '{1}' qui ne peut pas être chargé ou qui n'existe pas. Exception signalée : {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         conversions supplémentaires dirigées vers le type
@@ -202,6 +237,11 @@
         interopérabilité facultative pouvant accepter une valeur null
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         déclaration de type ouverte
@@ -417,6 +457,11 @@
         Imprimer les interfaces inférées de tous les fichiers de compilation sur les fichiers de signature associés
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Afficher les valeurs autorisées pour la version du langage, spécifier la version du langage comme 'dernière' ou 'préversion'
@@ -607,6 +652,11 @@
         Impossible d'appliquer des attributs aux extensions de type.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         La syntaxe « expr1[expr2] » est utilisée pour l’indexation. Envisagez d’ajouter une annotation de type pour activer l’indexation, ou si vous appelez une fonction, ajoutez un espace, par exemple « expr1 [expr2] ».
@@ -732,6 +782,11 @@
         La valeur « {0} » n’est pas une fonction et ne prend pas en charge la notation d’index.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         La syntaxe « expr1[expr2] » est ambiguë lorsqu’elle est utilisée comme argument. Voir https://aka.ms/fsharp-index-notation. Si vous avez l’intention d’indexer ou de découper, vous devez utiliser « expr1.[expr2] » en position d’argument. Si vous appelez une fonction avec plusieurs arguments codés, ajoutez un espace entre eux, par exemple « someFunction expr1 [expr2] ».
@@ -792,6 +847,11 @@
         Cette expression convertit implicitement le type « {0} » en type « {1} ». Voir https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Chaîne interpolée non valide. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.it.xlf b/src/fsharp/xlf/FSComp.txt.it.xlf
index 20f85121269..a47b959e368 100644
--- a/src/fsharp/xlf/FSComp.txt.it.xlf
+++ b/src/fsharp/xlf/FSComp.txt.it.xlf
@@ -47,6 +47,11 @@
         L'uso di 'incr' dalla libreria F # è deprecato. Vedere https://aka.ms/fsharp-refcell-ops. Ad esempio, modificare 'incr cell' in 'cell.Value <- cell.Value + 1'.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         L'attributo 'AssemblyKeyNameAttribute' è deprecato. In alternativa, usare 'AssemblyKeyFileAttribute'.
@@ -62,6 +67,11 @@
         Overload disponibili:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Un costrutto generico richiede che un parametro di tipo generico sia noto come tipo riferimento o struct. Provare ad aggiungere un'annotazione di tipo.
@@ -92,6 +102,11 @@
         Parametro di tipo noto: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         L'argomento alla posizione di indice {0} non corrisponde
@@ -102,6 +117,21 @@
         L'argomento '{0}' non corrisponde
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Non è stato possibile caricare l'assembly '{0}' della finestra di progettazione del provider di tipi dalla cartella '{1}' perché una dipendenza non è presente o non è stato possibile caricarla. Tutte le dipendenze dell'assembly della finestra di progettazione del provider di tipi devono trovarsi nella stessa cartella dell'assembly. L'eccezione restituita è {2} - {3}
@@ -117,6 +147,11 @@
         L'attributo di assembly '{0}' fa riferimento a un assembly '{1}' della finestra di progettazione che non è stato caricato o non esiste. L'eccezione restituita è {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         conversioni aggiuntive dirette ai tipi
@@ -202,6 +237,11 @@
         Interop facoltativo nullable
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         dichiarazione di tipo aperto
@@ -417,6 +457,11 @@
         Stampare le interfacce derivate di tutti i file di compilazione nei file di firma associati
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Visualizza i valori consentiti per la versione del linguaggio. Specificare la versione del linguaggio, ad esempio 'latest' o 'preview'
@@ -607,6 +652,11 @@
         Gli attributi non possono essere applicati a estensioni di tipo.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         La sintassi 'expr1[expr2]' viene usata per l'indicizzazione. Provare ad aggiungere un'annotazione di tipo per abilitare l'indicizzazione oppure se la chiamata a una funzione aggiunge uno spazio, ad esempio 'expr1 [expr2]'.
@@ -732,6 +782,11 @@
         Questo valore '{0}' non è una funzione e non supporta la notazione degli indici.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         La sintassi 'expr1[expr2]' è ambigua se usata come argomento. Vedere https://aka.ms/fsharp-index-notation. Se si intende eseguire l'indicizzazione o il sezionamento, è necessario usare 'expr1.[expr2]' nella posizione dell'argomento. Se si chiama una funzione con più argomenti sottoposti a corsi, aggiungere uno spazio tra di essi, ad esempio 'someFunction expr1 [expr2]'.
@@ -792,6 +847,11 @@
         Questa espressione converte in modo implicito il tipo '{0}' nel tipo '{1}'. Vedere https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         La stringa interpolata non è valida. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.ja.xlf b/src/fsharp/xlf/FSComp.txt.ja.xlf
index be9dfed2e2a..86de00d942f 100644
--- a/src/fsharp/xlf/FSComp.txt.ja.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ja.xlf
@@ -47,6 +47,11 @@
         F# ライブラリからの 'incr' の使用は非推奨です。https://aka.ms/fsharp-refcell-ops を参照してください。たとえば、'incr cell' を 'cell.Value <- cell.Value +1' に変えてください。
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' は非推奨になりました。代わりに 'AssemblyKeyFileAttribute' を使用してください。
@@ -62,6 +67,11 @@
         使用可能なオーバーロード:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         ジェネリック コンストラクトでは、ジェネリック型パラメーターが構造体または参照型として認識されている必要があります。型の注釈の追加を検討してください。
@@ -92,6 +102,11 @@
         既知の型パラメーター: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         インデックス {0} の引数が一致しません
@@ -102,6 +117,21 @@
         引数 '{0}' が一致しません
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         依存関係がないか、または読み込めなかったため、型プロバイダーのデザイナー アセンブリ '{0}' をフォルダー '{1}' から読み込めませんでした。型プロバイダーのデザイナー アセンブリのすべての依存関係は、そのアセンブリと同じフォルダーに配置されている必要があります。次の例外が報告されました: {2} - {3}
@@ -117,6 +147,11 @@
         アセンブリ属性 '{0}' は、デザイナー アセンブリ '{1}' を参照していますが、これは読み込むことができないか、存在していません。報告された例外: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         その他の型指定された変換
@@ -202,6 +237,11 @@
         Null 許容のオプションの相互運用
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         オープン型宣言
@@ -417,6 +457,11 @@
         すべてのコンパイル ファイルの推定されたインターフェイスを関連する署名ファイルに印刷します
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         言語バージョンで許可された値を表示し、'最新' や 'プレビュー' などの言語バージョンを指定する
@@ -607,6 +652,11 @@
         属性を型拡張に適用することはできません。
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         構文 'expr1[expr2]' はインデックス作成に使用されます。インデックスを有効にするために型の注釈を追加するか、関数を呼び出す場合には、'expr1 [expr2]' のようにスペースを入れます。
@@ -732,6 +782,11 @@
         値 '{0}' は関数ではなく、インデックス表記をサポートしていません。
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         構文 'expr1[expr2]' は引数として使用されている場合、あいまいです。https://aka.ms/fsharp-index-notation を参照してください。インデックス作成またはスライスを行う場合は、'expr1.[expr2]' を引数の位置に使用する必要があります。複数のカリー化された引数を持つ関数を呼び出す場合は、'expr1 [expr2]' のように間にスペースを追加します。
@@ -792,6 +847,11 @@
         この式は、型 '{0}' を型 '{1}' に暗黙的に変換します。https://aka.ms/fsharp-implicit-convs を参照してください。
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         補間された文字列が無効です。{0}
diff --git a/src/fsharp/xlf/FSComp.txt.ko.xlf b/src/fsharp/xlf/FSComp.txt.ko.xlf
index 220ac33630b..5b9d1570661 100644
--- a/src/fsharp/xlf/FSComp.txt.ko.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ko.xlf
@@ -47,6 +47,11 @@
         F# 라이브러리의 'incr' 사용은 더 이상 사용되지 않습니다. https://aka.ms/fsharp-refcell-ops를 참조하세요. 예를 들어 'incr cell'을 'cell.Value <- cell.Value + 1'로 변경하세요.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute'는 사용되지 않습니다. 대신 'AssemblyKeyFileAttribute'를 사용하세요.
@@ -62,6 +67,11 @@
         사용 가능한 오버로드:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         제네릭 구문을 사용하려면 구조체 또는 참조 형식의 제네릭 형식 매개 변수가 필요합니다. 형식 주석을 추가하세요.
@@ -92,6 +102,11 @@
         알려진 형식 매개 변수: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         인덱스 {0}의 인수가 일치하지 않습니다.
@@ -102,6 +117,21 @@
         '{0}' 인수가 일치하지 않습니다.
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         종속성이 없거나 로드되지 않았으므로 '{0}' 형식 공급자 디자이너 어셈블리를 '{1}' 폴더에서 로드할 수 없습니다. 형식 공급자 디자이너 어셈블리의 모든 종속성은 해당 어셈블리와 동일한 폴더에 있어야 합니다. 보고된 예외: {2} - {3}
@@ -117,6 +147,11 @@
         '{0}' 어셈블리 특성이 로드할 수 없거나 존재하지 않는 디자이너 어셈블리'{1}'을(를) 참조합니다. 보고된 예외: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         추가 형식-디렉션 변환
@@ -202,6 +237,11 @@
         nullable 선택적 interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         개방형 형식 선언
@@ -417,6 +457,11 @@
         모든 컴파일 파일의 유추된 인터페이스를 관련 서명 파일로 인쇄합니다.
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         언어 버전의 허용된 값을 표시하고 '최신' 또는 '미리 보기'와 같은 언어 버전을 지정합니다.
@@ -607,6 +652,11 @@
         형식 확장에 특성을 적용할 수 없습니다.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         인덱싱에는 'expr1[expr2]' 구문이 사용됩니다. 인덱싱을 사용하도록 설정하기 위해 형식 주석을 추가하는 것을 고려하거나 함수를 호출하는 경우 공백을 추가하세요(예: 'expr1 [expr2]').
@@ -732,6 +782,11 @@
         '{0}' 값은 함수가 아니며 인덱스 표기법을 지원하지 않습니다.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         'expr1[expr2]' 구문은 인수로 사용될 때 모호합니다. https://aka.ms/fsharp-index-notation을 참조하세요. 인덱싱이나 슬라이싱을 하려면 인수 위치에 'expr1.[expr2]'를 사용해야 합니다. 여러 개의 커리된 인수로 함수를 호출하는 경우 그 사이에 공백을 추가하세요(예: 'someFunction expr1 [expr2]').
@@ -792,6 +847,11 @@
         이 식은 암시적으로 '{0}' 형식을 '{1}' 형식으로 변환 합니다. https://aka.ms/fsharp-implicit-convs 참조
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         잘못된 보간 문자열. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.pl.xlf b/src/fsharp/xlf/FSComp.txt.pl.xlf
index 8c20b84069f..96fe63f2de9 100644
--- a/src/fsharp/xlf/FSComp.txt.pl.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pl.xlf
@@ -47,6 +47,11 @@
         Użycie elementu „incr" z biblioteki języka F# jest przestarzałe. Zobacz https://aka.ms/fsharp-refcell-ops. Na przykład zmień wyrażenie „incr cell” na „cell.Value <- cell.Value + 1”.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         Element „AssemblyKeyNameAttribute” jest przestarzały. Zamiast niego użyj elementu „AssemblyKeyFileAttribute”.
@@ -62,6 +67,11 @@
         Dostępne przeciążenia:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Konstrukcja ogólna wymaga, aby parametr typu ogólnego był znany jako struktura lub typ referencyjny. Rozważ dodanie adnotacji typu.
@@ -92,6 +102,11 @@
         Parametr znanego typu: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Argument pod indeksem {0} nie jest zgodny
@@ -102,6 +117,21 @@
         Argument „{0}” nie jest zgodny
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Nie można załadować zestawu projektanta dostawców typów „{0}” z folderu „{1}”, ponieważ brakuje zależności lub nie można jej załadować. Wszystkie zależności zestawu projektanta dostawców typów muszą znajdować się w tym samym folderze co ten zestaw. Zgłoszony wyjątek: {2} — {3}
@@ -117,6 +147,11 @@
         Atrybut zestawu „{0}” odwołuje się do zestawu projektanta „{1}”, którego nie można załadować lub który nie istnieje. Zgłoszony wyjątek: {2} — {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         dodatkowe konwersje ukierunkowane na typ
@@ -202,6 +237,11 @@
         opcjonalna międzyoperacyjność dopuszczająca wartość null
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         deklaracja typu otwartego
@@ -417,6 +457,11 @@
         Drukowanie wywnioskowanych interfejsów wszystkich plików kompilacji do skojarzonych plików sygnatur
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Wyświetl dozwolone wartości dla wersji językowej; określ wersję językową, np. „latest” lub „preview”
@@ -607,6 +652,11 @@
         Atrybutów nie można stosować do rozszerzeń typu.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         Do indeksowania używana jest składnia „expr1[expr2]”. Rozważ dodanie adnotacji typu, aby umożliwić indeksowanie, lub jeśli wywołujesz funkcję dodaj spację, np. „expr1 [expr2]”.
@@ -732,6 +782,11 @@
         Wartość elementu „{0}” nie jest funkcją i nie obsługuje notacji indeksowej.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         Składnia wyrażenia „expr1[expr2]” jest niejednoznaczna, gdy jest używana jako argument. Zobacz https://aka.ms/fsharp-index-notation. Jeśli zamierzasz indeksować lub fragmentować, to w pozycji argumentu musi być użyte wyrażenie „expr1.[expr2]”. Jeśli wywołujesz funkcję z wieloma argumentami typu curried, dodaj spację między nimi, np. „someFunction expr1 [expr2]”.
@@ -792,6 +847,11 @@
         To wyrażenie bezwzględnie konwertuje typ "{0}" na typ "{1}". Zobacz https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Nieprawidłowy ciąg interpolowany. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
index 0d8de614d17..7ca2ec37a69 100644
--- a/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
+++ b/src/fsharp/xlf/FSComp.txt.pt-BR.xlf
@@ -47,6 +47,11 @@
         O uso de 'incr' da biblioteca F# foi preterido. Consulte https://aka.ms/fsharp-refcell-ops. Por exemplo, altere a célula 'incr célula' para 'cell.Value <- cell.Value + 1'.
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         O 'AssemblyKeyNameAttribute' foi preterido. Use o 'AssemblyKeyFileAttribute'.
@@ -62,6 +67,11 @@
         Sobrecargas disponíveis:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Um constructo genérico exige que um parâmetro de tipo genérico seja conhecido como um tipo de referência ou struct. Considere adicionar uma anotação de tipo.
@@ -92,6 +102,11 @@
         Parâmetro de tipo conhecido: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         O argumento no índice {0} não corresponde
@@ -102,6 +117,21 @@
         O argumento '{0}' não corresponde
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Não foi possível carregar o assembly do designer do provedor de tipos '{0}' da pasta '{1}' porque uma dependência estava ausente ou não pôde ser carregada. Todas as dependências do assembly do designer do provedor de tipos precisam estar localizadas na mesma pasta que esse assembly. A exceção relatada foi: {2} – {3}
@@ -117,6 +147,11 @@
         O atributo de assembly '{0}' refere-se a um assembly de designer '{1}' que não pode ser carregado ou que não existe. A exceção relatada foi {2} – {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         conversões direcionadas por tipos adicionais
@@ -202,6 +237,11 @@
         interoperabilidade opcional anulável
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         declaração de tipo aberto
@@ -417,6 +457,11 @@
         Imprimir as interfaces inferidas de todos os arquivos de compilação para os arquivos de assinatura associados
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Exibe os valores permitidos para a versão do idioma, especifica a versão do idioma, como 'mais recente ' ou 'prévia'
@@ -607,6 +652,11 @@
         Os atributos não podem ser aplicados às extensões de tipo.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         A sintaxe 'expr1[expr2]' é usada para indexação. Considere adicionar uma anotação de tipo para habilitar a indexação ou, se chamar uma função, adicione um espaço, por exemplo, 'expr1 [expr2]'.
@@ -732,6 +782,11 @@
         O valor '{0}' não é uma função e não dá suporte à notação de índice.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         A sintaxe '[expr1][expr2]' é ambígua quando usada como um argumento. Consulte https://aka.ms/fsharp-index-notation. Se você pretende indexar ou colocar em fatias, deve usar '(expr1).[expr2]' na posição do argumento. Se chamar uma função com vários argumentos na forma curried, adicione um espaço entre eles, por exemplo, 'someFunction [expr1] [expr2]'.
@@ -792,6 +847,11 @@
         Essa expressão converte implicitamente o tipo '{0}' ao tipo '{1}'. Consulte https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Cadeia de caracteres interpolada inválida. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.ru.xlf b/src/fsharp/xlf/FSComp.txt.ru.xlf
index 14372c25312..986bd1b054a 100644
--- a/src/fsharp/xlf/FSComp.txt.ru.xlf
+++ b/src/fsharp/xlf/FSComp.txt.ru.xlf
@@ -47,6 +47,11 @@
         Использование "incr" из библиотеки F# не рекомендуется. См. https://aka.ms/fsharp-refcell-ops. Например, замените "incr cell" на "cell.Value <- cell.Value + 1".
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         Атрибут "AssemblyKeyNameAttribute" является устаревшим. Используйте вместо него атрибут "AssemblyKeyFileAttribute".
@@ -62,6 +67,11 @@
         Доступные перегрузки:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         В универсальной конструкции требуется использовать параметр универсального типа, известный как структура или ссылочный тип. Рекомендуется добавить заметку с типом.
@@ -92,6 +102,11 @@
         Известный параметр типа: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         Аргумент в индексе {0} не соответствует
@@ -102,6 +117,21 @@
         Аргумент "{0}" не соответствует
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         Не удалось загрузить сборку конструктора поставщика типа "{0}" из папки "{1}", так как зависимость отсутствует или не может быть загружена. Все зависимости для сборки конструктора поставщика типа должны находиться в папке сборки. Получено исключение: {2} — {3}
@@ -117,6 +147,11 @@
         Атрибут сборки "{0}" ссылается на сборку конструктора "{1}", которая не может быть загружена или не существует. Получено исключение: {2} — {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         дополнительные преобразования на основе типа
@@ -202,6 +237,11 @@
         необязательное взаимодействие, допускающее значение NULL
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         объявление открытого типа
@@ -417,6 +457,11 @@
         Печать определяемых интерфейсов всех файлов компиляции в связанные файлы подписей
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Отображение допустимых значений для версии языка. Укажите версию языка, например, "latest" или "preview".
@@ -607,6 +652,11 @@
         Атрибуты не могут быть применены к расширениям типа.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         Для индексирования используется синтаксис "expr1[expr2]". Рассмотрите возможность добавления аннотации типа для включения индексации или при вызове функции добавьте пробел, например "expr1 [expr2]".
@@ -732,6 +782,11 @@
         Значение {0} не является функцией и не поддерживает нотацию индекса.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         Синтаксис "expr1[expr2]" неоднозначен при использовании в качестве аргумента. См. https://aka.ms/fsharp-index-notation. Если вы намереваетесь индексировать или разрезать, необходимо использовать "expr1.[expr2]" в позиции аргумента. При вызове функции с несколькими каррированными аргументами добавьте пробел между ними, например "someFunction expr1 [expr2]".
@@ -792,6 +847,11 @@
         Это выражение неявно преобразует тип "{0}" в тип "{1}". См. сведения на странице https://aka.ms/fsharp-implicit-convs.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Недопустимая интерполированная строка. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.tr.xlf b/src/fsharp/xlf/FSComp.txt.tr.xlf
index 647ac274fb3..8cabd530653 100644
--- a/src/fsharp/xlf/FSComp.txt.tr.xlf
+++ b/src/fsharp/xlf/FSComp.txt.tr.xlf
@@ -47,6 +47,11 @@
         F# kitaplığından “incr” kullanımı kullanım dışı. https://aka.ms/fsharp-refcell-ops’a bakın. Örneğin, lütfen “incr cell”i “cell.Value <- cell.Value + 1” olarak değiştirin
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' kullanım dışı bırakıldı. Bunun yerine 'AssemblyKeyFileAttribute' kullanın.
@@ -62,6 +67,11 @@
         Kullanılabilir aşırı yüklemeler:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         Genel yapı, genel bir tür parametresinin yapı veya başvuru türü olarak bilinmesini gerektirir. Tür ek açıklaması eklemeyi düşünün.
@@ -92,6 +102,11 @@
         Bilinen tür parametresi: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         {0} dizinindeki bağımsız değişken eşleşmiyor
@@ -102,6 +117,21 @@
         '{0}' bağımsız değişkeni eşleşmiyor
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         '{0}' tür sağlayıcısı tasarımcı bütünleştirilmiş kodu, bir bağımlılık eksik olduğundan veya yüklenemediğinden '{1}' klasöründen yüklenemedi. Tür sağlayıcısı tasarımcısı bütünleştirilmiş kodunun tüm bağımlılıkları, ilgili bütünleştirilmiş kodun bulunduğu klasörde bulunmalıdır. Bildirilen özel durum: {2} - {3}
@@ -117,6 +147,11 @@
         '{0}' bütünleştirilmiş kod özniteliği, yüklenemeyen veya mevcut olmayan '{1}' tasarımcı bütünleştirilmiş koduna başvuruyor. Bildirilen özel durum: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         ek tür ile yönlendirilen dönüştürmeler
@@ -202,6 +237,11 @@
         null atanabilir isteğe bağlı birlikte çalışma
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         açık tür bildirimi
@@ -417,6 +457,11 @@
         Tüm derleme dosyalarının çıkarsanan arabirimlerini ilişkili imza dosyalarına yazdır
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         Dil sürümü için izin verilen değerleri görüntüleyin, dil sürümünü 'en son' veya 'önizleme' örneklerindeki gibi belirtin
@@ -607,6 +652,11 @@
         Öznitelikler tür uzantılarına uygulanamaz.
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         Söz dizimi “expr1[expr2]” dizin oluşturma için kullanılıyor. Dizin oluşturmayı etkinleştirmek için bir tür ek açıklama eklemeyi düşünün veya bir işlev çağırıyorsanız bir boşluk ekleyin, örn. “expr1 [expr2]”.
@@ -732,6 +782,11 @@
         “{0}” değeri bir işlev değildir ve dizin gösterimini desteklemez.
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         Söz dizimi “expr1[expr2]” artık dizin oluşturma için ayrılmıştır ve bağımsız değişken olarak kullanıldığında belirsizdir. https://aka.ms/fsharp-index-notation'a bakın. Dizin oluşturmayı veya dilimlemeyi düşünüyorsanız, bağımsız değişken konumunda “expr1.[expr2]” kullanmalısınız. Birden çok curry bağımsız değişkenli bir işlev çağırıyorsanız, aralarına bir boşluk ekleyin, örn. “someFunction expr1 [expr2]”.
@@ -792,6 +847,11 @@
         Bu ifade '{0}' türünü örtülü olarak '{1}' türüne dönüştürür. https://aka.ms/fsharp-implicit-convs adresine bakın.
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         Geçersiz düz metin arasına kod eklenmiş dize. {0}
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
index a04b1d827ab..ed011213fcd 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hans.xlf
@@ -47,6 +47,11 @@
         已弃用 F# 库中的“incr”。请参阅 https://aka.ms/fsharp-refcell-ops。 例如，请将“incr cell”更改为“cell.Value <- cell.Value + 1”。
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         "AssemblyKeyNameAttribute" 已被弃用。请改为使用 "AssemblyKeyFileAttribute"。
@@ -62,6 +67,11 @@
         可用重载:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         泛型构造要求泛型类型参数被视为结构或引用类型。请考虑添加类型注释。
@@ -92,6 +102,11 @@
         已知类型参数: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         索引 {0} 处的参数不匹配
@@ -102,6 +117,21 @@
         参数 "{0}" 不匹配
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         无法从文件夹“{1}”加载类型提供程序设计器程序集“{0}”，因为依赖项缺失或无法加载。类型提供程序设计器程序集的所有依赖项必须与该程序集位于同一文件夹中。报告的异常是: {2} - {3}
@@ -117,6 +147,11 @@
         程序集属性“{0}”引用了无法加载或不存在的设计器程序集“{1}”。报告的异常是: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         附加类型定向转换
@@ -202,6 +237,11 @@
         可以为 null 的可选互操作
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         开放类型声明
@@ -417,6 +457,11 @@
         将所有编译文件的推断接口打印到关联的签名文件
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         显示语言版本的允许值，指定语言版本，如“最新”或“预览”
@@ -607,6 +652,11 @@
         属性不可应用于类型扩展。
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         语法“expr1[expr2]”用于索引。考虑添加类型批注来启用索引，或者在调用函数添加空格，例如“expr1 [expr2]”。
@@ -732,6 +782,11 @@
         值 '{0}' 不是函数，不支持索引表示法。
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         语法“expr1[expr2]”用作参数时不明确。请参阅 https://aka.ms/fsharp-index-notation。如果要索引或切片，则必须在参数位置使用“expr1.[expr2]”。如果使用多个扩充参数调用函数，请在它们之间添加空格，例如“someFunction expr1 [expr2]”。
@@ -792,6 +847,11 @@
         此表达式将类型“{0}”隐式转换为类型“{1}”。请参阅 https://aka.ms/fsharp-implicit-convs。
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         内插字符串无效。{0}
diff --git a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
index 26e278c8709..6851db14ab0 100644
--- a/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSComp.txt.zh-Hant.xlf
@@ -47,6 +47,11 @@
         透過 F# 程式庫使用 'incr' 的方式已淘汰。請參閱 https://aka.ms/fsharp-refcell-ops。舉例來說，請將 'incr cell' 變更為 'cell.Value <- cell.Value + 1'。
         
       
+      
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        Nullness warning. The 'DefaultValue' attribute is used but the type (or one of its fields if a struct) is non-nullable.
+        
+      
       
         The 'AssemblyKeyNameAttribute' has been deprecated. Use 'AssemblyKeyFileAttribute' instead.
         'AssemblyKeyNameAttribute' 已淘汰。請改用 'AssemblyKeyFileAttribute'。
@@ -62,6 +67,11 @@
         可用的多載:\n{0}
         
       
+      
+        The constraints 'delegate' and 'comparison' are inconsistent
+        The constraints 'delegate' and 'comparison' are inconsistent
+        
+      
       
         A generic construct requires that a generic type parameter be known as a struct or reference type. Consider adding a type annotation.
         泛型建構要求泛型型別參數必須指定為結構或參考型別。請考慮新增型別註解。
@@ -92,6 +102,11 @@
         已知的型別參數: {0}
         
       
+      
+        The constraints 'null' and 'not null' are inconsistent
+        The constraints 'null' and 'not null' are inconsistent
+        
+      
       
         Argument at index {0} doesn't match
         位於索引 {0} 的引數不相符
@@ -102,6 +117,21 @@
         引數 '{0}' 不相符
         
       
+      
+        The constraints 'struct' and 'null' are inconsistent
+        The constraints 'struct' and 'null' are inconsistent
+        
+      
+      
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        The type '{0}' has 'null' as an extra value but a constraint does not permit this
+        
+      
+      
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        The type '{0}' has 'null' as a true representation value but a constraint does not permit this
+        
+      
       
         The type provider designer assembly '{0}' could not be loaded from folder '{1}' because a dependency was missing or could not loaded. All dependencies of the type provider designer assembly must be located in the same folder as that assembly. The exception reported was: {2} - {3}
         因為缺少相依性或相依性無法載入，導致無法從資料夾 '{1}' 載入類型提供者設計工具組件 '{0}'。類型提供者設計工具組件的所有相依性都必須位於該組件所在的資料夾內。回報的例外狀況: {2} - {3}
@@ -117,6 +147,11 @@
         無法載入組件屬性 '{0}' 參考的設計工具組件 '{1}' 或其不存在。回報的例外狀況: {2} - {3}
         
       
+      
+        {0} for F# {1}
+        {0} for F# {1}
+        
+      
       
         additional type-directed conversions
         其他類型導向轉換
@@ -202,6 +237,11 @@
         可為 Null 的選擇性 Interop
         
       
+      
+        nullness checking
+        nullness checking
+        
+      
       
         open type declaration
         開放式類型宣告
@@ -417,6 +457,11 @@
         將所有編譯檔案的推斷介面列印至相關聯的簽章檔案
         
       
+      
+        Enable nullness declarations and checks
+        Enable nullness declarations and checks
+        
+      
       
         Display the allowed values for language version, specify language version such as 'latest' or 'preview'
         顯示語言版本允許的值，指定 'latest' 或 'preview' 等語言版本
@@ -607,6 +652,11 @@
         屬性無法套用到類型延伸模組。
         
       
+      
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        Nullness warning. The default constructor of a struct type is required but one of the fields of struct type is non-nullable.
+        
+      
       
         The syntax 'expr1[expr2]' is used for indexing. Consider adding a type annotation to enable indexing, or if calling a function add a space, e.g. 'expr1 [expr2]'.
         語法 'expr1[expr2]' 已用於編製索引。請考慮新增類型註釋來啟用編製索引，或是呼叫函式並新增空格，例如 'expr1 [expr2]'。
@@ -732,6 +782,11 @@
         值 '{0}' 並非函式，不支援索引標記法。
         
       
+      
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        The 'nullness checking' language feature is not enabled. This use of a nullness checking construct will be ignored.
+        
+      
       
         The syntax 'expr1[expr2]' is ambiguous when used as an argument. See https://aka.ms/fsharp-index-notation. If you intend indexing or slicing then you must use 'expr1.[expr2]' in argument position. If calling a function with multiple curried arguments, add a space between them, e.g. 'someFunction expr1 [expr2]'.
         語法 'expr1[expr2]' 用作引數時不明確。請參閱 https://aka.ms/fsharp-index-notation。如果您要編製索引或切割，則必須在引數位置使用 'expr1.[expr2]'。如果要呼叫具有多個調用引數的函式，請在它們之間新增空格，例如 'someFunction expr1 [expr2]'。
@@ -792,6 +847,11 @@
         此運算式將類型 '{0}' 隱含轉換為類型 '{1}'。請參閱 https://aka.ms/fsharp-implicit-convs。
         
       
+      
+        The type '{0}' does not support a nullness qualitification.
+        The type '{0}' does not support a nullness qualitification.
+        
+      
       
         Invalid interpolated string. {0}
         插補字串無效。{0}
diff --git a/src/fsharp/xlf/FSStrings.cs.xlf b/src/fsharp/xlf/FSStrings.cs.xlf
index 924659eb22a..d5b6eb9cd89 100644
--- a/src/fsharp/xlf/FSStrings.cs.xlf
+++ b/src/fsharp/xlf/FSStrings.cs.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Nejméně jedna informační zpráva v načteném souboru\n
diff --git a/src/fsharp/xlf/FSStrings.de.xlf b/src/fsharp/xlf/FSStrings.de.xlf
index 9462806409e..e274d15cbbc 100644
--- a/src/fsharp/xlf/FSStrings.de.xlf
+++ b/src/fsharp/xlf/FSStrings.de.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Mindestens eine Informationsmeldung in der geladenen Datei.\n
diff --git a/src/fsharp/xlf/FSStrings.es.xlf b/src/fsharp/xlf/FSStrings.es.xlf
index b4b8b4531e4..b9a734373e0 100644
--- a/src/fsharp/xlf/FSStrings.es.xlf
+++ b/src/fsharp/xlf/FSStrings.es.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Uno o más mensajes informativos en el archivo cargado.\n
diff --git a/src/fsharp/xlf/FSStrings.fr.xlf b/src/fsharp/xlf/FSStrings.fr.xlf
index 53e4eb6cff4..d4c088f90bd 100644
--- a/src/fsharp/xlf/FSStrings.fr.xlf
+++ b/src/fsharp/xlf/FSStrings.fr.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Un ou plusieurs messages d’information dans le fichier chargé.\n
diff --git a/src/fsharp/xlf/FSStrings.it.xlf b/src/fsharp/xlf/FSStrings.it.xlf
index d8cf6e9c21e..fe757f9e87e 100644
--- a/src/fsharp/xlf/FSStrings.it.xlf
+++ b/src/fsharp/xlf/FSStrings.it.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Uno o più messaggi informativi nel file caricato.\n
diff --git a/src/fsharp/xlf/FSStrings.ja.xlf b/src/fsharp/xlf/FSStrings.ja.xlf
index ad32096733b..94242f410fb 100644
--- a/src/fsharp/xlf/FSStrings.ja.xlf
+++ b/src/fsharp/xlf/FSStrings.ja.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         読み込まれたファイル内の 1 つ以上の情報メッセージ。\n
diff --git a/src/fsharp/xlf/FSStrings.ko.xlf b/src/fsharp/xlf/FSStrings.ko.xlf
index 8e112d8d28c..5333592f3d9 100644
--- a/src/fsharp/xlf/FSStrings.ko.xlf
+++ b/src/fsharp/xlf/FSStrings.ko.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         로드된 파일에 하나 이상의 정보 메시지가 있습니다.\n
diff --git a/src/fsharp/xlf/FSStrings.pl.xlf b/src/fsharp/xlf/FSStrings.pl.xlf
index fe6c8536f87..c7f9b31a0cf 100644
--- a/src/fsharp/xlf/FSStrings.pl.xlf
+++ b/src/fsharp/xlf/FSStrings.pl.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Jeden lub więcej komunikatów informacyjnych w załadowanym pliku.\n
diff --git a/src/fsharp/xlf/FSStrings.pt-BR.xlf b/src/fsharp/xlf/FSStrings.pt-BR.xlf
index 8dc8c546ffc..49ee05f107c 100644
--- a/src/fsharp/xlf/FSStrings.pt-BR.xlf
+++ b/src/fsharp/xlf/FSStrings.pt-BR.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Uma ou mais mensagens informativas no arquivo carregado.\n
diff --git a/src/fsharp/xlf/FSStrings.ru.xlf b/src/fsharp/xlf/FSStrings.ru.xlf
index 6979fe42d9f..8eadd152103 100644
--- a/src/fsharp/xlf/FSStrings.ru.xlf
+++ b/src/fsharp/xlf/FSStrings.ru.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Одно или несколько информационных сообщений в загруженном файле.\n
diff --git a/src/fsharp/xlf/FSStrings.tr.xlf b/src/fsharp/xlf/FSStrings.tr.xlf
index 54328fdea3f..f4b62cc0852 100644
--- a/src/fsharp/xlf/FSStrings.tr.xlf
+++ b/src/fsharp/xlf/FSStrings.tr.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         Yüklenen dosyada bir veya daha fazla bilgi mesajı.\n
diff --git a/src/fsharp/xlf/FSStrings.zh-Hans.xlf b/src/fsharp/xlf/FSStrings.zh-Hans.xlf
index 95130a6391f..c002cd7eca8 100644
--- a/src/fsharp/xlf/FSStrings.zh-Hans.xlf
+++ b/src/fsharp/xlf/FSStrings.zh-Hans.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         加载文件 .\n 中有一条或多条信息性消息
diff --git a/src/fsharp/xlf/FSStrings.zh-Hant.xlf b/src/fsharp/xlf/FSStrings.zh-Hant.xlf
index 5ff1442b5c3..13fc9637d7b 100644
--- a/src/fsharp/xlf/FSStrings.zh-Hant.xlf
+++ b/src/fsharp/xlf/FSStrings.zh-Hant.xlf
@@ -2,6 +2,26 @@
 
   
     
+      
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        Nullness warning: The type '{0}' supports a null value but a constraint requires the type to be non-null.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have equivalent nullability '{2}' and '{3}'.
+        
+      
+      
+        Nullness warning: The type '{0}' does not support nullness.
+        Nullness warning: The type '{0}' does not support nullness.
+        
+      
+      
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        Nullness warning: The types '{0}' and '{1}' do not have compatible nullability '{2}' and '{3}'.
+        
+      
       
         One or more informational messages in loaded file.\n
         已載入檔案中的一或多個資訊訊息。\n

From cab562ec6c5fd59e4ad14a341bc3a0b5c66ed144 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 4 Mar 2022 17:36:22 +0000
Subject: [PATCH 058/112] fix build

---
 FSharp.Profiles.props                                      | 4 ++--
 src/fsharp/FSharp.Build/FSharp.Build.fsproj                | 1 -
 .../FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj | 2 --
 src/fsharp/FSharp.Core/FSharp.Core.fsproj                  | 3 +--
 src/fsharp/fscAnyCpu/fscAnyCpu.fsproj                      | 1 -
 src/fsharp/fsi/fsi.fsproj                                  | 2 --
 src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj                      | 1 -
 tests/benchmarks/TaskPerf/async2.fs                        | 2 +-
 vsintegration/src/FSharp.Editor/Common/Extensions.fs       | 7 +++++++
 .../src/FSharp.Editor/Completion/CompletionProvider.fs     | 1 +
 .../FSharp.Editor/LanguageService/FSharpEditorFactory.fs   | 1 +
 .../src/FSharp.Editor/LanguageService/LanguageService.fs   | 1 +
 12 files changed, 14 insertions(+), 12 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index dda1aa3fb4b..5f6accdbdda 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -5,7 +5,7 @@
     false
   
   
-    NO_CHECKNULLS;$(DefineConstants)
+    BUILDING_WITH_LKG;NO_CHECKNULLS;$(DefineConstants)
   
 
   
@@ -14,7 +14,7 @@
   
 
   
-	$(OtherFlags) /langversion:preview
+  	$(OtherFlags) /langversion:preview
     
     $(NoWarn);3271
     $(DefineConstants);NO_CHECKNULLS
diff --git a/src/fsharp/FSharp.Build/FSharp.Build.fsproj b/src/fsharp/FSharp.Build/FSharp.Build.fsproj
index d633bfe16f4..87835d12b92 100644
--- a/src/fsharp/FSharp.Build/FSharp.Build.fsproj
+++ b/src/fsharp/FSharp.Build/FSharp.Build.fsproj
@@ -10,7 +10,6 @@
     $(NoWarn);75 
     true
     true
-    $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1
     $(DefineConstants);LOCALIZATION_FSBUILD
     $(NoWarn);NU1701;FS0075
     true
diff --git a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
index 31debd53744..be63af92bec 100644
--- a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
+++ b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
@@ -19,9 +19,7 @@
     true
     
     true
-    $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1 --times
     $(DefineConstants);USE_SHIPPED_FSCORE
-    $(OtherFlags) --extraoptimizationloops:1 --times
     
     $(OtherFlags) --warnon:1182
     
diff --git a/src/fsharp/FSharp.Core/FSharp.Core.fsproj b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
index 8a37b8d9e14..94ef8d64871 100644
--- a/src/fsharp/FSharp.Core/FSharp.Core.fsproj
+++ b/src/fsharp/FSharp.Core/FSharp.Core.fsproj
@@ -13,7 +13,7 @@
     $(DefineConstants);FSHARP_CORE
     BUILDING_WITH_LKG;$(DefineConstants)
     $(OtherFlags) --warnon:3218 --warnon:1182 --warnon:3390
-    $(OtherFlags) --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1 --nowarn:57
+    $(OtherFlags) --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1
     $(OtherFlags) --langversion:preview
     true 
     
@@ -33,7 +33,6 @@
     
     
     $(OtherFlags) --nowarn:3511 --nowarn:3513
-    $(OtherFlags) --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1
     
     preview
     
diff --git a/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj b/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj
index c5d5e0025f6..035421320ac 100644
--- a/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj
+++ b/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj
@@ -9,7 +9,6 @@
     .exe
     $(NoWarn);44;45;55;62;75;1204
     true
-    $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1
     true
     true
   
diff --git a/src/fsharp/fsi/fsi.fsproj b/src/fsharp/fsi/fsi.fsproj
index 297cc0ea6d0..39cacc086b5 100644
--- a/src/fsharp/fsi/fsi.fsproj
+++ b/src/fsharp/fsi/fsi.fsproj
@@ -9,8 +9,6 @@
     net6.0
     $(NoWarn);44 
     true
-    $(OtherFlags)  --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
-    $(OtherFlags) --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
     $(OtherFlags) --warnon:1182
     fsi.res
     true
diff --git a/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj b/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj
index 4d998b53f5a..83fd057de6b 100644
--- a/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj
+++ b/src/fsharp/fsiAnyCpu/fsiAnyCpu.fsproj
@@ -9,7 +9,6 @@
     .exe
     $(NoWarn);44 
     true
-    $(OtherFlags)  --warnon:1182 --maxerrors:20 --extraoptimizationloops:1
     true
     $(OtherFlags)  --warnon:1182
     ..\fsi\fsi.res
diff --git a/tests/benchmarks/TaskPerf/async2.fs b/tests/benchmarks/TaskPerf/async2.fs
index 06938716ae1..f6dd2c96692 100644
--- a/tests/benchmarks/TaskPerf/async2.fs
+++ b/tests/benchmarks/TaskPerf/async2.fs
@@ -33,7 +33,7 @@ type Async2StateMachineData<'T>() =
 and IAsync2Invokable<'T> =
     abstract StartImmediate: CancellationToken -> IAsync2Invocation<'T>
 
-and [] IAsync2Invocation<'T> =
+and IAsync2Invocation<'T> =
     inherit IAsyncStateMachine
     //abstract TailcallTarget: IAsync2Invocation<'T> 
     abstract CancellationToken: CancellationToken
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index a5d273e4c0d..700111e7c9d 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -19,6 +19,13 @@ open FSharp.Compiler.Text
 
 open Microsoft.VisualStudio.FSharp.Editor
 
+#if NO_CHECKNULLS
+// Shim to match nullness checking library support in preview
+let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
+let inline nonNull<'T when 'T : null> (x: 'T) = x
+let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+#endif
+
 type private FSharpGlyph = FSharp.Compiler.EditorServices.FSharpGlyph
 type private FSharpRoslynGlyph = Microsoft.CodeAnalysis.ExternalAccess.FSharp.FSharpGlyph
 
diff --git a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
index 5ac264d5cea..ceee06e5e76 100644
--- a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
@@ -15,6 +15,7 @@ open Microsoft.CodeAnalysis.Text
 open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Completion
 
 open Microsoft.VisualStudio.Shell
+open Microsoft.VisualStudio.FSharp.Editor.Extensions
 
 open FSharp.Compiler.CodeAnalysis
 open FSharp.Compiler.EditorServices
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs b/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
index e078fc02ed4..180f2d9fbed 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
@@ -9,6 +9,7 @@ open Microsoft.VisualStudio.Shell.Interop
 open Microsoft.VisualStudio.TextManager.Interop
 open Microsoft.VisualStudio.Utilities
 open Microsoft.VisualStudio.ComponentModelHost
+open Microsoft.VisualStudio.FSharp.Editor.Extensions
 
 type ShellPackage = Microsoft.VisualStudio.Shell.Package
 
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
index 694a744eca3..aacd40b93fe 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
@@ -16,6 +16,7 @@ open FSharp.NativeInterop
 open Microsoft.VisualStudio
 open Microsoft.VisualStudio.Editor
 open Microsoft.VisualStudio.FSharp.Editor
+open Microsoft.VisualStudio.FSharp.Editor.Extensions
 open Microsoft.VisualStudio.LanguageServices
 open Microsoft.VisualStudio.LanguageServices.Implementation.LanguageService
 open Microsoft.VisualStudio.LanguageServices.Implementation.ProjectSystem

From 80c013189ab19d45a6fe7f294d5d1446bd7206a3 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 4 Mar 2022 18:14:06 +0000
Subject: [PATCH 059/112] fix build

---
 FSharp.Profiles.props                                |  4 ++--
 src/fsharp/FSharp.Core/array.fs                      |  4 ++--
 src/fsharp/FSharp.Core/local.fs                      |  2 +-
 src/fsharp/FSharp.Core/option.fs                     |  4 ++--
 src/fsharp/FSharp.Core/option.fsi                    |  8 ++++----
 src/fsharp/FSharp.Core/prim-types.fs                 |  6 +++---
 src/fsharp/FSharp.Core/prim-types.fsi                | 10 +++++-----
 src/fsharp/IlxGen.fs                                 |  4 ++--
 src/fsharp/TypedTree.fs                              |  1 -
 src/fsharp/absil/ilwritepdb.fs                       | 10 +++++-----
 vsintegration/src/FSharp.Editor/Common/Extensions.fs |  5 +++++
 11 files changed, 31 insertions(+), 27 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index 5f6accdbdda..bf70817359f 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -1,9 +1,9 @@
 
 
 
-  
+  
   
     BUILDING_WITH_LKG;NO_CHECKNULLS;$(DefineConstants)
   
diff --git a/src/fsharp/FSharp.Core/array.fs b/src/fsharp/FSharp.Core/array.fs
index 611a9dc4c59..0fc4707497e 100644
--- a/src/fsharp/FSharp.Core/array.fs
+++ b/src/fsharp/FSharp.Core/array.fs
@@ -562,7 +562,7 @@ namespace Microsoft.FSharp.Collections
                     maskArray.[maskIdx] <- mask
                 count 
 
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
             let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref>) (leftoverMaskOut: byref) =
 #else
             let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref?>) (leftoverMaskOut: byref) =
@@ -652,7 +652,7 @@ namespace Microsoft.FSharp.Collections
 
                 dstIdx
 
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
             let private filterViaMask (maskArray: array) (leftoverMask: uint32) (count: int) (src: array<_>) =
 #else
             let private filterViaMask (maskArray: array?) (leftoverMask: uint32) (count: int) (src: array<_>) =
diff --git a/src/fsharp/FSharp.Core/local.fs b/src/fsharp/FSharp.Core/local.fs
index e6be822811e..c9e0589850a 100644
--- a/src/fsharp/FSharp.Core/local.fs
+++ b/src/fsharp/FSharp.Core/local.fs
@@ -1087,7 +1087,7 @@ module internal Array =
         if array.Length > 1 then 
             Array.Sort<_>(array, fastComparerForArraySort())
 
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
 #else
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>?) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
diff --git a/src/fsharp/FSharp.Core/option.fs b/src/fsharp/FSharp.Core/option.fs
index 630ff6916fb..2e207bffd68 100644
--- a/src/fsharp/FSharp.Core/option.fs
+++ b/src/fsharp/FSharp.Core/option.fs
@@ -85,7 +85,7 @@ module Option =
     []
     let ofNullable (value:System.Nullable<'T>) = if value.HasValue then Some value.Value else None
 
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     []
     let ofObj value = match value with null -> None | _ -> Some value
 
@@ -181,7 +181,7 @@ module ValueOption =
     []
     let ofNullable (value:System.Nullable<'T>) = if value.HasValue then ValueSome value.Value else ValueNone
 
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     []
     let ofObj value = match value with null -> ValueNone | _ -> ValueSome value
 
diff --git a/src/fsharp/FSharp.Core/option.fsi b/src/fsharp/FSharp.Core/option.fsi
index edceccf09ec..952407d10f4 100644
--- a/src/fsharp/FSharp.Core/option.fsi
+++ b/src/fsharp/FSharp.Core/option.fsi
@@ -436,7 +436,7 @@ module Option =
     /// 
     /// 
     []
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     val ofObj: value: 'T -> 'T option  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -456,7 +456,7 @@ module Option =
     /// 
     /// 
     []
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     val toObj: value: 'T option -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -889,7 +889,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     val ofObj: value: 'T -> 'T voption  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -909,7 +909,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
     val toObj: value: 'T voption -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 5e9a1e279c7..46db7ca6511 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -3843,7 +3843,7 @@ namespace Microsoft.FSharp.Core
             | null -> false 
             | _ -> true
 
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
 
         []
         let inline isNullV (value : Nullable<'T>) = not value.HasValue
@@ -3930,7 +3930,7 @@ namespace Microsoft.FSharp.Core
         let inline nullArg (argumentName:string) = 
             raise (new System.ArgumentNullException(argumentName))        
 
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
         []
         let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : not null) = 
             match value with 
@@ -3999,7 +3999,7 @@ namespace Microsoft.FSharp.Core
         let inline defaultIfNone defaultValue arg = 
             match arg with None -> defaultValue | Some v -> v
         
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
         []
         let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : not null) = 
             match arg with null -> defaultValue | _ -> (# "" arg : 'T #)
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 0ec8f107d89..8ea844cd56b 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -1299,7 +1299,7 @@ namespace Microsoft.FSharp.Core
         val inline FastGenericComparer<'T> : System.Collections.Generic.IComparer<'T> when 'T: comparison 
 
         /// Make an F# comparer object for the given type, where it can be null if System.Collections.Generic.Comparer<'T>.Default
-#if NO_CHECKNULLS
+#if BUILDING_WITH_LKG
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T> when 'T : comparison 
 #else
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T>? when 'T : comparison 
@@ -3067,7 +3067,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline defaultIfNone : defaultValue:'T -> arg:'T option -> 'T 
 
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
         /// Used to specify a default value for a nullable reference argument in the implementation of a function
         /// The default value of the argument.
         /// A nullable value representing the argument.
@@ -3382,7 +3382,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline isNull: value: 'T -> bool when 'T: null
         
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
         /// Determines whether the given value is null.
         /// The value to check.
         /// A choice indicating whether the value is null or not-null.
@@ -3430,7 +3430,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline internal isNotNull : value:'T -> bool when 'T : null
 
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
         /// Get the null value for a value type.
         /// In a future revision of nullness support this may be unified with 'null'.
         /// The null value for a value type.
@@ -3533,7 +3533,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline nullArg: argumentName: string -> 'T 
 
-#if !NO_CHECKNULLS
+#if !BUILDING_WITH_LKG
         /// Throw a System.ArgumentNullException if the given value is null exception
         /// 
         /// The argument name.
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index ae9cb09d6a3..5bc01ef5afe 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -8690,7 +8690,7 @@ let LookupGeneratedValue (amap: ImportMap) (ctxt: ExecutionContext) eenv (v: Val
                   // because it is the MethodBuilder and that does not support Invoke.
                   // Rather, we look for the getter MethodInfo from the built type and .Invoke on that.
                   let methInfo = staticTy.GetMethod(ilGetterMethRef.Name, BindingFlags.Static ||| BindingFlags.Public ||| BindingFlags.NonPublic)
-                  methInfo.Invoke((null: obj), (null: obj[]))
+                  methInfo.Invoke(null, null)
           Some (obj, objTyp())
 
       | StaticProperty (ilGetterMethSpec, _) ->
@@ -8700,7 +8700,7 @@ let LookupGeneratedValue (amap: ImportMap) (ctxt: ExecutionContext) eenv (v: Val
               // because it is the MethodBuilder and that does not support Invoke.
               // Rather, we look for the getter MethodInfo from the built type and .Invoke on that.
               let methInfo = staticTy.GetMethod(ilGetterMethSpec.Name, BindingFlags.Static ||| BindingFlags.Public ||| BindingFlags.NonPublic)
-              methInfo.Invoke((null: obj), (null: obj[]))
+              methInfo.Invoke(null, null)
           Some (obj, objTyp())
 
       | Null ->
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 3e4c8fdb8c3..b2d099d21b9 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -5954,4 +5954,3 @@ type Construct() =
             let pos = Position.mkPos line (max 0 (column - 1)) 
             mkRange filePath pos pos |> Some
 #endif
-
diff --git a/src/fsharp/absil/ilwritepdb.fs b/src/fsharp/absil/ilwritepdb.fs
index 3acc2ada217..095c5d2ac6f 100644
--- a/src/fsharp/absil/ilwritepdb.fs
+++ b/src/fsharp/absil/ilwritepdb.fs
@@ -304,8 +304,8 @@ type PortablePdbGenerator (embedAllSource: bool, embedSourceList: string list, s
 
     let docs =
         match info.Documents with
-        | null -> Array.empty
-        | _ -> info.Documents
+        | Null -> Array.empty
+        | NotNull docs -> docs
 
     // The metadata to wite to the PoortablePDB (Roslyn = _debugMetadataOpt)
 
@@ -571,11 +571,11 @@ type PortablePdbGenerator (embedAllSource: bool, embedSourceList: string list, s
         let docHandle, sequencePointBlob =
             let sps =
                 match minfo.DebugPoints with
-                | null -> Array.empty
-                | _ ->
+                | Null -> Array.empty
+                | NotNull pts ->
                     match minfo.DebugRange with
                     | None -> Array.empty
-                    | Some _ -> minfo.DebugPoints
+                    | Some _ -> pts
 
             let builder = BlobBuilder()
             builder.WriteCompressedInteger(minfo.LocalSignatureToken)
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index 700111e7c9d..9d66bfc8117 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -24,6 +24,11 @@ open Microsoft.VisualStudio.FSharp.Editor
 let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
 let inline nonNull<'T when 'T : null> (x: 'T) = x
 let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+let inline nullArgCheck (argumentName:string) (value: 'T when 'T : not struct) = 
+    match box value with 
+    | null -> raise (new System.ArgumentNullException(argumentName))        
+    | _ ->  value
+let inline withNull<'T when 'T: not struct> (value : 'T) = value
 #endif
 
 type private FSharpGlyph = FSharp.Compiler.EditorServices.FSharpGlyph

From db17b6a751beb93e3872c1aa2ab8b813172cad1e Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 4 Mar 2022 18:25:08 +0000
Subject: [PATCH 060/112] fix build

---
 src/fsharp/absil/ilwritepdb.fs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fsharp/absil/ilwritepdb.fs b/src/fsharp/absil/ilwritepdb.fs
index 095c5d2ac6f..ff2cd41696b 100644
--- a/src/fsharp/absil/ilwritepdb.fs
+++ b/src/fsharp/absil/ilwritepdb.fs
@@ -305,7 +305,7 @@ type PortablePdbGenerator (embedAllSource: bool, embedSourceList: string list, s
     let docs =
         match info.Documents with
         | Null -> Array.empty
-        | NotNull docs -> docs
+        | NonNull docs -> docs
 
     // The metadata to wite to the PoortablePDB (Roslyn = _debugMetadataOpt)
 
@@ -572,7 +572,7 @@ type PortablePdbGenerator (embedAllSource: bool, embedSourceList: string list, s
             let sps =
                 match minfo.DebugPoints with
                 | Null -> Array.empty
-                | NotNull pts ->
+                | NonNull pts ->
                     match minfo.DebugRange with
                     | None -> Array.empty
                     | Some _ -> pts

From 15b3f29840ed13353abd841ad3a905882b071ad6 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 7 Mar 2022 13:44:45 +0000
Subject: [PATCH 061/112] fix build

---
 src/fsharp/absil/ilread.fs                    | 23 ++++++++++++-------
 .../Navigation/NavigableSymbolsService.fs     |  2 +-
 2 files changed, 16 insertions(+), 9 deletions(-)

diff --git a/src/fsharp/absil/ilread.fs b/src/fsharp/absil/ilread.fs
index 8489dfdc90b..eb4bf50d6a4 100644
--- a/src/fsharp/absil/ilread.fs
+++ b/src/fsharp/absil/ilread.fs
@@ -189,7 +189,11 @@ type WeakByteFile(fileName: string, chunk: (int * int) option) =
     let fileStamp = FileSystem.GetLastWriteTimeShim fileName
 
     /// The weak handle to the bytes for the file
+#if NO_CHECKNULLS
     let weakBytes = WeakReference(null)
+#else
+    let weakBytes = WeakReference< byte[]? >(null)
+#endif
 
     member _.FileName = fileName
 
@@ -213,7 +217,7 @@ type WeakByteFile(fileName: string, chunk: (int * int) option) =
 
                     weakBytes.SetTarget bytes
 
-                tg
+                nonNull tg
 
             ByteMemory.FromArray(strongBytes).AsReadOnly()
 
@@ -744,9 +748,11 @@ let mkCacheInt32 lowMem _inbase _nm _sz =
     fun f (idx: int32) ->
         let cache =
             match cache with
-            | null -> cache <- ConcurrentDictionary(Environment.ProcessorCount, 11)
-            | _ -> ()
-            cache
+            | Null ->
+                let v = ConcurrentDictionary(Environment.ProcessorCount, 11)
+                cache <- v
+                v
+            | NonNull v -> v
         match cache.TryGetValue idx with
         | true, res ->
             count <- count + 1
@@ -770,10 +776,11 @@ let mkCacheGeneric lowMem _inbase _nm _sz =
     fun f (idx :'T) ->
         let cache =
             match cache with
-            | null ->
-                cache <- ConcurrentDictionary<_, _>(Environment.ProcessorCount, 11 (* sz: int *) )
-            | _ -> ()
-            cache
+            | Null ->
+                let v = ConcurrentDictionary<_, _>(Environment.ProcessorCount, 11 (* sz: int *) )
+                cache <- v
+                v
+            | NonNull v -> v
 
         match cache.TryGetValue idx with
         | true, v ->
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
index ef97a66e5a4..b746777dbd2 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
@@ -34,7 +34,7 @@ type internal FSharpNavigableSymbolSource(metadataAsSource, serviceProvider: ISe
     let statusBar = StatusBar(serviceProvider.GetService())
 
     interface INavigableSymbolSource with
-        member _.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) : Task =
+        member _.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) : Task ? =
             // Yes, this is a code smell. But this is how the editor API accepts what we would treat as None.
             if disposed then null
             else

From 767e46294e2bbffc0ac436dcb16dcde57d92cdcd Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 7 Mar 2022 14:01:09 +0000
Subject: [PATCH 062/112] fix tests

---
 src/fsharp/LanguageFeatures.fs | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/src/fsharp/LanguageFeatures.fs b/src/fsharp/LanguageFeatures.fs
index ee8495eb42e..2b2a45f6644 100644
--- a/src/fsharp/LanguageFeatures.fs
+++ b/src/fsharp/LanguageFeatures.fs
@@ -102,12 +102,6 @@ type LanguageVersion (versionText) =
             // F# preview
             LanguageFeature.FromEndSlicing, previewVersion
             LanguageFeature.NullnessChecking, previewVersion
-            LanguageFeature.ResumableStateMachines, previewVersion
-            LanguageFeature.StructActivePattern, previewVersion
-            LanguageFeature.PrintfBinaryFormat, previewVersion
-            LanguageFeature.UseBindingValueDiscard, previewVersion
-            LanguageFeature.NonVariablePatternsToRightOfAsPatterns, previewVersion
-            LanguageFeature.AttributesToRightOfModuleKeyword, previewVersion
             LanguageFeature.MLCompatRevisions,previewVersion
             LanguageFeature.BetterExceptionPrinting,previewVersion
         ]

From ce93b9528f97f0476283fd4528fd9156ddd3aa3c Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Mon, 7 Mar 2022 22:01:30 +0000
Subject: [PATCH 063/112] cleanup

---
 DEVGUIDE.md                                   |   11 +
 src/fsharp/AccessibilityLogic.fs              |    4 +-
 src/fsharp/AugmentWithHashCompare.fs          |   38 +-
 src/fsharp/CheckComputationExpressions.fs     |   70 +-
 src/fsharp/CheckDeclarations.fs               |  335 +--
 src/fsharp/CheckExpressions.fs                | 1872 ++++++++++-------
 src/fsharp/CheckFormatStrings.fs              |   14 +-
 src/fsharp/ConstraintSolver.fs                |   28 +-
 src/fsharp/ConstraintSolver.fsi               |    6 +-
 src/fsharp/DetupleArgs.fs                     |   92 +-
 src/fsharp/FindUnsolved.fs                    |    2 +-
 src/fsharp/IlxGen.fs                          |    4 +-
 src/fsharp/InfoReader.fs                      |   14 +-
 src/fsharp/InnerLambdasToTopLevelFuncs.fs     |  219 +-
 src/fsharp/LowerStateMachines.fs              |    4 +-
 src/fsharp/MethodCalls.fs                     |   21 +-
 src/fsharp/MethodOverrides.fs                 |   10 +-
 src/fsharp/NameResolution.fs                  |   53 +-
 src/fsharp/NicePrint.fs                       |    4 +-
 src/fsharp/Optimizer.fs                       |  475 +++--
 src/fsharp/PostInferenceChecks.fs             |   23 +-
 src/fsharp/QuotationTranslator.fs             |   32 +-
 src/fsharp/SignatureConformance.fs            |    8 +-
 src/fsharp/TypedTreeOps.fs                    |   67 +-
 src/fsharp/TypedTreeOps.fsi                   |   29 +-
 src/fsharp/autobox.fs                         |    7 +-
 src/fsharp/service/FSharpCheckerResults.fs    |    2 +-
 src/fsharp/service/SemanticClassification.fs  |    2 +-
 src/fsharp/service/ServiceDeclarationLists.fs |    4 +-
 src/fsharp/symbols/Exprs.fs                   |  298 +--
 src/fsharp/symbols/SymbolHelpers.fs           |    6 +-
 src/fsharp/symbols/Symbols.fs                 |   32 +-
 32 files changed, 2143 insertions(+), 1643 deletions(-)

diff --git a/DEVGUIDE.md b/DEVGUIDE.md
index 105ed70e708..1497a7f56b2 100644
--- a/DEVGUIDE.md
+++ b/DEVGUIDE.md
@@ -129,6 +129,17 @@ popd
 
 This only works on Windows/.NETStandard framework, so changing this from any other platform requires editing and syncing all of the XLF files manually.
 
+## Updating baselines in tests
+
+Some tests use "baseline" files.  There is sometimes a way to update these baselines en-masse in your local build,
+useful when some change affects many baselines.  For example, in the 'fsharpqa' tests the baselines
+are updated using scripts or utilities that allow the following environment variable to be set:
+
+```
+set TEST_UPDATE_BSL=1
+```
+
+
 ## Developing the F# tools for Visual Studio
 
 As you would expect, doing this requires both Windows and Visual Studio are installed.
diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index 5737933732c..bdecce9da9d 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -81,7 +81,7 @@ let private IsILMemberAccessible g amap m (tcrefOfViewedItem : TyconRef) ad acce
                 match tcrefViewedFromOption with 
                 | None -> false
                 | Some tcrefViewedFrom ->
-                    ExistsHeadTypeInEntireHierarchy  g amap m (generalizedTyconRef tcrefViewedFrom) tcrefOfViewedItem)     
+                    ExistsHeadTypeInEntireHierarchy  g amap m (generalizedTyconRef g tcrefViewedFrom) tcrefOfViewedItem)     
 
             let accessibleByInternalsVisibleTo = 
                 (access = ILMemberAccess.Assembly || access = ILMemberAccess.FamilyOrAssembly) && 
@@ -93,7 +93,7 @@ let private IsILMemberAccessible g amap m (tcrefOfViewedItem : TyconRef) ad acce
                 match tcrefViewedFromOption with 
                 | None -> false
                 | Some tcrefViewedFrom ->
-                    ExistsHeadTypeInEntireHierarchy  g amap m (generalizedTyconRef tcrefViewedFrom) tcrefOfViewedItem    
+                    ExistsHeadTypeInEntireHierarchy  g amap m (generalizedTyconRef g tcrefViewedFrom) tcrefOfViewedItem    
 
             (access = ILMemberAccess.Public) || accessibleByFamily || accessibleByInternalsVisibleTo || accessibleByFamilyAndAssembly
 
diff --git a/src/fsharp/AugmentWithHashCompare.fs b/src/fsharp/AugmentWithHashCompare.fs
index d922fa1ce9c..fd8a38a0d67 100644
--- a/src/fsharp/AugmentWithHashCompare.fs
+++ b/src/fsharp/AugmentWithHashCompare.fs
@@ -45,21 +45,21 @@ let mkEqualsSlotSig (g: TcGlobals) =
 
 let mkThisTy  g ty = if isStructTy g ty then mkByrefTy g ty else ty 
 
-let mkCompareObjTy          g ty = (mkThisTy g ty) --> (g.obj_ty --> g.int_ty)
+let mkCompareObjTy          g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.obj_ty g.int_ty)
 
-let mkCompareTy             g ty = (mkThisTy g ty) --> (ty --> g.int_ty)
+let mkCompareTy             g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g ty g.int_ty)
 
-let mkCompareWithComparerTy g ty = (mkThisTy g ty) --> ((mkRefTupledTy g [g.obj_ty ; g.IComparer_ty]) --> g.int_ty)
+let mkCompareWithComparerTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g (mkRefTupledTy g [g.obj_ty ; g.IComparer_ty]) g.int_ty)
 
-let mkEqualsObjTy          g ty = (mkThisTy g ty) --> (g.obj_ty --> g.bool_ty)
+let mkEqualsObjTy          g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.obj_ty g.bool_ty)
 
-let mkEqualsTy             g ty = (mkThisTy g ty) --> (ty --> g.bool_ty)
+let mkEqualsTy             g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g ty g.bool_ty)
 
-let mkEqualsWithComparerTy g ty = (mkThisTy g ty) --> ((mkRefTupledTy g [g.obj_ty ; g.IEqualityComparer_ty]) --> g.bool_ty)
+let mkEqualsWithComparerTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g (mkRefTupledTy g [g.obj_ty ; g.IEqualityComparer_ty]) g.bool_ty)
 
-let mkHashTy             g ty = (mkThisTy g ty) --> (g.unit_ty --> g.int_ty)
+let mkHashTy             g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.unit_ty g.int_ty)
 
-let mkHashWithComparerTy g ty = (mkThisTy g ty) --> (g.IEqualityComparer_ty --> g.int_ty)
+let mkHashWithComparerTy g ty = mkFunTy g (mkThisTy g ty) (mkFunTy g g.IEqualityComparer_ty g.int_ty)
 
 //-------------------------------------------------------------------------
 // Polymorphic comparison
@@ -176,7 +176,7 @@ let mkEqualsTestConjuncts g m exprs =
 
 let mkMinimalTy (g: TcGlobals) (tcref: TyconRef) = 
     if tcref.Deref.IsExceptionDecl then [], g.exn_ty 
-    else generalizeTyconRef tcref
+    else generalizeTyconRef g tcref
 
 // check for nulls
 let mkBindNullComparison g m thise thate expr = 
@@ -781,7 +781,7 @@ let CheckAugmentationAttribs isImplementation g amap (tycon: Tycon) =
         errorR(Error(FSComp.SR.augInvalidAttrs(), m))
     
     let hasNominalInterface tcref =
-        let ty = generalizedTyconRef (mkLocalTyconRef tycon)
+        let ty = generalizedTyconRef g (mkLocalTyconRef tycon)
         ExistsHeadTypeInEntireHierarchy g amap tycon.Range ty tcref
 
     let hasExplicitICompare = 
@@ -954,10 +954,10 @@ let MakeBindingsForCompareAugmentation g (tycon: Tycon) =
 
                   mkApps g ((exprForValRef m vref2, vref2.Type), (if isNil tinst then [] else [tinst]), [thise;thate], m)
               
-              mkLambdas m tps [thisv;thatobjv] (comparee, g.int_ty)  
+              mkLambdas g m tps [thisv; thatobjv] (comparee, g.int_ty)  
             let rhs2 = 
               let thisv, thatv, comparee = comparef g tcref tycon 
-              mkLambdas m tps [thisv;thatv] (comparee, g.int_ty)  
+              mkLambdas g m tps [thisv; thatv] (comparee, g.int_ty)  
             [ // This one must come first because it may be inlined into the second
               mkCompGenBind vspec2 rhs2
               mkCompGenBind vspec1 rhs1; ] 
@@ -985,7 +985,7 @@ let MakeBindingsForCompareWithComparerAugmentation g (tycon: Tycon) =
             let rhs =
                 let comparee = comparef g tcref tycon (thisv, thise) (thatobjv, thate) compe
                 let comparee = if isUnitTy g ty then mkZero g m else comparee
-                mkMultiLambdas m tps [[thisv];[thatobjv;compv]] (comparee, g.int_ty)
+                mkMultiLambdas g m tps [[thisv]; [thatobjv; compv]] (comparee, g.int_ty)
             [mkCompGenBind vspec rhs]
     if tycon.IsUnionTycon then mkCompare mkUnionCompareWithComparer
     elif tycon.IsRecordTycon || tycon.IsStructOrEnumTycon then mkCompare mkRecdCompareWithComparer
@@ -1004,7 +1004,7 @@ let MakeBindingsForEqualityWithComparerAugmentation (g: TcGlobals) (tycon: Tycon
             let withcGetHashCodeExpr =
                 let compv, compe = mkCompGenLocal m "comp" g.IEqualityComparer_ty
                 let thisv, hashe = hashf g tcref tycon compe
-                mkLambdas m tps [thisv;compv] (hashe, g.int_ty)
+                mkLambdas g m tps [thisv; compv] (hashe, g.int_ty)
                 
             // build the equals rhs
             let withcEqualsExpr =
@@ -1014,8 +1014,7 @@ let MakeBindingsForEqualityWithComparerAugmentation (g: TcGlobals) (tycon: Tycon
                 let thatv, thate = mkCompGenLocal m "that" ty  
                 let compv, compe = mkCompGenLocal m "comp" g.IEqualityComparer_ty
                 let equalse = equalsf g tcref tycon (thisv, thise) thatobje (thatv, thate) compe
-                mkMultiLambdas m tps [[thisv];[thatobjv;compv]] (equalse, g.bool_ty)
-
+                mkMultiLambdas g m tps [[thisv];[thatobjv; compv]] (equalse, g.bool_ty)
 
             let objGetHashCodeExpr = 
                 let tinst, ty = mkMinimalTy g tcref
@@ -1028,7 +1027,7 @@ let MakeBindingsForEqualityWithComparerAugmentation (g: TcGlobals) (tycon: Tycon
                     let compe = mkILCallGetEqualityComparer g m
                     mkApps g ((exprForValRef m withcGetHashCodeVal, withcGetHashCodeVal.Type), (if isNil tinst then [] else [tinst]), [thise; compe], m)
                 
-                mkLambdas m tps [thisv; unitv] (hashe, g.int_ty)  
+                mkLambdas g m tps [thisv; unitv] (hashe, g.int_ty)  
                   
             [(mkCompGenBind withcGetHashCodeVal.Deref withcGetHashCodeExpr)  
              (mkCompGenBind objGetHashCodeVal.Deref objGetHashCodeExpr)  
@@ -1049,7 +1048,7 @@ let MakeBindingsForEqualsAugmentation (g: TcGlobals) (tycon: Tycon) =
           // this is the body of the real strongly typed implementation 
           let nocEqualsExpr = 
               let thisv, thatv, equalse = equalsf g tcref tycon 
-              mkLambdas m tps [thisv;thatv] (equalse, g.bool_ty)  
+              mkLambdas g m tps [thisv;thatv] (equalse, g.bool_ty)  
 
           // this is the body of the override 
           let objEqualsExpr = 
@@ -1065,8 +1064,7 @@ let MakeBindingsForEqualsAugmentation (g: TcGlobals) (tycon: Tycon) =
                     (mkApps g ((exprForValRef m nocEqualsVal, nocEqualsVal.Type), (if isNil tinst then [] else [tinst]), [thise;thate], m))
                     (mkFalse g m)
             
-            mkLambdas m tps [thisv;thatobjv] (equalse, g.bool_ty)  
-
+            mkLambdas g m tps [thisv;thatobjv] (equalse, g.bool_ty)  
 
           [ mkCompGenBind nocEqualsVal.Deref nocEqualsExpr
             mkCompGenBind objEqualsVal.Deref objEqualsExpr   ] 
diff --git a/src/fsharp/CheckComputationExpressions.fs b/src/fsharp/CheckComputationExpressions.fs
index 5ade9f73b11..8aafdf9c0de 100644
--- a/src/fsharp/CheckComputationExpressions.fs
+++ b/src/fsharp/CheckComputationExpressions.fs
@@ -214,10 +214,10 @@ let RecordNameAndTypeResolutions_IdeallyWithoutHavingOtherEffects cenv env tpenv
         with e -> ())
 
 /// Used for all computation expressions except sequence expressions
-let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, interpExpr: Expr, builderTy, comp: SynExpr) = 
+let TcComputationExpression (cenv: cenv) env (overallTy: OverallTy) tpenv (mWhole, interpExpr: Expr, builderTy, comp: SynExpr) = 
     let overallTy = overallTy.Commit
     
-    //dprintfn "TcComputationExpression, comp = \n%A\n-------------------\n" comp
+    let g = cenv.g
     let ad = env.eAccessRights
 
     let mkSynDelay2 (e: SynExpr) = mkSynDelay (e.Range.MakeSynthetic()) e
@@ -804,13 +804,13 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
             let varSpaceWithFirstVars = 
                 addVarsToVarSpace varSpace (fun _mCustomOp env -> 
                         use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (firstSourcePat, None)
+                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (firstSourcePat, None)
                         vspecs, envinner)
 
             let varSpaceWithSecondVars = 
                 addVarsToVarSpace varSpaceWithFirstVars (fun _mCustomOp env -> 
                         use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (secondSourcePat, None)
+                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (secondSourcePat, None)
                         vspecs, envinner)
 
             let varSpaceWithGroupJoinVars = 
@@ -818,7 +818,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
                 | Some pat3 -> 
                     addVarsToVarSpace varSpaceWithFirstVars (fun _mCustomOp env -> 
                         use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat3, None)
+                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (pat3, None)
                         vspecs, envinner)
                 | None -> varSpace
 
@@ -970,7 +970,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
             let varSpace = 
                 addVarsToVarSpace varSpace (fun _mCustomOp env -> 
                     use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                    let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat, None) 
+                    let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (pat, None) 
                     vspecs, envinner)
 
             Some (trans CompExprTranslationPass.Initial q varSpace innerComp
@@ -1190,7 +1190,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
                     | [NormalizedBinding(_vis, SynBindingKind.Normal, false, false, _, _, _, _, pat, _, _, _)] -> 
                         // successful case
                         use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat, None) 
+                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (pat, None) 
                         vspecs, envinner
                     | _ -> 
                         // error case
@@ -1223,7 +1223,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
             let varSpace = 
                 addVarsToVarSpace varSpace (fun _mCustomOp env -> 
                         use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (pat, None) 
+                        let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (pat, None) 
                         vspecs, envinner)
 
             let rhsExpr = mkSourceExprConditional isFromSource rhsExpr
@@ -1289,7 +1289,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
                 let varSpace = 
                     addVarsToVarSpace varSpace (fun _mCustomOp env -> 
                             use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                            let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (consumePat, None) 
+                            let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (consumePat, None) 
                             vspecs, envinner)
 
                 Some (transBind q varSpace mBind (addBindDebugPoint spBind) bindNName sources consumePat innerComp translatedCtxt)
@@ -1305,7 +1305,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
                     let varSpace = 
                         addVarsToVarSpace varSpace (fun _mCustomOp env -> 
                                 use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                                let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (consumePat, None) 
+                                let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (consumePat, None) 
                                 vspecs, envinner)
 
                     Some (transBind q varSpace mBind (addBindDebugPoint spBind) bindNName sources consumePat innerComp translatedCtxt)
@@ -1363,7 +1363,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
                     let varSpace = 
                         addVarsToVarSpace varSpace (fun _mCustomOp env -> 
                                 use _holder = TemporarilySuspendReportingTypecheckResultsToSink cenv.tcSink
-                                let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType()) env tpenv (consumePat, None) 
+                                let _, _, vspecs, envinner, _ = TcMatchPattern cenv (NewInferenceType g) env tpenv (consumePat, None) 
                                 vspecs, envinner)
 
                     // Build the 'Bind' call
@@ -1787,7 +1787,7 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
         | SynExpr.YieldOrReturn ((_, true), _, _) -> { env with eContextInfo = ContextInfo.ReturnInComputationExpression }
         | _ -> env
 
-    let lambdaExpr, tpenv= TcExpr cenv (MustEqual (builderTy --> overallTy)) env tpenv lambdaExpr
+    let lambdaExpr, tpenv = TcExpr cenv (MustEqual (mkFunTy g builderTy overallTy)) env tpenv lambdaExpr
 
     // beta-var-reduce to bind the builder using a 'let' binding
     let coreExpr = mkApps cenv.g ((lambdaExpr, tyOfExpr cenv.g lambdaExpr), [], [interpExpr], mBuilderVal)
@@ -1796,48 +1796,55 @@ let TcComputationExpression cenv env (overallTy: OverallTy) tpenv (mWhole, inter
 
 let mkSeqEmpty (cenv: cenv) env m genTy =
     // We must discover the 'zero' of the monadic algebra being generated in order to compile failing matches.
-    let genResultTy = NewInferenceType ()
-    UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
-    mkCallSeqEmpty cenv.g m genResultTy 
+    let g = cenv.g
+    let genResultTy = NewInferenceType g
+    UnifyTypes cenv env m genTy (mkSeqTy g genResultTy)
+    mkCallSeqEmpty g m genResultTy 
 
 let mkSeqCollect (cenv: cenv) env m enumElemTy genTy lam enumExpr =
-    let genResultTy = NewInferenceType ()
+    let g = cenv.g
+    let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
     let enumExpr = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g enumElemTy) (tyOfExpr cenv.g enumExpr) enumExpr
     mkCallSeqCollect cenv.g m enumElemTy genResultTy lam enumExpr
 
 let mkSeqUsing (cenv: cenv) (env: TcEnv) m resourceTy genTy resourceExpr lam =
+    let g = cenv.g
     AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace cenv.g.system_IDisposable_ty resourceTy
-    let genResultTy = NewInferenceType ()
+    let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
     mkCallSeqUsing cenv.g m resourceTy genResultTy resourceExpr lam 
 
 let mkSeqDelay (cenv: cenv) env m genTy lam =
-    let genResultTy = NewInferenceType ()
+    let g = cenv.g
+    let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
     mkCallSeqDelay cenv.g m genResultTy (mkUnitDelayLambda cenv.g m lam) 
 
 let mkSeqAppend (cenv: cenv) env m genTy e1 e2 =
-    let genResultTy = NewInferenceType ()
+    let g = cenv.g
+    let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
     let e1 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e1) e1
     let e2 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e2) e2
     mkCallSeqAppend cenv.g m genResultTy e1 e2 
 
 let mkSeqGenerated (cenv: cenv) env m genTy e1 e2 =
-    let genResultTy = NewInferenceType ()
+    let g = cenv.g
+    let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
     let e2 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e2) e2
     mkCallSeqGenerated cenv.g m genResultTy e1 e2 
 
 let mkSeqFinally (cenv: cenv) env m genTy e1 e2 =
-    let genResultTy = NewInferenceType ()
+    let g = cenv.g
+    let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
     let e1 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e1) e1
     mkCallSeqFinally cenv.g m genResultTy e1 e2 
 
-let mkSeqExprMatchClauses (pat', vspecs) innerExpr = 
-    [TClause(pat', None, TTarget(vspecs, innerExpr, None), pat'.Range) ] 
+let mkSeqExprMatchClauses (pat, vspecs) innerExpr = 
+    [TClause(pat, None, TTarget(vspecs, innerExpr, None), pat.Range) ] 
 
 let compileSeqExprMatchClauses (cenv: cenv) env inputExprMark (pat: Pattern, vspecs) innerExpr inputExprOpt bindPatTy genInnerTy = 
     let patMark = pat.Range
@@ -1852,7 +1859,8 @@ let compileSeqExprMatchClauses (cenv: cenv) env inputExprMark (pat: Pattern, vsp
 /// Also "ienumerable extraction" is performed on arguments to "for".
 let TcSequenceExpression (cenv: cenv) env tpenv comp (overallTy: OverallTy) m = 
 
-    let genEnumElemTy = NewInferenceType ()
+    let g = cenv.g
+    let genEnumElemTy = NewInferenceType g
     UnifyTypes cenv env m overallTy.Commit (mkSeqTy cenv.g genEnumElemTy)
 
     // Allow subsumption at 'yield' if the element type is nominal prior to the analysis of the body of the sequence expression
@@ -2010,8 +2018,8 @@ let TcSequenceExpression (cenv: cenv) env tpenv comp (overallTy: OverallTy) m =
         // 'use x = expr in expr'
         | SynExpr.LetOrUse (isUse=true; bindings=[SynBinding (kind=SynBindingKind.Normal; headPat=pat; expr=rhsExpr; debugPoint=spBind)]; body=innerComp; range=wholeExprMark) ->
 
-            let bindPatTy = NewInferenceType ()
-            let inputExprTy = NewInferenceType ()
+            let bindPatTy = NewInferenceType g
+            let inputExprTy = NewInferenceType g
             let pat', _, vspecs, envinner, tpenv = TcMatchPattern cenv bindPatTy env tpenv (pat, None)
 
             UnifyTypes cenv env m inputExprTy bindPatTy
@@ -2083,7 +2091,7 @@ let TcSequenceExpression (cenv: cenv) env tpenv comp (overallTy: OverallTy) m =
 
         | SynExpr.YieldOrReturn ((isYield, _), synYieldExpr, m) -> 
             let env = { env with eIsControlFlow = false }
-            let genResultTy = NewInferenceType ()
+            let genResultTy = NewInferenceType g
 
             if not isYield then errorR(Error(FSComp.SR.tcSeqResultsUseYield(), m)) 
 
@@ -2125,7 +2133,7 @@ let TcSequenceExpression (cenv: cenv) env tpenv comp (overallTy: OverallTy) m =
                 if hasTypeUnit then 
                     Choice2Of2 expr, tpenv
                 else
-                    let genResultTy = NewInferenceType ()
+                    let genResultTy = NewInferenceType g
                     UnifyTypes cenv env m genOuterTy (mkSeqTy cenv.g genResultTy)
                     let exprTy = tyOfExpr cenv.g expr
                     AddCxTypeMustSubsumeType env.eContextInfo env.DisplayEnv cenv.css m  NoTrace genResultTy exprTy
@@ -2163,13 +2171,15 @@ let TcSequenceExpressionEntry (cenv: cenv) env (overallTy: OverallTy) tpenv (has
     TcSequenceExpression cenv env tpenv comp overallTy m
 
 let TcArrayOrListComputedExpression (cenv: cenv) env (overallTy: OverallTy) tpenv (isArray, comp) m  =
+    let g = cenv.g
+
     // The syntax '[ n .. m ]' and '[ n .. step .. m ]' is not really part of array or list syntax.
     // It could be in the future, e.g. '[ 1; 2..30; 400 ]'
     //
     // The elaborated form of '[ n .. m ]' is 'List.ofSeq (seq (op_Range n m))' and this shouldn't change
     match RewriteRangeExpr comp with
     | Some replacementExpr -> 
-        let genCollElemTy = NewInferenceType ()
+        let genCollElemTy = NewInferenceType g
 
         let genCollTy = (if isArray then mkArrayType else mkListTy) cenv.g genCollElemTy
 
@@ -2227,7 +2237,7 @@ let TcArrayOrListComputedExpression (cenv: cenv) env (overallTy: OverallTy) tpen
         TcExprUndelayed cenv overallTy env tpenv replacementExpr
     | _ -> 
 
-      let genCollElemTy = NewInferenceType ()
+      let genCollElemTy = NewInferenceType g
 
       let genCollTy = (if isArray then mkArrayType else mkListTy) cenv.g genCollElemTy
 
diff --git a/src/fsharp/CheckDeclarations.fs b/src/fsharp/CheckDeclarations.fs
index 5b00d77667a..1ca00d6e18a 100644
--- a/src/fsharp/CheckDeclarations.fs
+++ b/src/fsharp/CheckDeclarations.fs
@@ -400,16 +400,17 @@ module TcRecdUnionAndEnumDeclarations =
         let vis = CombineReprAccess parent vis
         Construct.NewRecdField isStatic konst id nameGenerated ty' isMutable vol attrsForProperty attrsForField xmldoc vis false
 
-    let TcFieldDecl cenv env parent isIncrClass tpenv (isStatic, synAttrs, id, nameGenerated, ty, isMutable, xmldoc, vis, m) =
+    let TcFieldDecl (cenv: cenv) env parent isIncrClass tpenv (isStatic, synAttrs, id, nameGenerated, ty, isMutable, xmldoc, vis, m) =
+        let g = cenv.g
         let attrs, _ = TcAttributesWithPossibleTargets false cenv env AttributeTargets.FieldDecl synAttrs
         let attrsForProperty, attrsForField = attrs |> List.partition (fun (attrTargets, _) -> (attrTargets &&& AttributeTargets.Property) <> enum 0) 
         let attrsForProperty = (List.map snd attrsForProperty) 
         let attrsForField = (List.map snd attrsForField)
         let ty', _ = TcTypeAndRecover cenv NoNewTypars CheckCxs ItemOccurence.UseInType env tpenv ty
-        let zeroInit = HasFSharpAttribute cenv.g cenv.g.attrib_DefaultValueAttribute attrsForField
-        let isVolatile = HasFSharpAttribute cenv.g cenv.g.attrib_VolatileFieldAttribute attrsForField
+        let zeroInit = HasFSharpAttribute g g.attrib_DefaultValueAttribute attrsForField
+        let isVolatile = HasFSharpAttribute g g.attrib_VolatileFieldAttribute attrsForField
         
-        let isThreadStatic = isThreadOrContextStatic cenv.g attrsForField
+        let isThreadStatic = isThreadOrContextStatic g attrsForField
         if isThreadStatic && (not zeroInit || not isStatic) then 
             error(Error(FSComp.SR.tcThreadStaticAndContextStaticMustBeStatic(), m))
 
@@ -447,11 +448,13 @@ module TcRecdUnionAndEnumDeclarations =
     //------------------------------------------------------------------------- 
 
     let CheckUnionCaseName (cenv: cenv) (id: Ident) =
+        let g = cenv.g
         let name = id.idText
         if name = "Tags" then
             errorR(Error(FSComp.SR.tcUnionCaseNameConflictsWithGeneratedType(name, "Tags"), id.idRange))
 
-        CheckNamespaceModuleOrTypeName cenv.g id
+        CheckNamespaceModuleOrTypeName g id
+
         if not (String.isLeadingIdentifierCharacterUpperCase name) && name <> opNameCons && name <> opNameNil then
             errorR(NotUpperCaseConstructor(id.idRange))
 
@@ -470,7 +473,8 @@ module TcRecdUnionAndEnumDeclarations =
             | _ ->
                 seen.Add(f.LogicalName, sf))
                 
-    let TcUnionCaseDecl cenv env parent thisTy thisTyInst tpenv (SynUnionCase(Attributes synAttrs, id, args, xmldoc, vis, m, _)) =
+    let TcUnionCaseDecl (cenv: cenv) env parent thisTy thisTyInst tpenv (SynUnionCase(Attributes synAttrs, id, args, xmldoc, vis, m, _)) =
+        let g = cenv.g
         let attrs = TcAttributes cenv env AttributeTargets.UnionCaseDecl synAttrs // the attributes of a union case decl get attached to the generated "static factory" method
         let vis, _ = ComputeAccessAndCompPath env None m vis None parent
         let vis = CombineReprAccess parent vis
@@ -492,27 +496,33 @@ module TcRecdUnionAndEnumDeclarations =
                 ValidateFieldNames(flds, rfields)
                 
                 rfields, thisTy
+
             | SynUnionCaseKind.FullType (ty, arity) -> 
                 let ty', _ = TcTypeAndRecover cenv NoNewTypars CheckCxs ItemOccurence.UseInType env tpenv ty
-                let curriedArgTys, recordTy = GetTopTauTypeInFSharpForm cenv.g (arity |> TranslateTopValSynInfo m (TcAttributes cenv env) |> TranslatePartialArity []).ArgInfos ty' m
+                let curriedArgTys, recordTy = GetTopTauTypeInFSharpForm g (arity |> TranslateTopValSynInfo m (TcAttributes cenv env) |> TranslatePartialArity []).ArgInfos ty' m
+
                 if curriedArgTys.Length > 1 then 
                     errorR(Error(FSComp.SR.tcIllegalFormForExplicitTypeDeclaration(), m))   
+
                 let argTys = curriedArgTys |> List.concat
                 let nFields = argTys.Length
+
                 let rfields = 
                     argTys |> List.mapi (fun i (argty, argInfo) ->
                         let id = (match argInfo.Name with Some id -> id | None -> mkSynId m (mkUnionCaseFieldName nFields i))
                         MakeRecdFieldSpec cenv env parent (false, None, argty, [], [], id, argInfo.Name.IsNone, false, false, XmlDoc.Empty, None, m))
-                if not (typeEquiv cenv.g recordTy thisTy) then 
+
+                if not (typeEquiv g recordTy thisTy) then 
                     error(Error(FSComp.SR.tcReturnTypesForUnionMustBeSameAsType(), m))
                 rfields, recordTy
+
         let names = rfields |> List.map (fun f -> f.DisplayNameCore)
         let doc = xmldoc.ToXmlDoc(true, Some names)
         Construct.NewUnionCase id rfields recordTy attrs doc vis
 
     let TcUnionCaseDecls cenv env parent (thisTy: TType) thisTyInst tpenv unionCases =
-        let unionCases' = unionCases |> List.map (TcUnionCaseDecl cenv env parent thisTy thisTyInst tpenv) 
-        unionCases' |> CheckDuplicates (fun uc -> uc.Id) "union case" 
+        let unionCasesR = unionCases |> List.map (TcUnionCaseDecl cenv env parent thisTy thisTyInst tpenv) 
+        unionCasesR |> CheckDuplicates (fun uc -> uc.Id) "union case" 
 
     let TcEnumDecl cenv env parent thisTy fieldTy (SynEnumCase(attributes=Attributes synAttrs; ident=id; value=v; xmlDoc=xmldoc; range=m)) =
         let attrs = TcAttributes cenv env AttributeTargets.Field synAttrs
@@ -528,8 +538,9 @@ module TcRecdUnionAndEnumDeclarations =
             let doc = xmldoc.ToXmlDoc(true, Some [])
             Construct.NewRecdField true (Some v) id false thisTy false false [] attrs doc vis false
       
-    let TcEnumDecls cenv env parent thisTy enumCases =
-        let fieldTy = NewInferenceType ()
+    let TcEnumDecls (cenv: cenv) env parent thisTy enumCases =
+        let g = cenv.g
+        let fieldTy = NewInferenceType g
         let enumCases' = enumCases |> List.map (TcEnumDecl cenv env parent thisTy fieldTy) |> CheckDuplicates (fun f -> f.Id) "enum element"
         fieldTy, enumCases'
 
@@ -538,10 +549,16 @@ module TcRecdUnionAndEnumDeclarations =
 //------------------------------------------------------------------------- 
 
 let PublishInterface (cenv: cenv) denv (tcref: TyconRef) m compgen ty' = 
-    if not (isInterfaceTy cenv.g ty') then errorR(Error(FSComp.SR.tcTypeIsNotInterfaceType1(NicePrint.minimalStringOfType denv ty'), m))
-    let tcaug = tcref.TypeContents
-    if tcref.HasInterface cenv.g ty' then 
+    let g = cenv.g
+
+    if not (isInterfaceTy g ty') then
+        errorR(Error(FSComp.SR.tcTypeIsNotInterfaceType1(NicePrint.minimalStringOfType denv ty'), m))
+
+    if tcref.HasInterface g ty' then 
         errorR(Error(FSComp.SR.tcDuplicateSpecOfInterface(), m))
+
+    let tcaug = tcref.TypeContents
+
     tcaug.tcaug_interfaces <- (ty', compgen, m) :: tcaug.tcaug_interfaces
 
 let TcAndPublishMemberSpec cenv env containerInfo declKind tpenv memb = 
@@ -649,10 +666,14 @@ let TcOpenTypeDecl (cenv: cenv) mOpenDecl scopem env (synType: SynType, m) =
     let env = OpenTypeContent cenv.tcSink g cenv.amap scopem env typ openDecl
     env, [openDecl]
 
-let TcOpenDecl cenv mOpenDecl scopem env target = 
+let TcOpenDecl (cenv: cenv) mOpenDecl scopem env target = 
+    let g = cenv.g
     match target with
-    | SynOpenDeclTarget.ModuleOrNamespace (longId, m) -> TcOpenModuleOrNamespaceDecl cenv.tcSink cenv.g cenv.amap scopem env (longId, m)
-    | SynOpenDeclTarget.Type (synType, m) -> TcOpenTypeDecl cenv mOpenDecl scopem env (synType, m)
+    | SynOpenDeclTarget.ModuleOrNamespace (longId, m) ->
+        TcOpenModuleOrNamespaceDecl cenv.tcSink g cenv.amap scopem env (longId, m)
+
+    | SynOpenDeclTarget.Type (synType, m) ->
+        TcOpenTypeDecl cenv mOpenDecl scopem env (synType, m)
         
 exception ParameterlessStructCtor of range
 
@@ -715,16 +736,18 @@ module IncrClassChecking =
         
         /// Get the type parameters of the implicit constructor, after taking equi-recursive inference into account.
         member ctorInfo.GetNormalizedInstanceCtorDeclaredTypars (cenv: cenv) denv m = 
+            let g = cenv.g
             let ctorDeclaredTypars = ctorInfo.InstanceCtorDeclaredTypars
-            let ctorDeclaredTypars = ChooseCanonicalDeclaredTyparsAfterInference cenv.g denv ctorDeclaredTypars m
+            let ctorDeclaredTypars = ChooseCanonicalDeclaredTyparsAfterInference g denv ctorDeclaredTypars m
             ctorDeclaredTypars
 
     /// Check and elaborate the "left hand side" of the implicit class construction 
     /// syntax.
     let TcImplicitCtorLhs_Phase2A(cenv: cenv, env, tpenv, tcref: TyconRef, vis, attrs, spats, thisIdOpt, baseValOpt: Val option, safeInitInfo, m, copyOfTyconTypars, objTy, thisTy, doc: PreXmlDoc) =
 
+        let g = cenv.g
         let baseValOpt = 
-            match GetSuperTypeOfType cenv.g cenv.amap m objTy with 
+            match GetSuperTypeOfType g cenv.amap m objTy with 
             | Some superTy -> MakeAndPublishBaseVal cenv env (match baseValOpt with None -> None | Some v -> Some v.Id) superTy
             | None -> None
 
@@ -748,10 +771,11 @@ module IncrClassChecking =
         // NOTE: the type scheme here is not complete!!! The ctorTy is more or less 
         // just a type variable. The type and typars get fixed-up after inference 
         let ctorValScheme, ctorVal = 
-            let argty = mkRefTupledTy cenv.g (typesOfVals ctorArgs)
+            let argty = mkRefTupledTy g (typesOfVals ctorArgs)
             // Initial type has known information 
-            let ctorTy = mkFunTy argty objTy    
-            // REVIEW: no attributes can currently be specified for the implicit constructor 
+            let ctorTy = mkFunTy g argty objTy    
+
+            // NOTE: no attributes can currently be specified for the implicit constructor 
             let attribs = TcAttributes cenv env (AttributeTargets.Constructor ||| AttributeTargets.Method) attrs
             let memberFlags = CtorMemberFlags SynMemberFlagsTrivia.Zero
                                   
@@ -760,7 +784,7 @@ module IncrClassChecking =
             let id = ident ("new", m)
 
             CheckForNonAbstractInterface ModuleOrMemberBinding tcref memberFlags id.idRange
-            let memberInfo = MakeMemberDataAndMangledNameForMemberVal(cenv.g, tcref, false, attribs, [], memberFlags, valSynData, id, false)
+            let memberInfo = MakeMemberDataAndMangledNameForMemberVal(g, tcref, false, attribs, [], memberFlags, valSynData, id, false)
             let partialValReprInfo = TranslateTopValSynInfo m (TcAttributes cenv env) valSynData
             let prelimTyschemeG = TypeScheme(copyOfTyconTypars, ctorTy)
             let isComplete = ComputeIsComplete copyOfTyconTypars [] ctorTy
@@ -776,13 +800,13 @@ module IncrClassChecking =
         // The .cctor is never referenced by any other code.
         let cctorValInfo = 
             lazy 
-               (let cctorArgs = [ fst(mkCompGenLocal m "unitVar" cenv.g.unit_ty) ]
+               (let cctorArgs = [ fst(mkCompGenLocal m "unitVar" g.unit_ty) ]
 
-                let cctorTy = mkFunTy cenv.g.unit_ty cenv.g.unit_ty
+                let cctorTy = mkFunTy g g.unit_ty g.unit_ty
                 let valSynData = SynValInfo([[]], SynInfo.unnamedRetVal)
                 let id = ident ("cctor", m)
                 CheckForNonAbstractInterface ModuleOrMemberBinding tcref (ClassCtorMemberFlags SynMemberFlagsTrivia.Zero) id.idRange
-                let memberInfo = MakeMemberDataAndMangledNameForMemberVal(cenv.g, tcref, false, [(*no attributes*)], [], (ClassCtorMemberFlags SynMemberFlagsTrivia.Zero), valSynData, id, false)
+                let memberInfo = MakeMemberDataAndMangledNameForMemberVal(g, tcref, false, [(*no attributes*)], [], (ClassCtorMemberFlags SynMemberFlagsTrivia.Zero), valSynData, id, false)
                 let partialValReprInfo = TranslateTopValSynInfo m (TcAttributes cenv env) valSynData
                 let prelimTyschemeG = TypeScheme(copyOfTyconTypars, cctorTy)
                 let topValInfo = InferGenericArityFromTyScheme prelimTyschemeG partialValReprInfo
@@ -872,12 +896,13 @@ module IncrClassChecking =
             | Some res -> res
 
         static member IsMethodRepr (cenv: cenv) (bind: Binding) = 
+            let g = cenv.g
             let v = bind.Var
             // unit fields are not stored, just run rhs for effects
-            if isUnitTy cenv.g v.Type then 
+            if isUnitTy g v.Type then 
                 false
             else 
-                let arity = InferArityOfExprBinding cenv.g AllowTypeDirectedDetupling.Yes v bind.Expr 
+                let arity = InferArityOfExprBinding g AllowTypeDirectedDetupling.Yes v bind.Expr 
                 not arity.HasNoArgs && not v.IsMutable
 
 
@@ -965,7 +990,7 @@ module IncrClassChecking =
                         if isStatic then 
                             tauTy, topValInfo 
                         else 
-                            let tauTy = ctorInfo.InstanceCtorThisVal.Type --> v.TauType
+                            let tauTy = mkFunTy g ctorInfo.InstanceCtorThisVal.Type v.TauType
                             let (ValReprInfo(tpNames, args, ret)) = topValInfo
                             let topValInfo = ValReprInfo(tpNames, ValReprInfo.selfMetadata :: args, ret)
                             tauTy, topValInfo
@@ -1412,7 +1437,7 @@ module IncrClassChecking =
 
         let takenFieldNames = 
             [ for b in memberBinds do 
-                  yield b.Var.CompiledName cenv.g.CompilerGlobalState
+                  yield b.Var.CompiledName g.CompilerGlobalState
                   yield b.Var.DisplayName 
                   yield b.Var.DisplayNameCoreMangled 
                   yield b.Var.LogicalName ] 
@@ -1495,7 +1520,7 @@ module IncrClassChecking =
             let ctorBody = List.foldBack (fun (_, binder) acc -> binder acc) ctorInitActionsPre ctorBody
 
             // Add the final wrapping to make this into a method
-            let ctorBody = mkMemberLambdas m [] (Some thisVal) ctorInfo.InstanceCtorBaseValOpt [ctorInfo.InstanceCtorArgs] (ctorBody, g.unit_ty)
+            let ctorBody = mkMemberLambdas g m [] (Some thisVal) ctorInfo.InstanceCtorBaseValOpt [ctorInfo.InstanceCtorArgs] (ctorBody, g.unit_ty)
 
             ctorBody
 
@@ -1509,7 +1534,7 @@ module IncrClassChecking =
                 let cctorArgs, cctorVal, _ = ctorInfo.StaticCtorValInfo.Force()
                 // Reconstitute the type of the implicit class constructor with the correct quantified type variables.
                 cctorVal.SetType (mkForallTyIfNeeded ctorDeclaredTypars cctorVal.TauType)
-                let cctorBody = mkMemberLambdas m [] None None [cctorArgs] (cctorInitAction, g.unit_ty)
+                let cctorBody = mkMemberLambdas g m [] None None [cctorArgs] (cctorInitAction, g.unit_ty)
                 Some cctorBody
         
         ctorBody, cctorBodyOpt, methodBinds, reps
@@ -1865,9 +1890,9 @@ module MutRecBindingChecking =
                             let envInstance = AddDeclaredTypars CheckForDuplicateTypars incrClassCtorLhs.InstanceCtorDeclaredTypars envInstance
                             let envStatic = AddDeclaredTypars CheckForDuplicateTypars incrClassCtorLhs.InstanceCtorDeclaredTypars envStatic
                             let envInstance = match incrClassCtorLhs.InstanceCtorSafeThisValOpt with Some v -> AddLocalVal g cenv.tcSink scopem v envInstance | None -> envInstance
-                            let envInstance = List.foldBack (AddLocalValPrimitive cenv.g) incrClassCtorLhs.InstanceCtorArgs envInstance 
+                            let envInstance = List.foldBack (AddLocalValPrimitive g) incrClassCtorLhs.InstanceCtorArgs envInstance 
                             let envNonRec = match incrClassCtorLhs.InstanceCtorSafeThisValOpt with Some v -> AddLocalVal g cenv.tcSink scopem v envNonRec | None -> envNonRec
-                            let envNonRec = List.foldBack (AddLocalValPrimitive cenv.g) incrClassCtorLhs.InstanceCtorArgs envNonRec
+                            let envNonRec = List.foldBack (AddLocalValPrimitive g) incrClassCtorLhs.InstanceCtorArgs envNonRec
                             let safeThisValBindOpt = TcLetrecComputeCtorSafeThisValBind cenv incrClassCtorLhs.InstanceCtorSafeThisValOpt
 
                             let innerState = (tpenv, envInstance, envStatic, envNonRec, generalizedRecBinds, preGeneralizationRecBinds, uncheckedRecBindsTable)
@@ -1920,7 +1945,7 @@ module MutRecBindingChecking =
                                     errorR(Error(FSComp.SR.tcDllImportNotAllowed(), bind.Var.Range))
                                     
                                 let nm = bind.Var.DisplayName
-                                let ty = generalizedTyconRef tcref
+                                let ty = generalizedTyconRef g tcref
                                 let ad = envNonRec.AccessRights
                                 match TryFindIntrinsicMethInfo cenv.infoReader bind.Var.Range ad nm ty, 
                                       TryFindIntrinsicPropInfo cenv.infoReader bind.Var.Range ad nm ty with 
@@ -1928,7 +1953,7 @@ module MutRecBindingChecking =
                                 | _ -> errorR (Error(FSComp.SR.tcMemberAndLocalClassBindingHaveSameName nm, bind.Var.Range))
 
                             // Also add static entries to the envInstance if necessary 
-                            let envInstance = (if isStatic then (binds, envInstance) ||> List.foldBack (fun b e -> AddLocalVal cenv.g cenv.tcSink scopem b.Var e) else env)
+                            let envInstance = (if isStatic then (binds, envInstance) ||> List.foldBack (fun b e -> AddLocalVal g cenv.tcSink scopem b.Var e) else env)
                             let envStatic = (if isStatic then env else envStatic)
                             let innerState = (tpenv, envInstance, envStatic, envNonRec, generalizedRecBinds, preGeneralizationRecBinds, uncheckedRecBindsTable)
                             Phase2BIncrClassBindings bindRs, innerState
@@ -2206,19 +2231,25 @@ module MutRecBindingChecking =
 
     /// Check a "module X = A.B.C" module abbreviation declaration
     let TcModuleAbbrevDecl (cenv: cenv) scopem (env: TcEnv) (id, p, m) = 
+        let g = cenv.g
         let ad = env.AccessRights
         let resolved =
             match p with
             | [] -> Result []
             | id :: rest -> ResolveLongIdentAsModuleOrNamespace cenv.tcSink ResultCollectionSettings.AllResults cenv.amap m true OpenQualified env.NameEnv ad id rest false
+
         let mvvs = ForceRaise resolved
+
         if isNil mvvs then env else
         let modrefs = mvvs |> List.map p23
+
         if not (isNil modrefs) && modrefs |> List.forall (fun modref -> modref.IsNamespace) then 
             errorR(Error(FSComp.SR.tcModuleAbbreviationForNamespace(fullDisplayTextOfModRef (List.head modrefs)), m))
+
         let modrefs = modrefs |> List.filter (fun mvv -> not mvv.IsNamespace)
+
         if isNil modrefs then env else 
-        modrefs |> List.iter (fun modref -> CheckEntityAttributes cenv.g modref m |> CommitOperationResult)        
+        modrefs |> List.iter (fun modref -> CheckEntityAttributes g modref m |> CommitOperationResult)        
         let env = AddModuleAbbreviationAndReport cenv.tcSink scopem id modrefs env
         env
 
@@ -2238,6 +2269,7 @@ module MutRecBindingChecking =
     
     /// Compute the active environments within each nested module.
     let TcMutRecDefns_ComputeEnvs getTyconOpt getVals (cenv: cenv) report scopem m envInitial mutRecShape =
+        let g = cenv.g
         (envInitial, mutRecShape) ||> MutRecShapes.computeEnvs 
             (fun envAbove (MutRecDefnsPhase2DataForModule (mtypeAcc, mspec)) -> MakeInnerEnvWithAcc true envAbove mspec.Id mtypeAcc mspec.ModuleOrNamespaceType.ModuleOrNamespaceKind)
             (fun envAbove decls -> 
@@ -2269,24 +2301,27 @@ module MutRecBindingChecking =
                 // is not allowed.
 
                 let envForDecls = envAbove
+
                 // Add the modules being defined
-                let envForDecls = (envForDecls, mspecs) ||> List.fold ((if report then AddLocalSubModuleAndReport cenv.tcSink scopem else AddLocalSubModule) cenv.g cenv.amap m)
+                let envForDecls = (envForDecls, mspecs) ||> List.fold ((if report then AddLocalSubModuleAndReport cenv.tcSink scopem else AddLocalSubModule) g cenv.amap m)
+
                 // Process the 'open' declarations                
                 let envForDecls =
                     (envForDecls, opens) ||> List.fold (fun env (target, m, moduleRange, openDeclsRef) ->
                         let env, openDecls = TcOpenDecl cenv m moduleRange env target
                         openDeclsRef.Value <- openDecls
                         env)
+
                 // Add the type definitions being defined
-                let envForDecls = (if report then AddLocalTyconsAndReport cenv.tcSink scopem else AddLocalTycons) cenv.g cenv.amap m tycons envForDecls 
+                let envForDecls = (if report then AddLocalTyconsAndReport cenv.tcSink scopem else AddLocalTycons) g cenv.amap m tycons envForDecls 
                 // Add the exception definitions being defined
                 let envForDecls = (envForDecls, exns) ||> List.fold (AddLocalExnDefnAndReport cenv.tcSink scopem)
                 // Add the modules again (but don't report them a second time)
-                let envForDecls = (envForDecls, mspecs) ||> List.fold (AddLocalSubModule cenv.g cenv.amap m)
+                let envForDecls = (envForDecls, mspecs) ||> List.fold (AddLocalSubModule g cenv.amap m)
                 // Add the module abbreviations
                 let envForDecls = (envForDecls, moduleAbbrevs) ||> List.fold (TcModuleAbbrevDecl cenv scopem)
                 // Add the values and members
-                let envForDecls = AddLocalVals cenv.g cenv.tcSink scopem lets envForDecls
+                let envForDecls = AddLocalVals g cenv.tcSink scopem lets envForDecls
                 envForDecls)
 
     /// Phase 2: Check the members and 'let' definitions in a mutually recursive group of definitions.
@@ -2330,8 +2365,8 @@ module MutRecBindingChecking =
 
                 let envForDeclsUpdated = 
                     envForDecls
-                    |> AddLocalVals cenv.g cenv.tcSink scopem prelimRecValues 
-                    |> AddLocalVals cenv.g cenv.tcSink scopem ctorVals 
+                    |> AddLocalVals g cenv.tcSink scopem prelimRecValues 
+                    |> AddLocalVals g cenv.tcSink scopem ctorVals 
 
                 envForDeclsUpdated)
 
@@ -2430,7 +2465,7 @@ let TcMutRecDefns_Phase2 (cenv: cenv) envInitial bindsm scopem mutRecNSInfo (env
         let overridesOK = DeclKind.CanOverrideOrImplement declKind
         members |> List.collect (function
             | SynMemberDefn.Interface(interfaceType=ity; members=defnOpt) -> 
-                  let _, ty = if tcref.Deref.IsExceptionDecl then [], g.exn_ty else generalizeTyconRef tcref
+                  let ty = if tcref.Deref.IsExceptionDecl then g.exn_ty else generalizedTyconRef g tcref
                   let m = ity.Range
                   if tcref.IsTypeAbbrev then error(Error(FSComp.SR.tcTypeAbbreviationsCannotHaveInterfaceDeclaration(), m))
                   if tcref.IsEnumTycon then error(Error(FSComp.SR.tcEnumerationsCannotHaveInterfaceDeclaration(), m))
@@ -2555,7 +2590,7 @@ module AddAugmentationDeclarations =
         if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon && scSet.Contains tycon.Stamp then 
             let tcref = mkLocalTyconRef tycon
             let tcaug = tycon.TypeContents
-            let _, ty = if tcref.Deref.IsExceptionDecl then [], g.exn_ty else generalizeTyconRef tcref
+            let ty = if tcref.Deref.IsExceptionDecl then g.exn_ty else generalizedTyconRef g tcref
             let m = tycon.Range
             let genericIComparableTy = mkAppTy g.system_GenericIComparable_tcref [ty]
 
@@ -2606,20 +2641,22 @@ module AddAugmentationDeclarations =
                 PublishValueDefn cenv env ModuleOrMemberBinding evspec3
 
     let AddGenericCompareBindings (cenv: cenv) (tycon: Tycon) =
-        if (* AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon && *) Option.isSome tycon.GeneratedCompareToValues then 
+        if (* AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon && *) Option.isSome tycon.GeneratedCompareToValues then 
             AugmentWithHashCompare.MakeBindingsForCompareAugmentation cenv.g tycon
         else
             []
             
     let AddGenericCompareWithComparerBindings (cenv: cenv) (tycon: Tycon) =
-        if (* AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon && *) Option.isSome tycon.GeneratedCompareToWithComparerValues then
-             (AugmentWithHashCompare.MakeBindingsForCompareWithComparerAugmentation cenv.g tycon)
-         else
+        let g = cenv.g
+        if Option.isSome tycon.GeneratedCompareToWithComparerValues then
+            AugmentWithHashCompare.MakeBindingsForCompareWithComparerAugmentation g tycon
+        else
             []
              
     let AddGenericEqualityWithComparerBindings (cenv: cenv) (tycon: Tycon) =
-        if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon && Option.isSome tycon.GeneratedHashAndEqualsWithComparerValues then
-            (AugmentWithHashCompare.MakeBindingsForEqualityWithComparerAugmentation cenv.g tycon)
+        let g = cenv.g
+        if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon && Option.isSome tycon.GeneratedHashAndEqualsWithComparerValues then
+            (AugmentWithHashCompare.MakeBindingsForEqualityWithComparerAugmentation g tycon)
         else
             []
 
@@ -2637,7 +2674,7 @@ module AddAugmentationDeclarations =
         if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then 
             let tcref = mkLocalTyconRef tycon
             let tcaug = tycon.TypeContents
-            let _, ty = if tcref.Deref.IsExceptionDecl then [], g.exn_ty else generalizeTyconRef tcref
+            let ty = if tcref.Deref.IsExceptionDecl then g.exn_ty else generalizedTyconRef g tcref
             let m = tycon.Range
             
             // Note: tycon.HasOverride only gives correct results after we've done the type augmentation 
@@ -2676,7 +2713,7 @@ module TyconConstraintInference =
         // Initially, assume the equality relation is available for all structural type definitions 
         let initialAssumedTycons = 
             set [ for tycon, _ in tyconsWithStructuralTypes do 
-                       if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon then 
+                       if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon then 
                            yield tycon.Stamp ]
 
         // Initially, don't assume that the equality relation is dependent on any type variables
@@ -2692,7 +2729,7 @@ module TyconConstraintInference =
             let rec checkIfFieldTypeSupportsComparison (tycon: Tycon) (ty: TType) =
                 
                 // Is the field type a type parameter?
-                match tryDestTyparTy cenv.g ty with
+                match tryDestTyparTy g ty with
                 | ValueSome tp ->
                     // Look for an explicit 'comparison' constraint
                     if tp.Constraints |> List.exists (function TyparConstraint.SupportsComparison _ -> true | _ -> false) then 
@@ -2740,8 +2777,8 @@ module TyconConstraintInference =
                 assumedTycons |> Set.filter (fun tyconStamp -> 
                    let tycon, structuralTypes = tab.[tyconStamp] 
 
-                   if cenv.g.compilingFslib && 
-                      AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare cenv.g tycon && 
+                   if g.compilingFslib && 
+                      AugmentWithHashCompare.TyconIsCandidateForAugmentationWithCompare g tycon && 
                       not (HasFSharpAttribute g g.attrib_StructuralComparisonAttribute tycon.Attribs) && 
                       not (HasFSharpAttribute g g.attrib_NoComparisonAttribute tycon.Attribs) then 
                        errorR(Error(FSComp.SR.tcFSharpCoreRequiresExplicit(), tycon.Range)) 
@@ -2807,7 +2844,7 @@ module TyconConstraintInference =
         // Initially, assume the equality relation is available for all structural type definitions 
         let initialAssumedTycons = 
             set [ for tycon, _ in tyconsWithStructuralTypes do 
-                       if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon then 
+                       if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then 
                            yield tycon.Stamp ]
                            
         // Initially, don't assume that the equality relation is dependent on any type variables
@@ -2821,7 +2858,7 @@ module TyconConstraintInference =
             // Checks if a field type supports the 'equality' constraint based on the assumptions about the type constructors
             // and type parameters.
             let rec checkIfFieldTypeSupportsEquality (tycon: Tycon) (ty: TType) =
-                match tryDestTyparTy cenv.g ty with
+                match tryDestTyparTy g ty with
                 | ValueSome tp ->
                     // Look for an explicit 'equality' constraint
                     if tp.Constraints |> List.exists (function TyparConstraint.SupportsEquality _ -> true | _ -> false) then 
@@ -2868,8 +2905,8 @@ module TyconConstraintInference =
 
                    let tycon, structuralTypes = tab.[tyconStamp] 
 
-                   if cenv.g.compilingFslib && 
-                      AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon && 
+                   if g.compilingFslib && 
+                      AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon && 
                       not (HasFSharpAttribute g g.attrib_StructuralEqualityAttribute tycon.Attribs) && 
                       not (HasFSharpAttribute g g.attrib_NoEqualityAttribute tycon.Attribs) then 
                        errorR(Error(FSComp.SR.tcFSharpCoreRequiresExplicit(), tycon.Range)) 
@@ -2881,7 +2918,7 @@ module TyconConstraintInference =
                    if not res then 
                        match TryFindFSharpBoolAttribute g g.attrib_StructuralEqualityAttribute tycon.Attribs with
                        | Some true -> 
-                           if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon then 
+                           if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then 
                                match structuralTypes |> List.tryFind (fst >> checkIfFieldTypeSupportsEquality tycon >> not) with
                                | None -> 
                                    assert false
@@ -2896,7 +2933,7 @@ module TyconConstraintInference =
                        | Some false -> 
                            ()
                        | None -> 
-                           if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals cenv.g tycon then 
+                           if AugmentWithHashCompare.TyconIsCandidateForAugmentationWithEquals g tycon then 
                                match structuralTypes |> List.tryFind (fst >> checkIfFieldTypeSupportsEquality tycon >> not) with
                                | None -> 
                                    assert false
@@ -2977,7 +3014,7 @@ module TcExceptionDeclarations =
                 match idOpt with
                 | Some fieldId ->
                     let tcref = mkLocalTyconRef exnc
-                    let thisTypInst, _ = generalizeTyconRef tcref
+                    let thisTypInst, _ = generalizeTyconRef g tcref
                     let item = Item.RecdField (RecdFieldInfo (thisTypInst, RecdFieldRef (tcref, fieldId.idText)))
                     CallNameResolutionSink cenv.tcSink (fieldId.idRange, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.AccessRights)
                 | _ -> ()
@@ -3026,10 +3063,11 @@ module TcExceptionDeclarations =
         CallNameResolutionSink cenv.tcSink (id.idRange, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.AccessRights)
         args'
 
-    let private TcExnDefnCore cenv env parent synExnDefnRepr =
+    let private TcExnDefnCore (cenv: cenv) env parent synExnDefnRepr =
+        let g = cenv.g
         let exnc = TcExnDefnCore_Phase1A cenv env parent synExnDefnRepr
         let args' = TcExnDefnCore_Phase1G_EstablishRepresentation cenv env parent exnc synExnDefnRepr
-        exnc.TypeContents.tcaug_super <- Some cenv.g.exn_ty
+        exnc.TypeContents.tcaug_super <- Some g.exn_ty
 
         PublishTypeDefn cenv env exnc
 
@@ -3047,10 +3085,10 @@ module TcExceptionDeclarations =
 
         binds, exnc
 
-
-    let TcExnDefn cenv envInitial parent (SynExceptionDefn(core, _, aug, m), scopem) = 
+    let TcExnDefn (cenv: cenv) envInitial parent (SynExceptionDefn(core, _, aug, m), scopem) = 
+        let g = cenv.g
         let binds1, exnc = TcExnDefnCore cenv envInitial parent core
-        let envMutRec = AddLocalExnDefnAndReport cenv.tcSink scopem (AddLocalTycons cenv.g cenv.amap scopem [exnc] envInitial) exnc 
+        let envMutRec = AddLocalExnDefnAndReport cenv.tcSink scopem (AddLocalTycons g cenv.amap scopem [exnc] envInitial) exnc 
 
         let defns = [MutRecShape.Tycon(MutRecDefnsPhase2DataForTycon(Some exnc, parent, ModuleOrMemberBinding, mkLocalEntityRef exnc, None, NoSafeInitInfo, [], aug, m, NoNewSlots, (fun () -> ())))]
         let binds2, envFinal = TcMutRecDefns_Phase2 cenv envInitial m scopem None envMutRec defns
@@ -3059,9 +3097,10 @@ module TcExceptionDeclarations =
         let binds3 = AddAugmentationDeclarations.AddGenericEqualityBindings cenv envFinal exnc
         binds1 @ binds2flat @ binds3, exnc, envFinal
 
-    let TcExnSignature cenv envInitial parent tpenv (SynExceptionSig(exnRepr=core; members=aug), scopem) = 
+    let TcExnSignature (cenv: cenv) envInitial parent tpenv (SynExceptionSig(exnRepr=core; members=aug), scopem) = 
+        let g = cenv.g
         let binds, exnc = TcExnDefnCore cenv envInitial parent core
-        let envMutRec = AddLocalExnDefnAndReport cenv.tcSink scopem (AddLocalTycons cenv.g cenv.amap scopem [exnc] envInitial) exnc 
+        let envMutRec = AddLocalExnDefnAndReport cenv.tcSink scopem (AddLocalTycons g cenv.amap scopem [exnc] envInitial) exnc 
         let ecref = mkLocalEntityRef exnc
         let vals, _ = TcTyconMemberSpecs cenv envMutRec (ContainerInfo(parent, Some(MemberOrValContainerInfo(ecref, None, None, NoSafeInitInfo, [])))) ModuleOrMemberBinding tpenv aug
         binds, vals, ecref, envMutRec
@@ -3146,8 +3185,9 @@ module EstablishTypeDefinitionCores =
     /// Get the component types that make a record, union or struct type.
     ///
     /// Used when determining if a structural type supports structural comparison.
-    let private GetStructuralElementsOfTyconDefn cenv env tpenv (MutRecDefnsPhase1DataForTycon(_, synTyconRepr, _, _, _, _)) tycon = 
+    let private GetStructuralElementsOfTyconDefn (cenv: cenv) env tpenv (MutRecDefnsPhase1DataForTycon(_, synTyconRepr, _, _, _, _)) tycon = 
         let thisTyconRef = mkLocalTyconRef tycon
+        let g = cenv.g
         let m = tycon.Range
         let env = AddDeclaredTypars CheckForDuplicateTypars (tycon.Typars m) env
         let env = MakeInnerEnvForTyconRef env thisTyconRef false 
@@ -3163,7 +3203,7 @@ module EstablishTypeDefinitionCores =
                       yield (ty', m)
                 | SynUnionCaseKind.FullType (ty, arity) -> 
                   let ty', _ = TcTypeAndRecover cenv NoNewTypars NoCheckCxs ItemOccurence.UseInType env tpenv ty
-                  let curriedArgTys, _ = GetTopTauTypeInFSharpForm cenv.g (arity |> TranslateTopValSynInfo m (TcAttributes cenv env) |> TranslatePartialArity []).ArgInfos ty' m
+                  let curriedArgTys, _ = GetTopTauTypeInFSharpForm g (arity |> TranslateTopValSynInfo m (TcAttributes cenv env) |> TranslatePartialArity []).ArgInfos ty' m
                   if curriedArgTys.Length > 1 then 
                       errorR(Error(FSComp.SR.tcIllegalFormForExplicitTypeDeclaration(), m))   
                   for argTys in curriedArgTys do
@@ -3183,7 +3223,7 @@ module EstablishTypeDefinitionCores =
                   for arg in ctorArgNames do
                       let ty = names.[arg].Type
                       let m = names.[arg].Ident.idRange
-                      if not (isNil (ListSet.subtract typarEq (freeInTypeLeftToRight cenv.g false ty) tycon.TyparsNoRange)) then
+                      if not (isNil (ListSet.subtract typarEq (freeInTypeLeftToRight g false ty) tycon.TyparsNoRange)) then
                           errorR(Error(FSComp.SR.tcStructsMustDeclareTypesOfImplicitCtorArgsExplicitly(), m))   
                       yield (ty, m)
 
@@ -3203,9 +3243,10 @@ module EstablishTypeDefinitionCores =
     let AdjustModuleName modKind nm = (match modKind with FSharpModuleWithSuffix -> nm+FSharpModuleSuffix | _ -> nm)
 
     let InstanceMembersNeedSafeInitCheck (cenv: cenv) m thisTy = 
+        let g = cenv.g
         ExistsInEntireHierarchyOfType 
-            (fun ty -> not (isStructTy cenv.g ty) && (match tryTcrefOfAppTy cenv.g ty with ValueSome tcref when tcref.HasSelfReferentialConstructor -> true | _ -> false))
-            cenv.g 
+            (fun ty -> not (isStructTy g ty) && (match tryTcrefOfAppTy g ty with ValueSome tcref when tcref.HasSelfReferentialConstructor -> true | _ -> false))
+            g 
             cenv.amap
             m 
             AllowMultiIntfInstantiations.Yes
@@ -3213,9 +3254,10 @@ module EstablishTypeDefinitionCores =
         
     // Make the "delayed reference" boolean value recording the safe initialization of a type in a hierarchy where there is a HasSelfReferentialConstructor
     let ComputeInstanceSafeInitInfo (cenv: cenv) env m thisTy = 
+        let g = cenv.g
         if InstanceMembersNeedSafeInitCheck cenv m thisTy then 
-            let rfield = MakeSafeInitField cenv.g env m false
-            let tcref = tcrefOfAppTy cenv.g thisTy
+            let rfield = MakeSafeInitField g env m false
+            let tcref = tcrefOfAppTy g thisTy
             SafeInitField (mkRecdFieldRef tcref rfield.LogicalName, rfield)
         else
             NoSafeInitInfo
@@ -3255,11 +3297,12 @@ module EstablishTypeDefinitionCores =
                | _ -> () ]
             |> set
 
-    let TcTyconDefnCore_Phase1A_BuildInitialModule cenv envInitial parent typeNames compInfo decls =
+    let TcTyconDefnCore_Phase1A_BuildInitialModule (cenv: cenv) envInitial parent typeNames compInfo decls =
+        let g = cenv.g
         let (SynComponentInfo(Attributes attribs, _, _, longPath, xml, _, vis, im)) = compInfo 
         let id = ComputeModuleName longPath
         let modAttrs = TcAttributes cenv envInitial AttributeTargets.ModuleDecl attribs 
-        let modKind = ComputeModuleOrNamespaceKind cenv.g true typeNames modAttrs id.idText
+        let modKind = ComputeModuleOrNamespaceKind g true typeNames modAttrs id.idText
         let modName = AdjustModuleName modKind id.idText
 
         let vis, _ = ComputeAccessAndCompPath envInitial None id.idRange vis None parent
@@ -3267,7 +3310,7 @@ module EstablishTypeDefinitionCores =
         CheckForDuplicateModule envInitial id.idText id.idRange
         let id = ident (modName, id.idRange)
         CheckForDuplicateConcreteType envInitial id.idText im
-        CheckNamespaceModuleOrTypeName cenv.g id
+        CheckNamespaceModuleOrTypeName g id
 
         let envForDecls, mtypeAcc = MakeInnerEnv true envInitial id modKind    
         let mty = Construct.NewEmptyModuleOrNamespaceType modKind
@@ -3282,9 +3325,11 @@ module EstablishTypeDefinitionCores =
     /// but 
     ///    - we don't yet 'properly' establish constraints on type parameters
     let private TcTyconDefnCore_Phase1A_BuildInitialTycon (cenv: cenv) env parent (MutRecDefnsPhase1DataForTycon(synTyconInfo, synTyconRepr, _, preEstablishedHasDefaultCtor, hasSelfReferentialCtor, _)) = 
+        let g = cenv.g
         let (SynComponentInfo (_, TyparDecls synTypars, _, id, doc, preferPostfix, synVis, _)) = synTyconInfo
         let checkedTypars = TcTyparDecls cenv env synTypars
-        id |> List.iter (CheckNamespaceModuleOrTypeName cenv.g)
+        id |> List.iter (CheckNamespaceModuleOrTypeName g)
+
         match synTyconRepr with 
         | SynTypeDefnSimpleRepr.Exception synExnDefnRepr -> 
           TcExceptionDeclarations.TcExnDefnCore_Phase1A cenv env parent synExnDefnRepr
@@ -3354,6 +3399,7 @@ module EstablishTypeDefinitionCores =
     ///  synTyconInfo: Syntactic AST for the name, attributes etc. of the type constructor
     ///  synTyconRepr: Syntactic AST for the RHS of the type definition
     let private TcTyconDefnCore_Phase1B_EstablishBasicKind (cenv: cenv) inSig envinner (MutRecDefnsPhase1DataForTycon(synTyconInfo, synTyconRepr, _, _, _, _)) (tycon: Tycon) = 
+        let g = cenv.g
         let (SynComponentInfo(Attributes synAttrs, TyparDecls typars, _, _, _, _, _, _)) = synTyconInfo
         let m = tycon.Range
         let id = tycon.Id
@@ -3361,21 +3407,21 @@ module EstablishTypeDefinitionCores =
         // 'Check' the attributes. We return the results to avoid having to re-check them in all other phases. 
         // Allow failure of constructor resolution because Vals for members in the same recursive group are not yet available
         let attrs, getFinalAttrs = TcAttributesCanFail cenv envinner AttributeTargets.TyconDecl synAttrs
-        let hasMeasureAttr = HasFSharpAttribute cenv.g cenv.g.attrib_MeasureAttribute attrs
+        let hasMeasureAttr = HasFSharpAttribute g g.attrib_MeasureAttribute attrs
 
         let isStructRecordOrUnionType = 
             match synTyconRepr with
             | SynTypeDefnSimpleRepr.Record _ 
             | TyconCoreAbbrevThatIsReallyAUnion (hasMeasureAttr, envinner, id) _
             | SynTypeDefnSimpleRepr.Union _ -> 
-                HasFSharpAttribute cenv.g cenv.g.attrib_StructAttribute attrs
+                HasFSharpAttribute g g.attrib_StructAttribute attrs
             | _ -> 
                 false
 
         tycon.SetIsStructRecordOrUnion isStructRecordOrUnionType
 
         // Set the compiled name, if any
-        tycon.SetCompiledName (TryFindFSharpStringAttribute cenv.g cenv.g.attrib_CompiledNameAttribute attrs)
+        tycon.SetCompiledName (TryFindFSharpStringAttribute g g.attrib_CompiledNameAttribute attrs)
 
         if hasMeasureAttr then 
             tycon.SetTypeOrMeasureKind TyparKind.Measure
@@ -3386,7 +3432,7 @@ module EstablishTypeDefinitionCores =
             | SynTypeDefnSimpleRepr.Exception _ -> TNoRepr
             | SynTypeDefnSimpleRepr.None m -> 
                 // Run InferTyconKind to raise errors on inconsistent attribute sets
-                InferTyconKind cenv.g (SynTypeDefnKind.Opaque, attrs, [], [], inSig, true, m) |> ignore
+                InferTyconKind g (SynTypeDefnKind.Opaque, attrs, [], [], inSig, true, m) |> ignore
                 if not inSig && not hasMeasureAttr then 
                     errorR(Error(FSComp.SR.tcTypeRequiresDefinition(), m))
                 if hasMeasureAttr then 
@@ -3400,32 +3446,32 @@ module EstablishTypeDefinitionCores =
             | SynTypeDefnSimpleRepr.Union (_, _, m) -> 
 
                 // Run InferTyconKind to raise errors on inconsistent attribute sets
-                InferTyconKind cenv.g (SynTypeDefnKind.Union, attrs, [], [], inSig, true, m) |> ignore
+                InferTyconKind g (SynTypeDefnKind.Union, attrs, [], [], inSig, true, m) |> ignore
 
                 // Note: the table of union cases is initially empty
                 Construct.MakeUnionRepr []
 
             | SynTypeDefnSimpleRepr.TypeAbbrev _ -> 
                 // Run InferTyconKind to raise errors on inconsistent attribute sets
-                InferTyconKind cenv.g (SynTypeDefnKind.Abbrev, attrs, [], [], inSig, true, m) |> ignore
+                InferTyconKind g (SynTypeDefnKind.Abbrev, attrs, [], [], inSig, true, m) |> ignore
                 TNoRepr
 
             | SynTypeDefnSimpleRepr.LibraryOnlyILAssembly (s, m) -> 
                 let s = (s :?> ILType)
                 // Run InferTyconKind to raise errors on inconsistent attribute sets
-                InferTyconKind cenv.g (SynTypeDefnKind.IL, attrs, [], [], inSig, true, m) |> ignore
+                InferTyconKind g (SynTypeDefnKind.IL, attrs, [], [], inSig, true, m) |> ignore
                 TAsmRepr s
 
             | SynTypeDefnSimpleRepr.Record (_, _, m) -> 
 
                 // Run InferTyconKind to raise errors on inconsistent attribute sets
-                InferTyconKind cenv.g (SynTypeDefnKind.Record, attrs, [], [], inSig, true, m) |> ignore
+                InferTyconKind g (SynTypeDefnKind.Record, attrs, [], [], inSig, true, m) |> ignore
 
                 // Note: the table of record fields is initially empty
                 TFSharpRecdRepr (Construct.MakeRecdFieldsTable [])
 
             | SynTypeDefnSimpleRepr.General (kind, _, slotsigs, fields, isConcrete, _, _, _) ->
-                let kind = InferTyconKind cenv.g (kind, attrs, slotsigs, fields, inSig, isConcrete, m)
+                let kind = InferTyconKind g (kind, attrs, slotsigs, fields, inSig, isConcrete, m)
                 match kind with 
                 | SynTypeDefnKind.Opaque -> 
                     TNoRepr
@@ -3434,7 +3480,7 @@ module EstablishTypeDefinitionCores =
                         match kind with
                         | SynTypeDefnKind.Class -> TFSharpClass
                         | SynTypeDefnKind.Interface -> TFSharpInterface
-                        | SynTypeDefnKind.Delegate _ -> TFSharpDelegate (MakeSlotSig("Invoke", cenv.g.unit_ty, [], [], [], None))
+                        | SynTypeDefnKind.Delegate _ -> TFSharpDelegate (MakeSlotSig("Invoke", g.unit_ty, [], [], [], None))
                         | SynTypeDefnKind.Struct -> TFSharpStruct 
                         | _ -> error(InternalError("should have inferred tycon kind", m))
 
@@ -3502,6 +3548,8 @@ module EstablishTypeDefinitionCores =
 
     /// Check and establish a 'type X = ABC<...>' provided type definition
     let private TcTyconDefnCore_Phase1C_EstablishDeclarationForGeneratedSetOfTypes (cenv: cenv) inSig (tycon: Tycon, rhsType: SynType, tcrefForContainer: TyconRef, theRootType: Tainted, checkTypeName, args, m) =
+        let g = cenv.g
+
         // Explanation: We are definitely on the compilation thread here, we just have not propagated the token this far.
         let ctok = AssumeCompilationThreadWithoutEvidence()
 
@@ -3546,7 +3594,7 @@ module EstablishTypeDefinitionCores =
             if isForcedSuppressRelocate && canAccessFromEverywhere tycon.Accessibility && not cenv.isScript then 
                 errorR(Error(FSComp.SR.tcGeneratedTypesShouldBeInternalOrPrivate(), tcref.Range))
 
-            let isSuppressRelocate = cenv.g.isInteractive || isForcedSuppressRelocate
+            let isSuppressRelocate = g.isInteractive || isForcedSuppressRelocate
     
             // Adjust the representation of the container type
             let repr =
@@ -3659,6 +3707,7 @@ module EstablishTypeDefinitionCores =
     /// TAST type for 'PairOfInts' will report 'true' 
     //
     let private TcTyconDefnCore_Phase1C_Phase1E_EstablishAbbreviations (cenv: cenv) envinner inSig tpenv pass (MutRecDefnsPhase1DataForTycon(_, synTyconRepr, _, _, _, _)) (tycon: Tycon) (attrs: Attribs) =
+        let g = cenv.g
         let m = tycon.Range
         let checkCxs = if (pass = SecondPass) then CheckCxs else NoCheckCxs
         let firstPass = (pass = FirstPass)
@@ -3666,8 +3715,8 @@ module EstablishTypeDefinitionCores =
             let id = tycon.Id
             let thisTyconRef = mkLocalTyconRef tycon
 
-            let hasMeasureAttr = HasFSharpAttribute cenv.g cenv.g.attrib_MeasureAttribute attrs
-            let hasMeasureableAttr = HasFSharpAttribute cenv.g cenv.g.attrib_MeasureableAttribute attrs
+            let hasMeasureAttr = HasFSharpAttribute g g.attrib_MeasureAttribute attrs
+            let hasMeasureableAttr = HasFSharpAttribute g g.attrib_MeasureableAttribute attrs
             let envinner = AddDeclaredTypars CheckForDuplicateTypars (tycon.Typars m) envinner
             let envinner = MakeInnerEnvForTyconRef envinner thisTyconRef false 
 
@@ -3703,7 +3752,7 @@ module EstablishTypeDefinitionCores =
                     let ty, _ = TcTypeOrMeasureAndRecover (Some kind) cenv NoNewTypars checkCxs ItemOccurence.UseInType envinner tpenv rhsType
 
                     if not firstPass then 
-                        let ftyvs = freeInTypeLeftToRight cenv.g false ty 
+                        let ftyvs = freeInTypeLeftToRight g false ty 
                         let typars = tycon.Typars m
                         if ftyvs.Length <> typars.Length then 
                             errorR(Deprecated(FSComp.SR.tcTypeAbbreviationHasTypeParametersMissingOnType(), tycon.Range))
@@ -3718,7 +3767,8 @@ module EstablishTypeDefinitionCores =
 
     // Third phase: check and publish the super types. Run twice, once before constraints are established
     // and once after
-    let private TcTyconDefnCore_Phase1D_Phase1F_EstablishSuperTypesAndInterfaceTypes cenv tpenv inSig pass (envMutRec, mutRecDefns: MutRecShape<_ * (Tycon * (Attribs * _)) option, _, _> list) = 
+    let private TcTyconDefnCore_Phase1D_Phase1F_EstablishSuperTypesAndInterfaceTypes (cenv: cenv) tpenv inSig pass (envMutRec, mutRecDefns: MutRecShape<_ * (Tycon * (Attribs * _)) option, _, _> list) = 
+        let g = cenv.g
         let checkCxs = if (pass = SecondPass) then CheckCxs else NoCheckCxs
         let firstPass = (pass = FirstPass)
 
@@ -3742,7 +3792,7 @@ module EstablishTypeDefinitionCores =
                     match synTyconRepr with 
                     | SynTypeDefnSimpleRepr.Exception _ -> [], []
                     | SynTypeDefnSimpleRepr.General (kind, inherits, slotsigs, fields, isConcrete, _, _, m) ->
-                        let kind = InferTyconKind cenv.g (kind, attrs, slotsigs, fields, inSig, isConcrete, m)
+                        let kind = InferTyconKind g (kind, attrs, slotsigs, fields, inSig, isConcrete, m)
 
                         let inherits = inherits |> List.map (fun (ty, m, _) -> (ty, m)) 
                         let inheritedTys = fst (List.mapFold (mapFoldFst (TcTypeAndRecover cenv NoNewTypars checkCxs ItemOccurence.UseInType envinner)) tpenv inherits)
@@ -3761,7 +3811,7 @@ module EstablishTypeDefinitionCores =
                         implementedTys, []
 
                 for implementedTy, m in implementedTys do
-                    if firstPass && isErasedType cenv.g implementedTy then 
+                    if firstPass && isErasedType g implementedTy then 
                         errorR(Error(FSComp.SR.tcCannotInheritFromErasedType(), m)) 
 
                 // Publish interfaces, but only on the first pass, to avoid a duplicate interface check 
@@ -3777,22 +3827,22 @@ module EstablishTypeDefinitionCores =
           try 
               let super = 
                   match synTyconRepr with 
-                  | SynTypeDefnSimpleRepr.Exception _ -> Some cenv.g.exn_ty
+                  | SynTypeDefnSimpleRepr.Exception _ -> Some g.exn_ty
                   | SynTypeDefnSimpleRepr.None _ -> None
                   | SynTypeDefnSimpleRepr.TypeAbbrev _ -> None
                   | SynTypeDefnSimpleRepr.LibraryOnlyILAssembly _ -> None
                   | SynTypeDefnSimpleRepr.Union _ 
                   | SynTypeDefnSimpleRepr.Record _ ->
-                      if tycon.IsStructRecordOrUnionTycon then Some(cenv.g.system_Value_ty)
+                      if tycon.IsStructRecordOrUnionTycon then Some(g.system_Value_ty)
                       else None
                   | SynTypeDefnSimpleRepr.General (kind, _, slotsigs, fields, isConcrete, _, _, _) ->
-                      let kind = InferTyconKind cenv.g (kind, attrs, slotsigs, fields, inSig, isConcrete, m)
+                      let kind = InferTyconKind g (kind, attrs, slotsigs, fields, inSig, isConcrete, m)
                                            
                       match inheritedTys with 
                       | [] -> 
                           match kind with 
-                          | SynTypeDefnKind.Struct -> Some(cenv.g.system_Value_ty)
-                          | SynTypeDefnKind.Delegate _ -> Some(cenv.g.system_MulticastDelegate_ty )
+                          | SynTypeDefnKind.Struct -> Some(g.system_Value_ty)
+                          | SynTypeDefnKind.Delegate _ -> Some(g.system_MulticastDelegate_ty )
                           | SynTypeDefnKind.Opaque | SynTypeDefnKind.Class | SynTypeDefnKind.Interface -> None
                           | _ -> error(InternalError("should have inferred tycon kind", m)) 
 
@@ -3800,25 +3850,25 @@ module EstablishTypeDefinitionCores =
                           if not firstPass && not (match kind with SynTypeDefnKind.Class -> true | _ -> false) then 
                               errorR (Error(FSComp.SR.tcStructsInterfacesEnumsDelegatesMayNotInheritFromOtherTypes(), m)) 
                           CheckSuperType cenv ty m 
-                          if isTyparTy cenv.g ty then 
+                          if isTyparTy g ty then 
                               if firstPass then 
                                   errorR(Error(FSComp.SR.tcCannotInheritFromVariableType(), m)) 
-                              Some cenv.g.obj_ty // a "super" that is a variable type causes grief later
+                              Some g.obj_ty // a "super" that is a variable type causes grief later
                           else                          
                               Some ty 
                       | _ -> 
                           error(Error(FSComp.SR.tcTypesCannotInheritFromMultipleConcreteTypes(), m))
 
                   | SynTypeDefnSimpleRepr.Enum _ -> 
-                      Some(cenv.g.system_Enum_ty) 
+                      Some(g.system_Enum_ty) 
 
               // Allow super type to be a function type but convert back to FSharpFunc to make sure it has metadata
               // (We don't apply the same rule to tuple types, i.e. no F#-declared inheritors of those are permitted)
               let super = 
                   super |> Option.map (fun ty -> 
-                     if isFunTy cenv.g ty then  
-                         let a,b = destFunTy cenv.g ty
-                         mkAppTy cenv.g.fastFunc_tcr [a; b] 
+                     if isFunTy g ty then  
+                         let a,b = destFunTy g ty
+                         mkAppTy g.fastFunc_tcr [a; b] 
                      else ty)
 
               // Publish the super type
@@ -3834,7 +3884,7 @@ module EstablishTypeDefinitionCores =
             let id = tycon.Id
             let thisTyconRef = mkLocalTyconRef tycon
             let innerParent = Parent thisTyconRef
-            let thisTyInst, thisTy = generalizeTyconRef thisTyconRef
+            let thisTyInst, thisTy = generalizeTyconRef g thisTyconRef
 
             let hasAbstractAttr = HasFSharpAttribute g g.attrib_AbstractClassAttribute attrs
             let hasSealedAttr = 
@@ -4098,7 +4148,7 @@ module EstablishTypeDefinitionCores =
                                   noAbstractClassAttributeCheck()
                                   noFieldsCheck userFields
                                   let ty', _ = TcTypeAndRecover cenv NoNewTypars CheckCxs ItemOccurence.UseInType envinner tpenv ty
-                                  let _, _, curriedArgInfos, returnTy, _ = GetTopValTypeInCompiledForm cenv.g (arity |> TranslateTopValSynInfo m (TcAttributes cenv envinner)  |> TranslatePartialArity []) 0 ty' m
+                                  let _, _, curriedArgInfos, returnTy, _ = GetTopValTypeInCompiledForm g (arity |> TranslateTopValSynInfo m (TcAttributes cenv envinner)  |> TranslatePartialArity []) 0 ty' m
                                   if curriedArgInfos.Length < 1 then error(Error(FSComp.SR.tcInvalidDelegateSpecification(), m))
                                   if curriedArgInfos.Length > 1 then error(Error(FSComp.SR.tcDelegatesCannotBeCurried(), m))
                                   let ttps = thisTyconRef.Typars m
@@ -4309,7 +4359,7 @@ module EstablishTypeDefinitionCores =
             and accStructFieldType structTycon structTyInst fspec fieldTy (doneTypes, acc) =
                 let fieldTy = stripTyparEqns fieldTy
                 match fieldTy with
-                | TType_tuple (_isStruct , tinst2) when isStructTupleTy cenv.g fieldTy ->
+                | TType_tuple (_isStruct , tinst2) when isStructTupleTy g fieldTy ->
                     // The field is a struct tuple. Check each element of the tuple.
                     // This case was added to resolve issues/3916
                     ((doneTypes, acc), tinst2)
@@ -4364,7 +4414,7 @@ module EstablishTypeDefinitionCores =
             let acc = []
             let acc = 
                 if tycon.IsStructOrEnumTycon then
-                    let tinst, ty = generalizeTyconRef (mkLocalTyconRef tycon)
+                    let tinst, ty = generalizeTyconRef g (mkLocalTyconRef tycon)
                     let _, acc = accStructAllFields ty tycon tinst ([], acc)
                     acc
                 else
@@ -4883,6 +4933,8 @@ module TcDeclarations =
     /// Bind a collection of mutually recursive definitions in an implementation file
     let TcMutRecDefinitions (cenv: cenv) envInitial parent typeNames tpenv m scopem mutRecNSInfo (mutRecDefns: MutRecDefnsInitialData) =
 
+        let g = cenv.g
+
         // Split the definitions into "core representations" and "members". The code to process core representations
         // is shared between processing of signature files and implementation files.
         let mutRecDefnsAfterSplit = mutRecDefns |> MutRecShapes.mapTycons SplitTyconDefn
@@ -4904,7 +4956,7 @@ module TcDeclarations =
                 let declKind, tcref, declaredTyconTypars = ComputeTyconDeclKind cenv envForDecls tyconOpt isAtOriginalTyconDefn false tyDeclRange typars cs longPath
                 let newslotsOK = (if isAtOriginalTyconDefn && tcref.IsFSharpObjectModelTycon then NewSlotsOK else NoNewSlots)
 
-                if (declKind = ExtrinsicExtensionBinding) && isByrefTyconRef cenv.g tcref then 
+                if (declKind = ExtrinsicExtensionBinding) && isByrefTyconRef g tcref then 
                     error(Error(FSComp.SR.tcByrefsMayNotHaveTypeExtensions(), tyDeclRange))
 
                 if not (isNil members) && tcref.IsTypeAbbrev then 
@@ -5021,6 +5073,7 @@ module TcDeclarations =
 
 
     let private TcMutRecSignatureDecls_Phase2 (cenv: cenv) scopem envMutRec mutRecDefns =
+        let g = cenv.g
         (envMutRec, mutRecDefns) ||> MutRecShapes.mapWithEnv 
             // Do this for the members in each 'type' declaration 
             (fun envForDecls ((tyconCore, (synTyconInfo, members), innerParent), tyconOpt, _fixupFinalAttrs, _) -> 
@@ -5039,7 +5092,7 @@ module TcDeclarations =
             (fun envForDecls (containerInfo, valSpec) -> 
                 let tpenv = emptyUnscopedTyparEnv
                 let idvs, _ = TcAndPublishValSpec (cenv, envForDecls, containerInfo, ModuleOrMemberBinding, None, tpenv, valSpec)
-                let env = List.foldBack (AddLocalVal cenv.g cenv.tcSink scopem) idvs envForDecls
+                let env = List.foldBack (AddLocalVal g cenv.tcSink scopem) idvs envForDecls
                 env)
 
 
@@ -5080,8 +5133,9 @@ module TcDeclarations =
 // Bind module types
 //------------------------------------------------------------------------- 
 
-let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synSigDecl: Cancellable =
+let rec TcSignatureElementNonMutRec (cenv: cenv) parent typeNames endm (env: TcEnv) synSigDecl: Cancellable =
   cancellable {
+    let g = cenv.g
     try 
         match synSigDecl with 
         | SynModuleSigDecl.Exception (edef, m) ->
@@ -5108,7 +5162,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
             let containerInfo = ModuleOrNamespaceContainerInfo parentModule
             let idvs, _ = TcAndPublishValSpec (cenv, env, containerInfo, ModuleOrMemberBinding, None, emptyUnscopedTyparEnv, vspec)
             let scopem = unionRanges m endm
-            let env = List.foldBack (AddLocalVal cenv.g cenv.tcSink scopem) idvs env
+            let env = List.foldBack (AddLocalVal g cenv.tcSink scopem) idvs env
             return env
 
         | SynModuleSigDecl.NestedModule(SynComponentInfo(attributes=Attributes attribs; longId=longPath; xmlDoc=xml; accessibility=vis; range=im) as compInfo, isRec, mdefs, m, trivia) ->
@@ -5121,8 +5175,8 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
                 let id = ComputeModuleName longPath
                 let vis, _ = ComputeAccessAndCompPath env None im vis None parent
                 let attribs = TcAttributes cenv env AttributeTargets.ModuleDecl attribs
-                CheckNamespaceModuleOrTypeName cenv.g id
-                let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind cenv.g true typeNames attribs id.idText
+                CheckNamespaceModuleOrTypeName g id
+                let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind g true typeNames attribs id.idText
                 let modName = EstablishTypeDefinitionCores.AdjustModuleName modKind id.idText
                 CheckForDuplicateConcreteType env modName id.idRange
 
@@ -5138,7 +5192,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
                 mspec.entity_modul_contents <- MaybeLazy.Strict mtyp 
                 let scopem = unionRanges m endm
                 PublishModuleDefn cenv env mspec
-                let env = AddLocalSubModuleAndReport cenv.tcSink scopem cenv.g cenv.amap m env mspec
+                let env = AddLocalSubModuleAndReport cenv.tcSink scopem g cenv.amap m env mspec
                 return env
             
         | SynModuleSigDecl.ModuleAbbrev (id, p, m) -> 
@@ -5157,7 +5211,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
                 errorR(Error(FSComp.SR.tcModuleAbbreviationForNamespace(fullDisplayTextOfModRef (List.head unfilteredModrefs)), m))
             
             if List.isEmpty modrefs then return env else
-            modrefs |> List.iter (fun modref -> CheckEntityAttributes cenv.g modref m |> CommitOperationResult)        
+            modrefs |> List.iter (fun modref -> CheckEntityAttributes g modref m |> CommitOperationResult)        
             
             let env = AddModuleAbbreviationAndReport cenv.tcSink scopem id modrefs env 
             return env
@@ -5169,7 +5223,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
         | SynModuleSigDecl.NamespaceFragment (SynModuleOrNamespaceSig(longId, isRec, kind, defs, xml, attribs, vis, m)) -> 
 
             do for id in longId do 
-                 CheckNamespaceModuleOrTypeName cenv.g id
+                 CheckNamespaceModuleOrTypeName g id
 
             // Logically speaking, this changes 
             //    module [rec] A.B.M
@@ -5186,7 +5240,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
                     longId, defs
 
             let envNS = LocateEnv cenv.topCcu env enclosingNamespacePath
-            let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink cenv.g cenv.amap m enclosingNamespacePath envNS
+            let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink g cenv.amap m enclosingNamespacePath envNS
 
             // For 'namespace rec' and 'module rec' we add the thing being defined 
             let mtypNS = envNS.eModuleOrNamespaceTypeAccumulator.Value
@@ -5199,7 +5253,7 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
                 CallNameResolutionSink cenv.tcSink (mspec.Range, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.AccessRights))
 
             // For 'namespace rec' and 'module rec' we add the thing being defined 
-            let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m envNS mtypRoot else envNS
+            let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m envNS mtypRoot else envNS
             let nsInfo = Some (mspecNSOpt, envNS.eModuleOrNamespaceTypeAccumulator) 
             let mutRecNSInfo = if isRec then nsInfo else None
 
@@ -5211,12 +5265,12 @@ let rec TcSignatureElementNonMutRec cenv parent typeNames endm (env: TcEnv) synS
                 if isNil enclosingNamespacePath then 
                     envAtEnd
                 else
-                    let env = AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m env mtypRoot
+                    let env = AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m env mtypRoot
 
                     // If the namespace is an interactive fragment e.g. FSI_0002, then open FSI_0002 in the subsequent environment.
                     let env, _openDecls = 
-                        match TryStripPrefixPath cenv.g enclosingNamespacePath with 
-                        | Some(p, _) -> TcOpenModuleOrNamespaceDecl cenv.tcSink cenv.g cenv.amap m.EndRange env ([p], m.EndRange)
+                        match TryStripPrefixPath g enclosingNamespacePath with 
+                        | Some(p, _) -> TcOpenModuleOrNamespaceDecl cenv.tcSink g cenv.amap m.EndRange env ([p], m.EndRange)
                         | None -> env, []
 
                     // Publish the combined module type
@@ -5366,6 +5420,7 @@ let CheckLetOrDoInNamespace binds m =
 /// The non-mutually recursive case for a declaration
 let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem env synDecl = 
   cancellable {
+    let g = cenv.g
     cenv.synArgNameGenerator.Reset()
     let tpenv = emptyUnscopedTyparEnv
 
@@ -5436,7 +5491,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
               let id = ComputeModuleName longPath
 
               let modAttrs = TcAttributes cenv env AttributeTargets.ModuleDecl attribs
-              let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind cenv.g true typeNames modAttrs id.idText
+              let modKind = EstablishTypeDefinitionCores.ComputeModuleOrNamespaceKind g true typeNames modAttrs id.idText
               let modName = EstablishTypeDefinitionCores.AdjustModuleName modKind id.idText
               CheckForDuplicateConcreteType env modName im
               CheckForDuplicateModule env id.idText id.idRange
@@ -5445,7 +5500,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
               let endm = m.EndRange
               let id = ident (modName, id.idRange)
 
-              CheckNamespaceModuleOrTypeName cenv.g id
+              CheckNamespaceModuleOrTypeName g id
 
               let envForModule, mtypeAcc = MakeInnerEnv true env id modKind
     
@@ -5461,8 +5516,10 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
               // Get the inferred type of the decls and record it in the mspec. 
               mspec.entity_modul_contents <- MaybeLazy.Strict mtypeAcc.Value
               let modDefn = TMDefRec(false, [], [], [ModuleOrNamespaceBinding.Module(mspec, mexpr)], m)
+
               PublishModuleDefn cenv env mspec 
-              let env = AddLocalSubModuleAndReport cenv.tcSink scopem cenv.g cenv.amap m env mspec
+
+              let env = AddLocalSubModuleAndReport cenv.tcSink scopem g cenv.amap m env mspec
           
               // isContinuingModule is true for all of the following
               //   - the implicit module of a script 
@@ -5482,7 +5539,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
           let endm = m.EndRange
 
           do for id in longId do 
-               CheckNamespaceModuleOrTypeName cenv.g id
+               CheckNamespaceModuleOrTypeName g id
 
           // Logically speaking, this changes 
           //    module [rec] A.B.M
@@ -5499,7 +5556,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
                   longId, defs
 
           let envNS = LocateEnv cenv.topCcu env enclosingNamespacePath
-          let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink cenv.g cenv.amap m enclosingNamespacePath envNS
+          let envNS = ImplicitlyOpenOwnNamespace cenv.tcSink g cenv.amap m enclosingNamespacePath envNS
 
           let mtypNS = envNS.eModuleOrNamespaceTypeAccumulator.Value
           let mtypRoot, mspecNSs = BuildRootModuleType enclosingNamespacePath envNS.eCompPath mtypNS
@@ -5511,7 +5568,7 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
             CallNameResolutionSink cenv.tcSink (mspec.Range, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.AccessRights))
 
           // For 'namespace rec' and 'module rec' we add the thing being defined 
-          let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m envNS mtypRoot else envNS
+          let envNS = if isRec then AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m envNS mtypRoot else envNS
           let nsInfo = Some (mspecNSOpt, envNS.eModuleOrNamespaceTypeAccumulator)
           let mutRecNSInfo = if isRec then nsInfo else None
 
@@ -5523,12 +5580,12 @@ let rec TcModuleOrNamespaceElementNonMutRec (cenv: cenv) parent typeNames scopem
               if isNil enclosingNamespacePath then 
                   envAtEnd, []
               else
-                  let env = AddLocalRootModuleOrNamespace cenv.tcSink cenv.g cenv.amap m env mtypRoot
+                  let env = AddLocalRootModuleOrNamespace cenv.tcSink g cenv.amap m env mtypRoot
 
                   // If the namespace is an interactive fragment e.g. FSI_0002, then open FSI_0002 in the subsequent environment
                   let env, openDecls = 
-                      match TryStripPrefixPath cenv.g enclosingNamespacePath with 
-                      | Some(p, _) -> TcOpenModuleOrNamespaceDecl cenv.tcSink cenv.g cenv.amap m.EndRange env ([p], m.EndRange)
+                      match TryStripPrefixPath g enclosingNamespacePath with 
+                      | Some(p, _) -> TcOpenModuleOrNamespaceDecl cenv.tcSink g cenv.amap m.EndRange env ([p], m.EndRange)
                       | None -> env, []
 
                   // Publish the combined module type
@@ -5862,11 +5919,11 @@ let CheckModuleSignature g (cenv: cenv) m denvAtEnd rootSigOpt implFileTypePrior
                     raise (ReportedError None)
 
                 // Compute the remapping from implementation to signature
-                let remapInfo, _ = ComputeRemappingFromInferredSignatureToExplicitSignature cenv.g implFileTypePriorToSig sigFileType
+                let remapInfo, _ = ComputeRemappingFromInferredSignatureToExplicitSignature g implFileTypePriorToSig sigFileType
                      
                 let aenv = { TypeEquivEnv.Empty with EquivTycons = TyconRefMap.OfList remapInfo.RepackagedEntities }
                     
-                if not (SignatureConformance.Checker(cenv.g, cenv.amap, denv, remapInfo, true).CheckSignature aenv cenv.infoReader (mkLocalModRef implFileSpecPriorToSig) sigFileType) then (
+                if not (SignatureConformance.Checker(g, cenv.amap, denv, remapInfo, true).CheckSignature aenv cenv.infoReader (mkLocalModRef implFileSpecPriorToSig) sigFileType) then (
                     // We can just raise 'ReportedError' since CheckModuleOrNamespace raises its own error 
                     raise (ReportedError None)
                 )
diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index 45e1e073922..8ebc9ab8d3a 100644
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -465,8 +465,9 @@ type cenv = TcFileState
 let CopyAndFixupTypars m rigid tpsorig =
     FreshenAndFixupTypars m rigid [] [] tpsorig
 
-let UnifyTypes cenv (env: TcEnv) m actualTy expectedTy =
-    AddCxTypeEqualsType env.eContextInfo env.DisplayEnv cenv.css m (tryNormalizeMeasureInType cenv.g actualTy) (tryNormalizeMeasureInType cenv.g expectedTy)
+let UnifyTypes (cenv: cenv) (env: TcEnv) m actualTy expectedTy =
+    let g = cenv.g
+    AddCxTypeEqualsType env.eContextInfo env.DisplayEnv cenv.css m (tryNormalizeMeasureInType g actualTy) (tryNormalizeMeasureInType g expectedTy)
 
 // If the overall type admits subsumption or type directed conversion, and the original unify would have failed,
 // then allow subsumption or type directed conversion.
@@ -474,10 +475,11 @@ let UnifyTypes cenv (env: TcEnv) m actualTy expectedTy =
 // Any call to UnifyOverallType MUST have a matching call to TcAdjustExprForTypeDirectedConversions
 // to actually build the expression for any conversion applied.
 let UnifyOverallType cenv (env: TcEnv) m overallTy actualTy =
+    let g = cenv.g
     match overallTy with
-    | MustConvertTo(isMethodArg, reqdTy) when cenv.g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions ->
-        let actualTy = tryNormalizeMeasureInType cenv.g actualTy
-        let reqdTy = tryNormalizeMeasureInType cenv.g reqdTy
+    | MustConvertTo(isMethodArg, reqdTy) when g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions ->
+        let actualTy = tryNormalizeMeasureInType g actualTy
+        let reqdTy = tryNormalizeMeasureInType g reqdTy
         if AddCxTypeEqualsTypeUndoIfFailed env.DisplayEnv cenv.css m reqdTy actualTy then
             ()
         else
@@ -616,13 +618,14 @@ let ShrinkContext env oldRange newRange =
 
 /// Optimized unification routine that avoids creating new inference
 /// variables unnecessarily
-let UnifyRefTupleType contextInfo cenv denv m ty ps =
+let UnifyRefTupleType contextInfo (cenv: cenv) denv m ty ps =
+    let g = cenv.g
     let ptys =
-        if isRefTupleTy cenv.g ty then
-            let ptys = destRefTupleTy cenv.g ty
+        if isRefTupleTy g ty then
+            let ptys = destRefTupleTy g ty
             if List.length ps = List.length ptys then ptys
-            else NewInferenceTypes ps
-        else NewInferenceTypes ps
+            else NewInferenceTypes g ps
+        else NewInferenceTypes g ps
 
     let contextInfo =
         match contextInfo with
@@ -634,17 +637,18 @@ let UnifyRefTupleType contextInfo cenv denv m ty ps =
 
 /// Allow the inference of structness from the known type, e.g.
 ///    let (x: struct (int * int)) = (3,4)
-let UnifyTupleTypeAndInferCharacteristics contextInfo cenv denv m knownTy isExplicitStruct ps =
+let UnifyTupleTypeAndInferCharacteristics contextInfo (cenv: cenv) denv m knownTy isExplicitStruct ps =
+    let g = cenv.g
     let tupInfo, ptys =
-        if isAnyTupleTy cenv.g knownTy then
-            let tupInfo, ptys = destAnyTupleTy cenv.g knownTy
+        if isAnyTupleTy g knownTy then
+            let tupInfo, ptys = destAnyTupleTy g knownTy
             let tupInfo = (if isExplicitStruct then tupInfoStruct else tupInfo)
-            let ptys =
-                if List.length ps = List.length ptys then ptys
-                else NewInferenceTypes ps
+            let ptys = 
+                if List.length ps = List.length ptys then ptys 
+                else NewInferenceTypes g ps
             tupInfo, ptys
         else
-            mkTupInfo isExplicitStruct, NewInferenceTypes ps
+            mkTupInfo isExplicitStruct, NewInferenceTypes g ps
 
     let contextInfo =
         match contextInfo with
@@ -657,9 +661,10 @@ let UnifyTupleTypeAndInferCharacteristics contextInfo cenv denv m knownTy isExpl
 
 // Allow inference of assembly-affinity and structness from the known type - even from another assembly. This is a rule of
 // the language design and allows effective cross-assembly use of anonymous types in some limited circumstances.
-let UnifyAnonRecdTypeAndInferCharacteristics contextInfo cenv denv m ty isExplicitStruct unsortedNames =
+let UnifyAnonRecdTypeAndInferCharacteristics contextInfo (cenv: cenv) denv m ty isExplicitStruct unsortedNames =
+    let g = cenv.g
     let anonInfo, ptys =
-        match tryDestAnonRecdTy cenv.g ty with
+        match tryDestAnonRecdTy g ty with
         | ValueSome (anonInfo, ptys) ->
             // Note: use the assembly of the known type, not the current assembly
             // Note: use the structness of the known type, unless explicit
@@ -668,12 +673,12 @@ let UnifyAnonRecdTypeAndInferCharacteristics contextInfo cenv denv m ty isExplic
             let anonInfo = AnonRecdTypeInfo.Create(anonInfo.Assembly, tupInfo, unsortedNames)
             let ptys =
                 if List.length ptys = Array.length unsortedNames then ptys
-                else NewInferenceTypes (Array.toList anonInfo.SortedNames)
+                else NewInferenceTypes g (Array.toList anonInfo.SortedNames)
             anonInfo, ptys
         | ValueNone ->
             // Note: no known anonymous record type - use our assembly
             let anonInfo = AnonRecdTypeInfo.Create(cenv.topCcu, mkTupInfo isExplicitStruct, unsortedNames)
-            anonInfo, NewInferenceTypes (Array.toList anonInfo.SortedNames)
+            anonInfo, NewInferenceTypes g (Array.toList anonInfo.SortedNames)
     let ty2 = TType_anon (anonInfo, ptys)
     AddCxTypeEqualsType contextInfo denv cenv.css m ty ty2
     anonInfo, ptys
@@ -681,12 +686,13 @@ let UnifyAnonRecdTypeAndInferCharacteristics contextInfo cenv denv m ty isExplic
 
 /// Optimized unification routine that avoids creating new inference
 /// variables unnecessarily
-let UnifyFunctionTypeUndoIfFailed cenv denv m ty =
-    match tryDestFunTy cenv.g ty with
+let UnifyFunctionTypeUndoIfFailed (cenv: cenv) denv m ty =
+    let g = cenv.g
+    match tryDestFunTy g ty with
     | ValueNone ->
-        let domainTy = NewInferenceType ()
-        let resultTy = NewInferenceType ()
-        if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (domainTy --> resultTy) then
+        let domainTy = NewInferenceType g
+        let resultTy = NewInferenceType g
+        if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (mkFunTy g domainTy resultTy) then 
             ValueSome(domainTy, resultTy)
         else
             ValueNone
@@ -740,29 +746,30 @@ let ReportImplicitlyIgnoredBoolExpression denv m ty expr =
         extractNext inner
     | expr -> checkExpr m expr
 
-let UnifyUnitType cenv (env: TcEnv) m ty expr =
+let UnifyUnitType (cenv: cenv) (env: TcEnv) m ty expr =
+    let g = cenv.g
     let denv = env.DisplayEnv
-    if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty cenv.g.unit_ty then
+    if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty g.unit_ty then
         true
     else
-        let domainTy = NewInferenceType ()
-        let resultTy = NewInferenceType ()
-        if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (domainTy --> resultTy) then
+        let domainTy = NewInferenceType g
+        let resultTy = NewInferenceType g
+        if AddCxTypeEqualsTypeUndoIfFailed denv cenv.css m ty (mkFunTy g domainTy resultTy) then 
             warning (FunctionValueUnexpected(denv, ty, m))
         else
             let reportImplicitlyDiscardError() =
-                if typeEquiv cenv.g cenv.g.bool_ty ty then
+                if typeEquiv g g.bool_ty ty then
                     warning (ReportImplicitlyIgnoredBoolExpression denv m ty expr)
                 else
                     warning (UnitTypeExpected (denv, ty, m))
 
             match env.eContextInfo with
             | ContextInfo.SequenceExpression seqTy ->
-                let lifted = mkSeqTy cenv.g ty
-                if typeEquiv cenv.g seqTy lifted then
+                let lifted = mkSeqTy g ty
+                if typeEquiv g seqTy lifted then
                     warning (Error (FSComp.SR.implicitlyDiscardedInSequenceExpression(NicePrint.prettyStringOfTy denv ty), m))
                 else
-                    if isListTy cenv.g ty || isArrayTy cenv.g ty || typeEquiv cenv.g seqTy ty then
+                    if isListTy g ty || isArrayTy g ty || typeEquiv g seqTy ty then
                         warning (Error (FSComp.SR.implicitlyDiscardedSequenceInSequenceExpression(NicePrint.prettyStringOfTy denv ty), m))
                     else
                         reportImplicitlyDiscardError()
@@ -771,9 +778,10 @@ let UnifyUnitType cenv (env: TcEnv) m ty expr =
 
         false
 
-let TryUnifyUnitTypeWithoutWarning cenv (env:TcEnv) m ty =
+let TryUnifyUnitTypeWithoutWarning (cenv: cenv) (env:TcEnv) m ty =
+    let g = cenv.g
     let denv = env.DisplayEnv
-    AddCxTypeEqualsTypeUndoIfFailedOrWarnings denv cenv.css m ty cenv.g.unit_ty
+    AddCxTypeEqualsTypeUndoIfFailedOrWarnings denv cenv.css m ty g.unit_ty
 
 // Logically extends System.AttributeTargets
 module AttributeTargets =
@@ -807,7 +815,8 @@ let rec TcSynRationalConst c =
   | SynRationalConst.Rational(p, q, _) -> DivRational (intToRational p) (intToRational q)
 
 /// Typecheck constant terms in expressions and patterns
-let TcConst cenv (overallTy: TType) m env c =
+let TcConst (cenv: cenv) (overallTy: TType) m env c =
+    let g = cenv.g
     let rec tcMeasure ms =
         match ms with
         | SynMeasure.One -> Measure.One
@@ -842,40 +851,40 @@ let TcConst cenv (overallTy: TType) m env c =
         unif measureTy
 
     let expandedMeasurablesEnabled =
-        cenv.g.langVersion.SupportsFeature LanguageFeature.ExpandedMeasurables
+        g.langVersion.SupportsFeature LanguageFeature.ExpandedMeasurables
 
     match c with
-    | SynConst.Unit -> unif cenv.g.unit_ty; Const.Unit
-    | SynConst.Bool i -> unif cenv.g.bool_ty; Const.Bool i
-    | SynConst.Single f -> unif cenv.g.float32_ty; Const.Single f
-    | SynConst.Double f -> unif cenv.g.float_ty; Const.Double f
-    | SynConst.Decimal f -> unif (mkAppTy cenv.g.decimal_tcr []); Const.Decimal f
-    | SynConst.SByte i -> unif cenv.g.sbyte_ty; Const.SByte i
-    | SynConst.Int16 i -> unif cenv.g.int16_ty; Const.Int16 i
-    | SynConst.Int32 i -> unif cenv.g.int_ty; Const.Int32 i
-    | SynConst.Int64 i -> unif cenv.g.int64_ty; Const.Int64 i
-    | SynConst.IntPtr i -> unif cenv.g.nativeint_ty; Const.IntPtr i
-    | SynConst.Byte i -> unif cenv.g.byte_ty; Const.Byte i
-    | SynConst.UInt16 i -> unif cenv.g.uint16_ty; Const.UInt16 i
-    | SynConst.UInt32 i -> unif cenv.g.uint32_ty; Const.UInt32 i
-    | SynConst.UInt64 i -> unif cenv.g.uint64_ty; Const.UInt64 i
-    | SynConst.UIntPtr i -> unif cenv.g.unativeint_ty; Const.UIntPtr i
-    | SynConst.Measure(SynConst.Single f, _, _) -> unifyMeasureArg (f=0.0f) cenv.g.pfloat32_tcr c; Const.Single f
-    | SynConst.Measure(SynConst.Double f, _, _) -> unifyMeasureArg (f=0.0) cenv.g.pfloat_tcr c; Const.Double f
-    | SynConst.Measure(SynConst.Decimal f, _, _) -> unifyMeasureArg false cenv.g.pdecimal_tcr c; Const.Decimal f
-    | SynConst.Measure(SynConst.SByte i, _, _) -> unifyMeasureArg (i=0y) cenv.g.pint8_tcr c; Const.SByte i
-    | SynConst.Measure(SynConst.Int16 i, _, _) -> unifyMeasureArg (i=0s) cenv.g.pint16_tcr c; Const.Int16 i
-    | SynConst.Measure(SynConst.Int32 i, _, _) -> unifyMeasureArg (i=0) cenv.g.pint_tcr c; Const.Int32 i
-    | SynConst.Measure(SynConst.Int64 i, _, _) -> unifyMeasureArg (i=0L) cenv.g.pint64_tcr c; Const.Int64 i
-    | SynConst.Measure(SynConst.IntPtr i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0L) cenv.g.pnativeint_tcr c; Const.IntPtr i
-    | SynConst.Measure(SynConst.Byte i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0uy) cenv.g.puint8_tcr c; Const.Byte i
-    | SynConst.Measure(SynConst.UInt16 i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0us) cenv.g.puint16_tcr c; Const.UInt16 i
-    | SynConst.Measure(SynConst.UInt32 i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0u) cenv.g.puint_tcr c; Const.UInt32 i
-    | SynConst.Measure(SynConst.UInt64 i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0UL) cenv.g.puint64_tcr c; Const.UInt64 i
-    | SynConst.Measure(SynConst.UIntPtr i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0UL) cenv.g.punativeint_tcr c; Const.UIntPtr i
-    | SynConst.Char c -> unif cenv.g.char_ty; Const.Char c
+    | SynConst.Unit -> unif g.unit_ty; Const.Unit
+    | SynConst.Bool i -> unif g.bool_ty; Const.Bool i
+    | SynConst.Single f -> unif g.float32_ty; Const.Single f
+    | SynConst.Double f -> unif g.float_ty; Const.Double f
+    | SynConst.Decimal f -> unif (mkAppTy g.decimal_tcr []); Const.Decimal f
+    | SynConst.SByte i -> unif g.sbyte_ty; Const.SByte i
+    | SynConst.Int16 i -> unif g.int16_ty; Const.Int16 i
+    | SynConst.Int32 i -> unif g.int_ty; Const.Int32 i
+    | SynConst.Int64 i -> unif g.int64_ty; Const.Int64 i
+    | SynConst.IntPtr i -> unif g.nativeint_ty; Const.IntPtr i
+    | SynConst.Byte i -> unif g.byte_ty; Const.Byte i
+    | SynConst.UInt16 i -> unif g.uint16_ty; Const.UInt16 i
+    | SynConst.UInt32 i -> unif g.uint32_ty; Const.UInt32 i
+    | SynConst.UInt64 i -> unif g.uint64_ty; Const.UInt64 i
+    | SynConst.UIntPtr i -> unif g.unativeint_ty; Const.UIntPtr i
+    | SynConst.Measure(SynConst.Single f, _, _) -> unifyMeasureArg (f=0.0f) g.pfloat32_tcr c; Const.Single f
+    | SynConst.Measure(SynConst.Double f, _, _) -> unifyMeasureArg (f=0.0) g.pfloat_tcr c; Const.Double f
+    | SynConst.Measure(SynConst.Decimal f, _, _) -> unifyMeasureArg false g.pdecimal_tcr c; Const.Decimal f
+    | SynConst.Measure(SynConst.SByte i, _, _) -> unifyMeasureArg (i=0y) g.pint8_tcr c; Const.SByte i
+    | SynConst.Measure(SynConst.Int16 i, _, _) -> unifyMeasureArg (i=0s) g.pint16_tcr c; Const.Int16 i
+    | SynConst.Measure(SynConst.Int32 i, _, _) -> unifyMeasureArg (i=0) g.pint_tcr c; Const.Int32 i
+    | SynConst.Measure(SynConst.Int64 i, _, _) -> unifyMeasureArg (i=0L) g.pint64_tcr c; Const.Int64 i
+    | SynConst.Measure(SynConst.IntPtr i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0L) g.pnativeint_tcr c; Const.IntPtr i
+    | SynConst.Measure(SynConst.Byte i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0uy) g.puint8_tcr c; Const.Byte i
+    | SynConst.Measure(SynConst.UInt16 i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0us) g.puint16_tcr c; Const.UInt16 i
+    | SynConst.Measure(SynConst.UInt32 i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0u) g.puint_tcr c; Const.UInt32 i
+    | SynConst.Measure(SynConst.UInt64 i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0UL) g.puint64_tcr c; Const.UInt64 i
+    | SynConst.Measure(SynConst.UIntPtr i, _, _) when expandedMeasurablesEnabled -> unifyMeasureArg (i=0UL) g.punativeint_tcr c; Const.UIntPtr i
+    | SynConst.Char c -> unif g.char_ty; Const.Char c
     | SynConst.String (s, _, _)
-    | SynConst.SourceIdentifier (_, s, _) -> unif cenv.g.string_ty; Const.String s
+    | SynConst.SourceIdentifier (_, s, _) -> unif g.string_ty; Const.String s
     | SynConst.UserNum _ -> error (InternalError(FSComp.SR.tcUnexpectedBigRationalConstant(), m))
     | SynConst.Measure _ -> error (Error(FSComp.SR.tcInvalidTypeForUnitsOfMeasure(), m))
     | SynConst.UInt16s _ -> error (InternalError(FSComp.SR.tcUnexpectedConstUint16Array(), m))
@@ -1262,7 +1271,8 @@ let PublishValueDefnPrim cenv env (vspec: Val) =
     UpdateAccModuleOrNamespaceType cenv env (fun _ mty ->
         mty.AddVal vspec)
 
-let PublishValueDefn cenv env declKind (vspec: Val) =
+let PublishValueDefn (cenv: cenv) env declKind (vspec: Val) =
+    let g = cenv.g
     if (declKind = ModuleOrMemberBinding) &&
        ((GetCurrAccumulatedModuleOrNamespaceType env).ModuleOrNamespaceKind = Namespace) &&
        (Option.isNone vspec.MemberInfo) then
@@ -1290,7 +1300,7 @@ let PublishValueDefn cenv env declKind (vspec: Val) =
         let tcaug = vspec.MemberApparentEntity.TypeContents
         let vref = mkLocalValRef vspec
         tcaug.tcaug_adhoc <- NameMultiMap.add vspec.LogicalName vref tcaug.tcaug_adhoc
-        tcaug.tcaug_adhoc_list.Add (ValRefIsExplicitImpl cenv.g vref, vref)
+        tcaug.tcaug_adhoc_list.Add (ValRefIsExplicitImpl g vref, vref)
     | _ -> ()
 
 let CombineVisibilityAttribs vis1 vis2 m =
@@ -1327,9 +1337,10 @@ let ComputeAccessAndCompPath env declKindOpt m vis overrideVis actualParent =
     let cpath = if accessModPermitted then Some env.eCompPath else None
     vis, cpath
 
-let CheckForAbnormalOperatorNames cenv (idRange: range) coreDisplayName (memberInfoOpt: ValMemberInfo option) =
+let CheckForAbnormalOperatorNames (cenv: cenv) (idRange: range) coreDisplayName (memberInfoOpt: ValMemberInfo option) =
+    let g = cenv.g
     if (idRange.EndColumn - idRange.StartColumn <= 5) &&
-        not cenv.g.compilingFslib
+        not g.compilingFslib
     then
         let opName = DecompileOpName coreDisplayName
         let isMember = memberInfoOpt.IsSome
@@ -1357,7 +1368,9 @@ let CheckForAbnormalOperatorNames cenv (idRange: range) coreDisplayName (memberI
                 warning(StandardOperatorRedefinitionWarning(FSComp.SR.tcInvalidMemberNameFixedTypes opName, idRange))
         | Other -> ()
 
-let MakeAndPublishVal cenv env (altActualParent, inSig, declKind, vrec, vscheme, attrs, doc, konst, isGeneratedEventVal) =
+let MakeAndPublishVal (cenv: cenv) env (altActualParent, inSig, declKind, vrec, vscheme, attrs, doc, konst, isGeneratedEventVal) =
+
+    let g = cenv.g
 
     let (ValScheme(id, typeScheme, topValData, memberInfoOpt, isMutable, inlineFlag, baseOrThis, vis, compgen, isIncrClass, isTyFunc, hasDeclaredTypars)) = vscheme
 
@@ -1385,7 +1398,7 @@ let MakeAndPublishVal cenv env (altActualParent, inSig, declKind, vrec, vscheme,
             // Members of interface implementations have the accessibility of the interface
             // they are implementing.
             let vis =
-                if MemberIsExplicitImpl cenv.g memberInfo then
+                if MemberIsExplicitImpl g memberInfo then
                     let slotSig = List.head memberInfo.ImplementedSlotSigs
                     match slotSig.ImplementedType with
                     | TType_app (tyconref, _) -> Some tyconref.Accessibility
@@ -1398,13 +1411,13 @@ let MakeAndPublishVal cenv env (altActualParent, inSig, declKind, vrec, vscheme,
     let vis, _ = ComputeAccessAndCompPath env (Some declKind) id.idRange vis overrideVis actualParent
 
     let inlineFlag = 
-        if HasFSharpAttributeOpt cenv.g cenv.g.attrib_DllImportAttribute attrs then 
+        if HasFSharpAttributeOpt g g.attrib_DllImportAttribute attrs then 
             if inlineFlag = ValInline.Always then 
               errorR(Error(FSComp.SR.tcDllImportStubsCannotBeInlined(), m)) 
             ValInline.Never 
         else 
             let implflags = 
-                match TryFindFSharpAttribute cenv.g cenv.g.attrib_MethodImplAttribute attrs with
+                match TryFindFSharpAttribute g g.attrib_MethodImplAttribute attrs with
                 | Some (Attrib(_, _, [ AttribInt32Arg flags ], _, _, _, _)) -> flags
                 | _ -> 0x0
             // MethodImplOptions.NoInlining = 0x8
@@ -1415,7 +1428,7 @@ let MakeAndPublishVal cenv env (altActualParent, inSig, declKind, vrec, vscheme,
                 inlineFlag
 
     // CompiledName not allowed on virtual/abstract/override members
-    let compiledNameAttrib = TryFindFSharpStringAttribute cenv.g cenv.g.attrib_CompiledNameAttribute attrs
+    let compiledNameAttrib = TryFindFSharpStringAttribute g g.attrib_CompiledNameAttribute attrs
     if Option.isSome compiledNameAttrib then
         match memberInfoOpt with
         | Some (PreValMemberInfo(memberInfo, _, _)) ->
@@ -1508,14 +1521,15 @@ let MakeAndPublishBaseVal cenv env baseIdOpt ty =
 
 // Make the "delayed reference" value where the this pointer will reside after calling the base class constructor
 // Make the value for the 'this' pointer for use within a constructor
-let MakeAndPublishSafeThisVal cenv env (thisIdOpt: Ident option) thisTy =
+let MakeAndPublishSafeThisVal (cenv: cenv) env (thisIdOpt: Ident option) thisTy =
+    let g = cenv.g
     match thisIdOpt with
     | Some thisId ->
         // for structs, thisTy is a byref
-        if not (isFSharpObjModelTy cenv.g thisTy) then
+        if not (isFSharpObjModelTy g thisTy) then
             errorR(Error(FSComp.SR.tcStructsCanOnlyBindThisAtMemberDeclaration(), thisId.idRange))
 
-        let valScheme = ValScheme(thisId, NonGenericTypeScheme(mkRefCellTy cenv.g thisTy), None, None, false, ValInline.Never, CtorThisVal, None, false, false, false, false)
+        let valScheme = ValScheme(thisId, NonGenericTypeScheme(mkRefCellTy g thisTy), None, None, false, ValInline.Never, CtorThisVal, None, false, false, false, false)
         Some(MakeAndPublishVal cenv env (ParentNone, false, ExpressionBinding, ValNotInRecScope, valScheme, [], XmlDoc.Empty, None, false))
 
     | None ->
@@ -1621,22 +1635,24 @@ let SetTyparRigid denv m (tp: Typar) =
             errorR(Error(FSComp.SR.tcTypeParameterHasBeenConstrained(NicePrint.prettyStringOfTy denv ty), tp.Range))
     tp.SetRigidity TyparRigidity.Rigid
 
-let GeneralizeVal cenv denv enclosingDeclaredTypars generalizedTyparsForThisBinding
+let GeneralizeVal (cenv: cenv) denv enclosingDeclaredTypars generalizedTyparsForThisBinding
         (PrelimValScheme1(id, explicitTyparInfo, ty, partialValReprInfo, memberInfoOpt, isMutable, inlineFlag, baseOrThis, argAttribs, vis, compgen)) =
 
+    let g = cenv.g
+
     let (ExplicitTyparInfo(_rigidCopyOfDeclaredTypars, declaredTypars, _)) = explicitTyparInfo
 
     let m = id.idRange
 
     let allDeclaredTypars = enclosingDeclaredTypars@declaredTypars
-    let allDeclaredTypars = ChooseCanonicalDeclaredTyparsAfterInference cenv.g denv allDeclaredTypars m
+    let allDeclaredTypars = ChooseCanonicalDeclaredTyparsAfterInference g denv allDeclaredTypars m
 
     // Trim out anything not in type of the value (as opposed to the type of the r.h.s)
     // This is important when a single declaration binds
     // multiple generic items, where each item does not use all the polymorphism
     // of the r.h.s., e.g. let x, y = None, []
     let computeRelevantTypars thruFlag =
-        let ftps = freeInTypeLeftToRight cenv.g thruFlag ty
+        let ftps = freeInTypeLeftToRight g thruFlag ty
         let generalizedTypars = generalizedTyparsForThisBinding |> List.filter (fun tp -> ListSet.contains typarEq tp ftps)
         // Put declared typars first
         let generalizedTypars = PlaceTyparsInDeclarationOrder allDeclaredTypars generalizedTypars
@@ -1785,7 +1801,10 @@ let MakeAndPublishSimpleVals cenv env names =
 /// into scope simultaneously. The technique used to do this is a disturbing and unfortunate hack that
 /// intercepts `NotifyNameResolution` calls being emitted by `MakeAndPublishSimpleVals`
 
-let MakeAndPublishSimpleValsForMergedScope cenv env m (names: NameMap<_>) =
+let MakeAndPublishSimpleValsForMergedScope (cenv: cenv) env m (names: NameMap<_>) =
+
+    let g = cenv.g
+
     let values, vspecMap =
         if names.Count <= 1 then
             MakeAndPublishSimpleVals cenv env names
@@ -1834,7 +1853,7 @@ let MakeAndPublishSimpleValsForMergedScope cenv env m (names: NameMap<_>) =
 
             values, vspecMap
 
-    let envinner = AddLocalValMap cenv.g cenv.tcSink m vspecMap env
+    let envinner = AddLocalValMap g cenv.tcSink m vspecMap env
     envinner, values, vspecMap
 
 //-------------------------------------------------------------------------
@@ -1842,7 +1861,8 @@ let MakeAndPublishSimpleValsForMergedScope cenv env m (names: NameMap<_>) =
 // to C<_> occurs then generate C for a fresh type inference variable ?ty.
 //-------------------------------------------------------------------------
 
-let FreshenTyconRef m rigid (tcref: TyconRef) declaredTyconTypars =
+let FreshenTyconRef (g: TcGlobals) m rigid (tcref: TyconRef) declaredTyconTypars = 
+    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     let tpsorig = declaredTyconTypars
     let tps = copyTypars tpsorig
     if rigid <> TyparRigidity.Rigid then
@@ -1851,7 +1871,7 @@ let FreshenTyconRef m rigid (tcref: TyconRef) declaredTyconTypars =
     let renaming, tinst = FixupNewTypars m [] [] tpsorig tps
     (TType_app(tcref, List.map mkTyparTy tpsorig), tps, renaming, TType_app(tcref, tinst))
 
-let FreshenPossibleForallTy g m rigid ty =
+let FreshenPossibleForallTy g m rigid ty = 
     let tpsorig, tau = tryDestForallTy g ty
     if isNil tpsorig then
         [], [], [], tau
@@ -1861,7 +1881,8 @@ let FreshenPossibleForallTy g m rigid ty =
         let tps, renaming, tinst = CopyAndFixupTypars m rigid tpsorig
         tpsorig, tps, tinst, instType renaming tau
 
-let FreshenTyconRef2 m (tcref: TyconRef) =
+let FreshenTyconRef2 (g: TcGlobals) m (tcref: TyconRef) = 
+    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     let tps, renaming, tinst = FreshenTypeInst m (tcref.Typars m)
     tps, renaming, tinst, TType_app (tcref, tinst)
 
@@ -1902,9 +1923,12 @@ let FreshenAbstractSlot g amap m synTyparDecls absMethInfo =
 // Helpers to typecheck expressions and patterns
 //-------------------------------------------------------------------------
 
-let BuildFieldMap cenv env isPartial ty flds m =
+let BuildFieldMap (cenv: cenv) env isPartial ty flds m =
+    let g = cenv.g
     let ad = env.eAccessRights
+
     if isNil flds then invalidArg "flds" "BuildFieldMap"
+
     let fldCount = flds.Length
 
     let frefSets =
@@ -1918,7 +1942,7 @@ let BuildFieldMap cenv env isPartial ty flds m =
         frefSets |> List.map (fun (_, frefSet, _) -> frefSet |> List.map (fun (FieldResolution(rfinfo, _)) -> rfinfo.TypeInst, rfinfo.TyconRef))
 
     let tinst, tcref =
-        match List.fold (ListSet.intersect (fun (_, tcref1) (_, tcref2) -> tyconRefEq cenv.g tcref1 tcref2)) (List.head relevantTypeSets) (List.tail relevantTypeSets) with
+        match List.fold (ListSet.intersect (fun (_, tcref1) (_, tcref2) -> tyconRefEq g tcref1 tcref2)) (List.head relevantTypeSets) (List.tail relevantTypeSets) with
         | [tinst, tcref] -> tinst, tcref
         | tcrefs ->
             if isPartial then
@@ -1937,7 +1961,7 @@ let BuildFieldMap cenv env isPartial ty flds m =
 
     let fldsmap, rfldsList =
         ((Map.empty, []), frefSets) ||> List.fold (fun (fs, rfldsList) (fld, frefs, fldExpr) ->
-                match frefs |> List.filter (fun (FieldResolution(rfinfo2, _)) -> tyconRefEq cenv.g tcref rfinfo2.TyconRef) with
+                match frefs |> List.filter (fun (FieldResolution(rfinfo2, _)) -> tyconRefEq g tcref rfinfo2.TyconRef) with
                 | [FieldResolution(rfinfo2, showDeprecated)] ->
 
                     // Record the precise resolution of the field for intellisense
@@ -1946,13 +1970,13 @@ let BuildFieldMap cenv env isPartial ty flds m =
 
                     let fref2 = rfinfo2.RecdFieldRef
                     CheckRecdFieldAccessible cenv.amap m env.eAccessRights fref2 |> ignore
-                    CheckFSharpAttributes cenv.g fref2.PropertyAttribs m |> CommitOperationResult
+                    CheckFSharpAttributes g fref2.PropertyAttribs m |> CommitOperationResult
                     if Map.containsKey fref2.FieldName fs then
                         errorR (Error(FSComp.SR.tcFieldAppearsTwiceInRecord(fref2.FieldName), m))
                     if showDeprecated then
                         warning(Deprecated(FSComp.SR.nrRecordTypeNeedsQualifiedAccess(fref2.FieldName, fref2.Tycon.DisplayName) |> snd, m))
 
-                    if not (tyconRefEq cenv.g tcref fref2.TyconRef) then
+                    if not (tyconRefEq g tcref fref2.TyconRef) then
                         let _, frefSet1, _ = List.head frefSets
                         let (FieldResolution(rfinfo1, _)) = List.head frefSet1
                         errorR (FieldsFromDifferentTypes(env.DisplayEnv, rfinfo1.RecdFieldRef, fref2, m))
@@ -1963,12 +1987,13 @@ let BuildFieldMap cenv env isPartial ty flds m =
                 | _ -> error(Error(FSComp.SR.tcRecordFieldInconsistentTypes(), m)))
     tinst, tcref, fldsmap, List.rev rfldsList
 
-let rec ApplyUnionCaseOrExn (makerForUnionCase, makerForExnTag) m cenv env overallTy item =
+let rec ApplyUnionCaseOrExn (makerForUnionCase, makerForExnTag) m (cenv: cenv) env overallTy item =
+    let g = cenv.g
     let ad = env.eAccessRights
     match item with
     | Item.ExnCase ecref ->
-        CheckEntityAttributes cenv.g ecref m |> CommitOperationResult
-        UnifyTypes cenv env m overallTy cenv.g.exn_ty
+        CheckEntityAttributes g ecref m |> CommitOperationResult
+        UnifyTypes cenv env m overallTy g.exn_ty
         CheckTyconAccessible cenv.amap m ad ecref |> ignore
         let mkf = makerForExnTag ecref
         mkf, recdFieldTysOfExnDefRef ecref, [ for f in (recdFieldsOfExnDefRef ecref) -> f.Id ]
@@ -1978,7 +2003,7 @@ let rec ApplyUnionCaseOrExn (makerForUnionCase, makerForExnTag) m cenv env overa
             warning(Deprecated(FSComp.SR.nrUnionTypeNeedsQualifiedAccess(ucinfo.DisplayName, ucinfo.Tycon.DisplayName) |> snd, m))
 
         let ucref = ucinfo.UnionCaseRef
-        CheckUnionCaseAttributes cenv.g ucref m |> CommitOperationResult
+        CheckUnionCaseAttributes g ucref m |> CommitOperationResult
         CheckUnionCaseAccessible cenv.amap m ad ucref |> ignore
         let gtyp2 = actualResultTyOfUnionCase ucinfo.TypeInst ucref
         let inst = mkTyparInst ucref.TyconRef.TyparsNoRange ucinfo.TypeInst
@@ -2146,23 +2171,25 @@ module GeneralizationHelpers =
             TrimUngeneralizableTypars genConstrainedTyparFlag inlineFlag generalizedTypars freeInEnv
 
     /// Condense type variables in positive position
-    let CondenseTypars (cenv, denv: DisplayEnv, generalizedTypars: Typars, tauTy, m) =
+    let CondenseTypars (cenv: cenv, denv: DisplayEnv, generalizedTypars: Typars, tauTy, m) =
+
+        let g = cenv.g
 
         // The type of the value is ty11 * ... * ty1N -> ... -> tyM1 * ... * tyMM -> retTy
         // This is computed REGARDLESS of the arity of the expression.
-        let curriedArgTys, retTy = stripFunTy cenv.g tauTy
-        let allUntupledArgTys = curriedArgTys |> List.collect (tryDestRefTupleTy cenv.g)
+        let curriedArgTys, retTy = stripFunTy g tauTy
+        let allUntupledArgTys = curriedArgTys |> List.collect (tryDestRefTupleTy g)
 
-        // Compute the type variables in 'retTy'
-        let returnTypeFreeTypars = freeInTypeLeftToRight cenv.g false retTy
-        let allUntupledArgTysWithFreeVars = allUntupledArgTys |> List.map (fun ty -> (ty, freeInTypeLeftToRight cenv.g false ty))
+        // Compute the type variables in 'rettyR
+        let returnTypeFreeTypars = freeInTypeLeftToRight g false retTy
+        let allUntupledArgTysWithFreeVars = allUntupledArgTys |> List.map (fun ty -> (ty, freeInTypeLeftToRight g false ty))
 
         let relevantUniqueSubtypeConstraint (tp: Typar) =
             // Find a single subtype constraint
             match tp.Constraints |> List.partition (function TyparConstraint.CoercesTo _ -> true | _ -> false) with
             | [TyparConstraint.CoercesTo(cxty, _)], others ->
                  // Throw away null constraints if they are implied
-                 if others |> List.exists (function TyparConstraint.SupportsNull _ -> not (TypeSatisfiesNullConstraint cenv.g m cxty) | _ -> true)
+                 if others |> List.exists (function TyparConstraint.SupportsNull _ -> not (TypeSatisfiesNullConstraint g m cxty) | _ -> true)
                  then None
                  else Some cxty
             | _ -> None
@@ -2173,10 +2200,10 @@ module GeneralizationHelpers =
 
         let lhsConstraintTypars =
             allUntupledArgTys |> List.collect (fun ty ->
-                match tryDestTyparTy cenv.g ty with
+                match tryDestTyparTy g ty with
                 | ValueSome tp ->
                     match relevantUniqueSubtypeConstraint tp with
-                    | Some cxty -> freeInTypeLeftToRight cenv.g false cxty
+                    | Some cxty -> freeInTypeLeftToRight g false cxty
                     | None -> []
                 | _ -> [])
 
@@ -2190,7 +2217,7 @@ module GeneralizationHelpers =
             // A condensation typar can't be used in the constraints of any candidate condensation typars
             not (ListSet.contains typarEq tp lhsConstraintTypars) &&
             // A condensation typar must occur precisely once in tyIJ, and must not occur free in any other tyIJ
-            (match allUntupledArgTysWithFreeVars |> List.partition (fun (ty, _) -> match tryDestTyparTy cenv.g ty with ValueSome destTypar -> typarEq destTypar tp | _ -> false) with
+            (match allUntupledArgTysWithFreeVars |> List.partition (fun (ty, _) -> match tryDestTyparTy g ty with ValueSome destTypar -> typarEq destTypar tp | _ -> false) with
              | [_], rest -> not (rest |> List.exists (fun (_, fvs) -> ListSet.contains typarEq tp fvs))
              | _ -> false)
 
@@ -2202,32 +2229,33 @@ module GeneralizationHelpers =
         generalizedTypars
 
     let ComputeAndGeneralizeGenericTypars (cenv,
-                                           denv: DisplayEnv,
-                                           m,
-                                           freeInEnv: FreeTypars,
-                                           canInferTypars,
-                                           genConstrainedTyparFlag,
-                                           inlineFlag,
-                                           exprOpt,
-                                           allDeclaredTypars: Typars,
-                                           maxInferredTypars: Typars,
-                                           tauTy,
-                                           resultFirst) =
-
-        let allDeclaredTypars = NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g allDeclaredTypars
+            denv: DisplayEnv,
+            m,
+            freeInEnv: FreeTypars,
+            canInferTypars,
+            genConstrainedTyparFlag,
+            inlineFlag,
+            exprOpt,
+            allDeclaredTypars: Typars,
+            maxInferredTypars: Typars,
+            tauTy,
+            resultFirst) =
+
+        let g = cenv.g
+        let allDeclaredTypars = NormalizeDeclaredTyparsForEquiRecursiveInference g allDeclaredTypars
+
         let typarsToAttemptToGeneralize =
-            if (match exprOpt with None -> true | Some e -> IsGeneralizableValue cenv.g e)
+            if (match exprOpt with None -> true | Some e -> IsGeneralizableValue g e)
             then (ListSet.unionFavourLeft typarEq allDeclaredTypars maxInferredTypars)
             else allDeclaredTypars
 
         let generalizedTypars, freeInEnv =
             TrimUngeneralizableTypars genConstrainedTyparFlag inlineFlag typarsToAttemptToGeneralize freeInEnv
 
-        allDeclaredTypars
-        |> List.iter (fun tp ->
+        for tp in allDeclaredTypars do
             if Zset.memberOf freeInEnv tp then
                 let ty = mkTyparTy tp
-                error(Error(FSComp.SR.tcNotSufficientlyGenericBecauseOfScope(NicePrint.prettyStringOfTy denv ty), m)))
+                error(Error(FSComp.SR.tcNotSufficientlyGenericBecauseOfScope(NicePrint.prettyStringOfTy denv ty), m))
 
         let generalizedTypars = CondenseTypars(cenv, denv, generalizedTypars, tauTy, m)
 
@@ -2236,7 +2264,7 @@ module GeneralizationHelpers =
             else generalizedTypars |> List.filter (fun tp -> ListSet.contains typarEq tp allDeclaredTypars)
 
         let allConstraints = List.collect (fun (tp: Typar) -> tp.Constraints) generalizedTypars
-        let generalizedTypars = SimplifyMeasuresInTypeScheme cenv.g resultFirst generalizedTypars tauTy allConstraints
+        let generalizedTypars = SimplifyMeasuresInTypeScheme g resultFirst generalizedTypars tauTy allConstraints
 
         // Generalization turns inference type variables into rigid, quantified type variables,
         // (they may be rigid already)
@@ -2553,8 +2581,11 @@ module EventDeclarationNormalization =
     /// Some F# bindings syntactically imply additional bindings, notably properties
     /// annotated with []
     let GenerateExtraBindings cenv (bindingAttribs, binding) =
+        let g = cenv.g
+
         let (NormalizedBinding(vis1, bindingKind, isInline, isMutable, _, bindingXmlDoc, _synTyparDecls, valSynData, declPattern, bindingRhs, mBinding, spBind)) = binding
-        if CompileAsEvent cenv.g bindingAttribs then
+
+        if CompileAsEvent g bindingAttribs then
 
             let MakeOne (prefix, target) =
                 let declPattern = RenameBindingPattern (fun s -> prefix + s) declPattern
@@ -2593,18 +2624,23 @@ module EventDeclarationNormalization =
 /// Make a copy of the "this" type for a generic object type, e.g. List<'T> --> List<'?> for a fresh inference variable.
 /// Also adjust the "this" type to take into account whether the type is a struct.
 let FreshenObjectArgType cenv m rigid tcref isExtrinsic declaredTyconTypars =
+    let g = cenv.g
+
 #if EXTENDED_EXTENSION_MEMBERS // indicates if extension members can add additional constraints to type parameters
-    let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy = FreshenTyconRef m (if isExtrinsic then TyparRigidity.Flexible else rigid) tcref declaredTyconTypars
+    let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy =
+        FreshenTyconRef g m (if isExtrinsic then TyparRigidity.Flexible else rigid) tcref declaredTyconTypars
 #else
-    let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy = FreshenTyconRef m rigid tcref declaredTyconTypars
+    let tcrefObjTy, enclosingDeclaredTypars, renaming, objTy =
+        FreshenTyconRef g m rigid tcref declaredTyconTypars
 #endif
+
     // Struct members have a byref 'this' type (unless they are extrinsic extension members)
     let thisTy =
         if not isExtrinsic && tcref.IsStructOrEnumTycon then
-            if isRecdOrStructTyReadOnly cenv.g m objTy then
-                mkInByrefTy cenv.g objTy
+            if isRecdOrStructTyReadOnly g m objTy then
+                mkInByrefTy g objTy
             else
-                mkByrefTy cenv.g objTy
+                mkByrefTy g objTy
         else
             objTy
     tcrefObjTy, enclosingDeclaredTypars, renaming, objTy, thisTy
@@ -2635,19 +2671,15 @@ let FreshenObjectArgType cenv m rigid tcref isExtrinsic declaredTyconTypars =
 // consistency check for recursive uses of "A" with explicit instantiations within the recursive
 // scope of "A".
 let TcValEarlyGeneralizationConsistencyCheck cenv (env: TcEnv) (v: Val, vrec, tinst, vty, tau, m) =
+    let g = cenv.g
+
     match vrec with
     | ValInRecScope isComplete when isComplete && not (isNil tinst) ->
-        //printfn "pushing post-inference check for '%s', vty = '%s'" v.DisplayName (DebugPrint.showType vty)
         cenv.css.PushPostInferenceCheck (preDefaults=false, check=fun () ->
-            //printfn "running post-inference check for '%s'" v.DisplayName
-            //printfn "tau = '%s'" (DebugPrint.showType tau)
-            //printfn "vty = '%s'" (DebugPrint.showType vty)
-            let tpsorig, tau2 = tryDestForallTy cenv.g vty
-            //printfn "tau2 = '%s'" (DebugPrint.showType tau2)
+            let tpsorig, tau2 = tryDestForallTy g vty
             if not (isNil tpsorig) then
-              let tpsorig = NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g tpsorig
+              let tpsorig = NormalizeDeclaredTyparsForEquiRecursiveInference g tpsorig
               let tau3 = instType (mkTyparInst tpsorig tinst) tau2
-              //printfn "tau3 = '%s'" (DebugPrint.showType tau3)
               if not (AddCxTypeEqualsTypeUndoIfFailed env.DisplayEnv cenv.css m tau tau3) then
                   let txt = bufs (fun buf -> NicePrint.outputQualifiedValSpec env.DisplayEnv cenv.infoReader buf (mkLocalValRef v))
                   error(Error(FSComp.SR.tcInferredGenericTypeGivesRiseToInconsistency(v.DisplayName, txt), m)))
@@ -2666,19 +2698,20 @@ let TcValEarlyGeneralizationConsistencyCheck cenv (env: TcEnv) (v: Val, vrec, ti
 ///    | CtorValUsedAsSuperInit "inherit Panel()"
 ///    | CtorValUsedAsSelfInit "new() = new OwnType(3)"
 ///    | VSlotDirectCall "base.OnClick(eventArgs)"
-let TcVal checkAttributes cenv env tpenv (vref: ValRef) optInst optAfterResolution m =
+let TcVal checkAttributes (cenv: cenv) env tpenv (vref: ValRef) optInst optAfterResolution m =
+    let g = cenv.g
     let tpsorig, _, _, _, tinst, _ as res =
         let v = vref.Deref
         let vrec = v.RecursiveValInfo
         v.SetHasBeenReferenced()
         CheckValAccessible m env.eAccessRights vref
         if checkAttributes then
-            CheckValAttributes cenv.g vref m |> CommitOperationResult
+            CheckValAttributes g vref m |> CommitOperationResult
         let vty = vref.Type
         // byref-typed values get dereferenced
-        if isByrefTy cenv.g vty then
+        if isByrefTy g vty then
             let isSpecial = true
-            [], mkAddrGet m vref, isSpecial, destByrefTy cenv.g vty, [], tpenv
+            [], mkAddrGet m vref, isSpecial, destByrefTy g vty, [], tpenv
         else
           match v.LiteralValue with
           | Some c ->
@@ -2687,19 +2720,19 @@ let TcVal checkAttributes cenv env tpenv (vref: ValRef) optInst optAfterResoluti
               // The value may still be generic, e.g.
               //   []
               //   let Null = null
-              let tpsorig, _, tinst, tau = FreshenPossibleForallTy cenv.g m TyparRigidity.Flexible vty
+              let tpsorig, _, tinst, tau = FreshenPossibleForallTy g m TyparRigidity.Flexible vty
               tpsorig, Expr.Const (c, m, tau), isSpecial, tau, tinst, tpenv
 
           | None ->
                 // References to 'this' in classes get dereferenced from their implicit reference cell and poked
-              if v.IsCtorThisVal && isRefCellTy cenv.g vty then
+              if v.IsCtorThisVal && isRefCellTy g vty then
                   let exprForVal = exprForValRef m vref
                   //if AreWithinCtorPreConstruct env then
                   //    warning(SelfRefObjCtor(AreWithinImplicitCtor env, m))
 
-                  let ty = destRefCellTy cenv.g vty
+                  let ty = destRefCellTy g vty
                   let isSpecial = true
-                  [], mkCallCheckThis cenv.g m ty (mkRefCellGet cenv.g m ty exprForVal), isSpecial, ty, [], tpenv
+                  [], mkCallCheckThis g m ty (mkRefCellGet g m ty exprForVal), isSpecial, ty, [], tpenv
               else
                   // Instantiate the value
                   let tpsorig, vrefFlags, tinst, tau, tpenv =
@@ -2707,7 +2740,7 @@ let TcVal checkAttributes cenv env tpenv (vref: ValRef) optInst optAfterResoluti
                       match optInst with
                       // No explicit instantiation (the normal case)
                       | None ->
-                          if HasFSharpAttribute cenv.g cenv.g.attrib_RequiresExplicitTypeArgumentsAttribute v.Attribs then
+                          if HasFSharpAttribute g g.attrib_RequiresExplicitTypeArgumentsAttribute v.Attribs then
                                errorR(Error(FSComp.SR.tcFunctionRequiresExplicitTypeArguments(v.DisplayName), m))
 
                           match vrec with
@@ -2717,7 +2750,7 @@ let TcVal checkAttributes cenv env tpenv (vref: ValRef) optInst optAfterResoluti
                               tpsorig, NormalValUse, tinst, tau, tpenv
                           | ValInRecScope true
                           | ValNotInRecScope ->
-                              let tpsorig, _, tinst, tau = FreshenPossibleForallTy cenv.g m TyparRigidity.Flexible vty
+                              let tpsorig, _, tinst, tau = FreshenPossibleForallTy g m TyparRigidity.Flexible vty
                               tpsorig, NormalValUse, tinst, tau, tpenv
 
                       // If we have got an explicit instantiation then use that
@@ -2738,7 +2771,7 @@ let TcVal checkAttributes cenv env tpenv (vref: ValRef) optInst optAfterResoluti
                                 tpsorig, vrefFlags, tinst, tau2, tpenv
                             | ValInRecScope true
                             | ValNotInRecScope ->
-                                let tpsorig, tps, tptys, tau = FreshenPossibleForallTy cenv.g m TyparRigidity.Flexible vty
+                                let tpsorig, tps, tptys, tau = FreshenPossibleForallTy g m TyparRigidity.Flexible vty
                                 //dprintfn "After Freshen: tau = %s" (LayoutRender.showL (typeL tau))
                                 let (tinst: TypeInst), tpenv = checkTys tpenv (tps |> List.map (fun tp -> tp.Kind))
                                 checkInst tinst
@@ -2754,8 +2787,8 @@ let TcVal checkAttributes cenv env tpenv (vref: ValRef) optInst optAfterResoluti
                   let exprForVal = mkTyAppExpr m (exprForVal, vty) tinst
                   let isSpecial =
                       (match vrefFlags with NormalValUse | PossibleConstrainedCall _ -> false | _ -> true) ||
-                      valRefEq cenv.g vref cenv.g.splice_expr_vref ||
-                      valRefEq cenv.g vref cenv.g.splice_raw_expr_vref
+                      valRefEq g vref g.splice_expr_vref ||
+                      valRefEq g vref g.splice_raw_expr_vref
 
                   let exprForVal = RecordUseOfRecValue cenv vrec vref exprForVal m
 
@@ -2814,14 +2847,15 @@ type ApplicableExpr =
 
     member x.SupplyArgument(e2, m) =
         let (ApplicableExpr (cenv, fe, first)) = x
+        let g = cenv.g
         let combinedExpr =
             match fe with
             | Expr.App (e1, e1ty, tyargs1, args1, e1m) when
                        (not first || isNil args1) &&
-                       (not (isForallTy cenv.g e1ty) || isFunTy cenv.g (applyTys cenv.g e1ty (tyargs1, args1))) ->
+                       (not (isForallTy g e1ty) || isFunTy g (applyTys g e1ty (tyargs1, args1))) ->
                 Expr.App (e1, e1ty, tyargs1, args1@[e2], unionRanges e1m m)
             | _ ->
-                Expr.App (fe, tyOfExpr cenv.g fe, [], [e2], m)
+                Expr.App (fe, tyOfExpr g fe, [], [e2], m)
         ApplicableExpr(cenv, combinedExpr, false)
 
     member x.Expr =
@@ -2882,12 +2916,12 @@ let MakeApplicableExprWithFlex cenv (env: TcEnv) expr =
                 if isNonFlexibleType actualType
                 then actualType
                 else
-                   let flexibleType = NewInferenceType ()
+                   let flexibleType = NewInferenceType g
                    AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace actualType flexibleType
                    flexibleType)
 
         // Create a coercion to represent the expansion of the application
-        let expr = mkCoerceExpr (expr, mkIteratedFunTy (List.map (mkRefTupledTy g) curriedFlexibleTypes) retTy, m, exprTy)
+        let expr = mkCoerceExpr (expr, mkIteratedFunTy g (List.map (mkRefTupledTy g) curriedFlexibleTypes) retTy, m, exprTy)
         ApplicableExpr (cenv, expr, true)
 
 
@@ -2922,29 +2956,32 @@ let TcRuntimeTypeTest isCast isOperator cenv denv m tgtTy srcTy =
 
 ///  Checks, warnings and constraint assertions for upcasts
 let TcStaticUpcast cenv denv m tgtTy srcTy =
-    if isTyparTy cenv.g tgtTy then
-        if not (destTyparTy cenv.g tgtTy).IsCompatFlex then
+    let g = cenv.g
+    if isTyparTy g tgtTy then
+        if not (destTyparTy g tgtTy).IsCompatFlex then
             error(IndeterminateStaticCoercion(denv, srcTy, tgtTy, m))
             //else warning(UpcastUnnecessary m)
 
-    if isSealedTy cenv.g tgtTy && not (isTyparTy cenv.g tgtTy) then
+    if isSealedTy g tgtTy && not (isTyparTy g tgtTy) then
         warning(CoercionTargetSealed(denv, tgtTy, m))
 
-    if typeEquiv cenv.g srcTy tgtTy then
+    if typeEquiv g srcTy tgtTy then
         warning(UpcastUnnecessary m)
 
     AddCxTypeMustSubsumeType ContextInfo.NoContext denv cenv.css m NoTrace tgtTy srcTy
 
-let BuildPossiblyConditionalMethodCall cenv env isMutable m isProp minfo valUseFlags minst objArgs args =
+let BuildPossiblyConditionalMethodCall (cenv: cenv) env isMutable m isProp minfo valUseFlags minst objArgs args =
+
+    let g = cenv.g
 
-    let conditionalCallDefineOpt = TryFindMethInfoStringAttribute cenv.g m cenv.g.attrib_ConditionalAttribute minfo
+    let conditionalCallDefineOpt = TryFindMethInfoStringAttribute g m g.attrib_ConditionalAttribute minfo
 
     match conditionalCallDefineOpt, cenv.conditionalDefines with
     | Some d, Some defines when not (List.contains d defines) ->
 
         // Methods marked with 'Conditional' must return 'unit'
-        UnifyTypes cenv env m cenv.g.unit_ty (minfo.GetFSharpReturnTy(cenv.amap, m, minst))
-        mkUnit cenv.g m, cenv.g.unit_ty
+        UnifyTypes cenv env m g.unit_ty (minfo.GetFSharpReturnTy(cenv.amap, m, minst))
+        mkUnit g m, g.unit_ty
 
     | _ ->
 #if !NO_EXTENSIONTYPING
@@ -2953,8 +2990,8 @@ let BuildPossiblyConditionalMethodCall cenv env isMutable m isProp minfo valUseF
             // BuildInvokerExpressionForProvidedMethodCall converts references to F# intrinsics back to values
             // and uses TcVal to do this. However we don't want to check attributes again for provided references to values,
             // so we pass 'false' for 'checkAttributes'.
-            let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
-            let _, retExpt, retTy = ProvidedMethodCalls.BuildInvokerExpressionForProvidedMethodCall tcVal (cenv.g, cenv.amap, mi, objArgs, isMutable, isProp, valUseFlags, args, m)
+            let tcVal = LightweightTcValForUsingInBuildMethodCall g
+            let _, retExpt, retTy = ProvidedMethodCalls.BuildInvokerExpressionForProvidedMethodCall tcVal (g, cenv.amap, mi, objArgs, isMutable, isProp, valUseFlags, args, m)
             retExpt, retTy
 
         | _ ->
@@ -2962,13 +2999,14 @@ let BuildPossiblyConditionalMethodCall cenv env isMutable m isProp minfo valUseF
         let tcVal valref valUse ttypes m =
             let _, a, _, b, _, _ = TcVal true cenv env emptyUnscopedTyparEnv valref (Some (valUse, (fun x _ -> ttypes, x))) None m
             a, b
-        BuildMethodCall tcVal cenv.g cenv.amap isMutable m isProp minfo valUseFlags minst objArgs args
+        BuildMethodCall tcVal g cenv.amap isMutable m isProp minfo valUseFlags minst objArgs args
 
 
 let TryFindIntrinsicOrExtensionMethInfo collectionSettings (cenv: cenv) (env: TcEnv) m ad nm ty =
     AllMethInfosOfTypeInScope collectionSettings cenv.infoReader env.NameEnv (Some nm) ad IgnoreOverrides m ty
 
 let TryFindFSharpSignatureInstanceGetterProperty (cenv: cenv) (env: TcEnv) m nm ty (sigTys: TType list) =
+    let g = cenv.g
     TryFindIntrinsicPropInfo cenv.infoReader m env.AccessRights nm ty
     |> List.tryFind (fun propInfo ->
         not propInfo.IsStatic && propInfo.HasGetter &&
@@ -2982,41 +3020,45 @@ let TryFindFSharpSignatureInstanceGetterProperty (cenv: cenv) (env: TcEnv) m nm
                     false
                 else
                     (argTys, sigTys)
-                    ||> List.forall2 (typeEquiv cenv.g)
+                    ||> List.forall2 (typeEquiv g)
         )
     )
 
 /// Build the 'test and dispose' part of a 'use' statement
-let BuildDisposableCleanup cenv env m (v: Val) =
-    v.SetHasBeenReferenced()
+let BuildDisposableCleanup (cenv: cenv) env m (v: Val) =
+    let g = cenv.g
     let ad = env.eAccessRights
+
+    v.SetHasBeenReferenced()
+
     let disposeMethod =
-        match TryFindIntrinsicOrExtensionMethInfo ResultCollectionSettings.AllResults cenv env m ad "Dispose" cenv.g.system_IDisposable_ty with
+        match TryFindIntrinsicOrExtensionMethInfo ResultCollectionSettings.AllResults cenv env m ad "Dispose" g.system_IDisposable_ty with
         | [x] -> x
         | _ -> error(InternalError(FSComp.SR.tcCouldNotFindIDisposable(), m))
 
-
     // For struct types the test is simpler: we can determine if IDisposable is supported, and even when it is, we can avoid doing the type test
     // Note this affects the elaborated form seen by quotations etc.
-    if isStructTy cenv.g v.Type then
-        if TypeFeasiblySubsumesType 0 cenv.g cenv.amap m cenv.g.system_IDisposable_ty CanCoerce v.Type then
+    if isStructTy g v.Type then
+        if TypeFeasiblySubsumesType 0 g cenv.amap m g.system_IDisposable_ty CanCoerce v.Type then
             // We can use NeverMutates here because the variable is going out of scope, there is no need to take a defensive
             // copy of it.
             let disposeExpr, _ = BuildPossiblyConditionalMethodCall cenv env NeverMutates m false disposeMethod NormalValUse [] [exprForVal v.Range v] []
             disposeExpr
         else
-            mkUnit cenv.g m
+            mkUnit g m
     else
-        let disposeObjVar, disposeObjExpr = mkCompGenLocal m "objectToDispose" cenv.g.system_IDisposable_ty
+        let disposeObjVar, disposeObjExpr = mkCompGenLocal m "objectToDispose" g.system_IDisposable_ty
         let disposeExpr, _ = BuildPossiblyConditionalMethodCall cenv env PossiblyMutates m false disposeMethod NormalValUse [] [disposeObjExpr] []
-        let inpe = mkCoerceExpr(exprForVal v.Range v, cenv.g.obj_ty, m, v.Type)
-        mkIsInstConditional cenv.g m cenv.g.system_IDisposable_ty inpe disposeObjVar disposeExpr (mkUnit cenv.g m)
+        let inpe = mkCoerceExpr(exprForVal v.Range v, g.obj_ty, m, v.Type)
+        mkIsInstConditional g m g.system_IDisposable_ty inpe disposeObjVar disposeExpr (mkUnit g m)
 
 /// Build call to get_OffsetToStringData as part of 'fixed'
 let BuildOffsetToStringData cenv env m =
+    let g = cenv.g
     let ad = env.eAccessRights
+
     let offsetToStringDataMethod =
-        match TryFindIntrinsicOrExtensionMethInfo ResultCollectionSettings.AllResults cenv env m ad "get_OffsetToStringData" cenv.g.system_RuntimeHelpers_ty with
+        match TryFindIntrinsicOrExtensionMethInfo ResultCollectionSettings.AllResults cenv env m ad "get_OffsetToStringData" g.system_RuntimeHelpers_ty with
         | [x] -> x
         | _ -> error(Error(FSComp.SR.tcCouldNotFindOffsetToStringData(), m))
 
@@ -3146,7 +3188,8 @@ let GetMethodArgs arg =
 //-------------------------------------------------------------------------
 
 let CompilePatternForMatch cenv (env: TcEnv) mExpr matchm warnOnUnused actionOnFailure (inputVal, generalizedTypars, inputExprOpt) clauses inputTy resultTy =
-    let dtree, targets = CompilePattern cenv.g env.DisplayEnv cenv.amap (LightweightTcValForUsingInBuildMethodCall cenv.g) cenv.infoReader mExpr matchm warnOnUnused actionOnFailure (inputVal, generalizedTypars, inputExprOpt) clauses inputTy resultTy
+    let g = cenv.g
+    let dtree, targets = CompilePattern g env.DisplayEnv cenv.amap (LightweightTcValForUsingInBuildMethodCall g) cenv.infoReader mExpr matchm warnOnUnused actionOnFailure (inputVal, generalizedTypars, inputExprOpt) clauses inputTy resultTy
     mkAndSimplifyMatch DebugPointAtBinding.NoneAtInvisible mExpr matchm resultTy dtree targets
 
 /// Compile a pattern
@@ -3172,8 +3215,9 @@ let CompilePatternForMatchClauses cenv env mExpr matchm warnOnUnused actionOnFai
 
 // localAlloc is relevant if the enumerator is a mutable struct and indicates
 // if the enumerator can be allocated as a mutable local variable
-let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr =
+let AnalyzeArbitraryExprAsEnumerable (cenv: cenv) (env: TcEnv) localAlloc m exprty expr =
     let ad = env.AccessRights
+    let g = cenv.g
 
     let err k ty =
         let txt = NicePrint.minimalStringOfType env.DisplayEnv ty
@@ -3206,7 +3250,7 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
 
         let moveNext_minst = FreshenMethInfo m moveNext_minfo
         let retTypeOfMoveNext = moveNext_minfo.GetFSharpReturnTy(cenv.amap, m, moveNext_minst)
-        if not (typeEquiv cenv.g cenv.g.bool_ty retTypeOfMoveNext) then err false retTypeOfGetEnumerator else
+        if not (typeEquiv g g.bool_ty retTypeOfMoveNext) then err false retTypeOfGetEnumerator else
         if hasArgs moveNext_minfo moveNext_minst then err false retTypeOfGetEnumerator else
 
         match findMethInfo false m "get_Current" retTypeOfGetEnumerator with
@@ -3227,19 +3271,19 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
 
         let enumElemTy =
 
-            if isObjTy cenv.g enumElemTy then
+            if isObjTy g enumElemTy then
                 // Look for an 'Item' property, or a set of these with consistent return types
                 let allEquivReturnTypes (minfo: MethInfo) (others: MethInfo list) =
                     let returnTy = minfo.GetFSharpReturnTy(cenv.amap, m, [])
-                    others |> List.forall (fun other -> typeEquiv cenv.g (other.GetFSharpReturnTy(cenv.amap, m, [])) returnTy)
+                    others |> List.forall (fun other -> typeEquiv g (other.GetFSharpReturnTy(cenv.amap, m, [])) returnTy)
 
                 let isInt32OrObjectIndexer (minfo: MethInfo) =
                     match minfo.GetParamTypes(cenv.amap, m, []) with
                     | [[ty]] ->
                         // e.g. MatchCollection
-                        typeEquiv cenv.g cenv.g.int32_ty ty ||
+                        typeEquiv g g.int32_ty ty ||
                         // e.g. EnvDTE.Documents.Item
-                        typeEquiv cenv.g cenv.g.obj_ty ty
+                        typeEquiv g g.obj_ty ty
                     | _ -> false
 
                 match TryFindIntrinsicOrExtensionMethInfo ResultCollectionSettings.AllResults cenv env m ad "get_Item" tyToSearchForGetEnumeratorAndItem with
@@ -3259,7 +3303,7 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
             else
                 enumElemTy
 
-        let isEnumeratorTypeStruct = isStructTy cenv.g retTypeOfGetEnumerator
+        let isEnumeratorTypeStruct = isStructTy g retTypeOfGetEnumerator
         let originalRetTypeOfGetEnumerator = retTypeOfGetEnumerator
 
         let (enumeratorVar, enumeratorExpr), retTypeOfGetEnumerator =
@@ -3267,9 +3311,9 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
                if localAlloc then
                   mkMutableCompGenLocal m "enumerator" retTypeOfGetEnumerator, retTypeOfGetEnumerator
                else
-                  let refCellTyForRetTypeOfGetEnumerator = mkRefCellTy cenv.g retTypeOfGetEnumerator
+                  let refCellTyForRetTypeOfGetEnumerator = mkRefCellTy g retTypeOfGetEnumerator
                   let v, e = mkMutableCompGenLocal m "enumerator" refCellTyForRetTypeOfGetEnumerator
-                  (v, mkRefCellGet cenv.g m retTypeOfGetEnumerator e), refCellTyForRetTypeOfGetEnumerator
+                  (v, mkRefCellGet g m retTypeOfGetEnumerator e), refCellTyForRetTypeOfGetEnumerator
 
             else
                mkCompGenLocal m "enumerator" retTypeOfGetEnumerator, retTypeOfGetEnumerator
@@ -3279,8 +3323,8 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
             if not isEnumeratorTypeStruct || localAlloc then res
             else
                 // wrap enumerators that are represented as mutable structs into ref cells
-                let getEnumExpr = mkRefCell cenv.g m originalRetTypeOfGetEnumerator getEnumExpr
-                let getEnumTy = mkRefCellTy cenv.g getEnumTy
+                let getEnumExpr = mkRefCell g m originalRetTypeOfGetEnumerator getEnumExpr
+                let getEnumTy = mkRefCellTy g getEnumTy
                 getEnumExpr, getEnumTy
 
         let guardExpr, guardTy = BuildPossiblyConditionalMethodCall cenv env DefinitelyMutates m false moveNext_minfo NormalValUse moveNext_minst [enumeratorExpr] []
@@ -3288,16 +3332,16 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
         let currentExpr = mkCoerceExpr(currentExpr, enumElemTy, currentExpr.Range, currentTy)
         let currentExpr, enumElemTy =
             // Implicitly dereference byref for expr 'for x in ...'
-            if isByrefTy cenv.g enumElemTy then
+            if isByrefTy g enumElemTy then
                 let expr = mkDerefAddrExpr m currentExpr currentExpr.Range enumElemTy
-                expr, destByrefTy cenv.g enumElemTy
+                expr, destByrefTy g enumElemTy
             else
                 currentExpr, enumElemTy
 
         Result(enumeratorVar, enumeratorExpr, retTypeOfGetEnumerator, enumElemTy, getEnumExpr, getEnumTy, guardExpr, guardTy, currentExpr)
 
     // First try the original known static type
-    match (if isArray1DTy cenv.g exprty then Exception (Failure "") else tryType (expr, exprty)) with
+    match (if isArray1DTy g exprty then Exception (Failure "") else tryType (expr, exprty)) with
     | Result res -> res
     | Exception e ->
 
@@ -3311,13 +3355,13 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
         else None
 
     // Next try to typecheck the thing as a sequence
-    let enumElemTy = NewInferenceType ()
-    let exprTyAsSeq = mkSeqTy cenv.g enumElemTy
+    let enumElemTy = NewInferenceType g
+    let exprTyAsSeq = mkSeqTy g enumElemTy
 
     match probe exprTyAsSeq with
     | Some res -> res
     | None ->
-    let ienumerable = mkAppTy cenv.g.tcref_System_Collections_IEnumerable []
+    let ienumerable = mkAppTy g.tcref_System_Collections_IEnumerable []
     match probe ienumerable with
     | Some res -> res
     | None ->
@@ -3326,9 +3370,10 @@ let AnalyzeArbitraryExprAsEnumerable cenv (env: TcEnv) localAlloc m exprty expr
 
 // Used inside sequence expressions
 let ConvertArbitraryExprToEnumerable (cenv: cenv) ty (env: TcEnv) (expr: Expr) =
+    let g = cenv.g
     let m = expr.Range
-    let enumElemTy = NewInferenceType ()
-    if AddCxTypeMustSubsumeTypeUndoIfFailed env.DisplayEnv cenv.css m ( mkSeqTy cenv.g enumElemTy) ty then
+    let enumElemTy = NewInferenceType g
+    if AddCxTypeMustSubsumeTypeUndoIfFailed env.DisplayEnv cenv.css m (mkSeqTy g enumElemTy) ty then
         expr, enumElemTy
     else
         let enumerableVar, enumerableExpr = mkCompGenLocal m "inputSequence" ty
@@ -3337,8 +3382,8 @@ let ConvertArbitraryExprToEnumerable (cenv: cenv) ty (env: TcEnv) (expr: Expr) =
 
         let expr =
            mkCompGenLet m enumerableVar expr
-               (mkCallSeqOfFunctions cenv.g m retTypeOfGetEnumerator enumElemTy
-                   (mkUnitDelayLambda cenv.g m getEnumExpr)
+               (mkCallSeqOfFunctions g m retTypeOfGetEnumerator enumElemTy
+                   (mkUnitDelayLambda g m getEnumExpr)
                    (mkLambda m enumeratorVar (guardExpr, guardTy))
                    (mkLambda m enumeratorVar (betterCurrentExpr, enumElemTy)))
         expr, enumElemTy
@@ -3535,10 +3580,10 @@ let EliminateInitializationGraphs
             | _ ->
                 let ty = v.Type
                 let m = v.Range
-                let vty = (mkLazyTy g ty)
+                let vty = mkLazyTy g ty
 
-                let fty = (g.unit_ty --> ty)
-                let flazy, felazy = mkCompGenLocal m v.LogicalName fty
+                let fty = mkFunTy g g.unit_ty ty
+                let flazy, felazy = mkCompGenLocal m v.LogicalName fty 
                 let frhs = mkUnitDelayLambda g m e
                 if mustHaveArity then flazy.SetValReprInfo (Some(InferArityOfExpr g AllowTypeDirectedDetupling.Yes fty [] [] frhs))
 
@@ -3674,9 +3719,7 @@ let CheckAndRewriteObjectCtor g env (ctorLambdaExpr: Expr) =
             error expr
 
     let body = checkAndRewrite body
-    mkMultiLambdas m tps vsl (body, returnTy)
-
-
+    mkMultiLambdas g m tps vsl (body, returnTy)
 
 /// Post-typechecking normalizations to enforce semantic constraints
 /// lazy and, lazy or, rethrow, address-of
@@ -3708,7 +3751,7 @@ let buildApp cenv expr resultTy arg m =
     | ApplicableExpr(_, Expr.App (Expr.Val (vf, _, _), _, _, [], _), _), _
          when (valRefEq g vf g.nativeptr_tobyref_vref) ->
 
-        let argty = NewInferenceType()
+        let argty = NewInferenceType g
         let resultTy = mkByrefTyWithInference g argty (NewByRefKindInferenceType g m)
         expr.SupplyArgument (arg, m), resultTy
 
@@ -3937,45 +3980,48 @@ let GetInstanceMemberThisVariable (vspec: Val, expr) =
 //-------------------------------------------------------------------------
 /// Check specifications of constraints on type parameters
 let rec TcTyparConstraint ridx cenv newOk checkCxs occ (env: TcEnv) tpenv c =
-    let checkSimpleConstraint tp m constraintAdder =
-        let tp', tpenv = TcTypar cenv env newOk tpenv tp
-        constraintAdder env.DisplayEnv cenv.css m NoTrace (mkTyparTy tp')
-        tpenv
+    let g = cenv.g
 
     match c with
     | SynTypeConstraint.WhereTyparDefaultsToType(tp, ty, m) ->
-        let ty', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv ty
-        let tp', tpenv = TcTypar cenv env newOk tpenv tp
-        AddCxTyparDefaultsTo env.DisplayEnv cenv.css m env.eContextInfo tp' ridx ty'
+        let tyR, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv ty
+        let tpR, tpenv = TcTypar cenv env newOk tpenv tp
+        AddCxTyparDefaultsTo env.DisplayEnv cenv.css m env.eContextInfo tpR ridx tyR
         tpenv
 
     | SynTypeConstraint.WhereTyparSubtypeOfType(tp, ty, m) ->
-        let ty', tpenv = TcTypeAndRecover cenv newOk checkCxs ItemOccurence.UseInType env tpenv ty
-        let tp', tpenv = TcTypar cenv env newOk tpenv tp
-        if newOk = NoNewTypars && isSealedTy cenv.g ty' then
+        let tyR, tpenv = TcTypeAndRecover cenv newOk checkCxs ItemOccurence.UseInType env tpenv ty
+        let tpR, tpenv = TcTypar cenv env newOk tpenv tp
+        if newOk = NoNewTypars && isSealedTy g tyR then
             errorR(Error(FSComp.SR.tcInvalidConstraintTypeSealed(), m))
-        AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace ty' (mkTyparTy tp')
+        AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace tyR (mkTyparTy tpR)
         tpenv
 
-    | SynTypeConstraint.WhereTyparSupportsNull(tp, m) -> checkSimpleConstraint tp m AddCxTypeMustSupportNull
+    | SynTypeConstraint.WhereTyparSupportsNull(tp, m) ->
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeUseSupportsNull
 
-    | SynTypeConstraint.WhereTyparIsComparable(tp, m) -> checkSimpleConstraint tp m AddCxTypeMustSupportComparison
+    | SynTypeConstraint.WhereTyparIsComparable(tp, m) ->
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeMustSupportComparison
 
-    | SynTypeConstraint.WhereTyparIsEquatable(tp, m) -> checkSimpleConstraint tp m AddCxTypeMustSupportEquality
+    | SynTypeConstraint.WhereTyparIsEquatable(tp, m) ->
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeMustSupportEquality
 
-    | SynTypeConstraint.WhereTyparIsReferenceType(tp, m) -> checkSimpleConstraint tp m AddCxTypeIsReferenceType
+    | SynTypeConstraint.WhereTyparIsReferenceType(tp, m) ->
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeIsReferenceType
 
-    | SynTypeConstraint.WhereTyparIsValueType(tp, m) -> checkSimpleConstraint tp m AddCxTypeIsValueType
+    | SynTypeConstraint.WhereTyparIsValueType(tp, m) ->
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeIsValueType
 
-    | SynTypeConstraint.WhereTyparIsUnmanaged(tp, m) -> checkSimpleConstraint tp m AddCxTypeIsUnmanaged
+    | SynTypeConstraint.WhereTyparIsUnmanaged(tp, m) ->
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeIsUnmanaged
 
     | SynTypeConstraint.WhereTyparIsEnum(tp, tyargs, m) ->
-        let tp', tpenv = TcTypar cenv env newOk tpenv tp
+        let tpR, tpenv = TcTypar cenv env newOk tpenv tp
         let tpenv =
             match tyargs with
             | [underlying] ->
                 let underlying', tpenv = TcTypeAndRecover cenv newOk checkCxs ItemOccurence.UseInType env tpenv underlying
-                AddCxTypeIsEnum env.DisplayEnv cenv.css m NoTrace (mkTyparTy tp') underlying'
+                AddCxTypeIsEnum env.DisplayEnv cenv.css m NoTrace (mkTyparTy tpR) underlying'
                 tpenv
             | _ ->
                 errorR(Error(FSComp.SR.tcInvalidEnumConstraint(), m))
@@ -3983,12 +4029,12 @@ let rec TcTyparConstraint ridx cenv newOk checkCxs occ (env: TcEnv) tpenv c =
         tpenv
 
     | SynTypeConstraint.WhereTyparIsDelegate(tp, tyargs, m) ->
-        let tp', tpenv = TcTypar cenv env newOk tpenv tp
+        let tpR, tpenv = TcTypar cenv env newOk tpenv tp
         match tyargs with
         | [a;b] ->
             let a', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv a
             let b', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv b
-            AddCxTypeIsDelegate env.DisplayEnv cenv.css m NoTrace (mkTyparTy tp') a' b'
+            AddCxTypeIsDelegate env.DisplayEnv cenv.css m NoTrace (mkTyparTy tpR) a' b'
             tpenv
         | _ ->
             errorR(Error(FSComp.SR.tcInvalidEnumConstraint(), m))
@@ -3999,7 +4045,7 @@ let rec TcTyparConstraint ridx cenv newOk checkCxs occ (env: TcEnv) tpenv c =
         match traitInfo with
         | TTrait(objtys, ".ctor", memberFlags, argTys, returnTy, _) when memberFlags.MemberKind = SynMemberKind.Constructor ->
             match objtys, argTys with
-            | [ty], [] when typeEquiv cenv.g ty (GetFSharpViewOfReturnType cenv.g returnTy) ->
+            | [ty], [] when typeEquiv g ty (GetFSharpViewOfReturnType g returnTy) ->
                 AddCxTypeMustSupportDefaultCtor env.DisplayEnv cenv.css m NoTrace ty
                 tpenv
             | _ ->
@@ -4009,12 +4055,16 @@ let rec TcTyparConstraint ridx cenv newOk checkCxs occ (env: TcEnv) tpenv c =
             AddCxMethodConstraint env.DisplayEnv cenv.css m NoTrace traitInfo
             tpenv
 
+and TcSimpleTyparConstraint cenv env newOk tpenv tp m constraintAdder =
+    let tpR, tpenv = TcTypar cenv env newOk tpenv tp
+    constraintAdder env.DisplayEnv cenv.css m NoTrace (mkTyparTy tpR)
+    tpenv
+
 and TcPseudoMemberSpec cenv newOk env synTypes tpenv memSpfn m =
-#if ALLOW_MEMBER_CONSTRAINTS_ON_MEASURES
-    let tps, tpenv = List.mapFold (TcTyparOrMeasurePar None cenv env newOk) tpenv synTypars
-#else
+    let g = cenv.g
+
     let tys, tpenv = List.mapFold (TcTypeAndRecover cenv newOk CheckCxs ItemOccurence.UseInType env) tpenv synTypes
-#endif
+
     match memSpfn with
     | SynMemberSig.Member (valSpfn, memberFlags, m) ->
         // REVIEW: Test pseudo constraints cannot refer to polymorphic methods.
@@ -4022,9 +4072,9 @@ and TcPseudoMemberSpec cenv newOk env synTypes tpenv memSpfn m =
         let members, tpenv = TcValSpec cenv env ModuleOrMemberBinding newOk ExprContainerInfo (Some memberFlags) (Some (List.head tys)) tpenv valSpfn []
         match members with
         | [ValSpecResult(_, _, id, _, _, memberConstraintTy, partialValReprInfo, _)] ->
-            let memberConstraintTypars, _ = tryDestForallTy cenv.g memberConstraintTy
+            let memberConstraintTypars, _ = tryDestForallTy g memberConstraintTy
             let topValInfo = TranslatePartialArity memberConstraintTypars partialValReprInfo
-            let _, _, curriedArgInfos, returnTy, _ = GetTopValTypeInCompiledForm cenv.g topValInfo 0 memberConstraintTy m
+            let _, _, curriedArgInfos, returnTy, _ = GetTopValTypeInCompiledForm g topValInfo 0 memberConstraintTy m
             //if curriedArgInfos.Length > 1 then  error(Error(FSComp.SR.tcInvalidConstraint(), m))
             let argTys = List.concat curriedArgInfos
             let argTys = List.map fst argTys
@@ -4040,9 +4090,11 @@ and TcPseudoMemberSpec cenv newOk env synTypes tpenv memSpfn m =
 
 /// Check a value specification, e.g. in a signature, interface declaration or a constraint
 and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv valSpfn attrs =
+    let g = cenv.g
     let (SynValSig(ident=id; explicitValDecls=ValTyparDecls (synTypars, synTyparConstraints, _); synType=ty; arity=valSynInfo; range=m)) = valSpfn
     let declaredTypars = TcTyparDecls cenv env synTypars
     let (ContainerInfo(altActualParent, tcrefContainerInfo)) = containerInfo
+
     let enclosingDeclaredTypars, memberContainerInfo, thisTyOpt, declKind =
         match tcrefContainerInfo with
         | Some(MemberOrValContainerInfo(tcref, _, _, _, declaredTyconTypars)) ->
@@ -4054,6 +4106,7 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv
             enclosingDeclaredTypars, Some tcref, Some thisTy, declKind
         | None ->
             [], None, thisTyOpt, ModuleOrMemberBinding
+
     let allDeclaredTypars = enclosingDeclaredTypars @ declaredTypars
     let envinner = AddDeclaredTypars NoCheckForDuplicateTypars allDeclaredTypars env
     let checkCxs = CheckCxs
@@ -4080,7 +4133,7 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv
         let generateOneMember (memberFlags: SynMemberFlags) =
 
             // Decode members in the signature
-            let ty', valSynInfo =
+            let tyR, valSynInfo =
                 match memberFlags.MemberKind with
                 | SynMemberKind.ClassConstructor
                 | SynMemberKind.Constructor
@@ -4089,31 +4142,34 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv
                 | SynMemberKind.PropertyGet
                 | SynMemberKind.PropertySet ->
                     let fakeArgReprInfos = [ for n in SynInfo.AritiesOfArgs valSynInfo do yield [ for _ in 1 .. n do yield ValReprInfo.unnamedTopArg1 ] ]
-                    let arginfos, returnTy = GetTopTauTypeInFSharpForm cenv.g fakeArgReprInfos declaredTy m
+                    let arginfos, returnTy = GetTopTauTypeInFSharpForm g fakeArgReprInfos declaredTy m
                     if arginfos.Length > 1 then error(Error(FSComp.SR.tcInvalidPropertyType(), m))
                     match memberFlags.MemberKind with
                     | SynMemberKind.PropertyGet ->
-                        if SynInfo.HasNoArgs valSynInfo then
-                          (cenv.g.unit_ty --> declaredTy), (SynInfo.IncorporateEmptyTupledArgForPropertyGetter valSynInfo)
+                        if SynInfo.HasNoArgs valSynInfo then 
+                            let getterTy = mkFunTy g g.unit_ty declaredTy
+                            getterTy, (SynInfo.IncorporateEmptyTupledArgForPropertyGetter valSynInfo)
                         else
-                          declaredTy, valSynInfo
-                    | _ ->
-                        let setterTy = (mkRefTupledTy cenv.g (List.map fst (List.concat arginfos) @ [returnTy]) --> cenv.g.unit_ty)
+                            declaredTy, valSynInfo
+                    | _ -> 
+                        let setterArgTys = List.map fst (List.concat arginfos) @ [returnTy]
+                        let setterArgTy = mkRefTupledTy g setterArgTys
+                        let setterTy = mkFunTy g setterArgTy cenv.g.unit_ty
                         let synInfo = SynInfo.IncorporateSetterArg valSynInfo
                         setterTy, synInfo
                 | SynMemberKind.PropertyGetSet ->
                     error(InternalError("Unexpected SynMemberKind.PropertyGetSet from signature parsing", m))
 
             // Take "unit" into account in the signature
-            let valSynInfo = AdjustValSynInfoInSignature cenv.g ty' valSynInfo
+            let valSynInfo = AdjustValSynInfoInSignature g tyR valSynInfo
 
-            let ty', valSynInfo =
+            let tyR, valSynInfo =
                 if memberFlags.IsInstance then
-                  (thisTy --> ty'), (SynInfo.IncorporateSelfArg valSynInfo)
+                    (mkFunTy cenv.g thisTy tyR), (SynInfo.IncorporateSelfArg valSynInfo)
                 else
-                  ty', valSynInfo
+                    tyR, valSynInfo
 
-            let reallyGenerateOneMember(id: Ident, valSynInfo, ty', memberFlags) =
+            let reallyGenerateOneMember(id: Ident, valSynInfo, tyR, memberFlags) =
                 let PartialValReprInfo(argsData, _) as partialValReprInfo =
                     TranslateTopValSynInfo id.idRange (TcAttributes cenv env) valSynInfo
 
@@ -4121,46 +4177,44 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv
                 // Fold in the optional argument information
                 // Resort to using the syntactic argument information since that is what tells us
                 // what is optional and what is not.
-                let ty' =
+                let tyR =
 
                     if SynInfo.HasOptionalArgs valSynInfo then
-                        let curriedArgTys, returnTy = GetTopTauTypeInFSharpForm cenv.g argsData ty' m
+                        let curriedArgTys, returnTy = GetTopTauTypeInFSharpForm g argsData tyR m
                         let curriedArgTys =
                             ((List.mapSquared fst curriedArgTys), valSynInfo.CurriedArgInfos)
                             ||> List.map2 (fun argTys argInfos ->
                                  (argTys, argInfos)
                                  ||> List.map2 (fun argty argInfo ->
-                                     if SynInfo.IsOptionalArg argInfo then mkOptionTy cenv.g argty
+                                     if SynInfo.IsOptionalArg argInfo then mkOptionTy g argty
                                      else argty))
-                        mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) curriedArgTys) returnTy
-                    else ty'
+                        mkIteratedFunTy g (List.map (mkRefTupledTy g) curriedArgTys) returnTy
+                    else tyR
 
                 let memberInfoOpt =
                     match memberContainerInfo with
                     | Some tcref ->
                         let isExtrinsic = (declKind = ExtrinsicExtensionBinding)
-                        let memberInfoTransient = MakeMemberDataAndMangledNameForMemberVal(cenv.g, tcref, isExtrinsic, attrs, [], memberFlags, valSynInfo, id, false)
+                        let memberInfoTransient = MakeMemberDataAndMangledNameForMemberVal(g, tcref, isExtrinsic, attrs, [], memberFlags, valSynInfo, id, false)
                         Some memberInfoTransient
                     | None ->
                         None
 
-                ValSpecResult(altActualParent, memberInfoOpt, id, enclosingDeclaredTypars, declaredTypars, ty', partialValReprInfo, declKind)
+                ValSpecResult(altActualParent, memberInfoOpt, id, enclosingDeclaredTypars, declaredTypars, tyR, partialValReprInfo, declKind)
 
-            [ yield reallyGenerateOneMember(id, valSynInfo, ty', memberFlags)
-              if CompileAsEvent cenv.g attrs then
+            [ yield reallyGenerateOneMember(id, valSynInfo, tyR, memberFlags)
+              if CompileAsEvent g attrs then
                     let valSynInfo = EventDeclarationNormalization.ConvertSynInfo id.idRange valSynInfo
                     let memberFlags = EventDeclarationNormalization.ConvertMemberFlags memberFlags
-                    let delTy = FindDelegateTypeOfPropertyEvent cenv.g cenv.amap id.idText id.idRange declaredTy
+                    let delTy = FindDelegateTypeOfPropertyEvent g cenv.amap id.idText id.idRange declaredTy
                     let ty =
                        if memberFlags.IsInstance then
-                         thisTy --> (delTy --> cenv.g.unit_ty)
+                           mkFunTy g thisTy (mkFunTy g delTy g.unit_ty)
                        else
-                         (delTy --> cenv.g.unit_ty)
+                           mkFunTy g delTy g.unit_ty
                     yield reallyGenerateOneMember(ident("add_" + id.idText, id.idRange), valSynInfo, ty, memberFlags)
                     yield reallyGenerateOneMember(ident("remove_" + id.idText, id.idRange), valSynInfo, ty, memberFlags) ]
 
-
-
         match memberFlags.MemberKind with
         | SynMemberKind.ClassConstructor
         | SynMemberKind.Constructor
@@ -4172,7 +4226,7 @@ and TcValSpec cenv env declKind newOk containerInfo memFlagsOpt thisTyOpt tpenv
             [ yield! generateOneMember({memberFlags with MemberKind=SynMemberKind.PropertyGet})
               yield! generateOneMember({memberFlags with MemberKind=SynMemberKind.PropertySet}) ], tpenv
     | _ ->
-        let valSynInfo = AdjustValSynInfoInSignature cenv.g declaredTy valSynInfo
+        let valSynInfo = AdjustValSynInfoInSignature g declaredTy valSynInfo
         let partialValReprInfo = TranslateTopValSynInfo id.idRange (TcAttributes cenv env) valSynInfo
         [ ValSpecResult(altActualParent, None, id, enclosingDeclaredTypars, declaredTypars, declaredTy, partialValReprInfo, declKind) ], tpenv
 
@@ -4216,23 +4270,26 @@ and TcTyparOrMeasurePar optKind cenv (env: TcEnv) newOk tpenv (SynTypar(id, _, _
         // OK, this is an implicit declaration of a type parameter
         // The kind defaults to Type
         let kind = match optKind with None -> TyparKind.Type | Some kind -> kind
-        let tp' = Construct.NewTypar (kind, TyparRigidity.WarnIfNotRigid, tp, false, TyparDynamicReq.Yes, [], false, false)
-        let item = Item.TypeVar(id.idText, tp')
+        let tpR = Construct.NewTypar (kind, TyparRigidity.WarnIfNotRigid, tp, false, TyparDynamicReq.Yes, [], false, false)
+        let item = Item.TypeVar(id.idText, tpR)
         CallNameResolutionSink cenv.tcSink (id.idRange, env.NameEnv, item, emptyTyparInst, ItemOccurence.UseInType, env.AccessRights)
-        tp', AddUnscopedTypar key tp' tpenv
+        tpR, AddUnscopedTypar key tpR tpenv
 
 and TcTypar cenv env newOk tpenv tp =
     TcTyparOrMeasurePar (Some TyparKind.Type) cenv env newOk tpenv tp
 
 and TcTyparDecl cenv env (SynTyparDecl(Attributes synAttrs, (SynTypar(id, _, _) as stp))) =
+    let g = cenv.g
+
     let attrs = TcAttributes cenv env AttributeTargets.GenericParameter synAttrs
-    let hasMeasureAttr = HasFSharpAttribute cenv.g cenv.g.attrib_MeasureAttribute attrs
-    let hasEqDepAttr = HasFSharpAttribute cenv.g cenv.g.attrib_EqualityConditionalOnAttribute attrs
-    let hasCompDepAttr = HasFSharpAttribute cenv.g cenv.g.attrib_ComparisonConditionalOnAttribute attrs
-    let attrs = attrs |> List.filter (IsMatchingFSharpAttribute cenv.g cenv.g.attrib_MeasureAttribute >> not)
+    let hasMeasureAttr = HasFSharpAttribute g g.attrib_MeasureAttribute attrs
+    let hasEqDepAttr = HasFSharpAttribute g g.attrib_EqualityConditionalOnAttribute attrs
+    let hasCompDepAttr = HasFSharpAttribute g g.attrib_ComparisonConditionalOnAttribute attrs
+    let attrs = attrs |> List.filter (IsMatchingFSharpAttribute g g.attrib_MeasureAttribute >> not)
     let kind = if hasMeasureAttr then TyparKind.Measure else TyparKind.Type
     let tp = Construct.NewTypar (kind, TyparRigidity.WarnIfNotRigid, stp, false, TyparDynamicReq.Yes, attrs, hasEqDepAttr, hasCompDepAttr)
-    match TryFindFSharpStringAttribute cenv.g cenv.g.attrib_CompiledNameAttribute attrs with
+
+    match TryFindFSharpStringAttribute g g.attrib_CompiledNameAttribute attrs with
     | Some compiledName ->
         tp.SetILName (Some compiledName)
     | None ->
@@ -4329,32 +4386,37 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: UnscopedTyparEnv
     | SynType.AnonRecd(_, [],m) ->
         error(Error((FSComp.SR.tcAnonymousTypeInvalidInDeclaration()), m))
 
-    | SynType.AnonRecd(isStruct, args,m) ->
+    | SynType.AnonRecd(isStruct, args, m) ->
+
         let tupInfo = mkTupInfo isStruct
         let args',tpenv = TcTypesAsTuple cenv newOk checkCxs occ env tpenv (args |> List.map snd |> List.map (fun x -> (false,x))) m
         let unsortedFieldIds = args |> List.map fst |> List.toArray
         let anonInfo = AnonRecdTypeInfo.Create(cenv.topCcu, tupInfo, unsortedFieldIds)
+
         // Sort into canonical order
         let sortedFieldTys, sortedCheckedArgTys = List.zip args args' |> List.indexed |> List.sortBy (fun (i,_) -> unsortedFieldIds.[i].idText) |> List.map snd |> List.unzip
+
         sortedFieldTys |> List.iteri (fun i (x,_) ->
             let item = Item.AnonRecdField(anonInfo, sortedCheckedArgTys, i, x.idRange)
             CallNameResolutionSink cenv.tcSink (x.idRange,env.NameEnv,item,emptyTyparInst,ItemOccurence.UseInType,env.eAccessRights))
+
         TType_anon(anonInfo, sortedCheckedArgTys),tpenv
 
     | SynType.Fun(domainTy, resultTy, _) ->
-        let domainTy', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv domainTy
-        let resultTy', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv resultTy
-        (domainTy' --> resultTy'), tpenv
+        let domainTyR, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv domainTy
+        let resultTyR, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv resultTy
+        let tyR = mkFunTy g domainTyR resultTyR
+        tyR, tpenv
 
     | SynType.Array (n, elemTy, m) ->
         let elemTy, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv elemTy
         mkArrayTy g n elemTy m, tpenv
 
     | SynType.Var (tp, _) ->
-        let tp', tpenv = TcTyparOrMeasurePar optKind cenv env newOk tpenv tp
-        match tp'.Kind with
-        | TyparKind.Measure -> TType_measure (Measure.Var tp'), tpenv
-        | TyparKind.Type -> mkTyparTy tp', tpenv
+        let tpR, tpenv = TcTyparOrMeasurePar optKind cenv env newOk tpenv tp
+        match tpR.Kind with
+        | TyparKind.Measure -> TType_measure (Measure.Var tpR), tpenv
+        | TyparKind.Type -> mkTyparTy tpR, tpenv
 
     // _ types
     | SynType.Anon m ->
@@ -4371,8 +4433,8 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: UnscopedTyparEnv
     // #typ
     | SynType.HashConstraint(ty, m) ->
         let tp = TcAnonTypeOrMeasure (Some TyparKind.Type) cenv TyparRigidity.WarnIfNotRigid TyparDynamicReq.Yes newOk m
-        let ty', tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv ty
-        AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace ty' (mkTyparTy tp)
+        let tyR, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv ty
+        AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace tyR (mkTyparTy tp)
         tp.AsType, tpenv
 
     | SynType.StaticConstant (c, m) ->
@@ -4689,7 +4751,7 @@ and TcTypeApp cenv newOk checkCxs occ env tpenv m tcref pathTypeArgs (synArgTys:
     if tcref.Deref.IsProvided then TcProvidedTypeApp cenv env tpenv tcref synArgTys m else
 #endif
 
-    let tps, _, tinst, _ = FreshenTyconRef2 m tcref
+    let tps, _, tinst, _ = FreshenTyconRef2 g m tcref
 
     // If we're not checking constraints, i.e. when we first assert the super/interfaces of a type definition, then just
     // clear the constraint lists of the freshly generated type variables. A little ugly but fairly localized.
@@ -4717,24 +4779,32 @@ and TcTypeApp cenv newOk checkCxs occ env tpenv m tcref pathTypeArgs (synArgTys:
     ty, tpenv
 
 and TcTypeOrMeasureAndRecover optKind cenv newOk checkCxs occ env tpenv ty =
-    try TcTypeOrMeasure optKind cenv newOk checkCxs occ env tpenv ty
+    let g = cenv.g
+    try
+        TcTypeOrMeasure optKind cenv newOk checkCxs occ env tpenv ty
     with e ->
         errorRecovery e ty.Range
+
         let rty =
             match optKind, newOk with
             | Some TyparKind.Measure, NoNewTypars -> TType_measure Measure.One
             | Some TyparKind.Measure, _ -> TType_measure (NewErrorMeasure ())
-            | _, NoNewTypars -> cenv.g.obj_ty
+            | _, NoNewTypars -> g.obj_ty
             | _ -> NewErrorType ()
-        rty, tpenv
 
+        rty, tpenv
 
 and TcTypeAndRecover cenv newOk checkCxs occ env tpenv ty =
     TcTypeOrMeasureAndRecover (Some TyparKind.Type) cenv newOk checkCxs occ env tpenv ty
 
 and TcNestedTypeApplication cenv newOk checkCxs occ env tpenv mWholeTypeApp ty pathTypeArgs tyargs =
-    let ty = convertToTypeWithMetadataIfPossible cenv.g ty
-    if not (isAppTy cenv.g ty) then error(Error(FSComp.SR.tcTypeHasNoNestedTypes(), mWholeTypeApp))
+    let g = cenv.g
+
+    let ty = convertToTypeWithMetadataIfPossible g ty
+
+    if not (isAppTy g ty) then
+        error(Error(FSComp.SR.tcTypeHasNoNestedTypes(), mWholeTypeApp))
+
     match ty with
     | TType_app(tcref, _) ->
         TcTypeApp cenv newOk checkCxs occ env tpenv mWholeTypeApp tcref pathTypeArgs tyargs
@@ -4757,29 +4827,33 @@ and TryAdjustHiddenVarNameToCompGenName cenv env (id: Ident) altNameRefCellOpt =
 
 /// Bind the patterns used in a lambda. Not clear why we don't use TcPat.
 and TcSimplePat optArgsOK checkCxs cenv ty env (tpenv, names, takenNames) p =
+    let g = cenv.g
+
     match p with
     | SynSimplePat.Id (id, altNameRefCellOpt, compgen, isMemberThis, isOpt, m) ->
+
         // Check to see if pattern translation decides to use an alternative identifier.
         match TryAdjustHiddenVarNameToCompGenName cenv env id altNameRefCellOpt with
-        | Some altId -> TcSimplePat optArgsOK checkCxs cenv ty env (tpenv, names, takenNames) (SynSimplePat.Id (altId, None, compgen, isMemberThis, isOpt, m) )
+        | Some altId ->
+            TcSimplePat optArgsOK checkCxs cenv ty env (tpenv, names, takenNames) (SynSimplePat.Id (altId, None, compgen, isMemberThis, isOpt, m) )
         | None ->
             if isOpt then
                 if not optArgsOK then
                     errorR(Error(FSComp.SR.tcOptionalArgsOnlyOnMembers(), m))
 
-                let tyarg = NewInferenceType ()
-                UnifyTypes cenv env m ty (mkOptionTy cenv.g tyarg)
+                let tyarg = NewInferenceType g
+                UnifyTypes cenv env m ty (mkOptionTy g tyarg)
 
             let _, names, takenNames = TcPatBindingName cenv env id ty isMemberThis None None (ValInline.Optional, permitInferTypars, noArgOrRetAttribs, false, None, compgen) (names, takenNames)
             id.idText,
             (tpenv, names, takenNames)
 
     | SynSimplePat.Typed (p, cty, m) ->
-        let cty', tpenv = TcTypeAndRecover cenv NewTyparsOK checkCxs ItemOccurence.UseInType env tpenv cty
+        let ctyR, tpenv = TcTypeAndRecover cenv NewTyparsOK checkCxs ItemOccurence.UseInType env tpenv cty
         match p with
         // Optional arguments on members
-        | SynSimplePat.Id(_, _, _, _, true, _) -> UnifyTypes cenv env m ty (mkOptionTy cenv.g cty')
-        | _ -> UnifyTypes cenv env m ty cty'
+        | SynSimplePat.Id(_, _, _, _, true, _) -> UnifyTypes cenv env m ty (mkOptionTy g ctyR)
+        | _ -> UnifyTypes cenv env m ty ctyR
 
         TcSimplePat optArgsOK checkCxs cenv ty env (tpenv, names, takenNames) p
 
@@ -4810,6 +4884,8 @@ and ValidateOptArgOrder (spats: SynSimplePats) =
 /// Bind the patterns used in argument position for a function, method or lambda.
 and TcSimplePats cenv optArgsOK checkCxs ty env (tpenv, names, takenNames: Set<_>) p =
 
+    let g = cenv.g
+
     // validate optional argument declaration
     ValidateOptArgOrder p
 
@@ -4824,7 +4900,7 @@ and TcSimplePats cenv optArgsOK checkCxs ty env (tpenv, names, takenNames: Set<_
         // uniform with the process where we give names to other (more complex)
         // patterns used in argument position, e.g. "let f (D(x)) = ..."
         let id = ident("unitVar" + string takenNames.Count, m)
-        UnifyTypes cenv env m ty cenv.g.unit_ty
+        UnifyTypes cenv env m ty g.unit_ty
         let _, names, takenNames = TcPatBindingName cenv env id ty false None None (ValInline.Optional, permitInferTypars, noArgOrRetAttribs, false, None, true) (names, takenNames)
         [id.idText], (tpenv, names, takenNames)
 
@@ -4838,17 +4914,18 @@ and TcSimplePats cenv optArgsOK checkCxs ty env (tpenv, names, takenNames: Set<_
         ps', (tpenv, names, takenNames)
 
     | SynSimplePats.Typed (p, cty, m) ->
-        let cty', tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv cty
+        let ctyR, tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv cty
 
         match p with
         // Solitary optional arguments on members
-        | SynSimplePats.SimplePats([SynSimplePat.Id(_, _, _, _, true, _)], _) -> UnifyTypes cenv env m ty (mkOptionTy cenv.g cty')
-        | _ -> UnifyTypes cenv env m ty cty'
+        | SynSimplePats.SimplePats([SynSimplePat.Id(_, _, _, _, true, _)], _) -> UnifyTypes cenv env m ty (mkOptionTy g ctyR)
+        | _ -> UnifyTypes cenv env m ty ctyR
 
         TcSimplePats cenv optArgsOK checkCxs ty env (tpenv, names, takenNames) p
 
 and TcSimplePatsOfUnknownType cenv optArgsOK checkCxs env tpenv spats =
-    let argty = NewInferenceType ()
+    let g = cenv.g
+    let argty = NewInferenceType g
     TcSimplePats cenv optArgsOK checkCxs argty env (tpenv, NameMap.empty, Set.empty) spats
 
 and TcPatBindingName cenv env id ty isMemberThis vis1 topValData (inlineFlag, declaredTypars, argAttribs, isMutable, vis2, compgen) (names, takenNames: Set) =
@@ -4901,16 +4978,19 @@ and TcPatAndRecover warnOnUpper cenv (env: TcEnv) topValInfo vFlags (tpenv, name
 ///    the second-phase function in terms of a List.map from names to actual
 ///    value specifications.
 and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty pat =
+    let g = cenv.g
     let ad = env.AccessRights
+
     match pat with
     | SynPat.As(_, SynPat.Named _, _) -> ()
-    | SynPat.As (_, _, m) -> checkLanguageFeatureError cenv.g.langVersion LanguageFeature.NonVariablePatternsToRightOfAsPatterns m
+    | SynPat.As (_, _, m) -> checkLanguageFeatureError g.langVersion LanguageFeature.NonVariablePatternsToRightOfAsPatterns m
     | _ -> ()
+
     match pat with
     | SynPat.Const (c, m) ->
         match c with
         | SynConst.Bytes (bytes, _, m) ->
-            UnifyTypes cenv env m ty (mkByteArrayTy cenv.g)
+            UnifyTypes cenv env m ty (mkByteArrayTy g)
             TcPat warnOnUpper cenv env None vFlags (tpenv, names, takenNames) ty (SynPat.ArrayOrList (true, [ for b in bytes -> SynPat.Const(SynConst.Byte b, m) ], m))
 
         | SynConst.UserNum _ ->
@@ -4965,8 +5045,8 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
         (fun values -> TPat_as (TPat_wild m, bindf values, m)), (tpenv, names, takenNames)
 
     | SynPat.Typed (p, cty, m) ->
-        let cty', tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv cty
-        UnifyTypes cenv env m ty cty'
+        let ctyR, tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv cty
+        UnifyTypes cenv env m ty ctyR
         TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
 
     | SynPat.Attrib (p, attrs, _) ->
@@ -5018,7 +5098,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
 
         let tcArgPatterns () =
             let args = getArgPatterns ()
-            TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes args) args
+            TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes g args) args
 
         // Note we parse arguments to parameterized pattern labels as patterns, not expressions.
         // This means the range of syntactic expression forms that can be used here is limited.
@@ -5047,7 +5127,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
             id.idText = "nameof" &&
             try
                 match ResolveExprLongIdent cenv.tcSink cenv.nameResolver m ad env.NameEnv TypeNameResolutionInfo.Default [id] with
-                | Result (_, Item.Value vref, _) -> valRefEq cenv.g vref cenv.g.nameof_vref
+                | Result (_, Item.Value vref, _) -> valRefEq g vref g.nameof_vref
                 | _ -> false
             with _ -> false
 
@@ -5058,7 +5138,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
                 TcPat warnOnUpperForId cenv env topValInfo vFlags (tpenv, names, takenNames) ty (mkSynPatVar vis id)
 
             | [arg]
-                when cenv.g.langVersion.SupportsFeature LanguageFeature.NameOf && isNameof id ->
+                when g.langVersion.SupportsFeature LanguageFeature.NameOf && isNameof id ->
                 match TcNameOfExpr cenv env tpenv (convSynPatToSynExpr arg) with
                 | Expr.Const(c, m, _) -> (fun _ -> TPat_const (c, m)), (tpenv, names, takenNames)
                 | _ -> failwith "Impossible: TcNameOfExpr must return an Expr.Const"
@@ -5088,11 +5168,11 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
                 | _ ->
                     // This bit of type-directed analysis ensures that parameterized partial active patterns returning unit do not need to take an argument
                     // See FSharp 1.0 3502
-                    let dtys, rty = stripFunTy cenv.g vexpty
+                    let dtys, rty = stripFunTy g vexpty
 
                     if dtys.Length = args.Length + 1 &&
-                       ((isOptionTy cenv.g rty && isUnitTy cenv.g (destOptionTy cenv.g rty)) ||
-                        (isValueOptionTy cenv.g rty && isUnitTy cenv.g (destValueOptionTy cenv.g rty))) then
+                       ((isOptionTy g rty && isUnitTy g (destOptionTy g rty)) ||
+                        (isValueOptionTy g rty && isUnitTy g (destValueOptionTy g rty))) then
                         args, SynPat.Const(SynConst.Unit, m)
                     else
                         List.frontAndBack args
@@ -5102,8 +5182,8 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
 
             let activePatArgsAsSynExprs = List.map convSynPatToSynExpr activePatArgsAsSynPats
 
-            let activePatResTys = NewInferenceTypes apinfo.Names
-            let activePatType = apinfo.OverallType cenv.g m ty activePatResTys isStructRetTy
+            let activePatResTys = NewInferenceTypes g apinfo.Names
+            let activePatType = apinfo.OverallType g m ty activePatResTys isStructRetTy
 
             let delayed = activePatArgsAsSynExprs |> List.map (fun arg -> DelayedApp(ExprAtomicFlag.NonAtomic, false, None, arg, unionRanges (rangeOfLid longId) arg.Range))
             let activePatExpr, tpenv = PropagateThenTcDelayed cenv (MustEqual activePatType) env tpenv m vexp vexpty ExprAtomicFlag.NonAtomic delayed
@@ -5220,14 +5300,14 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
 
             let extraPatterns = extraPatterns @ extraPatternsFromNames
             let args', acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) argTys args
-            let _, acc = TcPatterns warnOnUpper cenv env vFlags acc (NewInferenceTypes extraPatterns) extraPatterns
+            let _, acc = TcPatterns warnOnUpper cenv env vFlags acc (NewInferenceTypes g extraPatterns) extraPatterns
             (fun values -> mkf m (List.map (fun f -> f values) args')), acc
 
         | Item.ILField finfo ->
-            CheckILFieldInfoAccessible cenv.g cenv.amap lidRange env.AccessRights finfo
+            CheckILFieldInfoAccessible g cenv.amap lidRange env.AccessRights finfo
             if not finfo.IsStatic then
                 errorR (Error (FSComp.SR.tcFieldIsNotStatic finfo.FieldName, lidRange))
-            CheckILFieldAttributes cenv.g finfo m
+            CheckILFieldAttributes g finfo m
             match finfo.LiteralValue with
             | None -> error (Error (FSComp.SR.tcFieldNotLiteralCannotBeUsedInPattern (), lidRange))
             | Some lit ->
@@ -5243,7 +5323,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
         | Item.RecdField rfinfo ->
             CheckRecdFieldInfoAccessible cenv.amap lidRange env.AccessRights rfinfo
             if not rfinfo.IsStatic then errorR (Error (FSComp.SR.tcFieldIsNotStatic(rfinfo.DisplayName), lidRange))
-            CheckRecdFieldInfoAttributes cenv.g rfinfo lidRange |> CommitOperationResult
+            CheckRecdFieldInfoAttributes g rfinfo lidRange |> CommitOperationResult
             match rfinfo.LiteralValue with
             | None -> error (Error(FSComp.SR.tcFieldNotLiteralCannotBeUsedInPattern(), lidRange))
             | Some lit ->
@@ -5263,7 +5343,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
             | Some lit ->
                 let _, _, _, vexpty, _, _ = TcVal true cenv env tpenv vref None None lidRange
                 CheckValAccessible lidRange env.AccessRights vref
-                CheckFSharpAttributes cenv.g vref.Attribs lidRange |> CommitOperationResult
+                CheckFSharpAttributes g vref.Attribs lidRange |> CommitOperationResult
                 checkNoArgsForLiteral()
                 let _, acc = tcArgPatterns ()
 
@@ -5285,20 +5365,20 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
             (fun values -> TPat_tuple(tupInfo, List.map (fun f -> f values) args', argTys, m)), acc
         with e ->
             errorRecovery e m
-            let _, acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes args) args
+            let _, acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (NewInferenceTypes g args) args
             (fun _ -> TPat_error m), acc
 
     | SynPat.Paren (p, _) ->
         TcPat warnOnUpper cenv env None vFlags (tpenv, names, takenNames) ty p
 
     | SynPat.ArrayOrList (isArray, args, m) ->
-        let argty = NewInferenceType ()
-        UnifyTypes cenv env m ty (if isArray then mkArrayType cenv.g argty else mkListTy cenv.g argty)
+        let argty = NewInferenceType g
+        UnifyTypes cenv env m ty (if isArray then mkArrayType g argty else mkListTy g argty)
         let args', acc = TcPatterns warnOnUpper cenv env vFlags (tpenv, names, takenNames) (List.map (fun _ -> argty) args) args
         (fun values ->
             let args' = List.map (fun f -> f values) args'
             if isArray then TPat_array(args', argty, m)
-            else List.foldBack (mkConsListPat cenv.g argty) args' (mkNilListPat cenv.g m argty)), acc
+            else List.foldBack (mkConsListPat g argty) args' (mkNilListPat g m argty)), acc
 
     | SynPat.Record (flds, m) ->
         let flds = List.map (fun (f, _, p) -> f,p) flds
@@ -5319,11 +5399,11 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
 
     | SynPat.DeprecatedCharRange (c1, c2, m) ->
         errorR(Deprecated(FSComp.SR.tcUseWhenPatternGuard(), m))
-        UnifyTypes cenv env m ty cenv.g.char_ty
+        UnifyTypes cenv env m ty g.char_ty
         (fun _ -> TPat_range(c1, c2, m)), (tpenv, names, takenNames)
 
     | SynPat.Null m ->
-        try AddCxTypeMustSupportNull env.DisplayEnv cenv.css m NoTrace ty
+        try AddCxTypeUseSupportsNull env.DisplayEnv cenv.css m NoTrace ty
         with e -> errorRecovery e m
         (fun _ -> TPat_null m), (tpenv, names, takenNames)
 
@@ -5371,20 +5451,25 @@ and RecordNameAndTypeResolutions_IdeallyWithoutHavingOtherEffects_Delayed cenv e
     dummyCheckedDelayed delayed
 
 and TcExprOfUnknownType cenv env tpenv expr =
-    let exprty = NewInferenceType ()
+    let g = cenv.g
+    let exprty = NewInferenceType g
     let expr', tpenv = TcExpr cenv (MustEqual exprty) env tpenv expr
     expr', exprty, tpenv
 
+// This is the old way of introducing flexibility via subtype constraints, still active
+// for compat reasons.
 and TcExprFlex cenv flex compat (desiredTy: TType) (env: TcEnv) tpenv (synExpr: SynExpr) =
-    // This is the old way of introducing flexibility via subtype constraints, still active
-    // for compat reasons.
+    let g = cenv.g
+
     if flex then
-        let argty = NewInferenceType ()
+        let argty = NewInferenceType g
         if compat then
-            (destTyparTy cenv.g argty).SetIsCompatFlex(true)
+            (destTyparTy g argty).SetIsCompatFlex(true)
+
         AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css synExpr.Range NoTrace desiredTy argty
+
         let expr2, tpenv = TcExprFlex2 cenv argty env false tpenv synExpr
-        let expr3 = mkCoerceIfNeeded cenv.g desiredTy argty expr2
+        let expr3 = mkCoerceIfNeeded g desiredTy argty expr2
         expr3, tpenv
     else
         TcExprFlex2 cenv desiredTy env false tpenv synExpr
@@ -5394,6 +5479,8 @@ and TcExprFlex2 cenv desiredTy env isMethodArg tpenv synExpr =
 
 and TcExpr cenv ty (env: TcEnv) tpenv (expr: SynExpr) =
 
+    let g = cenv.g
+
     // Guard the stack for deeply nested expressions
     cenv.stackGuard.Guard <| fun () ->
 
@@ -5408,7 +5495,7 @@ and TcExpr cenv ty (env: TcEnv) tpenv (expr: SynExpr) =
         // the type of the current expression with a type variable that indicates an error
         errorRecovery e m
         solveTypAsError cenv env.DisplayEnv m ty.Commit
-        mkThrow m ty.Commit (mkOne cenv.g m), tpenv
+        mkThrow m ty.Commit (mkOne g m), tpenv
 
 and TcExprNoRecover cenv (ty: OverallTy) (env: TcEnv) tpenv (expr: SynExpr) =
 
@@ -5424,22 +5511,27 @@ and TcExprNoRecover cenv (ty: OverallTy) (env: TcEnv) tpenv (expr: SynExpr) =
 // and has been added relatively late in F# 4.0 to preserve the structure of previous code. It pushes a 'delayed' parameter
 // through TcExprOfUnknownType, TcExpr and TcExprNoRecover
 and TcExprOfUnknownTypeThen cenv env tpenv expr delayed =
-    let exprty = NewInferenceType ()
+    let g = cenv.g
+
+    let exprty = NewInferenceType g
+
     let expr', tpenv =
       try
-        TcExprThen cenv (MustEqual exprty) env tpenv false expr delayed
-      with e ->
-        let m = expr.Range
-        errorRecovery e m
-        solveTypAsError cenv env.DisplayEnv m exprty
-        mkThrow m exprty (mkOne cenv.g m), tpenv
+          TcExprThen cenv (MustEqual exprty) env tpenv false expr delayed
+      with exn ->
+          let m = expr.Range
+          errorRecovery exn m
+          solveTypAsError cenv env.DisplayEnv m exprty
+          mkThrow m exprty (mkOne g m), tpenv
+
     expr', exprty, tpenv
 
 /// This is used to typecheck legitimate 'main body of constructor' expressions
 and TcExprThatIsCtorBody safeInitInfo cenv overallTy env tpenv expr =
+    let g = cenv.g
     let env = {env with eCtorInfo = Some (InitialExplicitCtorInfo safeInitInfo) }
     let expr, tpenv = TcExpr cenv overallTy env tpenv expr
-    let expr = CheckAndRewriteObjectCtor cenv.g env expr
+    let expr = CheckAndRewriteObjectCtor g env expr
     expr, tpenv
 
 /// This is used to typecheck all ordinary expressions including constituent
@@ -5459,13 +5551,14 @@ and TcStmtThatCantBeCtorBody cenv env tpenv expr =
     TcStmt cenv env tpenv expr
 
 and TcStmt cenv env tpenv synExpr =
+    let g = cenv.g
     let expr, ty, tpenv = TcExprOfUnknownType cenv env tpenv synExpr
     let m = synExpr.Range
     let wasUnit = UnifyUnitType cenv env m ty expr
     if wasUnit then
         expr, tpenv
     else
-        mkCompGenSequential m expr (mkUnit cenv.g m), tpenv
+        mkCompGenSequential m expr (mkUnit g m), tpenv
 
 and TryTcStmt cenv env tpenv synExpr =
     let expr, ty, tpenv = TcExprOfUnknownType cenv env tpenv synExpr
@@ -5477,8 +5570,9 @@ and TryTcStmt cenv env tpenv synExpr =
 /// keep a stack of things on the right. This lets us recognize
 /// method applications and other item-based syntax.
 and TcExprThen cenv (overallTy: OverallTy) env tpenv isArg synExpr delayed =
-    match synExpr with
+    let g = cenv.g
 
+    match synExpr with
     | LongOrSingleIdent (isOpt, longId, altNameRefCellOpt, mLongId) ->
         TcNonControlFlowExpr env <| fun env ->
         if isOpt then errorR(Error(FSComp.SR.tcSyntaxErrorUnexpectedQMark(), mLongId))
@@ -5498,22 +5592,25 @@ and TcExprThen cenv (overallTy: OverallTy) env tpenv isArg synExpr delayed =
         match delayed with
         | DelayedApp (hpa2, isSugar2, _, arg2, _) :: _ when not isInfix && (hpa = ExprAtomicFlag.NonAtomic) && isAdjacentListExpr isSugar2 hpa2 (Some synExpr) arg2 -> 
             let mWarning = unionRanges arg.Range arg2.Range
+
             match arg with 
             | SynExpr.Paren _ -> 
-                if cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+                if g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
                     warning(Error(FSComp.SR.tcParenThenAdjacentListArgumentNeedsAdjustment(), mWarning))
-                elif not (cenv.g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
+                elif not (g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
                     informationalWarning(Error(FSComp.SR.tcParenThenAdjacentListArgumentReserved(), mWarning))
+
             | SynExpr.ArrayOrListComputed _
             | SynExpr.ArrayOrList _ ->
-                if cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+                if g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
                     warning(Error(FSComp.SR.tcListThenAdjacentListArgumentNeedsAdjustment(), mWarning))
-                elif not (cenv.g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
+                elif not (g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
                     informationalWarning(Error(FSComp.SR.tcListThenAdjacentListArgumentReserved(), mWarning))
+
             | _ -> 
-                if cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+                if g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
                     warning(Error(FSComp.SR.tcOtherThenAdjacentListArgumentNeedsAdjustment(), mWarning))
-                elif not (cenv.g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
+                elif not (g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
                     informationalWarning(Error(FSComp.SR.tcOtherThenAdjacentListArgumentReserved(), mWarning))
 
         | _ -> ()
@@ -5536,7 +5633,7 @@ and TcExprThen cenv (overallTy: OverallTy) env tpenv isArg synExpr delayed =
     // etc.
     | SynExpr.DotIndexedGet (e1, IndexerArgs indexArgs, mDot, mWholeExpr) ->
         TcNonControlFlowExpr env <| fun env ->
-        if not isArg && cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+        if not isArg && g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
             informationalWarning(Error(FSComp.SR.tcIndexNotationDeprecated(), mDot))
         TcIndexerThen cenv env overallTy mWholeExpr mDot tpenv None e1 indexArgs delayed
 
@@ -5545,7 +5642,7 @@ and TcExprThen cenv (overallTy: OverallTy) env tpenv isArg synExpr delayed =
     // etc.
     | SynExpr.DotIndexedSet (e1, IndexerArgs indexArgs, e3, mOfLeftOfSet, mDot, mWholeExpr) ->
         TcNonControlFlowExpr env <| fun env ->
-        if cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+        if g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
             warning(Error(FSComp.SR.tcIndexNotationDeprecated(), mDot))
         TcIndexerThen cenv env overallTy mWholeExpr mDot tpenv (Some (e3, mOfLeftOfSet)) e1 indexArgs delayed
 
@@ -5562,8 +5659,10 @@ and TcExprsWithFlexes cenv env m tpenv flexes argTys args =
          TcExprFlex cenv flex false ty env tpenv e)
 
 and CheckSuperInit cenv objTy m =
+    let g = cenv.g
+
     // Check the type is not abstract
-    match tryTcrefOfAppTy cenv.g objTy with
+    match tryTcrefOfAppTy g objTy with
     | ValueSome tcref when isAbstractTycon tcref.Deref ->
         errorR(Error(FSComp.SR.tcAbstractTypeCannotBeInstantiated(), m))
     | _ -> ()
@@ -5573,7 +5672,8 @@ and CheckSuperInit cenv objTy m =
 //-------------------------------------------------------------------------
 
 and TcExprUndelayedNoType cenv env tpenv synExpr: Expr * TType * _ =
-    let overallTy = NewInferenceType ()
+    let g = cenv.g
+    let overallTy = NewInferenceType g
     let expr, tpenv = TcExprUndelayed cenv (MustEqual overallTy) env tpenv synExpr
     expr, overallTy, tpenv
 
@@ -5598,9 +5698,11 @@ and TcExprUndelayedNoType cenv env tpenv synExpr: Expr * TType * _ =
 ///   - string literal expressions (though the propagation is not essential in this case)
 ///
 and TcPropagatingExprLeafThenConvert cenv overallTy actualTy (env: TcEnv) (* canAdhoc *) m (f: unit -> Expr * UnscopedTyparEnv) =
+    let g = cenv.g
+
     match overallTy with
-    | MustConvertTo _ when cenv.g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions ->
-        assert (cenv.g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions)
+    | MustConvertTo _ when g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions ->
+        assert (g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions)
 
         // Compute the conversion _before_ processing the construct. We know enough to process this conversion eagerly.
         UnifyOverallType cenv env m overallTy actualTy
@@ -5628,10 +5730,13 @@ and TcPropagatingExprLeafThenConvert cenv overallTy actualTy (env: TcEnv) (* can
 ///  - anon record (except if overallTy is an anon record type or a variable type that can become one)
 ///  - record      (except if overallTy is requiresCtor || haveCtor or a record type or a variable type that can become one))
 and TcPossiblyPropogatingExprLeafThenConvert isPropagating cenv (overallTy: OverallTy) (env: TcEnv) m processExpr =
+
+    let g = cenv.g
+
     match overallTy with
-    | MustConvertTo(_, reqdTy) when cenv.g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions && not (isPropagating reqdTy) ->
+    | MustConvertTo(_, reqdTy) when g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions && not (isPropagating reqdTy) ->
         TcNonPropagatingExprLeafThenConvert cenv overallTy env m (fun () ->
-            let exprTy = NewInferenceType()
+            let exprTy = NewInferenceType g
 
             // Here 'processExpr' will eventually do the unification with exprTy.
             let expr, tpenv = processExpr exprTy
@@ -5649,20 +5754,24 @@ and TcPossiblyPropogatingExprLeafThenConvert isPropagating cenv (overallTy: Over
 ///   - LibraryOnlyUnionCaseFieldGet
 ///   - constants 
 and TcNonPropagatingExprLeafThenConvert cenv (overallTy: OverallTy) (env: TcEnv) m processExpr =
+
     // Process the construct
     let expr, exprTy, tpenv = processExpr ()
 
     // Now compute the conversion, based on the post-processing type
     UnifyOverallType cenv env m overallTy exprTy
 
-    let expr2 = TcAdjustExprForTypeDirectedConversions cenv overallTy exprTy env (* true  *) m expr
+    let expr2 = TcAdjustExprForTypeDirectedConversions cenv overallTy exprTy env m expr
     expr2, tpenv
 
 and TcAdjustExprForTypeDirectedConversions cenv (overallTy: OverallTy) actualTy (env: TcEnv) (* canAdhoc *) m expr =
+
+    let g = cenv.g
+
     match overallTy with
-    | MustConvertTo (_, reqdTy) when cenv.g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions ->
-        let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
-        AdjustExprForTypeDirectedConversions tcVal cenv.g cenv.amap cenv.infoReader env.AccessRights reqdTy actualTy m expr
+    | MustConvertTo (_, reqdTy) when g.langVersion.SupportsFeature LanguageFeature.AdditionalTypeDirectedConversions ->
+        let tcVal = LightweightTcValForUsingInBuildMethodCall g
+        AdjustExprForTypeDirectedConversions tcVal g cenv.amap cenv.infoReader env.AccessRights reqdTy actualTy m expr
     | _ ->
         expr
 
@@ -5697,6 +5806,8 @@ and TcNonControlFlowExpr (env: TcEnv) f =
 
 and TcExprUndelayed cenv (overallTy: OverallTy) env tpenv (synExpr: SynExpr) =
 
+    let g = cenv.g
+
     match synExpr with
     // ( * )
     | SynExpr.Paren(SynExpr.IndexRange (None, opm, None, _m1, _m2, _), _, _, _) ->
@@ -5720,7 +5831,7 @@ and TcExprUndelayed cenv (overallTy: OverallTy) env tpenv (synExpr: SynExpr) =
 
     | SynExpr.InterpolatedString (parts, _, m) ->
         TcNonControlFlowExpr env <| fun env ->
-        checkLanguageFeatureError cenv.g.langVersion LanguageFeature.StringInterpolation m
+        checkLanguageFeatureError g.langVersion LanguageFeature.StringInterpolation m
         CallExprHasTypeSink cenv.tcSink (m, env.NameEnv, overallTy.Commit, env.AccessRights)
         TcInterpolatedStringExpr cenv overallTy env m tpenv parts
 
@@ -5785,7 +5896,7 @@ and TcExprUndelayed cenv (overallTy: OverallTy) env tpenv (synExpr: SynExpr) =
 
     | SynExpr.Null m ->
         TcNonControlFlowExpr env <| fun env ->
-        AddCxTypeMustSupportNull env.DisplayEnv cenv.css m NoTrace overallTy.Commit
+        AddCxTypeUseSupportsNull env.DisplayEnv cenv.css m NoTrace overallTy.Commit
         mkNull m overallTy.Commit, tpenv
 
     | SynExpr.Lazy (synInnerExpr, m) ->
@@ -5798,7 +5909,7 @@ and TcExprUndelayed cenv (overallTy: OverallTy) env tpenv (synExpr: SynExpr) =
 
     | SynExpr.AnonRecd (isStruct, optOrigExpr, unsortedFieldExprs, mWholeExpr) ->
         TcNonControlFlowExpr env <| fun env ->
-        TcPossiblyPropogatingExprLeafThenConvert (fun ty -> isAnonRecdTy cenv.g ty || isTyparTy cenv.g ty) cenv overallTy env mWholeExpr (fun overallTy ->
+        TcPossiblyPropogatingExprLeafThenConvert (fun ty -> isAnonRecdTy g ty || isTyparTy g ty) cenv overallTy env mWholeExpr (fun overallTy ->
             TcAnonRecdExpr cenv overallTy env tpenv (isStruct, optOrigExpr, unsortedFieldExprs, mWholeExpr)
         )
 
@@ -5881,7 +5992,7 @@ and TcExprUndelayed cenv (overallTy: OverallTy) env tpenv (synExpr: SynExpr) =
         TcExprSequentialOrImplicitYield cenv overallTy env tpenv (sp, synExpr1, synExpr2, otherExpr, m)
 
     | SynExpr.Do (synInnerExpr, m) ->
-        UnifyTypes cenv env m overallTy.Commit cenv.g.unit_ty
+        UnifyTypes cenv env m overallTy.Commit g.unit_ty
         TcStmtThatCantBeCtorBody cenv env tpenv synInnerExpr
 
     | SynExpr.IfThenElse _ ->
@@ -5983,15 +6094,16 @@ and TcExprTypeAnnotated cenv overallTy env tpenv (synBodyExpr, synType, m) =
     let tgtTy, tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv synType
     UnifyOverallType cenv env m overallTy tgtTy
     let bodyExpr, tpenv = TcExpr cenv (MustConvertTo (false, tgtTy)) env tpenv synBodyExpr
-    let bodyExpr2 = TcAdjustExprForTypeDirectedConversions cenv overallTy tgtTy env (* true  *) m bodyExpr
+    let bodyExpr2 = TcAdjustExprForTypeDirectedConversions cenv overallTy tgtTy env m bodyExpr
     bodyExpr2, tpenv
 
 and TcExprTypeTest cenv overallTy env tpenv (synInnerExpr, tgtTy, m) =
+    let g = cenv.g
     let innerExpr, srcTy, tpenv = TcExprOfUnknownType cenv env tpenv synInnerExpr
-    UnifyTypes cenv env m overallTy.Commit cenv.g.bool_ty
+    UnifyTypes cenv env m overallTy.Commit g.bool_ty
     let tgtTy, tpenv = TcType cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv tgtTy
-    TcRuntimeTypeTest (*isCast*)false (*isOperator*)true cenv env.DisplayEnv m tgtTy srcTy
-    let expr = mkCallTypeTest cenv.g m tgtTy innerExpr
+    TcRuntimeTypeTest false true cenv env.DisplayEnv m tgtTy srcTy
+    let expr = mkCallTypeTest g m tgtTy innerExpr
     expr, tpenv
 
 and TcExprUpcast cenv overallTy env tpenv (synExpr, synInnerExpr, m) =
@@ -6010,7 +6122,10 @@ and TcExprUpcast cenv overallTy env tpenv (synExpr, synInnerExpr, m) =
     expr, tpenv
 
 and TcExprDowncast cenv overallTy env tpenv (synExpr, synInnerExpr, m) =
+    let g = cenv.g
+
     let innerExpr, srcTy, tpenv = TcExprOfUnknownType cenv env tpenv synInnerExpr
+
     let tgtTy, tpenv, isOperator =
         match synExpr with
         | SynExpr.Downcast (_, tgtTy, m) ->
@@ -6023,32 +6138,36 @@ and TcExprDowncast cenv overallTy env tpenv (synExpr, synInnerExpr, m) =
 
     // TcRuntimeTypeTest ensures tgtTy is a nominal type. Hence we can insert a check here
     // based on the nullness semantics of the nominal type.
-    let expr = mkCallUnbox cenv.g m tgtTy innerExpr
+    let expr = mkCallUnbox g m tgtTy innerExpr
     expr, tpenv
 
 and TcExprLazy cenv overallTy env tpenv (synInnerExpr, m) =
-    let innerTy = NewInferenceType ()
-    UnifyTypes cenv env m overallTy.Commit (mkLazyTy cenv.g innerTy)
+    let g = cenv.g
+    let innerTy = NewInferenceType g
+    UnifyTypes cenv env m overallTy.Commit (mkLazyTy g innerTy)
     let envinner = ExitFamilyRegion env
     let envinner = { envinner with eIsControlFlow = true }
     let innerExpr, tpenv = TcExpr cenv (MustEqual innerTy) envinner tpenv synInnerExpr
-    let expr = mkLazyDelayed cenv.g m innerTy (mkUnitDelayLambda cenv.g m innerExpr)
+    let expr = mkLazyDelayed g m innerTy (mkUnitDelayLambda g m innerExpr)
     expr, tpenv
 
 and TcExprTuple cenv overallTy env tpenv (isExplicitStruct, args, m) =
-    TcPossiblyPropogatingExprLeafThenConvert (fun ty -> isAnyTupleTy cenv.g ty || isTyparTy cenv.g ty) cenv overallTy env m (fun overallTy ->
+    let g = cenv.g
+    TcPossiblyPropogatingExprLeafThenConvert (fun ty -> isAnyTupleTy g ty || isTyparTy g ty) cenv overallTy env m (fun overallTy ->
         let tupInfo, argTys = UnifyTupleTypeAndInferCharacteristics env.eContextInfo cenv env.DisplayEnv m overallTy isExplicitStruct args
 
         let flexes = argTys |> List.map (fun _ -> false)
         let args', tpenv = TcExprsWithFlexes cenv env m tpenv flexes argTys args
-        let expr = mkAnyTupled cenv.g m tupInfo args' argTys
+        let expr = mkAnyTupled g m tupInfo args' argTys
         expr, tpenv
     )
 
 and TcExprArrayOrList cenv overallTy env tpenv (isArray, args, m) =
+    let g = cenv.g
+
     CallExprHasTypeSink cenv.tcSink (m, env.NameEnv, overallTy.Commit, env.AccessRights)
-    let argty = NewInferenceType ()
-    let actualTy = if isArray then mkArrayType cenv.g argty else mkListTy cenv.g argty
+    let argty = NewInferenceType g
+    let actualTy = if isArray then mkArrayType g argty else mkListTy g argty
 
     // Propagating type directed conversion, e.g. for 
     //     let x : seq  = [ 1; 2 ]
@@ -6058,7 +6177,7 @@ and TcExprArrayOrList cenv overallTy env tpenv (isArray, args, m) =
     TcPropagatingExprLeafThenConvert cenv overallTy actualTy env (* canAdhoc  *) m (fun () ->
 
         // Always allow subsumption if a nominal type is known prior to type checking any arguments
-        let flex = not (isTyparTy cenv.g argty)
+        let flex = not (isTyparTy g argty)
         let mutable first = true
         let getInitEnv m =
             if first then
@@ -6071,12 +6190,14 @@ and TcExprArrayOrList cenv overallTy env tpenv (isArray, args, m) =
 
         let expr =
             if isArray then Expr.Op (TOp.Array, [argty], args', m)
-            else List.foldBack (mkCons cenv.g argty) args' (mkNil cenv.g m argty)
+            else List.foldBack (mkCons g argty) args' (mkNil g m argty)
         expr, tpenv
     )
 
 // Note could be combined with TcObjectExpr
 and TcExprObjectExpr cenv overallTy env tpenv (synObjTy, argopt, binds, extraImpls, mNewExpr, m) =
+    let g = cenv.g
+
     CallExprHasTypeSink cenv.tcSink (m, env.NameEnv, overallTy.Commit, env.eAccessRights)
 
     // Note, allowing canAdhoc = true would disable subtype-based propagation from overallTy into checking of structure
@@ -6096,46 +6217,55 @@ and TcExprObjectExpr cenv overallTy env tpenv (synObjTy, argopt, binds, extraImp
         (tpenv, extraImpls) ||> List.mapFold (fun tpenv (SynInterfaceImpl(synIntfTy, _mWith, bindings, members, m)) ->
             let overrides = unionBindingAndMembers bindings members
             let intfTy, tpenv = TcType cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv synIntfTy
-            if not (isInterfaceTy cenv.g intfTy) then
+            if not (isInterfaceTy g intfTy) then
                 error(Error(FSComp.SR.tcExpectedInterfaceType(), m))
-            if isErasedType cenv.g intfTy then
+            if isErasedType g intfTy then
                 errorR(Error(FSComp.SR.tcCannotInheritFromErasedType(), m))
             (m, intfTy, overrides), tpenv)
 
-    let realObjTy = if isObjTy cenv.g objTy && not (isNil extraImpls) then (p23 (List.head extraImpls)) else objTy
+    let realObjTy = if isObjTy g objTy && not (isNil extraImpls) then (p23 (List.head extraImpls)) else objTy
 
     TcPropagatingExprLeafThenConvert cenv overallTy realObjTy env (* canAdhoc *) m (fun () ->
         TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mObjTy, mNewExpr, m)
     )
 
 and TcExprRecord cenv overallTy env tpenv (inherits, optOrigExpr, flds, mWholeExpr) =
-      CallExprHasTypeSink cenv.tcSink (mWholeExpr, env.NameEnv, overallTy.Commit, env.AccessRights)
-      let requiresCtor = (GetCtorShapeCounter env = 1) // Get special expression forms for constructors
-      let haveCtor = Option.isSome inherits
-      TcPossiblyPropogatingExprLeafThenConvert (fun ty -> requiresCtor || haveCtor || isRecdTy cenv.g ty || isTyparTy cenv.g ty) cenv overallTy env mWholeExpr (fun overallTy ->
+    let g = cenv.g
+    CallExprHasTypeSink cenv.tcSink (mWholeExpr, env.NameEnv, overallTy.Commit, env.AccessRights)
+    let requiresCtor = (GetCtorShapeCounter env = 1) // Get special expression forms for constructors
+    let haveCtor = Option.isSome inherits
+    TcPossiblyPropogatingExprLeafThenConvert (fun ty -> requiresCtor || haveCtor || isRecdTy g ty || isTyparTy g ty) cenv overallTy env mWholeExpr (fun overallTy ->
         TcRecdExpr cenv overallTy env tpenv (inherits, optOrigExpr, flds, mWholeExpr)
-      )
+    )
 
 and TcExprWhileLoop cenv overallTy env tpenv (spWhile, synGuardExpr, synBodyExpr, m) =
-    UnifyTypes cenv env m overallTy.Commit cenv.g.unit_ty
+    let g = cenv.g
+    UnifyTypes cenv env m overallTy.Commit g.unit_ty
+
     let guardExpr, tpenv = 
         let env = { env with eIsControlFlow = false }
-        TcExpr cenv (MustEqual cenv.g.bool_ty) env tpenv synGuardExpr
+        TcExpr cenv (MustEqual g.bool_ty) env tpenv synGuardExpr
+
     let bodyExpr, tpenv =
         let env = { env with eIsControlFlow = true }
         TcStmt cenv env tpenv synBodyExpr
-    mkWhile cenv.g (spWhile, NoSpecialWhileLoopMarker, guardExpr, bodyExpr, m), tpenv
+
+    mkWhile g (spWhile, NoSpecialWhileLoopMarker, guardExpr, bodyExpr, m), tpenv
 
 and TcExprIntegerForLoop cenv overallTy env tpenv (spFor, spTo, id, start, dir, finish, body, m) =
-    UnifyTypes cenv env m overallTy.Commit cenv.g.unit_ty
+    let g = cenv.g
+    UnifyTypes cenv env m overallTy.Commit g.unit_ty
+
     let startExpr, tpenv =
         let env = { env with eIsControlFlow = false }
-        TcExpr cenv (MustEqual cenv.g.int_ty) env tpenv start
+        TcExpr cenv (MustEqual g.int_ty) env tpenv start
+
     let finishExpr, tpenv =
         let env = { env with eIsControlFlow = false }
-        TcExpr cenv (MustEqual cenv.g.int_ty) env tpenv finish
-    let idv, _ = mkLocal id.idRange id.idText cenv.g.int_ty
-    let envinner = AddLocalVal cenv.g cenv.tcSink m idv env
+        TcExpr cenv (MustEqual g.int_ty) env tpenv finish
+
+    let idv, _ = mkLocal id.idRange id.idText g.int_ty
+    let envinner = AddLocalVal g cenv.tcSink m idv env
     let envinner = { envinner with eIsControlFlow = true }
 
     // notify name resolution sink about loop variable
@@ -6143,28 +6273,33 @@ and TcExprIntegerForLoop cenv overallTy env tpenv (spFor, spTo, id, start, dir,
     CallNameResolutionSink cenv.tcSink (idv.Range, env.NameEnv, item, emptyTyparInst, ItemOccurence.Binding, env.AccessRights)
 
     let bodyExpr, tpenv = TcStmt cenv envinner tpenv body
-    mkFastForLoop cenv.g (spFor, spTo, m, idv, startExpr, dir, finishExpr, bodyExpr), tpenv
+    mkFastForLoop g (spFor, spTo, m, idv, startExpr, dir, finishExpr, bodyExpr), tpenv
 
 and TcExprTryWith cenv overallTy env tpenv (synBodyExpr, synWithClauses, mWithToLast, mTryToLast, spTry, spWith) =
+    let g = cenv.g
+
     let env = { env with eIsControlFlow = true }
     let bodyExpr, tpenv = TcExpr cenv overallTy env tpenv synBodyExpr
+
     // Compile the pattern twice, once as a List.filter with all succeeding targets returning "1", and once as a proper catch block.
     let filterClauses =
         synWithClauses |> List.map (fun clause ->
             let (SynMatchClause(pat, optWhenExpr, _, m, _, trivia)) = clause
             let oneExpr =  SynExpr.Const (SynConst.Int32 1, m)
             SynMatchClause(pat, optWhenExpr, oneExpr, m, DebugPointAtTarget.No, trivia))
-    let checkedFilterClauses, tpenv = TcMatchClauses cenv cenv.g.exn_ty (MustEqual cenv.g.int_ty) env tpenv filterClauses
-    let checkedHandlerClauses, tpenv = TcMatchClauses cenv cenv.g.exn_ty overallTy env tpenv synWithClauses
-    let v1, filterExpr = CompilePatternForMatchClauses cenv env mWithToLast mWithToLast true FailFilter None cenv.g.exn_ty cenv.g.int_ty checkedFilterClauses
-    let v2, handlerExpr = CompilePatternForMatchClauses cenv env mWithToLast mWithToLast true Rethrow None cenv.g.exn_ty overallTy.Commit checkedHandlerClauses
-    mkTryWith cenv.g (bodyExpr, v1, filterExpr, v2, handlerExpr, mTryToLast, overallTy.Commit, spTry, spWith), tpenv
+
+    let checkedFilterClauses, tpenv = TcMatchClauses cenv g.exn_ty (MustEqual g.int_ty) env tpenv filterClauses
+    let checkedHandlerClauses, tpenv = TcMatchClauses cenv g.exn_ty overallTy env tpenv synWithClauses
+    let v1, filterExpr = CompilePatternForMatchClauses cenv env mWithToLast mWithToLast true FailFilter None g.exn_ty g.int_ty checkedFilterClauses
+    let v2, handlerExpr = CompilePatternForMatchClauses cenv env mWithToLast mWithToLast true Rethrow None g.exn_ty overallTy.Commit checkedHandlerClauses
+    mkTryWith g (bodyExpr, v1, filterExpr, v2, handlerExpr, mTryToLast, overallTy.Commit, spTry, spWith), tpenv
 
 and TcExprTryFinally cenv overallTy env tpenv (synBodyExpr, synFinallyExpr, mTryToLast, spTry, spFinally) =
+    let g = cenv.g
     let env = { env with eIsControlFlow = true }
     let bodyExpr, tpenv = TcExpr cenv overallTy env tpenv synBodyExpr
     let finallyExpr, tpenv = TcStmt cenv env tpenv synFinallyExpr
-    mkTryFinally cenv.g (bodyExpr, finallyExpr, mTryToLast, overallTy.Commit, spTry, spFinally), tpenv
+    mkTryFinally g (bodyExpr, finallyExpr, mTryToLast, overallTy.Commit, spTry, spFinally), tpenv
 
 and TcExprJoinIn cenv overallTy env tpenv (e1, mInToken, e2, mAll) =
     errorR(Error(FSComp.SR.parsUnfinishedExpression("in"), mInToken))
@@ -6251,6 +6386,7 @@ and TcExprNamedIndexPropertySet cenv overallTy env tpenv (lidwd, e1, e2, mStmt)
               MakeDelayedSet(e2, mStmt) ]
 
 and TcExprTraitCall cenv overallTy env tpenv (tps, memSpfn, arg, m) =
+    let g = cenv.g
     TcNonPropagatingExprLeafThenConvert cenv overallTy env m (fun () ->
         let synTypes = tps |> List.map (fun tp -> SynType.Var(tp, m))
         let traitInfo, tpenv = TcPseudoMemberSpec cenv NewTyparsOK env synTypes tpenv memSpfn m
@@ -6258,41 +6394,46 @@ and TcExprTraitCall cenv overallTy env tpenv (tps, memSpfn, arg, m) =
             warning(BakedInMemberConstraintName(traitInfo.MemberName, m))
 
         let argTys = traitInfo.ArgumentTypes
-        let returnTy = GetFSharpViewOfReturnType cenv.g traitInfo.ReturnType
+        let returnTy = GetFSharpViewOfReturnType g traitInfo.ReturnType
         let args, namedCallerArgs = GetMethodArgs arg
         if not (isNil namedCallerArgs) then errorR(Error(FSComp.SR.tcNamedArgumentsCannotBeUsedInMemberTraits(), m))
         // Subsumption at trait calls if arguments have nominal type prior to unification of any arguments or return type
-        let flexes = argTys |> List.map (isTyparTy cenv.g >> not)
+        let flexes = argTys |> List.map (isTyparTy g >> not)
         let args', tpenv = TcExprsWithFlexes cenv env m tpenv flexes argTys args
         AddCxMethodConstraint env.DisplayEnv cenv.css m NoTrace traitInfo
         Expr.Op (TOp.TraitCall traitInfo, [], args', m), returnTy, tpenv
     )
 
 and TcExprUnionCaseFieldGet cenv overallTy env tpenv (e1, c, n, m) =
+    let g = cenv.g
     TcNonPropagatingExprLeafThenConvert cenv overallTy env m (fun () ->
         let e1', ty1, tpenv = TcExprOfUnknownType cenv env tpenv e1
-        let mkf, ty2 = TcUnionCaseOrExnField cenv env ty1 m c n
-                          ((fun (a, b) n -> mkUnionCaseFieldGetUnproven cenv.g (e1', a, b, n, m)),
-                           (fun a n -> mkExnCaseFieldGet(e1', a, n, m)))
+        let mkf, ty2 =
+            TcUnionCaseOrExnField cenv env ty1 m c n
+                ((fun (a, b) n -> mkUnionCaseFieldGetUnproven g (e1', a, b, n, m)),
+                 (fun a n -> mkExnCaseFieldGet(e1', a, n, m)))
         mkf n, ty2, tpenv
     )
 
 and TcExprUnionCaseFieldSet cenv overallTy env tpenv (e1, c, n, e2, m) =
-    UnifyTypes cenv env m overallTy.Commit cenv.g.unit_ty
+    let g = cenv.g
+    UnifyTypes cenv env m overallTy.Commit g.unit_ty
     let e1', ty1, tpenv = TcExprOfUnknownType cenv env tpenv e1
-    let mkf, ty2 = TcUnionCaseOrExnField cenv env ty1 m c n
-                        ((fun (a, b) n e2' ->
-                            if not (isUnionCaseFieldMutable cenv.g a n) then errorR(Error(FSComp.SR.tcFieldIsNotMutable(), m))
-                            mkUnionCaseFieldSet(e1', a, b, n, e2', m)),
-                        (fun a n e2' ->
-                            if not (isExnFieldMutable a n) then errorR(Error(FSComp.SR.tcFieldIsNotMutable(), m))
-                            mkExnCaseFieldSet(e1', a, n, e2', m)))
+    let mkf, ty2 =
+        TcUnionCaseOrExnField cenv env ty1 m c n
+            ((fun (a, b) n e2' ->
+                if not (isUnionCaseFieldMutable g a n) then errorR(Error(FSComp.SR.tcFieldIsNotMutable(), m))
+                mkUnionCaseFieldSet(e1', a, b, n, e2', m)),
+             (fun a n e2' ->
+                if not (isExnFieldMutable a n) then errorR(Error(FSComp.SR.tcFieldIsNotMutable(), m))
+                mkExnCaseFieldSet(e1', a, n, e2', m)))
     let e2', tpenv = TcExpr cenv (MustEqual ty2) env tpenv e2
     mkf n e2', tpenv
 
 and TcExprILAssembly cenv overallTy env tpenv (s, tyargs, args, rtys, m) =
+    let g = cenv.g
     let s = (s :?> ILInstr[])
-    let argTys = NewInferenceTypes args
+    let argTys = NewInferenceTypes g args
     let tyargs', tpenv = TcTypes cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv tyargs
     // No subsumption at uses of IL assembly code
     let flexes = argTys |> List.map (fun _ -> false)
@@ -6300,7 +6441,7 @@ and TcExprILAssembly cenv overallTy env tpenv (s, tyargs, args, rtys, m) =
     let rtys', tpenv = TcTypes cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv rtys
     let returnTy =
         match rtys' with
-        | [] -> cenv.g.unit_ty
+        | [] -> g.unit_ty
         | [ returnTy ] -> returnTy
         | _ -> error(InternalError("Only zero or one pushed items are permitted in IL assembly code", m))
     UnifyTypes cenv env m overallTy.Commit returnTy
@@ -6329,12 +6470,13 @@ and RewriteRangeExpr expr =
 
 /// Check lambdas as a group, to catch duplicate names in patterns
 and TcIteratedLambdas cenv isFirst (env: TcEnv) overallTy takenNames tpenv e =
+    let g = cenv.g
     match e with
     | SynExpr.Lambda (isMember, isSubsequent, spats, bodyExpr, _, m, _) when isMember || isFirst || isSubsequent ->
         let domainTy, resultTy = UnifyFunctionType None cenv env.DisplayEnv m overallTy.Commit
         let vs, (tpenv, names, takenNames) = TcSimplePats cenv isMember CheckCxs domainTy env (tpenv, Map.empty, takenNames) spats
         let envinner, _, vspecMap = MakeAndPublishSimpleValsForMergedScope cenv env m names
-        let byrefs = vspecMap |> Map.map (fun _ v -> isByrefTy cenv.g v.Type, v)
+        let byrefs = vspecMap |> Map.map (fun _ v -> isByrefTy g v.Type, v)
         let envinner = if isMember then envinner else ExitFamilyRegion envinner
         let vspecs = vs |> List.map (fun nm -> NameMap.find nm vspecMap)
         
@@ -6344,7 +6486,7 @@ and TcIteratedLambdas cenv isFirst (env: TcEnv) overallTy takenNames tpenv e =
             | infos :: rest -> 
                  if infos.Length = vspecs.Length then 
                     (vspecs, infos) ||> List.iter2 (fun v argInfo -> 
-                        let inlineIfLambda = HasFSharpAttribute cenv.g cenv.g.attrib_InlineIfLambdaAttribute argInfo.Attribs
+                        let inlineIfLambda = HasFSharpAttribute g g.attrib_InlineIfLambdaAttribute argInfo.Attribs
                         if inlineIfLambda then 
                             v.SetInlineIfLambda())
                  { envinner with eLambdaArgInfos = rest }
@@ -6353,7 +6495,7 @@ and TcIteratedLambdas cenv isFirst (env: TcEnv) overallTy takenNames tpenv e =
         let bodyExpr, tpenv = TcIteratedLambdas cenv false envinner (MustConvertTo (false, resultTy)) takenNames tpenv bodyExpr
         // See bug 5758: Non-monotonicity in inference: need to ensure that parameters are never inferred to have byref type, instead it is always declared
         byrefs |> Map.iter (fun _ (orig, v) ->
-            if not orig && isByrefTy cenv.g v.Type then errorR(Error(FSComp.SR.tcParameterInferredByref v.DisplayName, v.Range)))
+            if not orig && isByrefTy g v.Type then errorR(Error(FSComp.SR.tcParameterInferredByref v.DisplayName, v.Range)))
 
         mkMultiLambda m vspecs (bodyExpr, resultTy), tpenv 
 
@@ -6448,7 +6590,9 @@ and ExpandIndexArgs (synLeftExprOpt: SynExpr option) indexArgs =
 // .NET metadata. This means we manually typecheck 'expr and look to see if it has a nominal type. We then
 // do the right thing in each case.
 and TcIndexingThen cenv env overallTy mWholeExpr mDot tpenv setInfo synLeftExprOpt expr e1ty expandedIndexArgs indexArgs delayed =
+    let g = cenv.g
     let ad = env.AccessRights
+
     // Find the first type in the effective hierarchy that either has a DefaultMember attribute OR
     // has a member called 'Item'
     let isIndex = indexArgs |> List.forall (fun indexArg -> match DecodeIndexArg indexArg with IndexArgItem _ -> true | _ -> false)
@@ -6457,16 +6601,16 @@ and TcIndexingThen cenv env overallTy mWholeExpr mDot tpenv setInfo synLeftExprO
             FoldPrimaryHierarchyOfType (fun ty acc ->
                 match acc with
                 | None ->
-                    match tryTcrefOfAppTy cenv.g ty with
+                    match tryTcrefOfAppTy g ty with
                     | ValueSome tcref ->
-                        TryFindTyconRefStringAttribute cenv.g mWholeExpr cenv.g.attrib_DefaultMemberAttribute tcref
+                        TryFindTyconRefStringAttribute g mWholeExpr g.attrib_DefaultMemberAttribute tcref
                     | _ ->
                         let item = Some "Item"
                         match AllPropInfosOfTypeInScope ResultCollectionSettings.AtMostOneResult cenv.infoReader env.NameEnv item ad IgnoreOverrides mWholeExpr ty with
                         | [] -> None
                         | _ -> item
                  | _ -> acc)
-              cenv.g
+              g
               cenv.amap
               mWholeExpr
               AllowMultiIntfInstantiations.Yes
@@ -6474,10 +6618,10 @@ and TcIndexingThen cenv env overallTy mWholeExpr mDot tpenv setInfo synLeftExprO
               None
         else Some "GetSlice"
 
-    let isNominal = isAppTy cenv.g e1ty
+    let isNominal = isAppTy g e1ty
 
-    let isArray = isArrayTy cenv.g e1ty
-    let isString = typeEquiv cenv.g cenv.g.string_ty e1ty
+    let isArray = isArrayTy g e1ty
+    let isString = typeEquiv g g.string_ty e1ty
 
     let idxRange = indexArgs |> List.map (fun e -> e.Range) |> List.reduce unionRanges
 
@@ -6493,7 +6637,7 @@ and TcIndexingThen cenv env overallTy mWholeExpr mDot tpenv setInfo synLeftExprO
 
         let info =
             if isArray then
-                let fixedIndex3d4dEnabled = cenv.g.langVersion.SupportsFeature LanguageFeature.FixedIndexSlice3d4d
+                let fixedIndex3d4dEnabled = g.langVersion.SupportsFeature LanguageFeature.FixedIndexSlice3d4d
                 let indexArgs = List.map DecodeIndexArg indexArgs
                 match indexArgs, setInfo with
                 | [IndexArgItem _; IndexArgItem _], None                                        -> Some (indexOpPath, "GetArray2D", expandedIndexArgs)
@@ -6618,9 +6762,11 @@ and TcIndexingThen cenv env overallTy mWholeExpr mDot tpenv setInfo synLeftExprO
 /// For 'inherit Type(args)', mWholeExprOrObjTy is the whole expression
 /// For an implicit inherit from System.Object or a default constructor, mWholeExprOrObjTy is the type name of the type being defined
 and TcNewExpr cenv env tpenv objTy mObjTyOpt superInit arg mWholeExprOrObjTy =
+    let g = cenv.g
     let ad = env.AccessRights
+
     // Handle the case 'new 'a()'
-    if (isTyparTy cenv.g objTy) then
+    if (isTyparTy g objTy) then
         if superInit then error(Error(FSComp.SR.tcCannotInheritFromVariableType(), mWholeExprOrObjTy))
         AddCxTypeMustSupportDefaultCtor env.DisplayEnv cenv.css mWholeExprOrObjTy NoTrace objTy
 
@@ -6628,26 +6774,28 @@ and TcNewExpr cenv env tpenv objTy mObjTyOpt superInit arg mWholeExprOrObjTy =
         | SynExpr.Const (SynConst.Unit, _) -> ()
         | _ -> errorR(Error(FSComp.SR.tcObjectConstructorsOnTypeParametersCannotTakeArguments(), mWholeExprOrObjTy))
 
-        mkCallCreateInstance cenv.g mWholeExprOrObjTy objTy, tpenv
+        mkCallCreateInstance g mWholeExprOrObjTy objTy, tpenv
     else
-        if not (isAppTy cenv.g objTy) && not (isAnyTupleTy cenv.g objTy) then error(Error(FSComp.SR.tcNamedTypeRequired(if superInit then "inherit" else "new"), mWholeExprOrObjTy))
+        if not (isAppTy g objTy) && not (isAnyTupleTy g objTy) then error(Error(FSComp.SR.tcNamedTypeRequired(if superInit then "inherit" else "new"), mWholeExprOrObjTy))
         let item = ForceRaise (ResolveObjectConstructor cenv.nameResolver env.DisplayEnv mWholeExprOrObjTy ad objTy)
 
         TcCtorCall false cenv env tpenv (MustEqual objTy) objTy mObjTyOpt item superInit [arg] mWholeExprOrObjTy [] None
 
 /// Check an 'inheritedTys declaration in an implicit or explicit class
 and TcCtorCall isNaked cenv env tpenv (overallTy: OverallTy) objTy mObjTyOpt item superInit args mWholeCall delayed afterTcOverloadResolutionOpt =
+    let g = cenv.g
     let ad = env.AccessRights
+
     let isSuperInit = (if superInit then CtorValUsedAsSuperInit else NormalValUse)
     let mItem = match mObjTyOpt with Some m -> m | None -> mWholeCall
 
-    if isInterfaceTy cenv.g objTy then
+    if isInterfaceTy g objTy then
         error(Error((if superInit then FSComp.SR.tcInheritCannotBeUsedOnInterfaceType() else FSComp.SR.tcNewCannotBeUsedOnInterfaceType()), mWholeCall))
 
     match item, args with
     | Item.CtorGroup(methodName, minfos), _ ->
         let meths = List.map (fun minfo -> minfo, None) minfos
-        if isNaked && TypeFeasiblySubsumesType 0 cenv.g cenv.amap mWholeCall cenv.g.system_IDisposable_ty NoCoerce objTy then
+        if isNaked && TypeFeasiblySubsumesType 0 g cenv.amap mWholeCall g.system_IDisposable_ty NoCoerce objTy then
             warning(Error(FSComp.SR.tcIDisposableTypeShouldUseNew(), mWholeCall))
 
         // Check the type is not abstract
@@ -6675,7 +6823,9 @@ and TcCtorCall isNaked cenv env tpenv (overallTy: OverallTy) objTy mObjTyOpt ite
 
 // Check a record construction expression
 and TcRecordConstruction cenv (overallTy: TType) env tpenv optOrigExprInfo objTy fldsList m =
-    let tcref, tinst = destAppTy cenv.g objTy
+    let g = cenv.g
+
+    let tcref, tinst = destAppTy g objTy
     let tycon = tcref.Deref
     UnifyTypes cenv env m overallTy objTy
 
@@ -6693,7 +6843,7 @@ and TcRecordConstruction cenv (overallTy: TType) env tpenv optOrigExprInfo objTy
                   with :? KeyNotFoundException ->
                       error (Error(FSComp.SR.tcUndefinedField(fname, NicePrint.minimalStringOfType env.DisplayEnv objTy), m))
               let fty = actualTyOfRecdFieldForTycon tycon tinst fspec
-              let flex = not (isTyparTy cenv.g fty)
+              let flex = not (isTyparTy g fty)
               yield (fname, fexpr, fty, flex) ]
 
     // Type check and generalize the supplied bindings
@@ -6744,11 +6894,11 @@ and TcRecordConstruction cenv (overallTy: TType) env tpenv optOrigExprInfo objTy
     // for fields in { new R with a=1 and b=2 } constructions and { r with a=1 } copy-and-update expressions
     rfrefs |> List.iter (fun rfref ->
         CheckRecdFieldAccessible cenv.amap m env.eAccessRights rfref |> ignore
-        CheckFSharpAttributes cenv.g rfref.PropertyAttribs m |> CommitOperationResult)
+        CheckFSharpAttributes g rfref.PropertyAttribs m |> CommitOperationResult)
 
     let args = List.map snd fldsList
 
-    let expr = mkRecordExpr cenv.g (GetRecdInfo env, tcref, tinst, rfrefs, args, m)
+    let expr = mkRecordExpr g (GetRecdInfo env, tcref, tinst, rfrefs, args, m)
 
     let expr =
       match optOrigExprInfo with
@@ -6759,7 +6909,7 @@ and TcRecordConstruction cenv (overallTy: TType) env tpenv optOrigExprInfo objTy
       | Some (old, oldvaddr, _) ->
           // '{ recd with fields }'.
           // Assign the first object to a tmp and then construct
-          let wrap, oldaddr, _readonly, _writeonly = mkExprAddrOfExpr cenv.g tycon.IsStructOrEnumTycon false NeverMutates old None m
+          let wrap, oldaddr, _readonly, _writeonly = mkExprAddrOfExpr g tycon.IsStructOrEnumTycon false NeverMutates old None m
           wrap (mkCompGenLet m oldvaddr oldaddr expr)
 
     expr, tpenv
@@ -6798,14 +6948,18 @@ and GetNameAndArityOfObjExprBinding _cenv _env b =
         lookPat pat
 
 
-and FreshenObjExprAbstractSlot cenv (env: TcEnv) (implty: TType) virtNameAndArityPairs (bind, bindAttribs, bindName, absSlots:(_ * MethInfo) list) =
+and FreshenObjExprAbstractSlot cenv (env: TcEnv) (implTy: TType) virtNameAndArityPairs (bind, bindAttribs, bindName, absSlots:(_ * MethInfo) list) =
+
+    let g = cenv.g
+
     let (NormalizedBinding (_, _, _, _, _, _, synTyparDecls, _, _, _, mBinding, _)) = bind
+
     match absSlots with
-    | [] when not (CompileAsEvent cenv.g bindAttribs) ->
+    | [] when not (CompileAsEvent g bindAttribs) ->
         let absSlotsByName = List.filter (fst >> fst >> (=) bindName) virtNameAndArityPairs
         let getSignature absSlot = (NicePrint.stringOfMethInfo cenv.infoReader mBinding env.DisplayEnv absSlot).Replace("abstract ", "")
         let getDetails (absSlot: MethInfo) =
-            if absSlot.GetParamTypes(cenv.amap, mBinding, []) |> List.existsSquared (isAnyTupleTy cenv.g) then
+            if absSlot.GetParamTypes(cenv.amap, mBinding, []) |> List.existsSquared (isAnyTupleTy g) then
                 FSComp.SR.tupleRequiredInAbstractMethod()
             else ""
 
@@ -6818,7 +6972,7 @@ and FreshenObjExprAbstractSlot cenv (env: TcEnv) (implty: TType) virtNameAndArit
 
         match absSlotsByName with
         | [] ->
-            let tcref = tcrefOfAppTy cenv.g implty
+            let tcref = tcrefOfAppTy g implTy
             let containsNonAbstractMemberWithSameName =
                 tcref.MembersOfFSharpTyconByName
                 |> Seq.exists (fun kv -> kv.Value |> List.exists (fun valRef -> valRef.DisplayName = bindName))
@@ -6840,22 +6994,24 @@ and FreshenObjExprAbstractSlot cenv (env: TcEnv) (implty: TType) virtNameAndArit
 
     | [(_, absSlot)] ->
 
-        let typarsFromAbsSlotAreRigid, typarsFromAbsSlot, argTysFromAbsSlot, retTyFromAbsSlot
-           = FreshenAbstractSlot cenv.g cenv.amap mBinding synTyparDecls absSlot
+        let typarsFromAbsSlotAreRigid, typarsFromAbsSlot, argTysFromAbsSlot, retTyFromAbsSlot =
+            FreshenAbstractSlot g cenv.amap mBinding synTyparDecls absSlot
 
         // Work out the required type of the member
-        let bindingTy = implty --> (mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot)
+        let bindingTy = mkFunTy cenv.g implTy (mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot) 
 
         Some(typarsFromAbsSlotAreRigid, typarsFromAbsSlot, bindingTy)
 
     | _ ->
         None
 
+and TcObjectExprBinding cenv (env: TcEnv) implTy tpenv (absSlotInfo, bind) =
+
+    let g = cenv.g
 
-and TcObjectExprBinding cenv (env: TcEnv) implty tpenv (absSlotInfo, bind) =
-    // 4a1. normalize the binding (note: needlessly repeating what we've done above)
     let (NormalizedBinding(vis, bkind, isInline, isMutable, attrs, doc, synTyparDecls, valSynData, p, bindingRhs, mBinding, spBind)) = bind
     let (SynValData(memberFlagsOpt, _, _)) = valSynData
+
     // 4a2. adjust the binding, especially in the "member" case, a subset of the logic of AnalyzeAndMakeAndPublishRecursiveValue
     let bindingRhs, logicalMethId, memberFlags =
         let rec lookPat p =
@@ -6883,7 +7039,7 @@ and TcObjectExprBinding cenv (env: TcEnv) implty tpenv (absSlotInfo, bind) =
         | Some(_, _, memberTyFromAbsSlot) ->
             memberTyFromAbsSlot
         | _ ->
-            implty --> NewInferenceType ()
+            mkFunTy cenv.g implTy (NewInferenceType cenv.g)
 
     let CheckedBindingInfo(inlineFlag, bindingAttribs, _, _, ExplicitTyparInfo(_, declaredTypars, _), nameToPrelimValSchemeMap, rhsExpr, _, _, m, _, _, _, _), tpenv =
         let explicitTyparInfo, tpenv = TcNonrecBindingTyparDecls cenv env tpenv bind
@@ -6907,7 +7063,7 @@ and TcObjectExprBinding cenv (env: TcEnv) implty tpenv (absSlotInfo, bind) =
         let freeInEnv = GeneralizationHelpers.ComputeUngeneralizableTypars env
 
         let generalizedTypars = GeneralizationHelpers.ComputeAndGeneralizeGenericTypars(cenv, denv, m, freeInEnv, false, CanGeneralizeConstrainedTypars, inlineFlag, Some rhsExpr, declaredTypars, [], bindingTy, false)
-        let declaredTypars = ChooseCanonicalDeclaredTyparsAfterInference cenv.g env.DisplayEnv declaredTypars m
+        let declaredTypars = ChooseCanonicalDeclaredTyparsAfterInference g env.DisplayEnv declaredTypars m
 
         let generalizedTypars = PlaceTyparsInDeclarationOrder declaredTypars generalizedTypars
 
@@ -6917,6 +7073,8 @@ and TcObjectExprBinding cenv (env: TcEnv) implty tpenv (absSlotInfo, bind) =
 
 and ComputeObjectExprOverrides cenv (env: TcEnv) tpenv impls =
 
+    let g = cenv.g
+
     // Compute the method sets each implemented type needs to implement
     let slotImplSets = DispatchSlotChecking.GetSlotImplSets cenv.infoReader env.DisplayEnv env.AccessRights true (impls |> List.map (fun (m, ty, _) -> ty, m))
 
@@ -6926,7 +7084,7 @@ and ComputeObjectExprOverrides cenv (env: TcEnv) tpenv impls =
             m, ty, binds, implTySet)
 
     let overridesAndVirts, tpenv =
-        (tpenv, allImpls) ||> List.mapFold (fun tpenv (m, implty, binds, SlotImplSet(reqdSlots, dispatchSlotsKeyed, availPriorOverrides, _) ) ->
+        (tpenv, allImpls) ||> List.mapFold (fun tpenv (m, implTy, binds, SlotImplSet(reqdSlots, dispatchSlotsKeyed, availPriorOverrides, _) ) ->
 
             // Generate extra bindings fo object expressions with bindings using the CLIEvent attribute
             let binds, bindsAttributes =
@@ -6942,10 +7100,12 @@ and ComputeObjectExprOverrides cenv (env: TcEnv) tpenv impls =
 
             // 2. collect all name/arity of all overrides
             let dispatchSlots = reqdSlots |> List.map (fun reqdSlot -> reqdSlot.MethodInfo)
+
             let virtNameAndArityPairs = dispatchSlots |> List.map (fun virt ->
                 let vkey = (virt.LogicalName, virt.NumArgs)
                 //dprintfn "vkey = %A" vkey
                 (vkey, virt))
+
             let bindNameAndSynInfoPairs = binds |> List.map (GetNameAndArityOfObjExprBinding cenv env)
             let bindNames = bindNameAndSynInfoPairs |> List.map fst
             let bindKeys =
@@ -6961,41 +7121,45 @@ and ComputeObjectExprOverrides cenv (env: TcEnv) tpenv impls =
 
             let absSlotInfo =
                (List.zip4 binds bindsAttributes bindNames preAssignedVirtsPerBinding)
-               |> List.map (FreshenObjExprAbstractSlot cenv env implty virtNameAndArityPairs)
+               |> List.map (FreshenObjExprAbstractSlot cenv env implTy virtNameAndArityPairs)
 
             // 4. typecheck/typeinfer/generalizer overrides using this information
-            let overrides, tpenv = (tpenv, List.zip absSlotInfo binds) ||> List.mapFold (TcObjectExprBinding cenv env implty)
+            let overrides, tpenv = (tpenv, List.zip absSlotInfo binds) ||> List.mapFold (TcObjectExprBinding cenv env implTy)
 
             // Convert the syntactic info to actual info
             let overrides =
                 (overrides, bindNameAndSynInfoPairs) ||> List.map2 (fun (id: Ident, memberFlags, ty, bindingAttribs, bindingBody) (_, valSynData) ->
                     let partialValInfo = TranslateTopValSynInfo id.idRange (TcAttributes cenv env) valSynData
-                    let tps, _ = tryDestForallTy cenv.g ty
+                    let tps, _ = tryDestForallTy g ty
                     let valInfo = TranslatePartialArity tps partialValInfo
-                    DispatchSlotChecking.GetObjectExprOverrideInfo cenv.g cenv.amap (implty, id, memberFlags, ty, valInfo, bindingAttribs, bindingBody))
+                    DispatchSlotChecking.GetObjectExprOverrideInfo g cenv.amap (implTy, id, memberFlags, ty, valInfo, bindingAttribs, bindingBody))
 
-            (m, implty, reqdSlots, dispatchSlotsKeyed, availPriorOverrides, overrides), tpenv)
+            (m, implTy, reqdSlots, dispatchSlotsKeyed, availPriorOverrides, overrides), tpenv)
 
     overridesAndVirts, tpenv
 
 and CheckSuperType cenv ty m =
-    if typeEquiv cenv.g ty cenv.g.system_Value_ty ||
-       typeEquiv cenv.g ty cenv.g.system_Enum_ty ||
-       typeEquiv cenv.g ty cenv.g.system_Array_ty ||
-       typeEquiv cenv.g ty cenv.g.system_MulticastDelegate_ty ||
-       typeEquiv cenv.g ty cenv.g.system_Delegate_ty then
+    let g = cenv.g
+
+    if typeEquiv g ty g.system_Value_ty ||
+       typeEquiv g ty g.system_Enum_ty ||
+       typeEquiv g ty g.system_Array_ty ||
+       typeEquiv g ty g.system_MulticastDelegate_ty ||
+       typeEquiv g ty g.system_Delegate_ty then
          error(Error(FSComp.SR.tcPredefinedTypeCannotBeUsedAsSuperType(), m))
-    if isErasedType cenv.g ty then
-        errorR(Error(FSComp.SR.tcCannotInheritFromErasedType(), m))
 
+    if isErasedType g ty then
+        errorR(Error(FSComp.SR.tcCannotInheritFromErasedType(), m))
 
 and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mObjTy, mNewExpr, mWholeExpr) =
 
-    match tryTcrefOfAppTy cenv.g objTy with
+    let g = cenv.g
+
+    match tryTcrefOfAppTy g objTy with
     | ValueNone -> error(Error(FSComp.SR.tcNewMustBeUsedWithNamedType(), mNewExpr))
     | ValueSome tcref ->
     let isRecordTy = tcref.IsRecordTycon
-    if not isRecordTy && not (isInterfaceTy cenv.g objTy) && isSealedTy cenv.g objTy then errorR(Error(FSComp.SR.tcCannotCreateExtensionOfSealedType(), mNewExpr))
+    if not isRecordTy && not (isInterfaceTy g objTy) && isSealedTy g objTy then errorR(Error(FSComp.SR.tcCannotCreateExtensionOfSealedType(), mNewExpr))
 
     CheckSuperType cenv objTy mObjTy
 
@@ -7009,11 +7173,11 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
     if // record construction ?
        isRecordTy ||
        // object construction?
-       (isFSharpObjModelTy cenv.g objTy && not (isInterfaceTy cenv.g objTy) && argopt.IsNone) then
+       (isFSharpObjModelTy g objTy && not (isInterfaceTy g objTy) && argopt.IsNone) then
 
         if argopt.IsSome then error(Error(FSComp.SR.tcNoArgumentsForRecordValue(), mWholeExpr))
         if not (isNil extraImpls) then error(Error(FSComp.SR.tcNoInterfaceImplementationForConstructionExpression(), mNewExpr))
-        if isFSharpObjModelTy cenv.g objTy && GetCtorShapeCounter env <> 1 then
+        if isFSharpObjModelTy g objTy && GetCtorShapeCounter env <> 1 then
             error(Error(FSComp.SR.tcObjectConstructionCanOnlyBeUsedInClassTypes(), mNewExpr))
         let fldsList =
             binds |> List.map (fun b ->
@@ -7025,7 +7189,7 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
     else
         let item = ForceRaise (ResolveObjectConstructor cenv.nameResolver env.DisplayEnv mObjTy ad objTy)
 
-        if isFSharpObjModelTy cenv.g objTy && GetCtorShapeCounter env = 1 then
+        if isFSharpObjModelTy g objTy && GetCtorShapeCounter env = 1 then
             error(Error(FSComp.SR.tcObjectsMustBeInitializedWithObjectExpression(), mNewExpr))
 
         let ctorCall, baseIdOpt, tpenv =
@@ -7041,7 +7205,7 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
                 expr, baseIdOpt, tpenv
             | Item.FakeInterfaceCtor intfTy, None ->
                 UnifyTypes cenv env mWholeExpr objTy intfTy
-                let expr = BuildObjCtorCall cenv.g mWholeExpr
+                let expr = BuildObjCtorCall g mWholeExpr
                 expr, None, tpenv
             | Item.FakeInterfaceCtor _, Some _ ->
                 error(Error(FSComp.SR.tcConstructorForInterfacesDoNotTakeArguments(), mNewExpr))
@@ -7050,7 +7214,7 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
             | _ -> error(Error(FSComp.SR.tcNewRequiresObjectConstructor(), mNewExpr))
 
         let baseValOpt = MakeAndPublishBaseVal cenv env baseIdOpt objTy
-        let env = Option.foldBack (AddLocalVal cenv.g cenv.tcSink mNewExpr) baseValOpt env
+        let env = Option.foldBack (AddLocalVal g cenv.tcSink mNewExpr) baseValOpt env
         let impls = (mWholeExpr, objTy, binds) :: extraImpls
 
         // 1. collect all the relevant abstract slots for each type we have to implement
@@ -7058,16 +7222,16 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
         let overridesAndVirts, tpenv = ComputeObjectExprOverrides cenv env tpenv impls
 
         // 2. check usage conditions
-        overridesAndVirts |> List.iter (fun (m, implty, dispatchSlots, dispatchSlotsKeyed, availPriorOverrides, overrides) ->
+        overridesAndVirts |> List.iter (fun (m, implTy, dispatchSlots, dispatchSlotsKeyed, availPriorOverrides, overrides) ->
             let overrideSpecs = overrides |> List.map fst
 
-            DispatchSlotChecking.CheckOverridesAreAllUsedOnce (env.DisplayEnv, cenv.g, cenv.infoReader, true, implty, dispatchSlotsKeyed, availPriorOverrides, overrideSpecs)
+            DispatchSlotChecking.CheckOverridesAreAllUsedOnce (env.DisplayEnv, g, cenv.infoReader, true, implTy, dispatchSlotsKeyed, availPriorOverrides, overrideSpecs)
 
-            DispatchSlotChecking.CheckDispatchSlotsAreImplemented (env.DisplayEnv, cenv.infoReader, m, env.NameEnv, cenv.tcSink, false, implty, dispatchSlots, availPriorOverrides, overrideSpecs) |> ignore)
+            DispatchSlotChecking.CheckDispatchSlotsAreImplemented (env.DisplayEnv, cenv.infoReader, m, env.NameEnv, cenv.tcSink, false, implTy, dispatchSlots, availPriorOverrides, overrideSpecs) |> ignore)
 
         // 3. create the specs of overrides
         let allTypeImpls =
-          overridesAndVirts |> List.map (fun (m, implty, _, dispatchSlotsKeyed, _, overrides) ->
+          overridesAndVirts |> List.map (fun (m, implTy, _, dispatchSlotsKeyed, _, overrides) ->
               let overrides' =
                   [ for overrideMeth in overrides do
                         let Override(_, _, id, (mtps, _), _, _, isFakeEventProperty, _) as ovinfo, (_, thisVal, methodVars, bindingAttribs, bindingBody) = overrideMeth
@@ -7077,7 +7241,7 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
                                 |> NameMultiMap.find id.idText
                                 |> List.tryPick (fun reqdSlot ->
                                      let virt = reqdSlot.MethodInfo
-                                     if DispatchSlotChecking.IsExactMatch cenv.g cenv.amap m virt ovinfo then
+                                     if DispatchSlotChecking.IsExactMatch g cenv.amap m virt ovinfo then
                                          Some virt
                                      else
                                          None)
@@ -7088,15 +7252,15 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
                                 | None -> error(Error(FSComp.SR.tcAtLeastOneOverrideIsInvalid(), mObjTy))
 
                             yield TObjExprMethod(overridden.GetSlotSig(cenv.amap, m), bindingAttribs, mtps, [thisVal] :: methodVars, bindingBody, id.idRange) ]
-              (implty, overrides'))
+              (implTy, overrides'))
 
-        let objTy', overrides' = allTypeImpls.Head
-        assert (typeEquiv cenv.g objTy objTy')
+        let objtyR, overrides' = allTypeImpls.Head
+        assert (typeEquiv g objTy objtyR)
         let extraImpls = allTypeImpls.Tail
 
         // 7. Build the implementation
-        let expr = mkObjExpr(objTy', baseValOpt, ctorCall, overrides', extraImpls, mWholeExpr)
-        let expr = mkCoerceIfNeeded cenv.g realObjTy objTy' expr
+        let expr = mkObjExpr(objtyR, baseValOpt, ctorCall, overrides', extraImpls, mWholeExpr)
+        let expr = mkCoerceIfNeeded g realObjTy objtyR expr
         expr, tpenv
 
 //-------------------------------------------------------------------------
@@ -7106,18 +7270,20 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
 /// Check a constant string expression. It might be a 'printf' format string
 and TcConstStringExpr cenv (overallTy: OverallTy) env m tpenv s =
 
-    if (AddCxTypeEqualsTypeUndoIfFailed env.DisplayEnv cenv.css m overallTy.Commit cenv.g.string_ty) then
-        mkString cenv.g m s, tpenv
+    let g = cenv.g
+
+    if AddCxTypeEqualsTypeUndoIfFailed env.DisplayEnv cenv.css m overallTy.Commit g.string_ty then
+        mkString g m s, tpenv
     else
         TcFormatStringExpr cenv overallTy env m tpenv s
 
 and TcFormatStringExpr cenv (overallTy: OverallTy) env m tpenv (fmtString: string) =
     let g = cenv.g
-    let aty = NewInferenceType ()
-    let bty = NewInferenceType ()
-    let cty = NewInferenceType ()
-    let dty = NewInferenceType ()
-    let ety = NewInferenceType ()
+    let aty = NewInferenceType g
+    let bty = NewInferenceType g
+    let cty = NewInferenceType g
+    let dty = NewInferenceType g
+    let ety = NewInferenceType g
     let formatTy = mkPrintfFormatTy g aty bty cty dty ety
 
     // This might qualify as a format string - check via a type directed rule
@@ -7168,18 +7334,18 @@ and TcInterpolatedStringExpr cenv (overallTy: OverallTy) env m tpenv (parts: Syn
             | SynInterpolatedStringPart.String (_,m) -> Some m
             | SynInterpolatedStringPart.FillExpr _  -> None)
 
-    let printerTy = NewInferenceType ()
-    let printerArgTy = NewInferenceType ()
-    let printerResidueTy = NewInferenceType ()
-    let printerResultTy = NewInferenceType ()
-    let printerTupleTy = NewInferenceType ()
+    let printerTy = NewInferenceType g
+    let printerArgTy = NewInferenceType g
+    let printerResidueTy = NewInferenceType g
+    let printerResultTy = NewInferenceType g
+    let printerTupleTy = NewInferenceType g
     let formatTy = mkPrintfFormatTy g printerTy printerArgTy printerResidueTy printerResultTy printerTupleTy
 
     // Check the library support is available in the referenced FSharp.Core
     let newFormatMethod =
         match GetIntrinsicConstructorInfosOfType cenv.infoReader m formatTy |> List.filter (fun minfo -> minfo.NumArgs = [3]) with
         | [ctorInfo] -> ctorInfo
-        | _ -> languageFeatureNotSupportedInLibraryError cenv.g.langVersion LanguageFeature.StringInterpolation m
+        | _ -> languageFeatureNotSupportedInLibraryError g.langVersion LanguageFeature.StringInterpolation m
 
     let stringKind =
         // If this is an interpolated string then try to force the result to be a string
@@ -7214,7 +7380,7 @@ and TcInterpolatedStringExpr cenv (overallTy: OverallTy) env m tpenv (parts: Syn
 
             match createMethodOpt with
             | Some createMethod -> Choice2Of2 createMethod
-            | None -> languageFeatureNotSupportedInLibraryError cenv.g.langVersion LanguageFeature.StringInterpolation m
+            | None -> languageFeatureNotSupportedInLibraryError g.langVersion LanguageFeature.StringInterpolation m
 
         // ... or if that fails then may be a PrintfFormat by a type-directed rule....
         elif not (isObjTy g overallTy.Commit) && AddCxTypeMustSubsumeTypeUndoIfFailed env.DisplayEnv cenv.css m overallTy.Commit formatTy then
@@ -7291,7 +7457,7 @@ and TcInterpolatedStringExpr cenv (overallTy: OverallTy) env m tpenv (parts: Syn
             if isString then
                 str, tpenv
             else
-                mkCallNewFormat cenv.g m printerTy printerArgTy printerResidueTy printerResultTy printerTupleTy str, tpenv
+                mkCallNewFormat g m printerTy printerArgTy printerResidueTy printerResultTy printerTupleTy str, tpenv
         else
             // Type check the expressions filling the holes
             let flexes = argTys |> List.map (fun _ -> false)
@@ -7345,15 +7511,17 @@ and TcInterpolatedStringExpr cenv (overallTy: OverallTy) env m tpenv (parts: Syn
 
 /// Check a constant expression.
 and TcConstExpr cenv (overallTy: OverallTy) env m tpenv c =
-    match c with
 
+    let g = cenv.g
+
+    match c with
     | SynConst.Bytes (bytes, _, m) ->
-      let actualTy = mkByteArrayTy cenv.g
+      let actualTy = mkByteArrayTy g
       TcPropagatingExprLeafThenConvert cenv overallTy actualTy env (* true *) m <| fun ()->
        Expr.Op (TOp.Bytes bytes, [], [], m), tpenv
 
     | SynConst.UInt16s arr ->
-      let actualTy = mkArrayType cenv.g cenv.g.uint16_ty
+      let actualTy = mkArrayType g g.uint16_ty
       TcPropagatingExprLeafThenConvert cenv overallTy actualTy env (* true *) m <| fun () ->
        Expr.Op (TOp.UInt16s arr, [], [], m), tpenv
 
@@ -7382,7 +7550,7 @@ and TcConstExpr cenv (overallTy: OverallTy) env m tpenv c =
                     expr
                 else
                     match ccuOfTyconRef mref with
-                    | Some ccu when ccuEq ccu cenv.g.fslibCcu ->
+                    | Some ccu when ccuEq ccu g.fslibCcu ->
                         SynExpr.Typed (expr, SynType.LongIdent(LongIdentWithDots(pathToSynLid m ["System";"Numerics";"BigInteger"], [])), m)
                     | _ ->
                         expr
@@ -7391,7 +7559,7 @@ and TcConstExpr cenv (overallTy: OverallTy) env m tpenv c =
 
     | _ ->
       TcNonPropagatingExprLeafThenConvert cenv overallTy env m (fun () ->
-        let cTy = NewInferenceType()
+        let cTy = NewInferenceType g
         let c' = TcConst cenv cTy m env c
         Expr.Const (c', m, cTy), cTy, tpenv)
 
@@ -7410,6 +7578,8 @@ and TcAssertExpr cenv overallTy env (m: range) tpenv x =
 
 and TcRecdExpr cenv (overallTy: TType) env tpenv (inherits, optOrigExpr, flds, mWholeExpr) =
 
+    let g = cenv.g
+
     let requiresCtor = (GetCtorShapeCounter env = 1) // Get special expression forms for constructors
     let haveCtor = Option.isSome inherits
 
@@ -7454,14 +7624,14 @@ and TcRecdExpr cenv (overallTy: TType) env tpenv (inherits, optOrigExpr, flds, m
         match optOrigExpr with
         | None -> None
         | Some(olde) ->
-            let oldvaddr, oldvaddre = mkCompGenLocal mWholeExpr "inputRecord" (if isStructTy cenv.g overallTy then mkByrefTy cenv.g overallTy else overallTy)
+            let oldvaddr, oldvaddre = mkCompGenLocal mWholeExpr "inputRecord" (if isStructTy g overallTy then mkByrefTy g overallTy else overallTy)
             Some(olde, oldvaddr, oldvaddre)
 
-    if hasOrigExpr && not (isRecdTy cenv.g overallTy) then
+    if hasOrigExpr && not (isRecdTy g overallTy) then
         errorR(Error(FSComp.SR.tcExpressionFormRequiresRecordTypes(), mWholeExpr))
 
     if requiresCtor || haveCtor then
-        if not (isFSharpObjModelTy cenv.g overallTy) then
+        if not (isFSharpObjModelTy g overallTy) then
             // Deliberate no-recovery failure here to prevent cascading internal errors
             error(Error(FSComp.SR.tcInheritedTypeIsNotObjectModelType(), mWholeExpr))
         if not requiresCtor then
@@ -7471,11 +7641,11 @@ and TcRecdExpr cenv (overallTy: TType) env tpenv (inherits, optOrigExpr, flds, m
             let errorInfo = if hasOrigExpr then FSComp.SR.tcEmptyCopyAndUpdateRecordInvalid() else FSComp.SR.tcEmptyRecordInvalid()
             error(Error(errorInfo, mWholeExpr))
 
-        if isFSharpObjModelTy cenv.g overallTy then errorR(Error(FSComp.SR.tcTypeIsNotARecordTypeNeedConstructor(), mWholeExpr))
-        elif not (isRecdTy cenv.g overallTy) then errorR(Error(FSComp.SR.tcTypeIsNotARecordType(), mWholeExpr))
+        if isFSharpObjModelTy g overallTy then errorR(Error(FSComp.SR.tcTypeIsNotARecordTypeNeedConstructor(), mWholeExpr))
+        elif not (isRecdTy g overallTy) then errorR(Error(FSComp.SR.tcTypeIsNotARecordType(), mWholeExpr))
 
     let superInitExprOpt , tpenv =
-        match inherits, GetSuperTypeOfType cenv.g cenv.amap mWholeExpr overallTy with
+        match inherits, GetSuperTypeOfType g cenv.amap mWholeExpr overallTy with
         | Some (superTy, arg, m, _, _), Some realSuperTy ->
             // Constructor expression, with an explicit 'inheritedTys clause. Check the inherits clause.
             let e, tpenv = TcExpr cenv (MustEqual realSuperTy) env tpenv (SynExpr.New (true, superTy, arg, m))
@@ -7494,7 +7664,7 @@ and TcRecdExpr cenv (overallTy: TType) env tpenv (inherits, optOrigExpr, flds, m
 
     let expr =
         match superInitExprOpt  with
-        | _ when isStructTy cenv.g overallTy -> expr
+        | _ when isStructTy g overallTy -> expr
         | Some superInitExpr  -> mkCompGenSequential mWholeExpr superInitExpr  expr
         | None -> expr
     expr, tpenv
@@ -7502,6 +7672,9 @@ and TcRecdExpr cenv (overallTy: TType) env tpenv (inherits, optOrigExpr, flds, m
 
 // Check '{| .... |}'
 and TcAnonRecdExpr cenv (overallTy: TType) env tpenv (isStruct, optOrigSynExpr, unsortedFieldIdsAndSynExprsGiven, mWholeExpr) =
+
+    let g = cenv.g
+
     let unsortedFieldSynExprsGiven = List.map (fun (_, _, e) -> e) unsortedFieldIdsAndSynExprsGiven
 
     match optOrigSynExpr with
@@ -7533,7 +7706,7 @@ and TcAnonRecdExpr cenv (overallTy: TType) env tpenv (isStruct, optOrigSynExpr,
 
         let unsortedCheckedArgs, tpenv = TcExprsWithFlexes cenv env mWholeExpr tpenv flexes unsortedFieldTys unsortedFieldSynExprsGiven
 
-        mkAnonRecd cenv.g mWholeExpr anonInfo unsortedFieldIds unsortedCheckedArgs unsortedFieldTys, tpenv
+        mkAnonRecd g mWholeExpr anonInfo unsortedFieldIds unsortedCheckedArgs unsortedFieldTys, tpenv
 
     | Some (origExpr, _) ->
         // The fairly complex case '{| origExpr with X = 1; Y = 2 |}'
@@ -7545,22 +7718,22 @@ and TcAnonRecdExpr cenv (overallTy: TType) env tpenv (isStruct, optOrigSynExpr,
         // Unlike in the case of record type copy-and-update we do _not_ assume that the origExpr has the same type as the overall expression.
         // Unlike in the case of record type copy-and-update {| a with X = 1 |} does not force a.X to exist or have had type 'int'
 
-        let origExprTy = NewInferenceType()
+        let origExprTy = NewInferenceType g
         let origExprChecked, tpenv = TcExpr cenv (MustEqual origExprTy) env tpenv origExpr
         let oldv, oldve = mkCompGenLocal mWholeExpr "inputRecord" origExprTy
         let mOrigExpr = origExpr.Range
 
-        if not (isAppTy cenv.g origExprTy || isAnonRecdTy cenv.g origExprTy) then
+        if not (isAppTy g origExprTy || isAnonRecdTy g origExprTy) then
             error (Error (FSComp.SR.tcCopyAndUpdateNeedsRecordType(), mOrigExpr))
 
         let origExprIsStruct =
-            match tryDestAnonRecdTy cenv.g origExprTy with
+            match tryDestAnonRecdTy g origExprTy with
             | ValueSome (anonInfo, _) -> evalTupInfoIsStruct anonInfo.TupInfo
             | ValueNone ->
-                let tcref, _ = destAppTy cenv.g origExprTy
+                let tcref, _ = destAppTy g origExprTy
                 tcref.IsStructOrEnumTycon
 
-        let wrap, oldveaddr, _readonly, _writeonly = mkExprAddrOfExpr cenv.g origExprIsStruct false NeverMutates oldve None mOrigExpr
+        let wrap, oldveaddr, _readonly, _writeonly = mkExprAddrOfExpr g origExprIsStruct false NeverMutates oldve None mOrigExpr
 
         // Put all the expressions in unsorted order. The new bindings come first. The origin of each is tracked using
         ///   - Choice1Of2 for a new binding
@@ -7568,12 +7741,12 @@ and TcAnonRecdExpr cenv (overallTy: TType) env tpenv (isStruct, optOrigSynExpr,
         let unsortedIdAndExprsAll =
             [| for id, _, e in unsortedFieldIdsAndSynExprsGiven do
                     yield (id, Choice1Of2 e)
-               match tryDestAnonRecdTy cenv.g origExprTy with
+               match tryDestAnonRecdTy g origExprTy with
                | ValueSome (anonInfo, tinst) ->
                    for i, id in Array.indexed anonInfo.SortedIds do
                        yield id, Choice2Of2 (mkAnonRecdFieldGetViaExprAddr (anonInfo, oldveaddr, tinst, i, mOrigExpr))
                | ValueNone ->
-                    match tryAppTy cenv.g origExprTy with
+                    match tryAppTy g origExprTy with
                     | ValueSome(tcref, tinst) when tcref.IsRecordTycon ->
                         let fspecs = tcref.Deref.TrueInstanceFieldsAsList
                         for fspec in fspecs do
@@ -7629,11 +7802,11 @@ and TcAnonRecdExpr cenv (overallTy: TType) env tpenv (isStruct, optOrigSynExpr,
             |> Array.mapi (fun unsortedIdx (_, expr) ->
                 match expr with
                 | Choice1Of2 _ -> unsortedFieldExprsGiven.[unsortedIdx]
-                | Choice2Of2 subExpr -> UnifyTypes cenv env mOrigExpr (tyOfExpr cenv.g subExpr) unsortedFieldTysAll.[unsortedIdx]; subExpr)
+                | Choice2Of2 subExpr -> UnifyTypes cenv env mOrigExpr (tyOfExpr g subExpr) unsortedFieldTysAll.[unsortedIdx]; subExpr)
             |> List.ofArray
 
         // Permute the expressions to sorted order in the TAST
-        let expr = mkAnonRecd cenv.g mWholeExpr anonInfo unsortedFieldIds unsortedFieldExprs unsortedFieldTysAll
+        let expr = mkAnonRecd g mWholeExpr anonInfo unsortedFieldIds unsortedFieldExprs unsortedFieldTysAll
         let expr = wrap expr
 
         // Bind the original expression
@@ -7642,6 +7815,8 @@ and TcAnonRecdExpr cenv (overallTy: TType) env tpenv (isStruct, optOrigSynExpr,
 
 and TcForEachExpr cenv overallTy env tpenv (synPat, synEnumExpr, synBodyExpr, mWholeExpr, spFor, spIn) =
 
+    let g = cenv.g
+
     let tryGetOptimizeSpanMethodsAux g m ty isReadOnlySpan =
         match (if isReadOnlySpan then tryDestReadOnlySpanTy g m ty else tryDestSpanTy g m ty) with
         | ValueSome(struct(_, destTy)) ->
@@ -7661,7 +7836,7 @@ and TcForEachExpr cenv overallTy env tpenv (synPat, synEnumExpr, synBodyExpr, mW
         else
             tryGetOptimizeSpanMethodsAux g m ty true
 
-    UnifyTypes cenv env mWholeExpr overallTy.Commit cenv.g.unit_ty
+    UnifyTypes cenv env mWholeExpr overallTy.Commit g.unit_ty
 
     let mPat = synPat.Range
     let mBodyExpr = synBodyExpr.Range
@@ -7683,48 +7858,48 @@ and TcForEachExpr cenv overallTy env tpenv (synPat, synEnumExpr, synBodyExpr, mW
 
         // optimize 'for i in n .. m do'
         | Expr.App (Expr.Val (vf, _, _), _, [tyarg], [startExpr;finishExpr], _)
-             when valRefEq cenv.g vf cenv.g.range_op_vref && typeEquiv cenv.g tyarg cenv.g.int_ty ->
-               (cenv.g.int32_ty, (fun _ x -> x), id, Choice1Of3 (startExpr, finishExpr))
+             when valRefEq g vf g.range_op_vref && typeEquiv g tyarg g.int_ty ->
+               (g.int32_ty, (fun _ x -> x), id, Choice1Of3 (startExpr, finishExpr))
 
         // optimize 'for i in arr do'
-        | _ when isArray1DTy cenv.g enumExprTy ->
+        | _ when isArray1DTy g enumExprTy ->
             let arrVar, arrExpr = mkCompGenLocal mEnumExpr "arr" enumExprTy
-            let idxVar, idxExpr = mkCompGenLocal mPat "idx" cenv.g.int32_ty
-            let elemTy = destArrayTy cenv.g enumExprTy
+            let idxVar, idxExpr = mkCompGenLocal mPat "idx" g.int32_ty
+            let elemTy = destArrayTy g enumExprTy
 
             // Evaluate the array index lookup
-            let bodyExprFixup elemVar bodyExpr = mkInvisibleLet mIn elemVar (mkLdelem cenv.g mIn elemTy arrExpr idxExpr) bodyExpr
+            let bodyExprFixup elemVar bodyExpr = mkInvisibleLet mIn elemVar (mkLdelem g mIn elemTy arrExpr idxExpr) bodyExpr
 
             // Evaluate the array expression once and put it in arrVar
             let overallExprFixup overallExpr = mkLet spForBind mFor arrVar enumExpr overallExpr
 
             // Ask for a loop over integers for the given range
-            (elemTy, bodyExprFixup, overallExprFixup, Choice2Of3 (idxVar, mkZero cenv.g mFor, mkDecr cenv.g mFor (mkLdlen cenv.g mFor arrExpr)))
+            (elemTy, bodyExprFixup, overallExprFixup, Choice2Of3 (idxVar, mkZero g mFor, mkDecr g mFor (mkLdlen g mFor arrExpr)))
 
         | _ ->
             // try optimize 'for i in span do' for span or readonlyspan
-            match tryGetOptimizeSpanMethods cenv.g mWholeExpr enumExprTy with
+            match tryGetOptimizeSpanMethods g mWholeExpr enumExprTy with
             | ValueSome(struct(getItemMethInfo, getLengthMethInfo, isReadOnlySpan)) ->
-                let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
+                let tcVal = LightweightTcValForUsingInBuildMethodCall g
                 let spanVar, spanExpr = mkCompGenLocal mEnumExpr "span" enumExprTy
-                let idxVar, idxExpr = mkCompGenLocal mPat "idx" cenv.g.int32_ty
-                let struct(_, elemTy) = if isReadOnlySpan then destReadOnlySpanTy cenv.g mWholeExpr enumExprTy else destSpanTy cenv.g mWholeExpr enumExprTy
-                let elemAddrTy = if isReadOnlySpan then mkInByrefTy cenv.g elemTy else mkByrefTy cenv.g elemTy
+                let idxVar, idxExpr = mkCompGenLocal mPat "idx" g.int32_ty
+                let struct(_, elemTy) = if isReadOnlySpan then destReadOnlySpanTy g mWholeExpr enumExprTy else destSpanTy g mWholeExpr enumExprTy
+                let elemAddrTy = if isReadOnlySpan then mkInByrefTy g elemTy else mkByrefTy g elemTy
 
                 // Evaluate the span index lookup
                 let bodyExprFixup elemVar bodyExpr =
                     let elemAddrVar, _ = mkCompGenLocal mIn "addr" elemAddrTy
                     let e = mkInvisibleLet mIn elemVar (mkAddrGet mIn (mkLocalValRef elemAddrVar)) bodyExpr
-                    let getItemCallExpr, _ = BuildMethodCall tcVal cenv.g cenv.amap PossiblyMutates mWholeExpr true getItemMethInfo ValUseFlag.NormalValUse [] [ spanExpr ] [ idxExpr ]
+                    let getItemCallExpr, _ = BuildMethodCall tcVal g cenv.amap PossiblyMutates mWholeExpr true getItemMethInfo ValUseFlag.NormalValUse [] [ spanExpr ] [ idxExpr ]
                     mkInvisibleLet mIn elemAddrVar getItemCallExpr e
 
                 // Evaluate the span expression once and put it in spanVar
                 let overallExprFixup overallExpr = mkLet spForBind mFor spanVar enumExpr overallExpr
 
-                let getLengthCallExpr, _ = BuildMethodCall tcVal cenv.g cenv.amap PossiblyMutates mWholeExpr true getLengthMethInfo ValUseFlag.NormalValUse [] [ spanExpr ] []
+                let getLengthCallExpr, _ = BuildMethodCall tcVal g cenv.amap PossiblyMutates mWholeExpr true getLengthMethInfo ValUseFlag.NormalValUse [] [ spanExpr ] []
 
                 // Ask for a loop over integers for the given range
-                (elemTy, bodyExprFixup, overallExprFixup, Choice2Of3 (idxVar, mkZero cenv.g mFor, mkDecr cenv.g mFor getLengthCallExpr))
+                (elemTy, bodyExprFixup, overallExprFixup, Choice2Of3 (idxVar, mkZero g mFor, mkDecr g mFor getLengthCallExpr))
 
             | _ ->
                 let enumerableVar, enumerableExprInVar = mkCompGenLocal mEnumExpr "inputSequence" enumExprTy
@@ -7769,11 +7944,11 @@ and TcForEachExpr cenv overallTy env tpenv (synPat, synEnumExpr, synBodyExpr, mW
 
         // Build iteration as a for loop
         | Choice1Of3(startExpr, finishExpr) ->
-            mkFastForLoop cenv.g (spFor, spIn, mWholeExpr, elemVar, startExpr, true, finishExpr, bodyExpr)
+            mkFastForLoop g (spFor, spIn, mWholeExpr, elemVar, startExpr, true, finishExpr, bodyExpr)
 
         // Build iteration as a for loop with a specific index variable that is not the same as the elemVar
         | Choice2Of3(idxVar, startExpr, finishExpr) ->
-            mkFastForLoop cenv.g (DebugPointAtFor.No, spIn, mWholeExpr, idxVar, startExpr, true, finishExpr, bodyExpr)
+            mkFastForLoop g (DebugPointAtFor.No, spIn, mWholeExpr, idxVar, startExpr, true, finishExpr, bodyExpr)
 
         // Build iteration as a while loop with a try/finally disposal
         | Choice3Of3(enumerableVar, enumeratorVar, _, getEnumExpr, _, guardExpr, currentExpr) ->
@@ -7781,14 +7956,14 @@ and TcForEachExpr cenv overallTy env tpenv (synPat, synEnumExpr, synBodyExpr, mW
             // This compiled for must be matched EXACTLY by CompiledForEachExpr
             mkLet spForBind mFor enumerableVar enumExpr
               (mkLet spEnumExpr mFor enumeratorVar getEnumExpr
-                   (mkTryFinally cenv.g
-                       (mkWhile cenv.g
+                   (mkTryFinally g
+                       (mkWhile g
                            (spInAsWhile,
                             WhileLoopForCompiledForEachExprMarker, guardExpr,
                             mkInvisibleLet mIn elemVar currentExpr bodyExpr,
                             mFor),
                         BuildDisposableCleanup cenv env mWholeExpr enumeratorVar, 
-                        mFor, cenv.g.unit_ty, DebugPointAtTry.No, DebugPointAtFinally.No)))
+                        mFor, g.unit_ty, DebugPointAtTry.No, DebugPointAtFinally.No)))
 
     let overallExpr = overallExprFixup overallExpr
     overallExpr, tpenv
@@ -7798,10 +7973,13 @@ and TcForEachExpr cenv overallTy env tpenv (synPat, synEnumExpr, synBodyExpr, mW
 //-------------------------------------------------------------------------
 
 and TcQuotationExpr cenv overallTy env tpenv (_oper, raw, ast, isFromQueryExpression, m) =
-    let astTy = NewInferenceType ()
+
+    let g = cenv.g
+
+    let astTy = NewInferenceType g
 
     // Assert the overall type for the domain of the quotation template
-    UnifyTypes cenv env m overallTy.Commit (if raw then mkRawQuotedExprTy cenv.g else mkQuotedExprTy cenv.g astTy)
+    UnifyTypes cenv env m overallTy.Commit (if raw then mkRawQuotedExprTy g else mkQuotedExprTy g astTy)
 
     // Check the expression
     let expr, tpenv = TcExpr cenv (MustEqual astTy) env tpenv ast
@@ -7810,7 +7988,7 @@ and TcQuotationExpr cenv overallTy env tpenv (_oper, raw, ast, isFromQueryExpres
     let expr = Expr.Quote (expr, ref None, isFromQueryExpression, m, overallTy.Commit)
 
     // Coerce it if needed
-    let expr = if raw then mkCoerceExpr(expr, (mkRawQuotedExprTy cenv.g), m, (tyOfExpr cenv.g expr)) else expr
+    let expr = if raw then mkCoerceExpr(expr, (mkRawQuotedExprTy g), m, (tyOfExpr g expr)) else expr
 
     // We serialize the quoted expression to bytes in IlxGen after type inference etc. is complete.
     expr, tpenv
@@ -7819,13 +7997,15 @@ and TcQuotationExpr cenv overallTy env tpenv (_oper, raw, ast, isFromQueryExpres
 /// type applications and dot-notation projections, first extract known
 /// type information from the applications.
 ///
-/// 'overallTy' is the type expected for the entire chain of expr + lookups.
-/// 'exprty' is the type of the expression on the left of the lookup chain.
+/// 'overalltyR is the type expected for the entire chain of expr + lookups.
+/// 'exprtyR is the type of the expression on the left of the lookup chain.
 ///
-/// We propagate information from the expected overall type 'overallTy'. The use
-/// of function application syntax unambiguously implies that 'overallTy' is a function type.
+/// We propagate information from the expected overall type 'overalltyR. The use
+/// of function application syntax unambiguously implies that 'overalltyR is a function type.
 and Propagate cenv (overallTy: OverallTy) (env: TcEnv) tpenv (expr: ApplicableExpr) exprty delayed =
 
+    let g = cenv.g
+
     let rec propagate isAddrOf delayedList mExpr exprty =
         match delayedList with
         | [] ->
@@ -7835,13 +8015,13 @@ and Propagate cenv (overallTy: OverallTy) (env: TcEnv) tpenv (expr: ApplicableEx
                 // We generate a tag inference parameter to the return type for "&x" and 'NativePtr.toByRef'
                 // See RFC FS-1053.md
                 let exprty =
-                    if isAddrOf && isByrefTy cenv.g exprty then
-                        mkByrefTyWithInference cenv.g (destByrefTy cenv.g exprty) (NewByRefKindInferenceType cenv.g mExpr)
-                    elif isByrefTy cenv.g exprty then
+                    if isAddrOf && isByrefTy g exprty then
+                        mkByrefTyWithInference g (destByrefTy g exprty) (NewByRefKindInferenceType g mExpr)
+                    elif isByrefTy g exprty then
                         // Implicit dereference on byref on return
-                        if isByrefTy cenv.g overallTy.Commit then
+                        if isByrefTy g overallTy.Commit then
                              errorR(Error(FSComp.SR.tcByrefReturnImplicitlyDereferenced(), mExpr))
-                        destByrefTy cenv.g exprty
+                        destByrefTy g exprty
                     else
                         exprty
 
@@ -7865,8 +8045,8 @@ and Propagate cenv (overallTy: OverallTy) (env: TcEnv) tpenv (expr: ApplicableEx
                 let isAddrOf =
                     match expr with
                     | ApplicableExpr(_, Expr.App (Expr.Val (vf, _, _), _, _, [], _), _)
-                        when (valRefEq cenv.g vf cenv.g.addrof_vref ||
-                              valRefEq cenv.g vf cenv.g.nativeptr_tobyref_vref) -> true
+                        when (valRefEq g vf g.addrof_vref ||
+                              valRefEq g vf g.nativeptr_tobyref_vref) -> true
                     | _ -> false
 
                 propagate isAddrOf delayedList' mExprAndArg resultTy
@@ -7885,7 +8065,7 @@ and Propagate cenv (overallTy: OverallTy) (env: TcEnv) tpenv (expr: ApplicableEx
                 // expr[idx1..idx2]
                 | SynExpr.ArrayOrListComputed(false, _, _) ->
                     let isAdjacent = isAdjacentListExpr isSugar atomicFlag synLeftExprOpt synArg
-                    if isAdjacent && cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+                    if isAdjacent && g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
                         // This is the non-error path
                         ()
                     else
@@ -7898,8 +8078,8 @@ and Propagate cenv (overallTy: OverallTy) (env: TcEnv) tpenv (expr: ApplicableEx
                             | Expr.Val (d, _, _) -> Some d.DisplayName
                             | _ -> None
                         if isAdjacent then
-                            if IsIndexerType cenv.g cenv.amap expr.Type then
-                                if cenv.g.langVersion.IsExplicitlySpecifiedAs50OrBefore() then
+                            if IsIndexerType g cenv.amap expr.Type then
+                                if g.langVersion.IsExplicitlySpecifiedAs50OrBefore() then
                                     error (NotAFunctionButIndexer(denv, overallTy.Commit, vName, mExpr, mArg, false))
                                 match vName with
                                 | Some nm -> 
@@ -7913,8 +8093,8 @@ and Propagate cenv (overallTy: OverallTy) (env: TcEnv) tpenv (expr: ApplicableEx
                                 | _ -> 
                                     error(Error(FSComp.SR.tcNotAnIndexerIndexingNotYetEnabled(), mExprAndArg))
                         else
-                            if IsIndexerType cenv.g cenv.amap expr.Type then
-                                let old = not (cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot)
+                            if IsIndexerType g cenv.amap expr.Type then
+                                let old = not (g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot)
                                 error (NotAFunctionButIndexer(denv, overallTy.Commit, vName, mExpr, mArg, old))
                             else
                                 error (NotAFunction(denv, overallTy.Commit, mExpr, mArg))
@@ -7935,6 +8115,8 @@ and PropagateThenTcDelayed cenv (overallTy: OverallTy) env tpenv mExpr expr expr
 /// type applications and dot-notation projections.
 and TcDelayed cenv (overallTy: OverallTy) env tpenv mExpr expr exprty (atomicFlag: ExprAtomicFlag) delayed =
 
+    let g = cenv.g
+
     // OK, we've typechecked the thing on the left of the delayed lookup chain.
     // We can now record for posterity the type of this expression and the location of the expression.
     if (atomicFlag = ExprAtomicFlag.Atomic) then
@@ -7964,13 +8146,13 @@ and TcDelayed cenv (overallTy: OverallTy) env tpenv mExpr expr exprty (atomicFla
 
     | DelayedSet (synExpr2, mStmt) :: otherDelayed ->
         if not (isNil otherDelayed) then error(Error(FSComp.SR.tcInvalidAssignment(), mExpr))
-        UnifyTypes cenv env mExpr overallTy.Commit cenv.g.unit_ty
+        UnifyTypes cenv env mExpr overallTy.Commit g.unit_ty
         let expr = expr.Expr
-        let _wrap, exprAddress, _readonly, _writeonly = mkExprAddrOfExpr cenv.g true false DefinitelyMutates expr None mExpr
-        let vty = tyOfExpr cenv.g expr
+        let _wrap, exprAddress, _readonly, _writeonly = mkExprAddrOfExpr g true false DefinitelyMutates expr None mExpr
+        let vty = tyOfExpr g expr
         // Always allow subsumption on assignment to fields
         let expr2, tpenv = TcExprFlex cenv true false vty env tpenv synExpr2
-        let v, _ve = mkCompGenLocal mExpr "addr" (mkByrefTy cenv.g vty)
+        let v, _ve = mkCompGenLocal mExpr "addr" (mkByrefTy g vty)
         mkCompGenLet mStmt v exprAddress (mkAddrSet mStmt (mkLocalValRef v) expr2), tpenv
 
 /// Convert the delayed identifiers to a dot-lookup.
@@ -7987,6 +8169,8 @@ and delayRest rest mPrior delayed =
 /// Typecheck "nameof" expressions
 and TcNameOfExpr cenv env tpenv (synArg: SynExpr) =
 
+    let g = cenv.g
+
     let rec stripParens expr =
         match expr with
         | SynExpr.Paren(expr, _, _, _) -> stripParens expr
@@ -8030,7 +8214,7 @@ and TcNameOfExpr cenv env tpenv (synArg: SynExpr) =
                           | Item.CtorGroup _
                           | Item.FakeInterfaceCtor _ -> false
                           | _ -> true) ->
-                    let overallTy = match overallTyOpt with None -> MustEqual (NewInferenceType()) | Some t -> t
+                    let overallTy = match overallTyOpt with None -> MustEqual (NewInferenceType g) | Some t -> t
                     let _, _ = TcItemThen cenv overallTy env tpenv res delayed
                     true
                 | _ ->
@@ -8096,8 +8280,9 @@ and TcNameOfExpr cenv env tpenv (synArg: SynExpr) =
     TcNameOfExprResult cenv lastIdent m
 
 and TcNameOfExprResult cenv (lastIdent: Ident) m =
+    let g = cenv.g
     let constRange = mkRange m.FileName m.Start (mkPos m.StartLine (m.StartColumn + lastIdent.idText.Length + 2)) // `2` are for quotes
-    Expr.Const(Const.String(lastIdent.idText), constRange, cenv.g.string_ty)
+    Expr.Const(Const.String(lastIdent.idText), constRange, g.string_ty)
 
 //-------------------------------------------------------------------------
 // TcApplicationThen: Typecheck "expr x" + projections
@@ -8140,16 +8325,16 @@ and TcApplicationThen cenv (overallTy: OverallTy) env tpenv mExprAndArg synLeftE
         if not isSugar then
             match synArg, atomicFlag with
             | (SynExpr.ArrayOrList (false, _, _) | SynExpr.ArrayOrListComputed (false, _, _)), ExprAtomicFlag.Atomic ->
-                if cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
+                if g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot then
                     informationalWarning(Error(FSComp.SR.tcHighPrecedenceFunctionApplicationToListDeprecated(), mExprAndArg))
-                elif not (cenv.g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
+                elif not (g.langVersion.IsExplicitlySpecifiedAs50OrBefore()) then
                     informationalWarning(Error(FSComp.SR.tcHighPrecedenceFunctionApplicationToListReserved(), mExprAndArg))
             | _ -> ()
 
         match leftExpr with
-        | ApplicableExpr(_, NameOfExpr cenv.g _, _) when cenv.g.langVersion.SupportsFeature LanguageFeature.NameOf ->
+        | ApplicableExpr(_, NameOfExpr g _, _) when g.langVersion.SupportsFeature LanguageFeature.NameOf ->
             let replacementExpr = TcNameOfExpr cenv env tpenv synArg
-            TcDelayed cenv overallTy env tpenv mExprAndArg (ApplicableExpr(cenv, replacementExpr, true)) cenv.g.string_ty ExprAtomicFlag.Atomic delayed
+            TcDelayed cenv overallTy env tpenv mExprAndArg (ApplicableExpr(cenv, replacementExpr, true)) g.string_ty ExprAtomicFlag.Atomic delayed
         | _ ->
             // Notice the special case 'seq { ... }'. In this case 'seq' is actually a function in the F# library.
             // Set a flag in the syntax tree to say we noticed a leading 'seq'
@@ -8160,7 +8345,7 @@ and TcApplicationThen cenv (overallTy: OverallTy) env tpenv mExprAndArg synLeftE
                 match synArg with
                 | SynExpr.ComputationExpr (false, comp, m) when 
                         (match leftExpr with
-                         | ApplicableExpr(_, Expr.Op(TOp.Coerce, _, [SeqExpr cenv.g], _), _) -> true
+                         | ApplicableExpr(_, Expr.Op(TOp.Coerce, _, [SeqExpr g], _), _) -> true
                          | _ -> false) ->
                     SynExpr.ComputationExpr (true, comp, m)
                 | _ -> synArg
@@ -8194,7 +8379,7 @@ and TcApplicationThen cenv (overallTy: OverallTy) env tpenv mExprAndArg synLeftE
         | SynExpr.ArrayOrListComputed(false, IndexerArgs indexArgs, m) 
               when 
                 isAdjacentListExpr isSugar atomicFlag synLeftExprOpt synArg && 
-                cenv.g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot ->
+                g.langVersion.SupportsFeature LanguageFeature.IndexerNotationWithoutDot ->
 
             let expandedIndexArgs = ExpandIndexArgs synLeftExprOpt indexArgs
             let setInfo, delayed = 
@@ -8206,7 +8391,7 @@ and TcApplicationThen cenv (overallTy: OverallTy) env tpenv mExprAndArg synLeftE
         // Perhaps 'leftExpr' is a computation expression builder, and 'arg' is '{ ... }'
         | SynExpr.ComputationExpr (false, comp, _m) ->
             let bodyOfCompExpr, tpenv = cenv.TcComputationExpression cenv env overallTy tpenv (mLeftExpr, leftExpr.Expr, exprty, comp)
-            TcDelayed cenv overallTy env tpenv mExprAndArg (MakeApplicableExprNoFlex cenv bodyOfCompExpr) (tyOfExpr cenv.g bodyOfCompExpr) ExprAtomicFlag.NonAtomic delayed
+            TcDelayed cenv overallTy env tpenv mExprAndArg (MakeApplicableExprNoFlex cenv bodyOfCompExpr) (tyOfExpr g bodyOfCompExpr) ExprAtomicFlag.NonAtomic delayed
 
         | _ ->
             error (NotAFunction(denv, overallTy.Commit, mLeftExpr, mArg))
@@ -8302,7 +8487,7 @@ and TcUnionCaseOrExnCaseOrActivePatternResultItemThen cenv overallTy env item tp
     let g = cenv.g
     let ad = env.eAccessRights
     // ucaseAppTy is the type of the union constructor applied to its (optional) argument
-    let ucaseAppTy = NewInferenceType ()
+    let ucaseAppTy = NewInferenceType g
     let mkConstrApp, argTys, argNames =
         match item with
         | Item.ActivePatternResult(apinfo, _apOverallTy, n, _) ->
@@ -8313,7 +8498,7 @@ and TcUnionCaseOrExnCaseOrActivePatternResultItemThen cenv overallTy env item tp
                 mkConstrApp, [ucaseAppTy], [ for s, m in apinfo.ActiveTagsWithRanges -> mkSynId m s ]
             | _ ->
                 let ucref = mkChoiceCaseRef g mItem aparity n
-                let _, _, tinst, _ = FreshenTyconRef2 mItem ucref.TyconRef
+                let _, _, tinst, _ = FreshenTyconRef2 g mItem ucref.TyconRef
                 let ucinfo = UnionCaseInfo (tinst, ucref)
                 ApplyUnionCaseOrExnTypes mItem cenv env ucaseAppTy (Item.UnionCase(ucinfo, false))
         | _ ->
@@ -8601,7 +8786,7 @@ and TcImplicitOpItemThen cenv overallTy env id sln tpenv mItem delayed =
     let traitInfo = TTrait(argTys, logicalCompiledName, memberFlags, argTys, Some retTy, sln)
 
     let expr = Expr.Op (TOp.TraitCall traitInfo, [], ves, mItem)
-    let expr = mkLambdas mItem [] vs (expr, retTy)
+    let expr = mkLambdas g mItem [] vs (expr, retTy)
 
     let rec isSimpleArgument e =
         match e with
@@ -8683,7 +8868,7 @@ and TcImplicitOpItemThen cenv overallTy env id sln tpenv mItem delayed =
         let pred = (function DelayedApp (_, _, _, arg, _) -> isSimpleArgument arg | _ -> false)
         List.takeWhile pred delayed, List.skipWhile pred delayed
 
-    let intermediateTy = if isNil delayed2 then overallTy.Commit else NewInferenceType ()
+    let intermediateTy = if isNil delayed2 then overallTy.Commit else NewInferenceType g
 
     let resultExpr, tpenv = TcDelayed cenv (MustEqual intermediateTy) env tpenv mItem (MakeApplicableExprNoFlex cenv expr) (tyOfExpr g expr) ExprAtomicFlag.NonAtomic delayed1
 
@@ -8747,13 +8932,13 @@ and TcValueItemThen cenv overallTy env vref tpenv mItem afterResolution delayed
         //   - it isn't a VSlotDirectCall (uses of base values do not take type arguments
         // Allow `nameof<'T>` for a generic parameter
         match vref with
-        | _ when isNameOfValRef cenv.g vref && cenv.g.langVersion.SupportsFeature LanguageFeature.NameOf ->
+        | _ when isNameOfValRef g vref && g.langVersion.SupportsFeature LanguageFeature.NameOf ->
             match tys with
             | [SynType.Var(SynTypar(id, _, false) as tp, _m)] ->
-                let _tp', tpenv = TcTyparOrMeasurePar None cenv env ImplicitlyBoundTyparsAllowed.NoNewTypars tpenv tp
+                let _tpR, tpenv = TcTyparOrMeasurePar None cenv env ImplicitlyBoundTyparsAllowed.NoNewTypars tpenv tp
                 let vexp = TcNameOfExprResult cenv id mExprAndTypeArgs
                 let vexpFlex = MakeApplicableExprNoFlex cenv vexp
-                PropagateThenTcDelayed cenv overallTy env tpenv mExprAndTypeArgs vexpFlex cenv.g.string_ty ExprAtomicFlag.Atomic otherDelayed
+                PropagateThenTcDelayed cenv overallTy env tpenv mExprAndTypeArgs vexpFlex g.string_ty ExprAtomicFlag.Atomic otherDelayed
             | _ ->
                 error (Error(FSComp.SR.expressionHasNoName(), mExprAndTypeArgs))
         | _ ->
@@ -8902,17 +9087,19 @@ and GetMemberApplicationArgs delayed cenv env tpenv =
     atomicFlag, tyArgsOptChecked, args, delayed, tpenv
 
 and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId delayed mExprAndLongId =
-    let objArgs = [objExpr]
+    let g = cenv.g
     let ad = env.eAccessRights
 
+    let objArgs = [objExpr]
+
     // 'base' calls use a different resolution strategy when finding methods.
     let findFlag =
         let baseCall = IsBaseCall objArgs
         (if baseCall then PreferOverrides else IgnoreOverrides)
 
     // Canonicalize inference problem prior to '.' lookup on variable types
-    if isTyparTy cenv.g objExprTy then
-        CanonicalizePartialInferenceProblem cenv.css env.DisplayEnv mExprAndLongId (freeInTypeLeftToRight cenv.g false objExprTy)
+    if isTyparTy g objExprTy then
+        CanonicalizePartialInferenceProblem cenv.css env.DisplayEnv mExprAndLongId (freeInTypeLeftToRight g false objExprTy)
 
     let item, mItem, rest, afterResolution = ResolveExprDotLongIdentAndComputeRange cenv.tcSink cenv.nameResolver mExprAndLongId ad env.NameEnv objExprTy longId TypeNameResolutionInfo.Default findFlag false
     let mExprAndItem = unionRanges mObjExpr mItem
@@ -8960,11 +9147,11 @@ and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId dela
         | DelayedSet(e2, mStmt) :: otherDelayed ->
             if not (isNil otherDelayed) then error(Error(FSComp.SR.tcInvalidAssignment(), mStmt))
             // Instance property setter
-            UnifyTypes cenv env mStmt overallTy.Commit cenv.g.unit_ty
+            UnifyTypes cenv env mStmt overallTy.Commit g.unit_ty
             let meths = SettersOfPropInfos pinfos
             if meths.IsEmpty then
                 let meths = pinfos |> GettersOfPropInfos
-                let isByrefMethReturnSetter = meths |> List.exists (function _,Some pinfo -> isByrefTy cenv.g (pinfo.GetPropertyType(cenv.amap,mItem)) | _ -> false)
+                let isByrefMethReturnSetter = meths |> List.exists (function _,Some pinfo -> isByrefTy g (pinfo.GetPropertyType(cenv.amap,mItem)) | _ -> false)
                 if not isByrefMethReturnSetter then
                     errorR (Error (FSComp.SR.tcPropertyCannotBeSet1 nm, mItem))
                 // x.P <- ... byref setter
@@ -8972,7 +9159,7 @@ and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId dela
                 TcMethodApplicationThen cenv env overallTy None tpenv tyargsOpt objArgs mExprAndItem mItem nm ad PossiblyMutates true meths afterResolution NormalValUse args atomicFlag delayed
             else
                 let args = if pinfo.IsIndexer then args else []
-                let mut = (if isStructTy cenv.g (tyOfExpr cenv.g objExpr) then DefinitelyMutates else PossiblyMutates)
+                let mut = (if isStructTy g (tyOfExpr g objExpr) then DefinitelyMutates else PossiblyMutates)
                 TcMethodApplicationThen cenv env overallTy None tpenv tyargsOpt objArgs mStmt mItem nm ad mut true meths afterResolution NormalValUse (args @ [e2]) atomicFlag []
         | _ ->
             // Instance property getter
@@ -8982,9 +9169,9 @@ and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId dela
 
     | Item.RecdField rfinfo ->
         // Get or set instance F# field or literal
-        RecdFieldInstanceChecks cenv.g cenv.amap ad mItem rfinfo
+        RecdFieldInstanceChecks g cenv.amap ad mItem rfinfo
         let tgtTy = rfinfo.DeclaringType
-        let valu = isStructTy cenv.g tgtTy
+        let valu = isStructTy g tgtTy
         AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css mItem NoTrace tgtTy objExprTy
         let objExpr = if valu then objExpr else mkCoerceExpr(objExpr, tgtTy, mExprAndItem, objExprTy)
         let fieldTy = rfinfo.FieldType
@@ -8993,15 +9180,15 @@ and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId dela
             // Mutable value set: 'v <- e'
             if not (isNil otherDelayed) then error(Error(FSComp.SR.tcInvalidAssignment(), mItem))
             CheckRecdFieldMutation mItem env.DisplayEnv rfinfo
-            UnifyTypes cenv env mStmt overallTy.Commit cenv.g.unit_ty
+            UnifyTypes cenv env mStmt overallTy.Commit g.unit_ty
             // Always allow subsumption on assignment to fields
             let e2', tpenv = TcExprFlex cenv true false fieldTy env tpenv e2
-            BuildRecdFieldSet cenv.g mStmt objExpr rfinfo e2', tpenv
+            BuildRecdFieldSet g mStmt objExpr rfinfo e2', tpenv
 
         | _ ->
 
             // Instance F# Record or Class field
-            let objExpr' = mkRecdFieldGet cenv.g (objExpr, rfinfo.RecdFieldRef, rfinfo.TypeInst, mExprAndItem)
+            let objExpr' = mkRecdFieldGet g (objExpr, rfinfo.RecdFieldRef, rfinfo.TypeInst, mExprAndItem)
             PropagateThenTcDelayed cenv overallTy env tpenv mExprAndItem (MakeApplicableExprWithFlex cenv env objExpr') fieldTy ExprAtomicFlag.Atomic delayed
 
     | Item.AnonRecdField (anonInfo, tinst, n, _) ->
@@ -9013,24 +9200,24 @@ and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId dela
             error(Error(FSComp.SR.tcInvalidAssignment(),mItem))
         | _ ->
             // Instance F# Anonymous Record
-            let objExpr' = mkAnonRecdFieldGet cenv.g (anonInfo,objExpr,tinst,n,mExprAndItem)
+            let objExpr' = mkAnonRecdFieldGet g (anonInfo,objExpr,tinst,n,mExprAndItem)
             PropagateThenTcDelayed cenv overallTy env tpenv mExprAndItem (MakeApplicableExprWithFlex cenv env objExpr') fieldTy ExprAtomicFlag.Atomic delayed
 
     | Item.ILField finfo ->
         // Get or set instance IL field
-        ILFieldInstanceChecks cenv.g cenv.amap ad mItem finfo
+        ILFieldInstanceChecks g cenv.amap ad mItem finfo
         let exprty = finfo.FieldType(cenv.amap, mItem)
 
         match delayed with
         // Set instance IL field
         | DelayedSet(e2, mStmt) :: _delayed' ->
-            UnifyTypes cenv env mStmt overallTy.Commit cenv.g.unit_ty
+            UnifyTypes cenv env mStmt overallTy.Commit g.unit_ty
             // Always allow subsumption on assignment to fields
             let e2', tpenv = TcExprFlex cenv true false exprty env tpenv e2
-            let expr = BuildILFieldSet cenv.g mStmt objExpr finfo e2'
+            let expr = BuildILFieldSet g mStmt objExpr finfo e2'
             expr, tpenv
         | _ ->
-            let expr = BuildILFieldGet cenv.g cenv.amap mExprAndItem objExpr finfo
+            let expr = BuildILFieldGet g cenv.amap mExprAndItem objExpr finfo
             PropagateThenTcDelayed cenv overallTy env tpenv mExprAndItem (MakeApplicableExprWithFlex cenv env expr) exprty ExprAtomicFlag.Atomic delayed
 
     | Item.Event einfo ->
@@ -9040,10 +9227,13 @@ and TcLookupThen cenv overallTy env tpenv mObjExpr objExpr objExprTy longId dela
     | Item.FakeInterfaceCtor _ | Item.DelegateCtor _ -> error (Error (FSComp.SR.tcConstructorsCannotBeFirstClassValues(), mItem))
     | _ -> error (Error (FSComp.SR.tcSyntaxFormUsedOnlyWithRecordLabelsPropertiesAndFields(), mItem))
 
+// Instance IL event (fake up event-as-value)
 and TcEventItemThen cenv overallTy env tpenv mItem mExprAndItem objDetails (einfo: EventInfo) delayed =
-    // Instance IL event (fake up event-as-value)
-    let nm = einfo.EventName
+    let g = cenv.g
     let ad = env.eAccessRights
+
+    let nm = einfo.EventName
+
     match objDetails, einfo.IsStatic with
     | Some _, true -> error (Error (FSComp.SR.tcEventIsStatic nm, mItem))
     | None, false -> error (Error (FSComp.SR.tcEventIsNotStatic nm, mItem))
@@ -9052,12 +9242,12 @@ and TcEventItemThen cenv overallTy env tpenv mItem mExprAndItem objDetails (einf
     let delegateType = einfo.GetDelegateType(cenv.amap, mItem)
     let (SigOfFunctionForDelegate(invokeMethInfo, compiledViewOfDelArgTys, _, _)) = GetSigOfFunctionForDelegate cenv.infoReader delegateType mItem ad
     let objArgs = Option.toList (Option.map fst objDetails)
-    MethInfoChecks cenv.g cenv.amap true None objArgs env.eAccessRights mItem invokeMethInfo
+    MethInfoChecks g cenv.amap true None objArgs env.eAccessRights mItem invokeMethInfo
 
     // This checks for and drops the 'object' sender
     let argsTy = ArgsTypOfEventInfo cenv.infoReader mItem ad einfo
     if not (slotSigHasVoidReturnTy (invokeMethInfo.GetSlotSig(cenv.amap, mItem))) then errorR (nonStandardEventError einfo.EventName mItem)
-    let delEventTy = mkIEventType cenv.g delegateType argsTy
+    let delEventTy = mkIEventType g delegateType argsTy
 
     let bindObjArgs f =
         match objDetails with
@@ -9069,16 +9259,16 @@ and TcEventItemThen cenv overallTy env tpenv mItem mExprAndItem objDetails (einf
     let expr =
         bindObjArgs (fun objVars ->
              //     EventHelper ((fun d -> e.add_X(d)), (fun d -> e.remove_X(d)), (fun f -> new 'Delegate(f)))
-            mkCallCreateEvent cenv.g mItem delegateType argsTy
+            mkCallCreateEvent g mItem delegateType argsTy
                (let dv, de = mkCompGenLocal mItem "eventDelegate" delegateType
                 let callExpr, _ = BuildPossiblyConditionalMethodCall cenv env PossiblyMutates mItem false einfo.AddMethod NormalValUse [] objVars [de]
-                mkLambda mItem dv (callExpr, cenv.g.unit_ty))
+                mkLambda mItem dv (callExpr, g.unit_ty))
                (let dv, de = mkCompGenLocal mItem "eventDelegate" delegateType
                 let callExpr, _ = BuildPossiblyConditionalMethodCall cenv env PossiblyMutates mItem false einfo.RemoveMethod NormalValUse [] objVars [de]
-                mkLambda mItem dv (callExpr, cenv.g.unit_ty))
-               (let fvty = (cenv.g.obj_ty --> (argsTy --> cenv.g.unit_ty))
+                mkLambda mItem dv (callExpr, g.unit_ty))
+               (let fvty = mkFunTy g g.obj_ty (mkFunTy g argsTy g.unit_ty)
                 let fv, fe = mkCompGenLocal mItem "callback" fvty
-                let createExpr = BuildNewDelegateExpr (Some einfo, cenv.g, cenv.amap, delegateType, invokeMethInfo, compiledViewOfDelArgTys, fe, fvty, mItem)
+                let createExpr = BuildNewDelegateExpr (Some einfo, g, cenv.amap, delegateType, invokeMethInfo, compiledViewOfDelArgTys, fe, fvty, mItem)
                 mkLambda mItem fv (createExpr, delegateType)))
 
     let exprty = delEventTy
@@ -9114,12 +9304,14 @@ and TcMethodApplicationThen
        delayed     // further lookups and applications that follow this
      =
 
+    let g = cenv.g
+
     // Nb. args is always of List.length <= 1 except for indexed setters, when it is 2
     let mWholeExpr = (m, args) ||> List.fold (fun m arg -> unionRanges m arg.Range)
 
     // Work out if we know anything about the return type of the overall expression. If there are any delayed
     // lookups then we don't know anything.
-    let exprTy = if isNil delayed then overallTy else MustEqual (NewInferenceType ())
+    let exprTy = if isNil delayed then overallTy else MustEqual (NewInferenceType g)
 
     // Call the helper below to do the real checking
     let (expr, attributeAssignedNamedItems, delayed), tpenv =
@@ -9132,20 +9324,26 @@ and TcMethodApplicationThen
 
 
     // Resolve the "delayed" lookups
-    let exprty = (tyOfExpr cenv.g expr)
+    let exprty = (tyOfExpr g expr)
 
     PropagateThenTcDelayed cenv overallTy env tpenv mWholeExpr (MakeApplicableExprNoFlex cenv expr) exprty atomicFlag delayed
 
 /// Infer initial type information at the callsite from the syntax of an argument, prior to overload resolution.
 and GetNewInferenceTypeForMethodArg cenv env tpenv x =
+
+    let g = cenv.g
+
     match x with
-    | SynExprParen(a, _, _, _) -> GetNewInferenceTypeForMethodArg cenv env tpenv a
-    | SynExpr.AddressOf (true, a, _, m) -> mkByrefTyWithInference cenv.g (GetNewInferenceTypeForMethodArg cenv env tpenv a) (NewByRefKindInferenceType cenv.g m)
-    | SynExpr.Lambda (body = a) -> mkFunTy (NewInferenceType ()) (GetNewInferenceTypeForMethodArg cenv env tpenv a)
+    | SynExprParen(a, _, _, _) ->
+        GetNewInferenceTypeForMethodArg cenv env tpenv a
+    | SynExpr.AddressOf (true, a, _, m) ->
+        mkByrefTyWithInference g (GetNewInferenceTypeForMethodArg cenv env tpenv a) (NewByRefKindInferenceType g m)
+    | SynExpr.Lambda (body = a) ->
+        mkFunTy g (NewInferenceType g) (GetNewInferenceTypeForMethodArg cenv env tpenv a)
     | SynExpr.Quote (_, raw, a, _, _) ->
-        if raw then mkRawQuotedExprTy cenv.g
-        else mkQuotedExprTy cenv.g (GetNewInferenceTypeForMethodArg cenv env tpenv a)
-    | _ -> NewInferenceType ()
+        if raw then mkRawQuotedExprTy g
+        else mkQuotedExprTy g (GetNewInferenceTypeForMethodArg cenv env tpenv a)
+    | _ -> NewInferenceType g
 
 /// Method calls, property lookups, attribute constructions etc. get checked through here
 and TcMethodApplication
@@ -9170,12 +9368,13 @@ and TcMethodApplication
         delayed
     =
 
+    let g = cenv.g
     let denv = env.DisplayEnv
 
     let isSimpleFormalArg (isParamArrayArg, _isInArg, isOutArg, optArgInfo: OptionalArgInfo, callerInfo: CallerInfo, _reflArgInfo: ReflectedArgInfo) =
         not isParamArrayArg && not isOutArg && not optArgInfo.IsOptional && callerInfo = NoCallerInfo
 
-    let callerObjArgTys = objArgs |> List.map (tyOfExpr cenv.g)
+    let callerObjArgTys = objArgs |> List.map (tyOfExpr g)
 
     let calledMeths = calledMethsAndProps |> List.map fst
 
@@ -9184,7 +9383,7 @@ and TcMethodApplication
     let curriedCallerArgs, exprTy, delayed =
         match calledMeths with
         | [calledMeth] when not isProp && calledMeth.NumArgs.Length > 1 ->
-            [], MustEqual (NewInferenceType ()), [ for x in curriedCallerArgs -> DelayedApp(ExprAtomicFlag.NonAtomic, false, None, x, x.Range) ] @ delayed
+            [], MustEqual (NewInferenceType g), [ for x in curriedCallerArgs -> DelayedApp(ExprAtomicFlag.NonAtomic, false, None, x, x.Range) ] @ delayed
         | _ when not isProp && calledMeths |> List.exists (fun calledMeth -> calledMeth.NumArgs.Length > 1) ->
             // This condition should only apply when multiple conflicting curried extension members are brought into scope
             error(Error(FSComp.SR.tcOverloadsCannotHaveCurriedArguments(), mMethExpr))
@@ -9258,7 +9457,7 @@ and TcMethodApplication
                         curriedCalledArgs.Head |> List.forall isSimpleFormalArg) ->
 
                 // The call lambda has function type
-                let exprTy = mkFunTy (NewInferenceType ()) exprTy.Commit
+                let exprTy = mkFunTy g (NewInferenceType g) exprTy.Commit
 
                 (None, Some unnamedCurriedCallerArgs.Head.Head, MustEqual exprTy)
 
@@ -9283,14 +9482,14 @@ and TcMethodApplication
     let GenerateMatchingSimpleArgumentTypes (calledMeth: MethInfo) =
         let curriedMethodArgAttribs = calledMeth.GetParamAttribs(cenv.amap, mItem)
         curriedMethodArgAttribs
-        |> List.map (List.filter isSimpleFormalArg >> NewInferenceTypes)
+        |> List.map (List.filter isSimpleFormalArg >> NewInferenceTypes g)
 
     let UnifyMatchingSimpleArgumentTypes exprTy (calledMeth: MethInfo) =
         let curriedArgTys = GenerateMatchingSimpleArgumentTypes calledMeth
         let returnTy =
             (exprTy, curriedArgTys) ||> List.fold (fun exprTy argTys ->
                 let domainTy, resultTy = UnifyFunctionType None cenv denv mMethExpr exprTy
-                UnifyTypes cenv env mMethExpr domainTy (mkRefTupledTy cenv.g argTys)
+                UnifyTypes cenv env mMethExpr domainTy (mkRefTupledTy g argTys)
                 resultTy)
         curriedArgTys, returnTy
 
@@ -9329,7 +9528,7 @@ and TcMethodApplication
             | None, _ ->
 
                 let domainTy, returnTy = UnifyFunctionType None cenv denv mMethExpr exprTy.Commit
-                let argTys = if isUnitTy cenv.g domainTy then [] else tryDestRefTupleTy cenv.g domainTy
+                let argTys = if isUnitTy g domainTy then [] else tryDestRefTupleTy g domainTy
                 // Only apply this rule if a candidate method exists with this number of arguments
                 let argTys =
                     if candidates |> List.exists (CalledMethHasSingleArgumentGroupOfThisLength argTys.Length) then
@@ -9391,7 +9590,7 @@ and TcMethodApplication
                     curriedArgTys, MustEqual returnTy
                 | _ ->
                     let domainTy, returnTy = UnifyFunctionType None cenv denv mMethExpr exprTy.Commit
-                    let argTys = if isUnitTy cenv.g domainTy then [] else tryDestRefTupleTy cenv.g domainTy
+                    let argTys = if isUnitTy g domainTy then [] else tryDestRefTupleTy g domainTy
                     // Only apply this rule if a candidate method exists with this number of arguments
                     let argTys =
                         if candidates |> List.exists (CalledMethHasSingleArgumentGroupOfThisLength argTys.Length) then
@@ -9401,7 +9600,7 @@ and TcMethodApplication
                     [argTys], MustEqual returnTy
 
             let lambdaVarsAndExprs = curriedArgTys |> List.mapiSquared (fun i j ty -> mkCompGenLocal mMethExpr ("arg"+string i+string j) ty)
-            let unnamedCurriedCallerArgs = lambdaVarsAndExprs |> List.mapSquared (fun (_, e) -> CallerArg(tyOfExpr cenv.g e, e.Range, false, e))
+            let unnamedCurriedCallerArgs = lambdaVarsAndExprs |> List.mapSquared (fun (_, e) -> CallerArg(tyOfExpr g e, e.Range, false, e))
             let namedCurriedCallerArgs = lambdaVarsAndExprs |> List.map (fun _ -> [])
             let lambdaVars = List.mapSquared fst lambdaVarsAndExprs
             unnamedCurriedCallerArgs, namedCurriedCallerArgs, Some lambdaVars, returnTy, tpenv
@@ -9416,18 +9615,18 @@ and TcMethodApplication
             let lambdaPropagationInfo =
                 if preArgumentTypeCheckingCalledMethGroup.Length > 1 then
                     [| for meth in preArgumentTypeCheckingCalledMethGroup do
-                        match ExamineMethodForLambdaPropagation cenv.g mMethExpr meth ad with
+                        match ExamineMethodForLambdaPropagation g mMethExpr meth ad with
                         | Some (unnamedInfo, namedInfo) ->
                             let calledObjArgTys = meth.CalledObjArgTys mMethExpr
                             if (calledObjArgTys, callerObjArgTys) ||> Seq.forall2 (fun calledTy callerTy -> 
-                                let noEagerConstraintApplication = MethInfoHasAttribute cenv.g mMethExpr cenv.g.attrib_NoEagerConstraintApplicationAttribute meth.Method
+                                let noEagerConstraintApplication = MethInfoHasAttribute g mMethExpr g.attrib_NoEagerConstraintApplicationAttribute meth.Method
 
                                 // The logic associated with NoEagerConstraintApplicationAttribute is part of the
                                 // Tasks and Resumable Code RFC
-                                if noEagerConstraintApplication && not (cenv.g.langVersion.SupportsFeature LanguageFeature.ResumableStateMachines) then
+                                if noEagerConstraintApplication && not (g.langVersion.SupportsFeature LanguageFeature.ResumableStateMachines) then
                                     errorR(Error(FSComp.SR.tcNoEagerConstraintApplicationAttribute(), mMethExpr))
 
-                                let extraRigidTps = if noEagerConstraintApplication then Zset.ofList typarOrder (freeInTypeLeftToRight cenv.g true callerTy) else emptyFreeTypars
+                                let extraRigidTps = if noEagerConstraintApplication then Zset.ofList typarOrder (freeInTypeLeftToRight g true callerTy) else emptyFreeTypars
 
                                 AddCxTypeMustSubsumeTypeMatchingOnlyUndoIfFailed denv cenv.css mMethExpr extraRigidTps calledTy callerTy) then
 
@@ -9472,7 +9671,7 @@ and TcMethodApplication
         // about the possible target of the call.
         if not uniquelyResolved then
             CanonicalizePartialInferenceProblem cenv.css denv mItem
-                 (unnamedCurriedCallerArgs |> List.collectSquared (fun callerArg -> freeInTypeLeftToRight cenv.g false callerArg.CallerArgumentType))
+                 (unnamedCurriedCallerArgs |> List.collectSquared (fun callerArg -> freeInTypeLeftToRight g false callerArg.CallerArgumentType))
 
         let result, errors = ResolveOverloadingForCall denv cenv.css mMethExpr methodName callerArgs ad postArgumentTypeCheckingCalledMethGroup true returnTy
 
@@ -9495,7 +9694,7 @@ and TcMethodApplication
 
             let overridingInfo =
                 overriding
-                |> List.tryFind (fun (minfo, _) -> minfo.IsVirtual && MethInfosEquivByNameAndSig EraseNone true cenv.g cenv.amap range0 result.Method minfo)
+                |> List.tryFind (fun (minfo, _) -> minfo.IsVirtual && MethInfosEquivByNameAndSig EraseNone true g cenv.amap range0 result.Method minfo)
 
             match overridingInfo with
             | Some (minfo, pinfoOpt) ->
@@ -9529,7 +9728,7 @@ and TcMethodApplication
     finalCalledMeth.AssociatedPropertyInfo |> Option.iter (fun pinfo -> CheckPropInfoAttributes pinfo mItem |> CommitOperationResult)
 
     let isInstance = not (isNil objArgs)
-    MethInfoChecks cenv.g cenv.amap isInstance tyargsOpt objArgs ad mItem finalCalledMethInfo
+    MethInfoChecks g cenv.amap isInstance tyargsOpt objArgs ad mItem finalCalledMethInfo
 
     // Adhoc constraints on use of .NET methods
     begin
@@ -9537,20 +9736,20 @@ and TcMethodApplication
         //
         if (isInstance &&
             finalCalledMethInfo.IsInstance &&
-            typeEquiv cenv.g finalCalledMethInfo.ApparentEnclosingType cenv.g.obj_ty &&
+            typeEquiv g finalCalledMethInfo.ApparentEnclosingType g.obj_ty &&
             (finalCalledMethInfo.LogicalName = "GetHashCode" || finalCalledMethInfo.LogicalName = "Equals")) then
 
-            objArgs |> List.iter (fun expr -> AddCxTypeMustSupportEquality env.DisplayEnv cenv.css mMethExpr NoTrace (tyOfExpr cenv.g expr))
+            objArgs |> List.iter (fun expr -> AddCxTypeMustSupportEquality env.DisplayEnv cenv.css mMethExpr NoTrace (tyOfExpr g expr))
 
         // Uses of a Dictionary() constructor without an IEqualityComparer argument imply an equality constraint
         // on the first type argument.
-        if HasHeadType cenv.g cenv.g.tcref_System_Collections_Generic_Dictionary finalCalledMethInfo.ApparentEnclosingType &&
+        if HasHeadType g g.tcref_System_Collections_Generic_Dictionary finalCalledMethInfo.ApparentEnclosingType &&
            finalCalledMethInfo.IsConstructor &&
            not (finalCalledMethInfo.GetParamDatas(cenv.amap, mItem, finalCalledMeth.CalledTyArgs)
                 |> List.existsSquared (fun (ParamData(_, _, _, _, _, _, _, ty)) ->
-                    HasHeadType cenv.g cenv.g.tcref_System_Collections_Generic_IEqualityComparer ty)) then
+                    HasHeadType g g.tcref_System_Collections_Generic_IEqualityComparer ty)) then
 
-            match argsOfAppTy cenv.g finalCalledMethInfo.ApparentEnclosingType with
+            match argsOfAppTy g finalCalledMethInfo.ApparentEnclosingType with
             | [dty; _] -> AddCxTypeMustSupportEquality env.DisplayEnv cenv.css mMethExpr NoTrace dty
             | _ -> ()
     end
@@ -9562,7 +9761,7 @@ and TcMethodApplication
     /// STEP 5. Build the argument list. Adjust for optional arguments, byref arguments and coercions.
 
     let objArgPreBinder, objArgs, allArgsPreBinders, allArgs, allArgsCoerced, optArgPreBinder, paramArrayPreBinders, outArgExprs, outArgTmpBinds =
-        let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
+        let tcVal = LightweightTcValForUsingInBuildMethodCall g
         AdjustCallerArgs tcVal TcFieldInit env.eCallerMemberName cenv.infoReader ad finalCalledMeth objArgs lambdaVars mItem mMethExpr
 
     // Record the resolution of the named argument for the Language Service
@@ -9583,9 +9782,9 @@ and TcMethodApplication
     // Handle byref returns
     let callExpr1, exprty =
         // byref-typed returns get implicitly dereferenced
-        let vty = tyOfExpr cenv.g callExpr0
-        if isByrefTy cenv.g vty then
-            mkDerefAddrExpr mMethExpr callExpr0 mMethExpr vty, destByrefTy cenv.g vty
+        let vty = tyOfExpr g callExpr0
+        if isByrefTy g vty then
+            mkDerefAddrExpr mMethExpr callExpr0 mMethExpr vty, destByrefTy g vty
         else
             callExpr0, exprty
 
@@ -9594,14 +9793,14 @@ and TcMethodApplication
         let expr = callExpr1
         if isNil outArgTmpBinds then expr, exprty
         else
-            let outArgTys = outArgExprs |> List.map (tyOfExpr cenv.g)
+            let outArgTys = outArgExprs |> List.map (tyOfExpr g)
             let expr =
-                if isUnitTy cenv.g exprty then
-                    mkCompGenSequential mMethExpr expr (mkRefTupled cenv.g mMethExpr outArgExprs outArgTys)
+                if isUnitTy g exprty then
+                    mkCompGenSequential mMethExpr expr (mkRefTupled g mMethExpr outArgExprs outArgTys)
                 else
-                    mkRefTupled cenv.g mMethExpr (expr :: outArgExprs) (exprty :: outArgTys)
+                    mkRefTupled g mMethExpr (expr :: outArgExprs) (exprty :: outArgTys)
             let expr = mkLetsBind mMethExpr outArgTmpBinds expr
-            expr, tyOfExpr cenv.g expr
+            expr, tyOfExpr g expr
 
     // Subsumption or conversion to return type
     let callExpr2b = TcAdjustExprForTypeDirectedConversions cenv returnTy exprty env mMethExpr callExpr2
@@ -9619,7 +9818,7 @@ and TcMethodApplication
 
             // Build the expression that mutates the properties on the result of the call
             let setterExprPrebinders, propSetExpr =
-                (mkUnit cenv.g mMethExpr, finalAssignedItemSetters) ||> List.mapFold (fun acc assignedItemSetter ->
+                (mkUnit g mMethExpr, finalAssignedItemSetters) ||> List.mapFold (fun acc assignedItemSetter ->
                         let argExprPrebinder, action, m = TcSetterArgExpr cenv env denv objExpr ad assignedItemSetter
                         argExprPrebinder, mkCompGenSequential m acc action)
 
@@ -9635,8 +9834,8 @@ and TcMethodApplication
         | Some curriedLambdaVars ->
             let mkLambda vs expr =
                 match vs with
-                | [] -> mkUnitDelayLambda cenv.g mMethExpr expr
-                | _ -> mkMultiLambda mMethExpr vs (expr, tyOfExpr cenv.g expr)
+                | [] -> mkUnitDelayLambda g mMethExpr expr
+                | _ -> mkMultiLambda mMethExpr vs (expr, tyOfExpr g expr)
             List.foldBack mkLambda curriedLambdaVars expr
 
     let callExpr5, tpenv =
@@ -9645,8 +9844,8 @@ and TcMethodApplication
         | Some synArgExpr ->
             match lambdaVars with
             | Some [lambdaVars] ->
-                let argExpr, tpenv = TcExpr cenv (MustEqual (mkRefTupledVarsTy cenv.g lambdaVars)) env tpenv synArgExpr
-                mkApps cenv.g ((expr, tyOfExpr cenv.g expr), [], [argExpr], mMethExpr), tpenv
+                let argExpr, tpenv = TcExpr cenv (MustEqual (mkRefTupledVarsTy g lambdaVars)) env tpenv synArgExpr
+                mkApps g ((expr, tyOfExpr g expr), [], [argExpr], mMethExpr), tpenv
             | _ ->
                 error(InternalError("unreachable - expected some lambda vars for a tuple mismatch", mItem))
         | None ->
@@ -9666,35 +9865,38 @@ and TcMethodApplication
     (callExpr6, finalAttributeAssignedNamedItems, delayed), tpenv
 
 and TcSetterArgExpr cenv env denv objExpr ad (AssignedItemSetter(id, setter, CallerArg(callerArgTy, m, isOptCallerArg, argExpr))) =
-    if isOptCallerArg then error(Error(FSComp.SR.tcInvalidOptionalAssignmentToPropertyOrField(), m))
+    let g = cenv.g
+
+    if isOptCallerArg then
+        error(Error(FSComp.SR.tcInvalidOptionalAssignmentToPropertyOrField(), m))
 
     let argExprPrebinder, action, defnItem =
         match setter with
         | AssignedPropSetter (pinfo, pminfo, pminst) ->
-            MethInfoChecks cenv.g cenv.amap true None [objExpr] ad m pminfo
+            MethInfoChecks g cenv.amap true None [objExpr] ad m pminfo
             let calledArgTy = List.head (List.head (pminfo.GetParamTypes(cenv.amap, m, pminst)))
-            let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
-            let argExprPrebinder, argExpr = MethodCalls.AdjustCallerArgExpr tcVal cenv.g cenv.amap cenv.infoReader ad false calledArgTy ReflectedArgInfo.None callerArgTy m argExpr
-            let mut = (if isStructTy cenv.g (tyOfExpr cenv.g objExpr) then DefinitelyMutates else PossiblyMutates)
+            let tcVal = LightweightTcValForUsingInBuildMethodCall g
+            let argExprPrebinder, argExpr = MethodCalls.AdjustCallerArgExpr tcVal g cenv.amap cenv.infoReader ad false calledArgTy ReflectedArgInfo.None callerArgTy m argExpr
+            let mut = (if isStructTy g (tyOfExpr g objExpr) then DefinitelyMutates else PossiblyMutates)
             let action = BuildPossiblyConditionalMethodCall cenv env mut m true pminfo NormalValUse pminst [objExpr] [argExpr] |> fst
             argExprPrebinder, action, Item.Property (pinfo.PropertyName, [pinfo])
 
         | AssignedILFieldSetter finfo ->
             // Get or set instance IL field
-            ILFieldInstanceChecks cenv.g cenv.amap ad m finfo
+            ILFieldInstanceChecks g cenv.amap ad m finfo
             let calledArgTy = finfo.FieldType (cenv.amap, m)
-            let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
-            let argExprPrebinder, argExpr = MethodCalls.AdjustCallerArgExpr tcVal cenv.g cenv.amap cenv.infoReader ad false calledArgTy ReflectedArgInfo.None callerArgTy m argExpr
-            let action = BuildILFieldSet cenv.g m objExpr finfo argExpr
+            let tcVal = LightweightTcValForUsingInBuildMethodCall g
+            let argExprPrebinder, argExpr = MethodCalls.AdjustCallerArgExpr tcVal g cenv.amap cenv.infoReader ad false calledArgTy ReflectedArgInfo.None callerArgTy m argExpr
+            let action = BuildILFieldSet g m objExpr finfo argExpr
             argExprPrebinder, action, Item.ILField finfo
 
         | AssignedRecdFieldSetter rfinfo ->
-            RecdFieldInstanceChecks cenv.g cenv.amap ad m rfinfo
+            RecdFieldInstanceChecks g cenv.amap ad m rfinfo
             let calledArgTy = rfinfo.FieldType
             CheckRecdFieldMutation m denv rfinfo
-            let tcVal = LightweightTcValForUsingInBuildMethodCall cenv.g
-            let argExprPrebinder, argExpr = MethodCalls.AdjustCallerArgExpr tcVal cenv.g cenv.amap cenv.infoReader ad false calledArgTy ReflectedArgInfo.None callerArgTy m argExpr
-            let action = BuildRecdFieldSet cenv.g m objExpr rfinfo argExpr
+            let tcVal = LightweightTcValForUsingInBuildMethodCall g
+            let argExprPrebinder, argExpr = MethodCalls.AdjustCallerArgExpr tcVal g cenv.amap cenv.infoReader ad false calledArgTy ReflectedArgInfo.None callerArgTy m argExpr
+            let action = BuildRecdFieldSet g m objExpr rfinfo argExpr
             argExprPrebinder, action, Item.RecdField rfinfo
 
     // Record the resolution for the Language Service
@@ -9730,7 +9932,9 @@ and TcMethodNamedArg cenv env (lambdaPropagationInfo, tpenv) (CallerNamedArg(id,
 
 and TcMethodArg cenv env (lambdaPropagationInfo, tpenv) (lambdaPropagationInfoForArg, CallerArg(callerArgTy, mArg, isOpt, argExpr)) =
 
-    // Apply the F# 3.1 rule for extracting information for lambdas
+    let g = cenv.g
+
+    // Apply the F# 3.1+ rule for extracting information for lambdas
     //
     // Before we check the argument, check to see if we can propagate info from a called lambda expression into the arguments of a received lambda
     if lambdaPropagationInfoForArg.Length > 0 then
@@ -9754,7 +9958,7 @@ and TcMethodArg cenv env (lambdaPropagationInfo, tpenv) (lambdaPropagationInfoFo
                             let calledLambdaArgTy = prefixOfLambdaArgsForEachOverload.[0].[lambdaVarNum]
                             let allRowsGiveSameArgumentType =
                                 prefixOfLambdaArgsForEachOverload
-                                |> Array.forall (fun row -> typeEquiv cenv.g calledLambdaArgTy row.[lambdaVarNum])
+                                |> Array.forall (fun row -> typeEquiv g calledLambdaArgTy row.[lambdaVarNum])
 
                             if allRowsGiveSameArgumentType then
                                 // Force the caller to be a function type.
@@ -9782,7 +9986,7 @@ and TcMethodArg cenv env (lambdaPropagationInfo, tpenv) (lambdaPropagationInfoFo
                   // constraints from tp1 to tp2.  
                   //
                   // The 'task' feature requires this fix to SRTP resolution. 
-                  let extraRigidTps = if noEagerConstraintApplication then Zset.ofList typarOrder (freeInTypeLeftToRight cenv.g true callerArgTy) else emptyFreeTypars
+                  let extraRigidTps = if noEagerConstraintApplication then Zset.ofList typarOrder (freeInTypeLeftToRight g true callerArgTy) else emptyFreeTypars
                   if AddCxTypeMustSubsumeTypeMatchingOnlyUndoIfFailed env.DisplayEnv cenv.css mArg extraRigidTps adjustedCalledArgTy callerArgTy then
                      yield info |]
 
@@ -9790,17 +9994,20 @@ and TcMethodArg cenv env (lambdaPropagationInfo, tpenv) (lambdaPropagationInfoFo
 
 /// Typecheck "new Delegate(fun x y z -> ...)" constructs
 and TcNewDelegateThen cenv (overallTy: OverallTy) env tpenv mDelTy mExprAndArg delegateTy arg atomicFlag delayed =
+    let g = cenv.g
     let ad = env.eAccessRights
     UnifyTypes cenv env mExprAndArg overallTy.Commit delegateTy
     let (SigOfFunctionForDelegate(invokeMethInfo, delArgTys, _, fty)) = GetSigOfFunctionForDelegate cenv.infoReader delegateTy mDelTy ad
+
     // We pass isInstance = true here because we're checking the rights to access the "Invoke" method
-    MethInfoChecks cenv.g cenv.amap true None [] env.eAccessRights mExprAndArg invokeMethInfo
+    MethInfoChecks g cenv.amap true None [] env.eAccessRights mExprAndArg invokeMethInfo
     let args = GetMethodArgs arg
+
     match args with
     | [farg], [] ->
         let m = arg.Range
         let callerArg, (_, tpenv) = TcMethodArg cenv env (Array.empty, tpenv) (Array.empty, CallerArg(fty, m, false, farg))
-        let expr = BuildNewDelegateExpr (None, cenv.g, cenv.amap, delegateTy, invokeMethInfo, delArgTys, callerArg.Expr, fty, m)
+        let expr = BuildNewDelegateExpr (None, g, cenv.amap, delegateTy, invokeMethInfo, delArgTys, callerArg.Expr, fty, m)
         PropagateThenTcDelayed cenv overallTy env tpenv m (MakeApplicableExprNoFlex cenv expr) delegateTy atomicFlag delayed
     | _ ->
         error(Error(FSComp.SR.tcDelegateConstructorMustBePassed(), mExprAndArg))
@@ -9829,6 +10036,9 @@ and CheckRecursiveBindingIds binds =
 /// Process a sequence of sequentials mixed with iterated lets "let ... in let ... in ..." in a tail recursive way
 /// This avoids stack overflow on really large "let" and "letrec" lists
 and TcLinearExprs bodyChecker cenv env overallTy tpenv isCompExpr expr cont =
+
+    let g = cenv.g
+
     match expr with
     | SynExpr.Sequential (sp, true, e1, e2, m) when not isCompExpr ->
         let e1', _ =
@@ -9861,9 +10071,10 @@ and TcLinearExprs bodyChecker cenv env overallTy tpenv isCompExpr expr cont =
                 cont (fst (mkf (x, overallTy.Commit)), tpenv))
 
     | SynExpr.IfThenElse (synBoolExpr, synThenExpr, synElseExprOpt, spIfToThen, isRecovery, m, trivia) when not isCompExpr ->
+
         let boolExpr, tpenv =
             let env = { env with eIsControlFlow = false }
-            TcExprThatCantBeCtorBody cenv (MustEqual cenv.g.bool_ty) env tpenv synBoolExpr
+            TcExprThatCantBeCtorBody cenv (MustEqual g.bool_ty) env tpenv synBoolExpr
 
         let env = { env with eIsControlFlow = true }
         let thenExpr, tpenv =
@@ -9876,13 +10087,13 @@ and TcLinearExprs bodyChecker cenv env overallTy tpenv isCompExpr expr cont =
                     | _ -> { env with eContextInfo = ContextInfo.IfExpression synThenExpr.Range }
 
             if not isRecovery && Option.isNone synElseExprOpt then
-                UnifyTypes cenv env m cenv.g.unit_ty overallTy.Commit
+                UnifyTypes cenv env m g.unit_ty overallTy.Commit
 
             TcExprThatCanBeCtorBody cenv overallTy env tpenv synThenExpr
 
         match synElseExprOpt with
         | None ->
-            let elseExpr = mkUnit cenv.g trivia.IfToThenRange
+            let elseExpr = mkUnit g trivia.IfToThenRange
             let overallExpr = primMkCond spIfToThen m overallTy.Commit boolExpr thenExpr elseExpr
             cont (overallExpr, tpenv)
 
@@ -9903,16 +10114,19 @@ and TcAndPatternCompileMatchClauses mExpr matchm actionOnFailure cenv inputExprO
     matchVal, expr, tpenv
 
 and TcMatchPattern cenv inputTy env tpenv (pat: SynPat, optWhenExpr: SynExpr option) =
+    let g = cenv.g
     let m = pat.Range
     let patf', (tpenv, names, _) = TcPat WarnOnUpperCase cenv env None (ValInline.Optional, permitInferTypars, noArgOrRetAttribs, false, None, false) (tpenv, Map.empty, Set.empty) inputTy pat
     let envinner, values, vspecMap = MakeAndPublishSimpleValsForMergedScope cenv env m names
+
     let optWhenExprR, tpenv =
         match optWhenExpr with
         | Some whenExpr ->
             let guardEnv = { envinner with eContextInfo = ContextInfo.PatternMatchGuard whenExpr.Range }
-            let whenExprR, tpenv = TcExpr cenv (MustEqual cenv.g.bool_ty) guardEnv tpenv whenExpr
+            let whenExprR, tpenv = TcExpr cenv (MustEqual g.bool_ty) guardEnv tpenv whenExpr
             Some whenExprR, tpenv
         | None -> None, tpenv
+
     patf' (TcPatPhase2Input (values, true)), optWhenExprR, NameMap.range vspecMap, envinner, tpenv
 
 and TcMatchClauses cenv inputTy (resultTy: OverallTy) env tpenv clauses =
@@ -9929,27 +10143,33 @@ and TcMatchClause cenv inputTy (resultTy: OverallTy) env isFirst tpenv synMatchC
     TClause(pat', optWhenExprR, TTarget(vspecs, e', None), patm), tpenv
 
 and TcStaticOptimizationConstraint cenv env tpenv c =
+    let g = cenv.g
+
     match c with
     | SynStaticOptimizationConstraint.WhenTyparTyconEqualsTycon(tp, ty, m) ->
-        if not cenv.g.compilingFslib then
+        if not g.compilingFslib then
             errorR(Error(FSComp.SR.tcStaticOptimizationConditionalsOnlyForFSharpLibrary(), m))
-        let ty', tpenv = TcType cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv ty
-        let tp', tpenv = TcTypar cenv env NewTyparsOK tpenv tp
-        TTyconEqualsTycon(mkTyparTy tp', ty'), tpenv
+        let tyR, tpenv = TcType cenv NewTyparsOK CheckCxs ItemOccurence.UseInType env tpenv ty
+        let tpR, tpenv = TcTypar cenv env NewTyparsOK tpenv tp
+        TTyconEqualsTycon(mkTyparTy tpR, tyR), tpenv
     | SynStaticOptimizationConstraint.WhenTyparIsStruct(tp, m) ->
-        if not cenv.g.compilingFslib then
+        if not g.compilingFslib then
             errorR(Error(FSComp.SR.tcStaticOptimizationConditionalsOnlyForFSharpLibrary(), m))
-        let tp', tpenv = TcTypar cenv env NewTyparsOK tpenv tp
-        TTyconIsStruct(mkTyparTy tp'), tpenv
+        let tpR, tpenv = TcTypar cenv env NewTyparsOK tpenv tp
+        TTyconIsStruct(mkTyparTy tpR), tpenv
 
 /// Emit a conv.i instruction
 and mkConvToNativeInt (g: TcGlobals) e m = Expr.Op (TOp.ILAsm ([ AI_conv ILBasicType.DT_I], [ g.nativeint_ty ]), [], [e], m)
 
 /// Fix up the r.h.s. of a 'use x = fixed expr'
 and TcAndBuildFixedExpr cenv env (overallPatTy, fixedExpr, overallExprTy, mBinding) =
+
+    let g = cenv.g
+
     warning(PossibleUnverifiableCode mBinding)
+
     match overallExprTy with
-    | ty when isByrefTy cenv.g ty ->
+    | ty when isByrefTy g ty ->
         let okByRef =
             match stripDebugPoints (stripExpr fixedExpr) with
             | Expr.Op (op, tyargs, args, _) ->
@@ -9963,31 +10183,31 @@ and TcAndBuildFixedExpr cenv env (overallPatTy, fixedExpr, overallExprTy, mBindi
         if not okByRef then
             error(Error(FSComp.SR.tcFixedNotAllowed(), mBinding))
 
-        let elemTy = destByrefTy cenv.g overallExprTy
-        UnifyTypes cenv env mBinding (mkNativePtrTy cenv.g elemTy) overallPatTy
+        let elemTy = destByrefTy g overallExprTy
+        UnifyTypes cenv env mBinding (mkNativePtrTy g elemTy) overallPatTy
         mkCompGenLetIn mBinding "pinnedByref" ty fixedExpr (fun (v, ve) ->
             v.SetIsFixed()
-            mkConvToNativeInt cenv.g ve mBinding)
+            mkConvToNativeInt g ve mBinding)
 
-    | ty when isStringTy cenv.g ty ->
-        let charPtrTy = mkNativePtrTy cenv.g cenv.g.char_ty
+    | ty when isStringTy g ty ->
+        let charPtrTy = mkNativePtrTy g g.char_ty
         UnifyTypes cenv env mBinding charPtrTy overallPatTy
         //
         //    let ptr: nativeptr =
         //        let pinned s = str
         //        (nativeptr)s + get_OffsettoStringData()
 
-        mkCompGenLetIn mBinding "pinnedString" cenv.g.string_ty fixedExpr (fun (v, ve) ->
+        mkCompGenLetIn mBinding "pinnedString" g.string_ty fixedExpr (fun (v, ve) ->
             v.SetIsFixed()
             let addrOffset = BuildOffsetToStringData cenv env mBinding
-            let stringAsNativeInt = mkConvToNativeInt cenv.g ve mBinding
-            let plusOffset = Expr.Op (TOp.ILAsm ([ AI_add ], [ cenv.g.nativeint_ty ]), [], [stringAsNativeInt; addrOffset], mBinding)
+            let stringAsNativeInt = mkConvToNativeInt g ve mBinding
+            let plusOffset = Expr.Op (TOp.ILAsm ([ AI_add ], [ g.nativeint_ty ]), [], [stringAsNativeInt; addrOffset], mBinding)
             // check for non-null
-            mkNullTest cenv.g mBinding ve plusOffset ve)
+            mkNullTest g mBinding ve plusOffset ve)
 
-    | ty when isArray1DTy cenv.g ty ->
-        let elemTy = destArrayTy cenv.g overallExprTy
-        let elemPtrTy = mkNativePtrTy cenv.g elemTy
+    | ty when isArray1DTy g ty ->
+        let elemTy = destArrayTy g overallExprTy
+        let elemPtrTy = mkNativePtrTy g elemTy
         UnifyTypes cenv env mBinding elemPtrTy overallPatTy
 
         // let ptr: nativeptr =
@@ -10003,16 +10223,16 @@ and TcAndBuildFixedExpr cenv env (overallPatTy, fixedExpr, overallExprTy, mBindi
         //
         mkCompGenLetIn mBinding "tmpArray" overallExprTy fixedExpr (fun (_, ve) ->
             // This is &arr.[0]
-            let elemZeroAddress = mkArrayElemAddress cenv.g (false, ILReadonly.NormalAddress, false, ILArrayShape.SingleDimensional, elemTy, [ve; mkInt32 cenv.g mBinding 0], mBinding)
+            let elemZeroAddress = mkArrayElemAddress g (false, ILReadonly.NormalAddress, false, ILArrayShape.SingleDimensional, elemTy, [ve; mkInt32 g mBinding 0], mBinding)
             // check for non-null and non-empty
-            let zero = mkConvToNativeInt cenv.g (mkInt32 cenv.g mBinding 0) mBinding
+            let zero = mkConvToNativeInt g (mkInt32 g mBinding 0) mBinding
             // This is arr.Length
-            let arrayLengthExpr = mkCallArrayLength cenv.g mBinding elemTy ve
-            mkNullTest cenv.g mBinding ve
-                (mkNullTest cenv.g mBinding arrayLengthExpr
-                    (mkCompGenLetIn mBinding "pinnedByref" (mkByrefTy cenv.g elemTy) elemZeroAddress (fun (v, ve) ->
+            let arrayLengthExpr = mkCallArrayLength g mBinding elemTy ve
+            mkNullTest g mBinding ve
+                (mkNullTest g mBinding arrayLengthExpr
+                    (mkCompGenLetIn mBinding "pinnedByref" (mkByrefTy g elemTy) elemZeroAddress (fun (v, ve) ->
                        v.SetIsFixed()
-                       (mkConvToNativeInt cenv.g ve mBinding)))
+                       (mkConvToNativeInt g ve mBinding)))
                     zero)
                 zero)
 
@@ -10021,10 +10241,12 @@ and TcAndBuildFixedExpr cenv env (overallPatTy, fixedExpr, overallExprTy, mBindi
 
 /// Binding checking code, for all bindings including let bindings, let-rec bindings, member bindings and object-expression bindings and
 and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt safeInitInfo (enclosingDeclaredTypars, (ExplicitTyparInfo(_, declaredTypars, _) as explicitTyparInfo)) bind =
+
+    let g = cenv.g
+
     let envinner = AddDeclaredTypars NoCheckForDuplicateTypars (enclosingDeclaredTypars@declaredTypars) env
 
     match bind with
-
     | NormalizedBinding(vis, bkind, isInline, isMutable, attrs, doc, _, valSynData, pat, NormalizedBindingRhs(spatsL, rtyOpt, rhsExpr), mBinding, spBind) ->
         let (SynValData(memberFlagsOpt, _, _)) = valSynData
 
@@ -10051,7 +10273,7 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
 
         let isFixed, rhsExpr, overallPatTy, overallExprTy =
             match rhsExpr with
-            | SynExpr.Fixed (e, _) -> true, e, NewInferenceType(), overallTy
+            | SynExpr.Fixed (e, _) -> true, e, NewInferenceType g, overallTy
             | e -> false, e, overallTy, overallTy
 
         // Check the attributes of the binding, parameters or return value
@@ -10088,7 +10310,7 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
                 in SynValData(valMf, SynValInfo(args, SynArgInfo({Attributes=rotRetSynAttrs; Range=mHead} :: attrs, opt, retId)), valId)
             retAttribs, valAttribs, valSynData
 
-        let isVolatile = HasFSharpAttribute cenv.g cenv.g.attrib_VolatileFieldAttribute valAttribs
+        let isVolatile = HasFSharpAttribute g g.attrib_VolatileFieldAttribute valAttribs
 
         let inlineFlag = ComputeInlineFlag memberFlagsOpt isInline isMutable mBinding
 
@@ -10096,7 +10318,7 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
             spatsL |> List.map (SynInfo.InferSynArgInfoFromSimplePats >> List.map (SynInfo.AttribsOfArgData >> TcAttrs AttributeTargets.Parameter false))
 
         // Assert the return type of an active pattern. A [] attribute may be used on a partial active pattern.
-        let isStructRetTy = HasFSharpAttribute cenv.g cenv.g.attrib_StructAttribute retAttribs
+        let isStructRetTy = HasFSharpAttribute g g.attrib_StructAttribute retAttribs
 
         let argAndRetAttribs = ArgAndRetAttribs(argAttribs, retAttribs)
 
@@ -10113,10 +10335,10 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
                 | _ -> false 
             | _ -> false
 
-        if HasFSharpAttribute cenv.g cenv.g.attrib_DefaultValueAttribute valAttribs && not isZeroMethod then 
+        if HasFSharpAttribute g g.attrib_DefaultValueAttribute valAttribs && not isZeroMethod then 
             errorR(Error(FSComp.SR.tcDefaultValueAttributeRequiresVal(), mBinding))
 
-        let isThreadStatic = isThreadOrContextStatic cenv.g valAttribs
+        let isThreadStatic = isThreadOrContextStatic g valAttribs
         if isThreadStatic then errorR(DeprecatedThreadStaticBindingWarning mBinding)
 
         if isVolatile then
@@ -10131,17 +10353,18 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
             errorR(Error(FSComp.SR.tcFixedNotAllowed(), mBinding))
 
         if (not declKind.CanBeDllImport || (match memberFlagsOpt with Some memberFlags -> memberFlags.IsInstance | _ -> false)) &&
-            HasFSharpAttributeOpt cenv.g cenv.g.attrib_DllImportAttribute valAttribs then
+            HasFSharpAttributeOpt g g.attrib_DllImportAttribute valAttribs then
             errorR(Error(FSComp.SR.tcDllImportNotAllowed(), mBinding))
 
-        if Option.isNone memberFlagsOpt && HasFSharpAttribute cenv.g cenv.g.attrib_ConditionalAttribute valAttribs then
+        if Option.isNone memberFlagsOpt && HasFSharpAttribute g g.attrib_ConditionalAttribute valAttribs then
             errorR(Error(FSComp.SR.tcConditionalAttributeRequiresMembers(), mBinding))
 
-        if HasFSharpAttribute cenv.g cenv.g.attrib_EntryPointAttribute valAttribs then
+        if HasFSharpAttribute g g.attrib_EntryPointAttribute valAttribs then
             if Option.isSome memberFlagsOpt then
                 errorR(Error(FSComp.SR.tcEntryPointAttributeRequiresFunctionInModule(), mBinding))
             else
-                UnifyTypes cenv env mBinding overallPatTy (mkArrayType cenv.g cenv.g.string_ty --> cenv.g.int_ty)
+                let entryPointTy = mkFunTy g (mkArrayType g g.string_ty) g.int_ty
+                UnifyTypes cenv env mBinding overallPatTy entryPointTy
 
         if isMutable && isInline then errorR(Error(FSComp.SR.tcMutableValuesCannotBeInline(), mBinding))
 
@@ -10243,13 +10466,17 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
 
         match apinfoOpt with
         | Some (apinfo, apOverallTy, _) ->
-            let activePatResTys = NewInferenceTypes apinfo.ActiveTags
-            let _, apReturnTy = stripFunTy cenv.g apOverallTy
+            let activePatResTys = NewInferenceTypes g apinfo.ActiveTags
+            let _, apReturnTy = stripFunTy g apOverallTy
+
             if isStructRetTy && apinfo.IsTotal then
                 errorR(Error(FSComp.SR.tcInvalidStructReturn(), mBinding))
+
             if isStructRetTy then
-                checkLanguageFeatureError cenv.g.langVersion LanguageFeature.StructActivePattern mBinding
-            UnifyTypes cenv env mBinding (apinfo.ResultType cenv.g rhsExpr.Range activePatResTys isStructRetTy) apReturnTy
+                checkLanguageFeatureError g.langVersion LanguageFeature.StructActivePattern mBinding
+
+            UnifyTypes cenv env mBinding (apinfo.ResultType g rhsExpr.Range activePatResTys isStructRetTy) apReturnTy
+
         | None ->
             if isStructRetTy then
                 errorR(Error(FSComp.SR.tcInvalidStructReturn(), mBinding))
@@ -10270,12 +10497,16 @@ and TcNormalizedBinding declKind (cenv: cenv) env tpenv overallTy safeThisValOpt
         CheckedBindingInfo(inlineFlag, valAttribs, doc, tcPatPhase2, explicitTyparInfo, nameToPrelimValSchemeMap, rhsExprChecked, argAndRetAttribs, overallPatTy, mBinding, spBind, compgen, literalValue, isFixed), tpenv
 
 and TcLiteral cenv overallTy env tpenv (attrs, synLiteralValExpr) =
-    let hasLiteralAttr = HasFSharpAttribute cenv.g cenv.g.attrib_LiteralAttribute attrs
+
+    let g = cenv.g
+
+    let hasLiteralAttr = HasFSharpAttribute g g.attrib_LiteralAttribute attrs
+
     if hasLiteralAttr then
         let literalValExpr, _ = TcExpr cenv (MustEqual overallTy) env tpenv synLiteralValExpr
-        match EvalLiteralExprOrAttribArg cenv.g literalValExpr with
+        match EvalLiteralExprOrAttribArg g literalValExpr with
         | Expr.Const (c, _, ty) ->
-            if c = Const.Zero && isStructTy cenv.g ty then
+            if c = Const.Zero && isStructTy g ty then
                 warning(Error(FSComp.SR.tcIllegalStructTypeForConstantExpression(), synLiteralValExpr.Range))
                 false, None
             else
@@ -10320,6 +10551,9 @@ and TcNonRecursiveBinding declKind cenv env tpenv ty binding =
 //------------------------------------------------------------------------
 
 and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribute) =
+
+    let g = cenv.g
+
     let (LongIdentWithDots(tycon, _)) = synAttr.TypeName
     let arg = synAttr.ArgExpr
     let targetIndicator = synAttr.Target
@@ -10343,11 +10577,11 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
 
     let ad = env.eAccessRights
 
-    if not (IsTypeAccessible cenv.g cenv.amap mAttr ad ty) then errorR(Error(FSComp.SR.tcTypeIsInaccessible(), mAttr))
+    if not (IsTypeAccessible g cenv.amap mAttr ad ty) then errorR(Error(FSComp.SR.tcTypeIsInaccessible(), mAttr))
 
-    let tcref = tcrefOfAppTy cenv.g ty
+    let tcref = tcrefOfAppTy g ty
 
-    let conditionalCallDefineOpt = TryFindTyconRefStringAttribute cenv.g mAttr cenv.g.attrib_ConditionalAttribute tcref
+    let conditionalCallDefineOpt = TryFindTyconRefStringAttribute g mAttr g.attrib_ConditionalAttribute tcref
 
     match conditionalCallDefineOpt, cenv.conditionalDefines with
     | Some d, Some defines when not (List.contains d defines) ->
@@ -10359,7 +10593,7 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
             let inheritedDefault = true
             if tcref.IsILTycon then
                 let tdef = tcref.ILTyconRawMetadata
-                let tref = cenv.g.attrib_AttributeUsageAttribute.TypeRef
+                let tref = g.attrib_AttributeUsageAttribute.TypeRef
 
                 match TryDecodeILAttribute tref tdef.CustomAttrs with
                 | Some ([ILAttribElem.Int32 validOn ], named) ->
@@ -10373,7 +10607,7 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
                 | _ ->
                     (validOnDefault, inheritedDefault)
             else
-                match (TryFindFSharpAttribute cenv.g cenv.g.attrib_AttributeUsageAttribute tcref.Attribs) with
+                match (TryFindFSharpAttribute g g.attrib_AttributeUsageAttribute tcref.Attribs) with
                 | Some(Attrib(_, _, [ AttribInt32Arg validOn ], _, _, _, _)) ->
                     (validOn, inheritedDefault)
                 | Some(Attrib(_, _, [ AttribInt32Arg validOn
@@ -10414,7 +10648,7 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
         | Exception _ when canFail -> [ ], true
         | res ->
         let item = ForceRaise res
-        if not (ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap mAttr ty cenv.g.tcref_System_Attribute) then warning(Error(FSComp.SR.tcTypeDoesNotInheritAttribute(), mAttr))
+        if not (ExistsHeadTypeInEntireHierarchy g cenv.amap mAttr ty g.tcref_System_Attribute) then warning(Error(FSComp.SR.tcTypeDoesNotInheritAttribute(), mAttr))
         let attrib =
             match item with
             | Item.CtorGroup(methodName, minfos) ->
@@ -10423,10 +10657,10 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
                 let (expr, attributeAssignedNamedItems, _), _ =
                   TcMethodApplication true cenv env tpenv None [] mAttr mAttr methodName None ad PossiblyMutates false meths afterResolution NormalValUse [arg] (MustEqual ty) []
 
-                UnifyTypes cenv env mAttr ty (tyOfExpr cenv.g expr)
+                UnifyTypes cenv env mAttr ty (tyOfExpr g expr)
 
                 let mkAttribExpr e =
-                    AttribExpr(e, EvalLiteralExprOrAttribArg cenv.g e)
+                    AttribExpr(e, EvalLiteralExprOrAttribArg g e)
 
                 let namedAttribArgMap =
                   attributeAssignedNamedItems |> List.map (fun (CallerNamedArg(id, CallerArg(argtyv, m, isOpt, callerArgExpr))) ->
@@ -10440,18 +10674,18 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
                             errorR(Error(FSComp.SR.tcPropertyCannotBeSet0(), m))
                           id.idText, true, pinfo.GetPropertyType(cenv.amap, m)
                       | Item.ILField finfo ->
-                          CheckILFieldInfoAccessible cenv.g cenv.amap m ad finfo
-                          CheckILFieldAttributes cenv.g finfo m
+                          CheckILFieldInfoAccessible g cenv.amap m ad finfo
+                          CheckILFieldAttributes g finfo m
                           id.idText, false, finfo.FieldType(cenv.amap, m)
                       | Item.RecdField rfinfo when not rfinfo.IsStatic ->
-                          CheckRecdFieldInfoAttributes cenv.g rfinfo m |> CommitOperationResult
+                          CheckRecdFieldInfoAttributes g rfinfo m |> CommitOperationResult
                           CheckRecdFieldInfoAccessible cenv.amap m ad rfinfo
                           // This uses the F# backend name mangling of fields....
                           let nm = ComputeFieldName rfinfo.Tycon rfinfo.RecdField
                           nm, false, rfinfo.FieldType
                       | _ ->
                           errorR(Error(FSComp.SR.tcPropertyOrFieldNotFoundInAttribute(), m))
-                          id.idText, false, cenv.g.unit_ty
+                          id.idText, false, g.unit_ty
                     let propNameItem = Item.SetterArg(id, setterItem)
                     CallNameResolutionSink cenv.tcSink (id.idRange, env.NameEnv, propNameItem, emptyTyparInst, ItemOccurence.Use, ad)
 
@@ -10480,6 +10714,8 @@ and TcAttributeEx canFail cenv (env: TcEnv) attrTgt attrEx (synAttr: SynAttribut
 
 and TcAttributesWithPossibleTargetsEx canFail cenv env attrTgt attrEx synAttribs =
 
+    let g = cenv.g
+
     (false, synAttribs) ||> List.collectFold (fun didFail synAttrib ->
         try
             let attribsAndTargets, didFail2 = TcAttributeEx canFail cenv env attrTgt attrEx synAttrib
@@ -10487,9 +10723,9 @@ and TcAttributesWithPossibleTargetsEx canFail cenv env attrTgt attrEx synAttribs
             // This is where we place any checks that completely exclude the use of some particular
             // attributes from F#.
             let attribs = List.map snd attribsAndTargets
-            if HasFSharpAttribute cenv.g cenv.g.attrib_TypeForwardedToAttribute attribs ||
-               HasFSharpAttribute cenv.g cenv.g.attrib_CompilationArgumentCountsAttribute attribs ||
-               HasFSharpAttribute cenv.g cenv.g.attrib_CompilationMappingAttribute attribs then
+            if HasFSharpAttribute g g.attrib_TypeForwardedToAttribute attribs ||
+               HasFSharpAttribute g g.attrib_CompilationArgumentCountsAttribute attribs ||
+               HasFSharpAttribute g g.attrib_CompilationMappingAttribute attribs then
                 errorR(Error(FSComp.SR.tcUnsupportedAttribute(), synAttrib.Range))
 
             attribsAndTargets, didFail || didFail2
@@ -10524,8 +10760,10 @@ and TcAttributes cenv env attrTgt synAttribs =
 
 and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBindsRange, scopem) =
 
+    let g = cenv.g
+
     // Typecheck all the bindings...
-    let checkedBinds, tpenv = List.mapFold (fun tpenv b -> TcNonRecursiveBinding declKind cenv env tpenv (NewInferenceType ()) b) tpenv synBinds
+    let checkedBinds, tpenv = List.mapFold (fun tpenv b -> TcNonRecursiveBinding declKind cenv env tpenv (NewInferenceType g) b) tpenv synBinds
     let (ContainerInfo(altActualParent, _)) = containerInfo
 
     // Canonicalize constraints prior to generalization
@@ -10534,7 +10772,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
         (checkedBinds |> List.collect (fun tbinfo ->
             let (CheckedBindingInfo(_, _, _, _, explicitTyparInfo, _, _, _, tauTy, _, _, _, _, _)) = tbinfo
             let (ExplicitTyparInfo(_, declaredTypars, _)) = explicitTyparInfo
-            let maxInferredTypars = (freeInTypeLeftToRight cenv.g false tauTy)
+            let maxInferredTypars = (freeInTypeLeftToRight g false tauTy)
             declaredTypars @ maxInferredTypars))
 
     let lazyFreeInEnv = lazy (GeneralizationHelpers.ComputeUngeneralizableTypars env)
@@ -10548,7 +10786,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
         let generalizedTypars, prelimValSchemes2 =
             let canInferTypars = GeneralizationHelpers. ComputeCanInferExtraGeneralizableTypars (containerInfo.ParentRef, canInferTypars, None)
 
-            let maxInferredTypars = freeInTypeLeftToRight cenv.g false tauTy
+            let maxInferredTypars = freeInTypeLeftToRight g false tauTy
 
             let generalizedTypars =
                 if isNil maxInferredTypars && isNil allDeclaredTypars then
@@ -10566,7 +10804,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
         // REVIEW: this scopes generalized type variables. Ensure this is handled properly
         // on all other paths.
         let tpenv = HideUnscopedTypars generalizedTypars tpenv
-        let valSchemes = NameMap.map (UseCombinedArity cenv.g declKind rhsExpr) prelimValSchemes2
+        let valSchemes = NameMap.map (UseCombinedArity g declKind rhsExpr) prelimValSchemes2
         let values = MakeAndPublishVals cenv env (altActualParent, false, declKind, ValNotInRecScope, valSchemes, attrs, doc, literalValue)
         let checkedPat = tcPatPhase2 (TcPatPhase2Input (values, true))
         let prelimRecValues = NameMap.map fst values
@@ -10595,7 +10833,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
             | _ when inlineFlag.MustInline ->
                 error(Error(FSComp.SR.tcInvalidInlineSpecification(), m))
 
-            | TPat_query _ when HasFSharpAttribute cenv.g cenv.g.attrib_LiteralAttribute attrs ->
+            | TPat_query _ when HasFSharpAttribute g g.attrib_LiteralAttribute attrs ->
                 error(Error(FSComp.SR.tcLiteralAttributeCannotUseActivePattern(), m))
 
             | _ ->
@@ -10607,7 +10845,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
                     if not isDiscarded then
                         errorR(Error(FSComp.SR.tcInvalidUseBinding(), m))
                     else
-                        checkLanguageFeatureError cenv.g.langVersion LanguageFeature.UseBindingValueDiscard checkedPat.Range
+                        checkLanguageFeatureError g.langVersion LanguageFeature.UseBindingValueDiscard checkedPat.Range
 
                 elif isFixed then
                     errorR(Error(FSComp.SR.tcInvalidUseBinding(), m))
@@ -10615,7 +10853,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
                 // If the overall declaration is declaring statics or a module value, then force the patternInputTmp to also
                 // have representation as module value.
                 if (DeclKind.MustHaveArity declKind) then
-                    AdjustValToTopVal tmp altActualParent (InferArityOfExprBinding cenv.g AllowTypeDirectedDetupling.Yes tmp rhsExpr)
+                    AdjustValToTopVal tmp altActualParent (InferArityOfExprBinding g AllowTypeDirectedDetupling.Yes tmp rhsExpr)
 
                 tmp, checkedPat
 
@@ -10631,7 +10869,7 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
             let valsDefinedByMatching = ListSet.remove valEq patternInputTmp allValsDefinedByPattern
             let clauses = [TClause(checkedPat2, None, TTarget(valsDefinedByMatching, bodyExpr, None), m)]
             let matchx = CompilePatternForMatch cenv env m m true ThrowIncompleteMatchException (patternInputTmp, generalizedTypars, Some rhsExpr) clauses tauTy bodyExprTy
-            let matchx = if (DeclKind.ConvertToLinearBindings declKind) then LinearizeTopMatch cenv.g altActualParent matchx else matchx
+            let matchx = if (DeclKind.ConvertToLinearBindings declKind) then LinearizeTopMatch g altActualParent matchx else matchx
             matchx, bodyExprTy
 
         // Add the dispose of any "use x = ..." to bodyExpr
@@ -10640,13 +10878,13 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
                 let isDiscarded = match checkedPat2 with TPat_wild _ -> true | _ -> false
                 let allValsDefinedByPattern = if isDiscarded then [patternInputTmp] else allValsDefinedByPattern
                 (allValsDefinedByPattern, (bodyExpr, bodyExprTy)) ||> List.foldBack (fun v (bodyExpr, bodyExprTy) ->
-                    AddCxTypeMustSubsumeType ContextInfo.NoContext denv cenv.css v.Range NoTrace cenv.g.system_IDisposable_ty v.Type
+                    AddCxTypeMustSubsumeType ContextInfo.NoContext denv cenv.css v.Range NoTrace g.system_IDisposable_ty v.Type
                     let cleanupE = BuildDisposableCleanup cenv env m v
-                    mkTryFinally cenv.g (bodyExpr, cleanupE, m, bodyExprTy, DebugPointAtTry.No, DebugPointAtFinally.No), bodyExprTy)
+                    mkTryFinally g (bodyExpr, cleanupE, m, bodyExprTy, DebugPointAtTry.No, DebugPointAtFinally.No), bodyExprTy)
             else
                 (bodyExpr, bodyExprTy)
 
-        let envInner = AddLocalValMap cenv.g cenv.tcSink scopem prelimRecValues env
+        let envInner = AddLocalValMap g cenv.tcSink scopem prelimRecValues env
 
         ((buildExpr >> mkCleanup >> mkPatBind >> mkRhsBind), envInner, tpenv))
 
@@ -10659,34 +10897,41 @@ and TcLetBinding cenv isUse env containerInfo declKind tpenv (synBinds, synBinds
 ///   If bindings are linearised, then this fork is pushed to the RHS.
 ///   In this case, the let bindings type check to a sequence of bindings.
 and TcLetBindings cenv env containerInfo declKind tpenv (binds, bindsm, scopem) =
+    let g = cenv.g
+
     assert(DeclKind.ConvertToLinearBindings declKind)
     let mkf, env, tpenv = TcLetBinding cenv false env containerInfo declKind tpenv (binds, bindsm, scopem)
-    let unite = mkUnit cenv.g bindsm
-    let expr, _ = mkf (unite, cenv.g.unit_ty)
+    let unite = mkUnit g bindsm
+    let expr, _ = mkf (unite, g.unit_ty)
+
     let rec stripLets acc expr =
         match stripDebugPoints expr with
         | Expr.Let (bind, body, m, _) -> stripLets (TMDefLet(bind, m) :: acc) body
         | Expr.Sequential (e1, e2, NormalSeq, m) -> stripLets (TMDefDo(e1, m) :: acc) e2
         | Expr.Const (Const.Unit, _, _) -> List.rev acc
         | _ -> failwith "TcLetBindings: let sequence is non linear. Maybe a LHS pattern was not linearised?"
+
     let binds = stripLets [] expr
     binds, env, tpenv
 
 and CheckMemberFlags optIntfSlotTy newslotsOK overridesOK memberFlags m =
     if newslotsOK = NoNewSlots && memberFlags.IsDispatchSlot then
-      errorR(Error(FSComp.SR.tcAbstractMembersIllegalInAugmentation(), m))
+        errorR(Error(FSComp.SR.tcAbstractMembersIllegalInAugmentation(), m))
     if overridesOK = ErrorOnOverrides && memberFlags.MemberKind = SynMemberKind.Constructor then
-      errorR(Error(FSComp.SR.tcConstructorsIllegalInAugmentation(), m))
+        errorR(Error(FSComp.SR.tcConstructorsIllegalInAugmentation(), m))
     if overridesOK = WarnOnOverrides && memberFlags.IsOverrideOrExplicitImpl && Option.isNone optIntfSlotTy then
-      warning(OverrideInIntrinsicAugmentation m)
+        warning(OverrideInIntrinsicAugmentation m)
     if overridesOK = ErrorOnOverrides && memberFlags.IsOverrideOrExplicitImpl then
-      error(Error(FSComp.SR.tcMethodOverridesIllegalHere(), m))
+        error(Error(FSComp.SR.tcMethodOverridesIllegalHere(), m))
 
 /// Apply the pre-assumed knowledge available to type inference prior to looking at
 /// the _body_ of the binding. For example, in a letrec we may assume this knowledge
 /// for each binding in the letrec prior to any type inference. This might, for example,
 /// tell us the type of the arguments to a recursive function.
 and ApplyTypesFromArgumentPatterns (cenv, env, optArgsOK, ty, m, tpenv, NormalizedBindingRhs (pushedPats, retInfoOpt, e), memberFlagsOpt: SynMemberFlags option) =
+
+    let g = cenv.g
+
     match pushedPats with
     | [] ->
         match retInfoOpt with
@@ -10697,17 +10942,16 @@ and ApplyTypesFromArgumentPatterns (cenv, env, optArgsOK, ty, m, tpenv, Normaliz
         // Property setters always have "unit" return type
         match memberFlagsOpt with
         | Some memFlags when memFlags.MemberKind = SynMemberKind.PropertySet ->
-            UnifyTypes cenv env m ty cenv.g.unit_ty
+            UnifyTypes cenv env m ty g.unit_ty
         | _ -> ()
 
     | pushedPat :: morePushedPats ->
         let domainTy, resultTy = UnifyFunctionType None cenv env.DisplayEnv m ty
         // We apply the type information from the patterns by type checking the
-        // "simple" patterns against 'domainTy'. They get re-typechecked later.
+        // "simple" patterns against 'domainTyR'. They get re-typechecked later.
         ignore (TcSimplePats cenv optArgsOK CheckCxs domainTy env (tpenv, Map.empty, Set.empty) pushedPat)
         ApplyTypesFromArgumentPatterns (cenv, env, optArgsOK, resultTy, m, tpenv, NormalizedBindingRhs (morePushedPats, retInfoOpt, e), memberFlagsOpt)
 
-
 /// Check if the type annotations and inferred type information in a value give a
 /// full and complete generic type for a value. If so, enable generic recursion.
 and ComputeIsComplete enclosingDeclaredTypars declaredTypars ty =
@@ -10720,7 +10964,9 @@ and ComputeIsComplete enclosingDeclaredTypars declaredTypars ty =
 /// it implements. Apply the inferred slotsig.
 and ApplyAbstractSlotInference (cenv: cenv) (envinner: TcEnv) (bindingTy, m, synTyparDecls, declaredTypars, memberId, tcrefObjTy, renaming, _objTy, optIntfSlotTy, valSynData, memberFlags: SynMemberFlags, attribs) =
 
+    let g = cenv.g
     let ad = envinner.eAccessRights
+
     let typToSearchForAbstractMembers =
         match optIntfSlotTy with
         | Some (ty, abstractSlots) ->
@@ -10740,7 +10986,7 @@ and ApplyAbstractSlotInference (cenv: cenv) (envinner: TcEnv) (bindingTy, m, syn
             match meths with
             | [] -> false
             | head :: tail ->
-                tail |> List.forall (MethInfosEquivByNameAndSig EraseNone false cenv.g cenv.amap m head)
+                tail |> List.forall (MethInfosEquivByNameAndSig EraseNone false g cenv.amap m head)
 
         match memberFlags.MemberKind with
         | SynMemberKind.Member ->
@@ -10773,11 +11019,11 @@ and ApplyAbstractSlotInference (cenv: cenv) (envinner: TcEnv) (bindingTy, m, syn
                      let uniqueAbstractMeth = uniqueAbstractMeth.Instantiate(cenv.amap, m, renaming)
 
                      let typarsFromAbsSlotAreRigid, typarsFromAbsSlot, argTysFromAbsSlot, retTyFromAbsSlot =
-                         FreshenAbstractSlot cenv.g cenv.amap m synTyparDecls uniqueAbstractMeth
+                         FreshenAbstractSlot g cenv.amap m synTyparDecls uniqueAbstractMeth
 
                      let declaredTypars = (if typarsFromAbsSlotAreRigid then typarsFromAbsSlot else declaredTypars)
 
-                     let absSlotTy = mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot
+                     let absSlotTy = mkMethodTy g argTysFromAbsSlot retTyFromAbsSlot
 
                      UnifyTypes cenv envinner m bindingTy absSlotTy
                      declaredTypars
@@ -10809,7 +11055,7 @@ and ApplyAbstractSlotInference (cenv: cenv) (envinner: TcEnv) (bindingTy, m, syn
            // Find the unique abstract slot if it exists
            let uniqueAbstractPropSigs =
                match dispatchSlots with
-               | [] when not (CompileAsEvent cenv.g attribs) ->
+               | [] when not (CompileAsEvent g attribs) ->
                    errorR(Error(FSComp.SR.tcNoPropertyFoundForOverride(), memberId.idRange))
                    []
                | [uniqueAbstractProp] -> [uniqueAbstractProp]
@@ -10830,20 +11076,21 @@ and ApplyAbstractSlotInference (cenv: cenv) (envinner: TcEnv) (bindingTy, m, syn
                let uniqueAbstractMeth = uniqueAbstractMeth.Instantiate(cenv.amap, m, renaming)
 
                let _, typarsFromAbsSlot, argTysFromAbsSlot, retTyFromAbsSlot =
-                    FreshenAbstractSlot cenv.g cenv.amap m synTyparDecls uniqueAbstractMeth
+                    FreshenAbstractSlot g cenv.amap m synTyparDecls uniqueAbstractMeth
 
                if not (isNil typarsFromAbsSlot) then
                    errorR(InternalError("Unexpected generic property", memberId.idRange))
 
                let absSlotTy =
-                   if (memberFlags.MemberKind = SynMemberKind.PropertyGet)
-                   then mkMethodTy cenv.g argTysFromAbsSlot retTyFromAbsSlot
+                   if (memberFlags.MemberKind = SynMemberKind.PropertyGet) then
+                       mkMethodTy g argTysFromAbsSlot retTyFromAbsSlot
                    else
-                     match argTysFromAbsSlot with
-                     | [argTysFromAbsSlot] -> mkRefTupledTy cenv.g argTysFromAbsSlot --> cenv.g.unit_ty
-                     | _ ->
-                         error(Error(FSComp.SR.tcInvalidSignatureForSet(), memberId.idRange))
-                         retTyFromAbsSlot --> cenv.g.unit_ty
+                      match argTysFromAbsSlot with
+                       | [argTysFromAbsSlot] ->
+                           mkFunTy g (mkRefTupledTy g argTysFromAbsSlot) g.unit_ty
+                       | _ ->
+                           error(Error(FSComp.SR.tcInvalidSignatureForSet(), memberId.idRange))
+                           mkFunTy g retTyFromAbsSlot g.unit_ty
 
                UnifyTypes cenv envinner m bindingTy absSlotTy)
 
@@ -10902,6 +11149,7 @@ and AnalyzeRecursiveStaticMemberOrValDecl
         mBinding,
         explicitTyparInfo) =
 
+    let g = cenv.g
     let vis = CombineVisibilityAttribs vis1 vis2 mBinding
 
     // Check if we're defining a member, in which case generate the internal unique
@@ -10940,15 +11188,15 @@ and AnalyzeRecursiveStaticMemberOrValDecl
                 // It is declared once on the 'inheritedTys clause, but a fresh binding is made for
                 // each member that may use it.
                 let baseValOpt =
-                    match GetSuperTypeOfType cenv.g cenv.amap mBinding objTy with
+                    match GetSuperTypeOfType g cenv.amap mBinding objTy with
                     | Some superTy -> MakeAndPublishBaseVal cenv envinner (match baseValOpt with None -> None | Some v -> Some v.Id) superTy
                     | None -> None
 
-                let domainTy = NewInferenceType ()
+                let domainTy = NewInferenceType g
 
                 // This is the type we pretend a constructor has, because its implementation must ultimately appear to return a value of the given type
                 // This is somewhat awkward later in codegen etc.
-                UnifyTypes cenv envinner mBinding ty (domainTy --> objTy)
+                UnifyTypes cenv envinner mBinding ty (mkFunTy g domainTy objTy)
 
                 safeThisValOpt, baseValOpt
 
@@ -10957,7 +11205,7 @@ and AnalyzeRecursiveStaticMemberOrValDecl
 
         let memberInfo =
             let isExtrinsic = (declKind = ExtrinsicExtensionBinding)
-            MakeMemberDataAndMangledNameForMemberVal(cenv.g, tcref, isExtrinsic, bindingAttribs, [], memberFlags, valSynInfo, id, false)
+            MakeMemberDataAndMangledNameForMemberVal(g, tcref, isExtrinsic, bindingAttribs, [], memberFlags, valSynInfo, id, false)
 
         envinner, tpenv, id, None, Some memberInfo, vis, vis2, safeThisValOpt, enclosingDeclaredTypars, baseValOpt, explicitTyparInfo, bindingRhs, declaredTypars
 
@@ -10988,6 +11236,7 @@ and AnalyzeRecursiveInstanceMemberDecl
         bindingRhs,
         mBinding) =
 
+    let g = cenv.g
     let vis = CombineVisibilityAttribs vis1 vis2 mBinding
     let (ExplicitTyparInfo(_, declaredTypars, infer)) = explicitTyparInfo
     match tcrefContainerInfo, memberFlagsOpt with
@@ -11014,8 +11263,8 @@ and AnalyzeRecursiveInstanceMemberDecl
          let baseValOpt = if tcref.IsFSharpObjectModelTycon then baseValOpt else None
 
          // Apply the known type of 'this'
-         let bindingTy = NewInferenceType ()
-         UnifyTypes cenv envinner mBinding ty (thisTy --> bindingTy)
+         let bindingTy = NewInferenceType g
+         UnifyTypes cenv envinner mBinding ty (mkFunTy g thisTy bindingTy)
 
          CheckForNonAbstractInterface declKind tcref memberFlags memberId.idRange
 
@@ -11032,11 +11281,11 @@ and AnalyzeRecursiveInstanceMemberDecl
          // It is declared once on the 'inheritedTys clause, but a fresh binding is made for
          // each member that may use it.
          let baseValOpt =
-             match GetSuperTypeOfType cenv.g cenv.amap mBinding objTy with
+             match GetSuperTypeOfType g cenv.amap mBinding objTy with
              | Some superTy -> MakeAndPublishBaseVal cenv envinner (match baseValOpt with None -> None | Some v -> Some v.Id) superTy
              | None -> None
 
-         let memberInfo = MakeMemberDataAndMangledNameForMemberVal(cenv.g, tcref, isExtrinsic, bindingAttribs, optInferredImplSlotTys, memberFlags, valSynInfo, memberId, false)
+         let memberInfo = MakeMemberDataAndMangledNameForMemberVal(g, tcref, isExtrinsic, bindingAttribs, optInferredImplSlotTys, memberFlags, valSynInfo, memberId, false)
          // This line factored in the 'get' or 'set' as the identifier for a property declaration using "with get () = ... and set v = ..."
          // It has been removed from FSharp.Compiler.Service because we want the property name to be the location of
          // the definition of these symbols.
@@ -11074,8 +11323,8 @@ and AnalyzeRecursiveDecl
         match p with
         | SynPat.FromParseError(pat', _) -> analyzeRecursiveDeclPat tpenv pat'
         | SynPat.Typed(pat', cty, _) ->
-            let cty', tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType envinner tpenv cty
-            UnifyTypes cenv envinner mBinding ty cty'
+            let ctyR, tpenv = TcTypeAndRecover cenv NewTyparsOK CheckCxs ItemOccurence.UseInType envinner tpenv cty
+            UnifyTypes cenv envinner mBinding ty ctyR
             analyzeRecursiveDeclPat tpenv pat'
         | SynPat.Attrib(_pat', _attribs, m) ->
             error(Error(FSComp.SR.tcAttributesInvalidInPatterns(), m))
@@ -11128,6 +11377,8 @@ and AnalyzeAndMakeAndPublishRecursiveValue
         (tpenv, recBindIdx)
         (NormalizedRecBindingDefn(containerInfo, newslotsOK, declKind, binding)) =
 
+    let g = cenv.g
+
     // Pull apart the inputs
     let (NormalizedBinding(vis1, bindingKind, isInline, isMutable, bindingSynAttribs, bindingXmlDoc, synTyparDecls, valSynData, declPattern, bindingRhs, mBinding, spBind)) = binding
     let (NormalizedBindingRhs(_, _, bindingExpr)) = bindingRhs
@@ -11140,12 +11391,11 @@ and AnalyzeAndMakeAndPublishRecursiveValue
     let bindingAttribs = TcAttributes cenv env attrTgt bindingSynAttribs
 
     // Allocate the type inference variable for the inferred type
-    let ty = NewInferenceType ()
-
+    let ty = NewInferenceType g
 
     let inlineFlag = ComputeInlineFlag memberFlagsOpt isInline isMutable mBinding
-    if isMutable then errorR(Error(FSComp.SR.tcOnlyRecordFieldsAndSimpleLetCanBeMutable(), mBinding))
 
+    if isMutable then errorR(Error(FSComp.SR.tcOnlyRecordFieldsAndSimpleLetCanBeMutable(), mBinding))
 
     // Typecheck the typar decls, if any
     let explicitTyparInfo, tpenv = TcBindingTyparDecls false cenv env tpenv synTyparDecls
@@ -11243,6 +11493,8 @@ and TcLetrecBinding
          // This is the actual binding to check
          (rbind: PreCheckingRecursiveBinding) =
 
+    let g = cenv.g
+
     let (RecursiveBindingInfo(_, _, enclosingDeclaredTypars, _, vspec, explicitTyparInfo, _, _, baseValOpt, safeThisValOpt, safeInitInfo, _, tau, declKind)) = rbind.RecBindingInfo
 
     let allDeclaredTypars = enclosingDeclaredTypars @ rbind.RecBindingInfo.DeclaredTypars
@@ -11270,8 +11522,8 @@ and TcLetrecBinding
     //  Example 3:
     //    let f() = []   f: unit -> ?b, can generalize immediately
     //    and g() = []
-    let envRec = Option.foldBack (AddLocalVal cenv.g cenv.tcSink scopem) baseValOpt envRec
-    let envRec = Option.foldBack (AddLocalVal cenv.g cenv.tcSink scopem) safeThisValOpt envRec
+    let envRec = Option.foldBack (AddLocalVal g cenv.tcSink scopem) baseValOpt envRec
+    let envRec = Option.foldBack (AddLocalVal g cenv.tcSink scopem) safeThisValOpt envRec
 
     // Members can access protected members of parents of the type, and private members in the type
     let envRec = MakeInnerEnvForMember envRec vspec
@@ -11291,8 +11543,8 @@ and TcLetrecBinding
         let reqdThisValTy, actualThisValTy, rangeForCheck =
             match GetInstanceMemberThisVariable (vspec, checkedBind.Expr) with
             | None ->
-                let reqdThisValTy = if isByrefTy cenv.g reqdThisValTy then destByrefTy cenv.g reqdThisValTy else reqdThisValTy
-                let enclosingTyconRef = tcrefOfAppTy cenv.g reqdThisValTy
+                let reqdThisValTy = if isByrefTy g reqdThisValTy then destByrefTy g reqdThisValTy else reqdThisValTy
+                let enclosingTyconRef = tcrefOfAppTy g reqdThisValTy
                 reqdThisValTy, (mkAppTy enclosingTyconRef (List.map mkTyparTy enclosingDeclaredTypars)), vspec.Range
             | Some thisVal ->
                 reqdThisValTy, thisVal.Type, thisVal.Range
@@ -11323,8 +11575,10 @@ and TcIncrementalLetRecGeneralization cenv scopem
           tpenv,
           uncheckedRecBindsTable: Map) =
 
+    let g = cenv.g
     let denv = envNonRec.DisplayEnv
-    // recompute the free-in-environment in case any type variables have been instantiated
+
+    // Recompute the free-in-environment in case any type variables have been instantiated
     let freeInEnv = GeneralizationHelpers.ComputeUngeneralizableTypars envNonRec
 
     // Attempt to actually generalize some of the candidates eligible for generalization.
@@ -11393,14 +11647,14 @@ and TcIncrementalLetRecGeneralization cenv scopem
 
                     //printfn "(failed generalization test 1 for binding for %s)" pgrbind.RecBindingInfo.Val.DisplayName
                     // Any declared type parameters in an type are always generalizable
-                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g pgrbind.ExtraGeneralizableTypars))
+                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference g pgrbind.ExtraGeneralizableTypars))
 
                     if freeInBinding.IsEmpty then true else
 
                     //printfn "(failed generalization test 2 for binding for %s)" pgrbind.RecBindingInfo.Val.DisplayName
 
                     // Any declared method parameters can always be generalized
-                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g pgrbind.RecBindingInfo.DeclaredTypars))
+                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference g pgrbind.RecBindingInfo.DeclaredTypars))
 
                     if freeInBinding.IsEmpty then true else
 
@@ -11452,12 +11706,12 @@ and TcIncrementalLetRecGeneralization cenv scopem
 
         let freeInEnv =
             (freeInEnv, newGeneralizableBindings) ||> List.fold (fun freeInEnv pgrbind ->
-                if GeneralizationHelpers.IsGeneralizableValue cenv.g pgrbind.CheckedBinding.Expr then
+                if GeneralizationHelpers.IsGeneralizableValue g pgrbind.CheckedBinding.Expr then
                     freeInEnv
                 else
                     let freeInBinding = (freeInType CollectAllNoCaching pgrbind.RecBindingInfo.Val.TauType).FreeTypars
-                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g pgrbind.ExtraGeneralizableTypars))
-                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g pgrbind.RecBindingInfo.DeclaredTypars))
+                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference g pgrbind.ExtraGeneralizableTypars))
+                    let freeInBinding = Zset.diff freeInBinding (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference g pgrbind.RecBindingInfo.DeclaredTypars))
                     Zset.union freeInBinding freeInEnv)
 
         // Process the bindings marked for transition from PreGeneralization --> PostGeneralization
@@ -11479,7 +11733,7 @@ and TcIncrementalLetRecGeneralization cenv scopem
 
         newGeneralizedRecBinds, preGeneralizationRecBinds, tpenv
 
-    let envNonRec = envNonRec |> AddLocalVals cenv.g cenv.tcSink scopem (newGeneralizedRecBinds |> List.map (fun b -> b.RecBindingInfo.Val))
+    let envNonRec = envNonRec |> AddLocalVals g cenv.tcSink scopem (newGeneralizedRecBinds |> List.map (fun b -> b.RecBindingInfo.Val))
     let generalizedRecBinds = newGeneralizedRecBinds @ generalizedRecBinds
 
     (envNonRec, generalizedRecBinds, preGeneralizationRecBinds, tpenv, uncheckedRecBindsTable)
@@ -11491,7 +11745,9 @@ and TcIncrementalLetRecGeneralization cenv scopem
 /// Compute the type variables which may be generalized and perform the generalization
 and TcLetrecComputeAndGeneralizeGenericTyparsForBinding cenv denv freeInEnv (pgrbind: PreGeneralizationRecursiveBinding) =
 
-    let freeInEnv = Zset.diff freeInEnv (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference cenv.g pgrbind.ExtraGeneralizableTypars))
+    let g = cenv.g
+
+    let freeInEnv = Zset.diff freeInEnv (Zset.ofList typarOrder (NormalizeDeclaredTyparsForEquiRecursiveInference g pgrbind.ExtraGeneralizableTypars))
 
     let rbinfo = pgrbind.RecBindingInfo
     let vspec = rbinfo.Val
@@ -11512,7 +11768,7 @@ and TcLetrecComputeAndGeneralizeGenericTyparsForBinding cenv denv freeInEnv (pgr
     let canInferTypars = CanInferExtraGeneralizedTyparsForRecBinding pgrbind
 
     let tau = vspec.TauType
-    let maxInferredTypars = freeInTypeLeftToRight cenv.g false tau
+    let maxInferredTypars = freeInTypeLeftToRight g false tau
 
     let canGeneralizeConstrained = GeneralizationHelpers.CanGeneralizeConstrainedTyparsForDecl rbinfo.DeclKind
     let generalizedTypars = GeneralizationHelpers.ComputeAndGeneralizeGenericTypars (cenv, denv, m, freeInEnv, canInferTypars, canGeneralizeConstrained, inlineFlag, Some expr, allDeclaredTypars, maxInferredTypars, tau, isCtor)
@@ -11520,9 +11776,10 @@ and TcLetrecComputeAndGeneralizeGenericTyparsForBinding cenv denv freeInEnv (pgr
 
 /// Compute the type variables which may have member constraints that need to be canonicalized prior to generalization
 and TcLetrecComputeSupportForBinding cenv (pgrbind: PreGeneralizationRecursiveBinding) =
+    let g = cenv.g
     let rbinfo = pgrbind.RecBindingInfo
     let allDeclaredTypars = rbinfo.EnclosingDeclaredTypars @ rbinfo.DeclaredTypars
-    let maxInferredTypars = freeInTypeLeftToRight cenv.g false rbinfo.Val.TauType
+    let maxInferredTypars = freeInTypeLeftToRight g false rbinfo.Val.TauType
     allDeclaredTypars @ maxInferredTypars
 
 //-------------------------------------------------------------------------
@@ -11532,6 +11789,7 @@ and TcLetrecComputeSupportForBinding cenv (pgrbind: PreGeneralizationRecursiveBi
 // Generalise generalizedTypars from checkedBind.
 and TcLetrecGeneralizeBinding cenv denv generalizedTypars (pgrbind: PreGeneralizationRecursiveBinding) : PostGeneralizationRecursiveBinding =
 
+    let g = cenv.g
     let (RecursiveBindingInfo(_, _, enclosingDeclaredTypars, _, vspec, explicitTyparInfo, partialValReprInfo, memberInfoOpt, _, _, _, vis, _, declKind)) = pgrbind.RecBindingInfo
     let (CheckedBindingInfo(inlineFlag, _, _, _, _, _, expr, argAttribs, _, _, _, compgen, _, isFixed)) = pgrbind.CheckedBinding
 
@@ -11543,7 +11801,7 @@ and TcLetrecGeneralizeBinding cenv denv generalizedTypars (pgrbind: PreGeneraliz
     let pvalscheme1 = PrelimValScheme1(vspec.Id, explicitTyparInfo, tau, Some partialValReprInfo, memberInfoOpt, false, inlineFlag, NormalVal, argAttribs, vis, compgen)
     let pvalscheme2 = GeneralizeVal cenv denv enclosingDeclaredTypars generalizedTypars pvalscheme1
 
-    let valscheme = UseCombinedArity cenv.g declKind expr pvalscheme2
+    let valscheme = UseCombinedArity g declKind expr pvalscheme2
     AdjustRecType vspec valscheme
 
     { ValScheme = valscheme
@@ -11552,12 +11810,13 @@ and TcLetrecGeneralizeBinding cenv denv generalizedTypars (pgrbind: PreGeneraliz
 
 
 and TcLetrecComputeCtorSafeThisValBind cenv safeThisValOpt =
+    let g = cenv.g
     match safeThisValOpt with
     | None -> None
     | Some (v: Val) ->
         let m = v.Range
-        let ty = destRefCellTy cenv.g v.Type
-        Some (mkCompGenBind v (mkRefCell cenv.g m ty (mkNull m ty)))
+        let ty = destRefCellTy g v.Type
+        Some (mkCompGenBind v (mkRefCell g m ty (mkNull m ty)))
 
 and MakeCheckSafeInitField g tinst thisValOpt rfref reqExpr (expr: Expr) =
     let m = expr.Range
@@ -11594,6 +11853,7 @@ and MakeCheckSafeInit g tinst safeInitInfo reqExpr expr =
 
 and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiveBinding) : PostSpecialValsRecursiveBinding =
 
+    let g = cenv.g
     let (RecursiveBindingInfo(_, _, _, _, vspec, _, _, _, baseValOpt, safeThisValOpt, safeInitInfo, _, _, _)) = pgrbind.RecBindingInfo
     let expr = pgrbind.CheckedBinding.Expr
     let spBind = pgrbind.CheckedBinding.DebugPoint
@@ -11604,7 +11864,7 @@ and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiv
         | Some bind ->
             let m = expr.Range
             let tps, vsl, body, returnTy = stripTopLambda (expr, vspec.Type)
-            mkMultiLambdas m tps vsl (mkLetBind m bind body, returnTy)
+            mkMultiLambdas g m tps vsl (mkLetBind m bind body, returnTy)
 
     // Add a call to CheckInit if necessary for instance members
     let expr =
@@ -11615,9 +11875,9 @@ and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiv
                 let tps, vsl, body, returnTy = stripTopLambda (expr, vspec.Type)
                 // This is an instance member, it must have a 'this'
                 let thisVar = vsl.Head.Head
-                let thisTypeInst = argsOfAppTy cenv.g thisVar.Type
-                let newBody = MakeCheckSafeInitField cenv.g thisTypeInst (Some thisVar) rfref (mkOne cenv.g m) body
-                mkMultiLambdas m tps vsl (newBody, returnTy)
+                let thisTypeInst = argsOfAppTy g thisVar.Type
+                let newBody = MakeCheckSafeInitField g thisTypeInst (Some thisVar) rfref (mkOne g m) body
+                mkMultiLambdas g m tps vsl (newBody, returnTy)
             | NoSafeInitInfo ->
                 expr
 
@@ -11630,12 +11890,13 @@ and TcLetrecAdjustMemberForSpecialVals cenv (pgrbind: PostGeneralizationRecursiv
         | _ ->
             let m = expr.Range
             let tps, vsl, body, returnTy = stripTopLambda (expr, vspec.Type)
-            mkMemberLambdas m tps None baseValOpt vsl (body, returnTy)
+            mkMemberLambdas g m tps None baseValOpt vsl (body, returnTy)
 
     { ValScheme = pgrbind.ValScheme
       Binding = TBind(vspec, expr, spBind) }
 
 and FixupLetrecBind cenv denv generalizedTyparsForRecursiveBlock (bind: PostSpecialValsRecursiveBinding) =
+    let g = cenv.g
     let (TBind(vspec, expr, spBind)) = bind.Binding
 
     // Check coherence of generalization of variables for memberInfo members in generic classes
@@ -11645,9 +11906,9 @@ and FixupLetrecBind cenv denv generalizedTyparsForRecursiveBlock (bind: PostSpec
 #else
     | Some _ ->
 #endif
-       match PartitionValTyparsForApparentEnclosingType cenv.g vspec with
+       match PartitionValTyparsForApparentEnclosingType g vspec with
        | Some(parentTypars, memberParentTypars, _, _, _) ->
-          ignore(SignatureConformance.Checker(cenv.g, cenv.amap, denv, SignatureRepackageInfo.Empty, false).CheckTypars vspec.Range TypeEquivEnv.Empty memberParentTypars parentTypars)
+          ignore(SignatureConformance.Checker(g, cenv.amap, denv, SignatureRepackageInfo.Empty, false).CheckTypars vspec.Range TypeEquivEnv.Empty memberParentTypars parentTypars)
        | None ->
           errorR(Error(FSComp.SR.tcMemberIsNotSufficientlyGeneric(), vspec.Range))
     | _ -> ()
@@ -11657,7 +11918,7 @@ and FixupLetrecBind cenv denv generalizedTyparsForRecursiveBlock (bind: PostSpec
 
     AdjustAndForgetUsesOfRecValue cenv (mkLocalValRef vspec) bind.ValScheme
 
-    let expr = mkGenericBindRhs cenv.g vspec.Range generalizedTyparsForRecursiveBlock bind.ValScheme.TypeScheme expr
+    let expr = mkGenericBindRhs g vspec.Range generalizedTyparsForRecursiveBlock bind.ValScheme.TypeScheme expr
 
     { FixupPoints = fixupPoints
       Binding = TBind(vspec, expr, spBind) }
@@ -11670,11 +11931,13 @@ and unionGeneralizedTypars typarSets = List.foldBack (ListSet.unionFavourRight t
 
 and TcLetrecBindings overridesOK cenv env tpenv (binds, bindsm, scopem) =
 
+    let g = cenv.g
+
     // Create prelimRecValues for the recursive items (includes type info from LHS of bindings) *)
     let binds = binds |> List.map (fun (RecDefnBindingInfo(a, b, c, bind)) -> NormalizedRecBindingDefn(a, b, c, BindingNormalization.NormalizeBinding ValOrMemberBinding cenv env bind))
     let uncheckedRecBinds, prelimRecValues, (tpenv, _) = AnalyzeAndMakeAndPublishRecursiveValues overridesOK cenv env tpenv binds
 
-    let envRec = AddLocalVals cenv.g cenv.tcSink scopem prelimRecValues env
+    let envRec = AddLocalVals g cenv.tcSink scopem prelimRecValues env
 
     // Typecheck bindings
     let uncheckedRecBindsTable = uncheckedRecBinds |> List.map (fun rbind -> rbind.RecBindingInfo.Val.Stamp, rbind) |> Map.ofList
@@ -11709,7 +11972,7 @@ and TcLetrecBindings overridesOK cenv env tpenv (binds, bindsm, scopem) =
 
         let results =
            EliminateInitializationGraphs
-             cenv.g mustHaveArity env.DisplayEnv
+             g mustHaveArity env.DisplayEnv
              bindsWithoutLaziness
              //(fun
              (fun doBindings bindings -> doBindings bindings)
@@ -11719,7 +11982,7 @@ and TcLetrecBindings overridesOK cenv env tpenv (binds, bindsm, scopem) =
         List.concat results
 
     // Post letrec env
-    let envbody = AddLocalVals cenv.g cenv.tcSink scopem prelimRecValues env
+    let envbody = AddLocalVals g cenv.tcSink scopem prelimRecValues env
     binds, envbody, tpenv
 
 //-------------------------------------------------------------------------
@@ -11728,26 +11991,28 @@ and TcLetrecBindings overridesOK cenv env tpenv (binds, bindsm, scopem) =
 
 let TcAndPublishValSpec (cenv, env, containerInfo: ContainerInfo, declKind, memFlagsOpt, tpenv, valSpfn) =
 
-  let (SynValSig (attributes=Attributes synAttrs; explicitValDecls=ValTyparDecls (synTypars, _, synCanInferTypars); isInline=isInline; isMutable=mutableFlag; xmlDoc=doc; accessibility=vis; synExpr=literalExprOpt; range=m)) = valSpfn
+    let g = cenv.g
+
+    let (SynValSig (attributes=Attributes synAttrs; explicitValDecls=ValTyparDecls (synTypars, _, synCanInferTypars); isInline=isInline; isMutable=mutableFlag; xmlDoc=doc; accessibility=vis; synExpr=literalExprOpt; range=m)) = valSpfn
 
-  GeneralizationHelpers.CheckDeclaredTyparsPermitted(memFlagsOpt, synTypars, m)
-  let canInferTypars = GeneralizationHelpers.ComputeCanInferExtraGeneralizableTypars (containerInfo.ParentRef, synCanInferTypars, memFlagsOpt)
+    GeneralizationHelpers.CheckDeclaredTyparsPermitted(memFlagsOpt, synTypars, m)
+    let canInferTypars = GeneralizationHelpers.ComputeCanInferExtraGeneralizableTypars (containerInfo.ParentRef, synCanInferTypars, memFlagsOpt)
 
-  let attrTgt = DeclKind.AllowedAttribTargets memFlagsOpt declKind
+    let attrTgt = DeclKind.AllowedAttribTargets memFlagsOpt declKind
 
-  let attrs = TcAttributes cenv env attrTgt synAttrs
-  let newOk = if canInferTypars then NewTyparsOK else NoNewTypars
+    let attrs = TcAttributes cenv env attrTgt synAttrs
+    let newOk = if canInferTypars then NewTyparsOK else NoNewTypars
 
-  let valinfos, tpenv = TcValSpec cenv env declKind newOk containerInfo memFlagsOpt None tpenv valSpfn attrs
-  let denv = env.DisplayEnv
+    let valinfos, tpenv = TcValSpec cenv env declKind newOk containerInfo memFlagsOpt None tpenv valSpfn attrs
+    let denv = env.DisplayEnv
 
-  (tpenv, valinfos) ||> List.mapFold (fun tpenv valSpecResult ->
+    (tpenv, valinfos) ||> List.mapFold (fun tpenv valSpecResult ->
 
             let (ValSpecResult (altActualParent, memberInfoOpt, id, enclosingDeclaredTypars, declaredTypars, ty, partialValReprInfo, declKind)) = valSpecResult
 
             let inlineFlag = ComputeInlineFlag (memberInfoOpt |> Option.map (fun (PreValMemberInfo(memberInfo, _, _)) -> memberInfo.MemberFlags)) isInline mutableFlag m
 
-            let freeInType = freeInTypeLeftToRight cenv.g false ty
+            let freeInType = freeInTypeLeftToRight g false ty
 
             let allDeclaredTypars = enclosingDeclaredTypars @ declaredTypars
 
@@ -11769,7 +12034,7 @@ let TcAndPublishValSpec (cenv, env, containerInfo: ContainerInfo, declKind, memF
             let literalValue =
                 match literalExprOpt with
                 | None ->
-                    let hasLiteralAttr = HasFSharpAttribute cenv.g cenv.g.attrib_LiteralAttribute attrs
+                    let hasLiteralAttr = HasFSharpAttribute g g.attrib_LiteralAttribute attrs
                     if hasLiteralAttr then
                         errorR(Error(FSComp.SR.tcLiteralAttributeRequiresConstantValue(), m))
                     None
@@ -11787,6 +12052,7 @@ let TcAndPublishValSpec (cenv, env, containerInfo: ContainerInfo, declKind, memF
 
             let doc = doc.ToXmlDoc(true, paramNames)
             let vspec = MakeAndPublishVal cenv env (altActualParent, true, declKind, ValNotInRecScope, valscheme, attrs, doc, literalValue, false)
+
             assert(vspec.InlineInfo = inlineFlag)
 
             vspec, tpenv)
diff --git a/src/fsharp/CheckFormatStrings.fs b/src/fsharp/CheckFormatStrings.fs
index a24be5dc6ee..703de5ff167 100644
--- a/src/fsharp/CheckFormatStrings.fs
+++ b/src/fsharp/CheckFormatStrings.fs
@@ -425,14 +425,14 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   checkOtherFlags ch
                   collectSpecifierLocation fragLine fragCol 1
                   let i = skipPossibleInterpolationHole (i+1)
-                  parseLoop ((posi, NewInferenceType ()) :: acc) (i, fragLine, fragCol+1) fragments
+                  parseLoop ((posi, NewInferenceType g) :: acc) (i, fragLine, fragCol+1) fragments
 
               // residue of hole "...{n}..." in interpolated strings become %P(...) 
               | 'P' when isInterpolated ->
                   checkOtherFlags ch
                   let i = requireAndSkipInterpolationHoleFormat (i+1)
                   // Note, the fragCol doesn't advance at all as these are magically inserted.  
-                  parseLoop ((posi, NewInferenceType ()) :: acc) (i, fragLine, startFragCol) fragments
+                  parseLoop ((posi, NewInferenceType g) :: acc) (i, fragLine, startFragCol) fragments
 
               | 'A' ->
                   match info.numPrefixIfPos with
@@ -440,15 +440,15 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   | Some '+' -> 
                       collectSpecifierLocation fragLine fragCol 1
                       let i = skipPossibleInterpolationHole (i+1)
-                      let xty = NewInferenceType ()
+                      let xty = NewInferenceType g
                       percentATys.Add(xty)
                       parseLoop ((posi, xty) :: acc)  (i, fragLine, fragCol+1) fragments
                   | Some n -> failwithf "%s" <| FSComp.SR.forDoesNotSupportPrefixFlag(ch.ToString(), n.ToString())
 
               | 'a' ->
                   checkOtherFlags ch
-                  let xty = NewInferenceType () 
-                  let fty = printerArgTy --> (xty --> printerResidueTy)
+                  let xty = NewInferenceType g 
+                  let fty = mkFunTy g printerArgTy (mkFunTy g xty printerResidueTy)
                   collectSpecifierLocation fragLine fragCol 2
                   let i = skipPossibleInterpolationHole (i+1)
                   parseLoop ((Option.map ((+)1) posi, xty) ::  (posi, fty) :: acc) (i, fragLine, fragCol+1) fragments
@@ -457,7 +457,7 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
                   checkOtherFlags ch
                   collectSpecifierLocation fragLine fragCol 1
                   let i = skipPossibleInterpolationHole (i+1)
-                  parseLoop ((posi, printerArgTy --> printerResidueTy) :: acc)  (i, fragLine, fragCol+1) fragments
+                  parseLoop ((posi, mkFunTy g printerArgTy printerResidueTy) :: acc)  (i, fragLine, fragCol+1) fragments
 
               | c -> failwithf "%s" <| FSComp.SR.forBadFormatSpecifierGeneral(String.make 1 c)
           
@@ -473,7 +473,7 @@ let parseFormatStringInternal (m: range) (fragRanges: range list) (g: TcGlobals)
 
 let ParseFormatString m fragmentRanges g isInterpolated isFormattableString formatStringCheckContext fmt printerArgTy printerResidueTy printerResultTy = 
     let argTys, specifierLocations, dotnetFormatString, percentATys = parseFormatStringInternal m fragmentRanges g isInterpolated isFormattableString formatStringCheckContext fmt printerArgTy printerResidueTy
-    let printerTy = List.foldBack (-->) argTys printerResultTy
+    let printerTy = List.foldBack (mkFunTy g) argTys printerResultTy
     let printerTupleTy = mkRefTupledTy g argTys
     argTys, printerTy, printerTupleTy, percentATys, specifierLocations, dotnetFormatString
 
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 60fe6051355..751fa3f2e28 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -96,7 +96,8 @@ let NewErrorTypar () =
 let NewErrorMeasureVar () =
     NewCompGenTypar (TyparKind.Measure, TyparRigidity.Flexible, TyparStaticReq.None, TyparDynamicReq.No, true)
 
-let NewInferenceType () =
+let NewInferenceType (g: TcGlobals) = 
+    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     mkTyparTy (Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, SynTypar(compgenId, TyparStaticReq.None, true), false, TyparDynamicReq.No, [], false, false))
 
 let NewErrorType () =
@@ -110,7 +111,7 @@ let NewByRefKindInferenceType (g: TcGlobals) m =
         tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, []), m)]
     mkTyparTy tp
 
-let NewInferenceTypes l = l |> List.map (fun _ -> NewInferenceType ()) 
+let NewInferenceTypes g l = l |> List.map (fun _ -> NewInferenceType g) 
 
 // QUERY: should 'rigid' ever really be 'true'? We set this when we know 
 // we are going to have to generalize a typar, e.g. when implementing a 
@@ -123,9 +124,11 @@ let FreshenAndFixupTypars m rigid fctps tinst tpsorig =
     let renaming, tinst = FixupNewTypars m fctps tinst tpsorig tps
     tps, renaming, tinst
 
-let FreshenTypeInst m tpsorig = FreshenAndFixupTypars m TyparRigidity.Flexible [] [] tpsorig 
+let FreshenTypeInst m tpsorig =
+    FreshenAndFixupTypars m TyparRigidity.Flexible [] [] tpsorig 
 
-let FreshMethInst m fctps tinst tpsorig = FreshenAndFixupTypars m TyparRigidity.Flexible fctps tinst tpsorig 
+let FreshMethInst m fctps tinst tpsorig =
+    FreshenAndFixupTypars m TyparRigidity.Flexible fctps tinst tpsorig 
 
 let FreshenTypars m tpsorig = 
     match tpsorig with 
@@ -1015,7 +1018,7 @@ and solveTypMeetsTyparConstraints (csenv: ConstraintSolverEnv) ndeep m2 trace ty
               | ValueSome destTypar ->
                   AddConstraint csenv ndeep m2 trace destTypar (TyparConstraint.DefaultsTo(priority, dty, m))
           
-      | TyparConstraint.SupportsNull m2                -> SolveTypeSupportsNull               csenv ndeep m2 trace ty
+      | TyparConstraint.SupportsNull m2                -> SolveTypeUseSupportsNull            csenv ndeep m2 trace ty
       | TyparConstraint.IsEnum(underlying, m2)         -> SolveTypeIsEnum                     csenv ndeep m2 trace ty underlying
       | TyparConstraint.SupportsComparison(m2)         -> SolveTypeSupportsComparison         csenv ndeep m2 trace ty
       | TyparConstraint.SupportsEquality(m2)           -> SolveTypeSupportsEquality           csenv ndeep m2 trace ty
@@ -1160,7 +1163,8 @@ and SolveTypeEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTr
     | TType_ucase (uc1, l1), TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2  -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
     | _  -> localAbortD
 
-and SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace ty1 ty2 = SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace None ty1 ty2
+and SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace ty1 ty2 =
+    SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace None ty1 ty2
 
 and private SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ty1 ty2 = 
    // Back out of expansions of type abbreviations to give improved error messages. 
@@ -1800,7 +1804,7 @@ and MemberConstraintSolutionOfMethInfo css m minfo minst =
         let allArgVars, allArgs = minfo.GetParamTypes(amap, m, minst) |> List.concat |> List.mapi (fun i ty -> mkLocal m ("arg"+string i) ty) |> List.unzip
         let objArgVars, objArgs = (if minfo.IsInstance then [mkLocal m "this" minfo.ApparentEnclosingType] else []) |> List.unzip
         let callMethInfoOpt, callExpr, callExprTy = ProvidedMethodCalls.BuildInvokerExpressionForProvidedMethodCall css.TcVal (g, amap, mi, objArgs, NeverMutates, false, ValUseFlag.NormalValUse, allArgs, m) 
-        let closedExprSln = ClosedExprSln (mkLambdas m [] (objArgVars@allArgVars) (callExpr, callExprTy) )
+        let closedExprSln = ClosedExprSln (mkLambdas g m [] (objArgVars@allArgVars) (callExpr, callExprTy) )
 
         // If the call is a simple call to an IL method with all the arguments in the natural order, then revert to use ILMethSln.
         // This is important for calls to operators on generated provided types. There is an (unchecked) condition
@@ -2114,7 +2118,7 @@ and AddConstraint (csenv: ConstraintSolverEnv) ndeep m2 trace tp newConstraint
             ()
     }
 
-and SolveTypeSupportsNull (csenv: ConstraintSolverEnv) ndeep m2 trace ty =
+and SolveTypeUseSupportsNull (csenv: ConstraintSolverEnv) ndeep m2 trace ty =
     let g = csenv.g
     let m = csenv.m
     let denv = csenv.DisplayEnv
@@ -2356,14 +2360,14 @@ and SolveTypeRequiresDefaultValue (csenv: ConstraintSolverEnv) ndeep m2 trace or
         if isNonNullableStructTyparTy g ty then
             SolveTypeRequiresDefaultConstructor csenv ndeep m2 trace ty 
         elif isReferenceTyparTy g ty then
-            SolveTypeSupportsNull csenv ndeep m2 trace ty
+            SolveTypeUseSupportsNull csenv ndeep m2 trace ty
         else
             ErrorD (ConstraintSolverError(FSComp.SR.csGenericConstructRequiresStructOrReferenceConstraint(), m, m2))
     else
         if isStructTy g ty then
              SolveTypeRequiresDefaultConstructor csenv ndeep m2 trace ty 
         else
-             SolveTypeSupportsNull csenv ndeep m2 trace ty
+             SolveTypeUseSupportsNull csenv ndeep m2 trace ty
 
 // Parameterized compatibility relation between member signatures.  The real work
 // is done by "equateTypes" and "subsumeTypes" and "subsumeArg"
@@ -3317,10 +3321,10 @@ let AddCxMethodConstraint denv css m trace traitInfo  =
         (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m)))
     |> RaiseOperationResult
 
-let AddCxTypeMustSupportNull denv css m trace ty =
+let AddCxTypeUseSupportsNull denv css m trace ty =
     let csenv = MakeConstraintSolverEnv ContextInfo.NoContext css m denv
     PostponeOnFailedMemberConstraintResolution csenv trace
-        (fun csenv -> SolveTypeSupportsNull csenv 0 m trace ty)
+        (fun csenv -> SolveTypeUseSupportsNull csenv 0 m trace ty)
         (fun res -> ErrorD (ErrorFromAddingConstraint(denv, res, m)))
     |> RaiseOperationResult
 
diff --git a/src/fsharp/ConstraintSolver.fsi b/src/fsharp/ConstraintSolver.fsi
index a7ada976a4c..37d86e35afd 100644
--- a/src/fsharp/ConstraintSolver.fsi
+++ b/src/fsharp/ConstraintSolver.fsi
@@ -19,7 +19,7 @@ open FSharp.Compiler.TypedTreeOps
 val NewAnonTypar: TyparKind * range * TyparRigidity * TyparStaticReq * TyparDynamicReq -> Typar
 
 /// Create an inference type variable 
-val NewInferenceType: unit -> TType
+val NewInferenceType: TcGlobals -> TType
 
 /// Create an inference type variable for the kind of a byref pointer
 val NewByRefKindInferenceType: TcGlobals -> range -> TType
@@ -31,7 +31,7 @@ val NewErrorType: unit -> TType
 val NewErrorMeasure: unit -> Measure
 
 /// Create a list of inference type variables, one for each element in the input list
-val NewInferenceTypes: 'a list -> TType list
+val NewInferenceTypes: TcGlobals -> 'a list -> TType list
 
 /// Given a set of formal type parameters and their constraints, make new inference type variables for
 /// each and ensure that the constraints on the new type variables are adjusted to refer to these.
@@ -186,7 +186,7 @@ val AddCxTypeMustSubsumeTypeMatchingOnlyUndoIfFailed: DisplayEnv -> ConstraintSo
 
 val AddCxMethodConstraint: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TraitConstraintInfo -> unit
 
-val AddCxTypeMustSupportNull: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit
+val AddCxTypeUseSupportsNull: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit
 
 val AddCxTypeMustSupportComparison: DisplayEnv -> ConstraintSolverState -> range -> OptionalTrace -> TType -> unit
 
diff --git a/src/fsharp/DetupleArgs.fs b/src/fsharp/DetupleArgs.fs
index 2e37c37154d..b5bfd2d11a2 100644
--- a/src/fsharp/DetupleArgs.fs
+++ b/src/fsharp/DetupleArgs.fs
@@ -110,7 +110,7 @@ let DetupleRewriteStackGuardDepth = StackGuard.GetDepthOption "DetupleRewrite"
 //
 // 4. Fixup defn bindings.
 //
-//    [[DEFN: fOrig  = LAM tps. lam x1 ...xp xq...xN. body ]]
+//    [[DEFN: fOrig = LAM tps. lam x1 ...xp xq...xN. body ]]
 //    ->
 //           transformedVal = LAM tps. lam [[FORMALS: yb1...ybp]] xq...xN. [[REBINDS x1, yb1 ... xp, ybp]] [[FIX: body]]
 //
@@ -166,7 +166,7 @@ module GlobalUsageAnalysis =
     let GetValsBoundInExpr expr =
        let folder = {ExprFolder0 with valBindingSiteIntercept = bindAccBounds}
        let z0 = Zset.empty valOrder
-       let z  = FoldExpr folder z0 expr
+       let z = FoldExpr folder z0 expr
        z
 
     type accessor = TupleGet of int * TType list
@@ -196,12 +196,12 @@ module GlobalUsageAnalysis =
        }
 
     let z0 =
-       { Uses     = Zmap.empty valOrder
-         Defns     = Zmap.empty valOrder
-         RecursiveBindings  = Zmap.empty valOrder
-         DecisionTreeBindings    = Zset.empty valOrder
+       { Uses = Zmap.empty valOrder
+         Defns = Zmap.empty valOrder
+         RecursiveBindings = Zmap.empty valOrder
+         DecisionTreeBindings = Zset.empty valOrder
          TopLevelBindings = Zset.empty valOrder
-         IterationIsAtTopLevel      = true }
+         IterationIsAtTopLevel = true }
 
     /// Log the use of a value with a particular tuple shape at a callsite
     /// Note: this routine is called very frequently
@@ -228,7 +228,7 @@ module GlobalUsageAnalysis =
     let logRecBindings z binds =
         let vs = valsOfBinds binds
         {z with RecursiveBindings = (z.RecursiveBindings, vs) ||> List.fold (fun mubinds v -> Zmap.add v (true, vs) mubinds)
-                Defns    = (z.Defns, binds) ||> List.fold (fun eqns bind -> Zmap.add bind.Var bind.Expr eqns)  } 
+                Defns = (z.Defns, binds) ||> List.fold (fun eqns bind -> Zmap.add bind.Var bind.Expr eqns)  } 
 
     /// Work locally under a lambda of some kind
     let foldUnderLambda f z x =
@@ -302,11 +302,11 @@ module GlobalUsageAnalysis =
       let tmethodIntercept exprF z = function TObjExprMethod(_, _, _, _, e, _m) -> Some (foldUnderLambda exprF z e)
       
       {ExprFolder0 with
-         exprIntercept    = exprUsageIntercept
+         exprIntercept = exprUsageIntercept
          nonRecBindingsIntercept = logNonRecBinding
-         recBindingsIntercept    = logRecBindings
+         recBindingsIntercept = logRecBindings
          valBindingSiteIntercept = logBinding
-         targetIntercept  = targetIntercept
+         targetIntercept = targetIntercept
          tmethodIntercept = tmethodIntercept
       }
 
@@ -322,7 +322,7 @@ module GlobalUsageAnalysis =
 let internalError str = raise(Failure(str))
 
 let mkLocalVal m name ty topValInfo =
-    let compgen    = false
+    let compgen = false
     Construct.NewVal(name, m, None, ty, Immutable, compgen, topValInfo, taccessPublic, ValNotInRecScope, None, NormalVal, [], ValInline.Optional, XmlDoc.Empty, false, false, false, false, false, false, None, ParentNone) 
 
 /// Represents inferred information about a tuple value
@@ -373,8 +373,8 @@ let rebuildTS g m ts vs =
       | v :: vs, UnknownTS   -> (exprForVal m v, v.Type), vs
       | vs, TupleTS tss -> 
           let xtys, vs = List.mapFold rebuild vs tss
-          let xs, tys  = List.unzip xtys
-          let x  = mkRefTupled g m xs tys
+          let xs, tys = List.unzip xtys
+          let x = mkRefTupled g m xs tys
           let ty = mkRefTupledTy g tys
           (x, ty), vs
    
@@ -475,14 +475,14 @@ let mkTransform g (f: Val) m tps x1Ntys rty (callPattern, tyfringes: (TType list
     let tys1r = List.collect fst tyfringes  (* types for collapsed initial r args *)
     let tysrN = List.skip tyfringes.Length x1Ntys    (* types for remaining args *)
     let argtys = tys1r @ tysrN
-    let fCty  = mkLambdaTy tps argtys rty
+    let fCty = mkLambdaTy g tps argtys rty
     let transformedVal =
         // Ensure that we have an g.CompilerGlobalState
         assert(g.CompilerGlobalState |> Option.isSome)
         mkLocalVal f.Range (g.CompilerGlobalState.Value.NiceNameGenerator.FreshCompilerGeneratedName (f.LogicalName, f.Range)) fCty topValInfo
     { transformCallPattern = callPattern
-      transformedFormals      = transformedFormals
-      transformedVal         = transformedVal }
+      transformedFormals = transformedFormals
+      transformedVal = transformedVal }
 
 
 //-------------------------------------------------------------------------
@@ -503,7 +503,7 @@ let rec zipTupleStructureAndType g ts ty =
 
 and zipTupleStructuresAndTypes g tss tys =
     let tstys = List.map2 (zipTupleStructureAndType g) tss tys  // assumes tss tys same length 
-    let tss  = List.map fst tstys         
+    let tss = List.map fst tstys         
     let tys = List.collect snd tstys       // link fringes 
     tss, tys
 
@@ -554,20 +554,27 @@ let decideFormalSuggestedCP g z tys vss =
 //-------------------------------------------------------------------------
 
 let decideTransform g z v callPatterns (m, tps, vss: Val list list, rty) =
-    let tys = List.map (typeOfLambdaArg m) vss       (* arg types *)
-    (* NOTE: 'a in arg types may have been instanced at different tuples... *)
-    (*       commonCallPattern has to handle those cases. *)
-    let callPattern           = commonCallPattern callPatterns                   // common CallPattern 
-    let callPattern           = List.truncate vss.Length callPattern            // restricted to max nArgs 
+    let tys = List.map (typeOfLambdaArg m) vss
+
+    // NOTE: 'a in arg types may have been instanced at different tuples... 
+    //       commonCallPattern has to handle those cases.
+    let callPattern = commonCallPattern callPatterns                   
+
+    // Restrict to max nArgs 
+    let callPattern = List.truncate vss.Length callPattern
+
     // Get formal callPattern by defn usage of formals 
-    let formalCallPattern     = decideFormalSuggestedCP g z tys vss 
-    let callPattern           = List.truncate callPattern.Length formalCallPattern
+    let formalCallPattern = decideFormalSuggestedCP g z tys vss 
+    let callPattern = List.truncate callPattern.Length formalCallPattern
+
     // Zip with information about known args 
     let callPattern, tyfringes = zipCallPatternArgTys m g callPattern vss
+
     // Drop trivial tail AND 
-    let callPattern           = minimalCallPattern callPattern                     
+    let callPattern = minimalCallPattern callPattern                     
+
     // Shorten tyfringes (zippable) 
-    let tyfringes    = List.truncate callPattern.Length tyfringes       
+    let tyfringes = List.truncate callPattern.Length tyfringes       
     if isTrivialCP callPattern then
         None // no transform 
     else
@@ -602,7 +609,7 @@ let determineTransforms g (z : GlobalUsageAnalysis.Results) =
         match List.concat vss with
         | []      -> None // defn has no term args 
         | arg1 :: _ -> // consider f 
-          let m   = arg1.Range                       // mark of first arg, mostly for error reporting 
+          let m = arg1.Range                       // mark of first arg, mostly for error reporting 
           let callPatterns = sitesCPs sites                   // callPatterns from sites 
           decideTransform g z f callPatterns (m, tps, vss, rty) // make transform (if required) 
   
@@ -694,7 +701,7 @@ let rec collapseArg env bindings ts (x: Expr) =
     | TupleTS tss, x                      -> 
         // project components 
         let bindings, x = noEffectExpr env bindings x
-        let env  = suffixE env "_p" 
+        let env = suffixE env "_p" 
         let xty = tyOfExpr env.eg x
         let xtys = destRefTupleTy env.eg xty
         let bindings, xs = buildProjections env bindings x xtys
@@ -705,7 +712,7 @@ and collapseArgs env bindings n callPattern args =
     | [], args        -> bindings, args
     | ts :: tss, arg :: args -> 
         let env1 = suffixE env (string n)
-        let bindings, xty  = collapseArg  env1 bindings ts    arg     
+        let bindings, xty = collapseArg  env1 bindings ts    arg     
         let bindings, xtys = collapseArgs env  bindings (n+1) tss args
         bindings, xty @ xtys
     | _ts :: _tss, []            -> 
@@ -728,12 +735,12 @@ let fixupApp (penv: penv) (fx, fty, tys, args, m) =
         match hasTransfrom penv f with
         | Some trans -> 
             // fix it 
-            let callPattern       = trans.transformCallPattern 
-            let transformedVal       = trans.transformedVal         
-            let fCty     = transformedVal.Type
-            let fCx      = exprForVal vm transformedVal
+            let callPattern = trans.transformCallPattern 
+            let transformedVal = trans.transformedVal         
+            let fCty = transformedVal.Type
+            let fCx = exprForVal vm transformedVal
             (* [[f tps args ]] -> transformedVal tps [[COLLAPSED: args]] *)
-            let env      = {prefix = "arg";m = m;eg=penv.g}
+            let env = {prefix = "arg";m = m;eg=penv.g}
             let bindings = []
             let bindings, args = collapseArgs env bindings 0 callPattern args
             let bindings = List.rev bindings
@@ -778,6 +785,7 @@ let transRebind ybi xi =
 //
 
 let passBind penv (TBind(fOrig, repr, letSeqPtOpt) as bind) =
+     let g = penv.g
      let m = fOrig.Range
      match hasTransfrom penv fOrig with
      | None ->
@@ -787,21 +795,21 @@ let passBind penv (TBind(fOrig, repr, letSeqPtOpt) as bind) =
          // fOrig has transform 
          let tps, vss, body, rty = stripTopLambda (repr, fOrig.Type) 
          // transformedVal is curried version of fOrig 
-         let transformedVal    = trans.transformedVal
+         let transformedVal = trans.transformedVal
          // fCBody - parts - formals 
          let transformedFormals = trans.transformedFormals 
-         let p     = transformedFormals.Length
+         let p = transformedFormals.Length
          if (vss.Length < p) then internalError "passBinds: |vss|
 
         let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) 
-        let ty = mkMultiLambdaTy m argvs rty 
+        let ty = mkMultiLambdaTy cenv.g m argvs rty 
         accLambdas cenv env topValInfo expr ty
 
     | Expr.TyLambda (_, tps, _body, _m, rty)  -> 
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 0e2cf020cfe..6c0931c2a1a 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -1755,7 +1755,7 @@ type AssemblyBuilder(cenv: cenv, anonTypeTable: AnonTypeGenerationTable) as mgbu
                             Construct.NewRecdField false None (mkSynId m propName) false (mkTyparTy tp) true false [] [] XmlDoc.Empty taccessPublic false)))
 
             let tcref = mkLocalTyconRef tycon
-            let _, typ = generalizeTyconRef tcref
+            let typ = generalizedTyconRef g tcref
             let tcaug = tcref.TypeContents
 
             tcaug.tcaug_interfaces <-
@@ -7829,7 +7829,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
     | TFSharpRecdRepr _
     | TFSharpUnionRepr _ ->
         let eenvinner = EnvForTycon tycon eenv
-        let thisTy = generalizedTyconRef tcref
+        let thisTy = generalizedTyconRef g tcref
 
         let ilThisTy = GenType cenv.amap m eenvinner.tyenv thisTy
         let tref = ilThisTy.TypeRef
diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index 255a447de67..af1ee787497 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -148,8 +148,8 @@ let rec GetImmediateIntrinsicPropInfosOfTypeAux (optFilter, ad) g amap m origTy
                 match optFilter with
                 |   Some name ->
                         match st.PApply((fun st -> st.GetProperty name), m) with
-                        |   Tainted.Null -> [||]
-                        |   pi -> [|pi|]
+                        | Tainted.Null -> [||]
+                        | pi -> [|pi|]
                 |   None ->
                         st.PApplyArray((fun st -> st.GetProperties()), "GetProperties", m)
             matchingProps
@@ -191,7 +191,7 @@ let IsIndexerType g amap ty =
     isListTy g ty ||
     match tryTcrefOfAppTy g ty with
     | ValueSome tcref ->
-        let _, entityTy = generalizeTyconRef tcref
+        let entityTy = generalizedTyconRef g tcref
         let props = GetImmediateIntrinsicPropInfosOfType (None, AccessibleFromSomeFSharpCode) g amap range0 entityTy
         props |> List.exists (fun x -> x.PropertyName = "Item")
     | ValueNone -> false
@@ -306,8 +306,8 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
                         [ for fi in st.PApplyArray((fun st -> st.GetFields()), "GetFields", m) -> ProvidedField(amap, fi, m) ]
                 |   Some name ->
                         match st.PApply ((fun st -> st.GetField name), m) with
-                        |   Tainted.Null -> []
-                        |   fi -> [  ProvidedField(amap, fi, m) ]
+                        | Tainted.Null -> []
+                        | fi -> [  ProvidedField(amap, fi, m) ]
 #endif
             | ILTypeMetadata _ -> 
                 let tinfo = ILTypeInfo.FromType g ty
@@ -446,7 +446,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
                             |> List.tryPick (fun ty -> 
                                 match tryTcrefOfAppTy g ty with
                                 | ValueSome tcref when tcref.IsILTycon && tcref.ILTyconRawMetadata.Name = overridesTyFullName ->
-                                    generalizedTyconRef tcref
+                                    generalizedTyconRef g tcref
                                     |> Some
                                 | _ -> 
                                     None)
@@ -924,7 +924,7 @@ let GetSigOfFunctionForDelegate (infoReader: InfoReader) delty m ad =
         | _ -> compiledViewOfDelArgTys
     let delRetTy = invokeMethInfo.GetFSharpReturnTy(amap, m, minst)
     CheckMethInfoAttributes g m None invokeMethInfo |> CommitOperationResult
-    let fty = mkIteratedFunTy fsharpViewOfDelArgTys delRetTy
+    let fty = mkIteratedFunTy g fsharpViewOfDelArgTys delRetTy
     SigOfFunctionForDelegate(invokeMethInfo, compiledViewOfDelArgTys, delRetTy, fty)
 
 /// Try and interpret a delegate type as a "standard" .NET delegate type associated with an event, with a "sender" parameter.
diff --git a/src/fsharp/InnerLambdasToTopLevelFuncs.fs b/src/fsharp/InnerLambdasToTopLevelFuncs.fs
index f5788c9c810..13c9cda0b01 100644
--- a/src/fsharp/InnerLambdasToTopLevelFuncs.fs
+++ b/src/fsharp/InnerLambdasToTopLevelFuncs.fs
@@ -186,16 +186,19 @@ module Pass1_DetermineTLRAndArities =
            sites |> List.map (fun (_accessors, _tinst, args) -> List.length args) |> List.max
 
     let SelectTLRVals g xinfo f e =
-        if IsRefusedTLR g f then None
+        if IsRefusedTLR g f then
+            None
+
         // Exclude values bound in a decision tree
-        else if Zset.contains f xinfo.DecisionTreeBindings then None
+        elif Zset.contains f xinfo.DecisionTreeBindings then
+            None
         else
             // Could the binding be TLR? with what arity?
             let atTopLevel = Zset.contains f xinfo.TopLevelBindings
             let tps, vss, _b, _rty = stripTopLambda (e, f.Type)
-            let nFormals    = vss.Length
+            let nFormals = vss.Length
             let nMaxApplied = GetMaxNumArgsAtUses xinfo f
-            let arity       = Operators.min nFormals nMaxApplied
+            let arity = Operators.min nFormals nMaxApplied
             if atTopLevel || arity<>0 || not (isNil tps) then Some (f, arity)
             else None
 
@@ -211,7 +214,7 @@ module Pass1_DetermineTLRAndArities =
         let dump f n = dprintf "tlr: arity %50s = %d\n" (showL (valL f)) n
         Zmap.iter dump arityM
 
-    let DetermineTLRAndArities g expr  =
+    let DetermineTLRAndArities g expr =
        let xinfo = GetUsageInfoOfImplFile g expr
        let fArities = Zmap.chooseL (SelectTLRVals g xinfo) xinfo.Defns
        let fArities = List.filter (fst >> IsValueRecursionFree xinfo) fArities
@@ -220,9 +223,9 @@ module Pass1_DetermineTLRAndArities =
        let rejectS = GetValsBoundUnderMustInline xinfo
        let fArities = List.filter (fun (v, _) -> not (Zset.contains v rejectS)) fArities
        (*-*)
-       let tlrS   = Zset.ofList valOrder (List.map fst fArities)
-       let topValS   = xinfo.TopLevelBindings                     (* genuinely top level *)
-       let topValS   = Zset.filter (IsMandatoryNonTopLevel g >> not) topValS     (* restrict *)
+       let tlrS = Zset.ofList valOrder (List.map fst fArities)
+       let topValS = xinfo.TopLevelBindings                     (* genuinely top level *)
+       let topValS = Zset.filter (IsMandatoryNonTopLevel g >> not) topValS     (* restrict *)
        (* REPORT MISSED CASES *)
 #if DEBUG
        if verboseTLR then
@@ -349,13 +352,13 @@ type ReqdItemsForDefn =
 
     member env.Extend (typars, items) =
         {env with
-               reqdTypars   = Zset.addList typars env.reqdTypars
+               reqdTypars = Zset.addList typars env.reqdTypars
                reqdItems = Zset.addList items  env.reqdItems}
 
     static member Initial typars m =
-        {reqdTypars   = Zset.addList typars  (Zset.empty typarOrder)
+        {reqdTypars = Zset.addList typars  (Zset.empty typarOrder)
          reqdItems = Zset.empty reqdItemOrder
-         m      = m }
+         m = m }
 
     override env.ToString() =
         (showL (commaListL (List.map typarL (Zset.elements env.reqdTypars)))) + "--" +
@@ -394,10 +397,10 @@ module Pass2_DetermineReqdItems =
     //  - required to find an env for these.
     //  - start a new envCollector:
     //      freetps = freetypars of (fBody1, fBody2, ...)
-    //      freevs  = freevars   of ..
+    //      freevs = freevars   of ..
     //      initialise:
-    //        reqdTypars       = freetps
-    //        reqdItems     = []      -- info collected from generator occurrences in bindings
+    //        reqdTypars = freetps
+    //        reqdItems = []      -- info collected from generator occurrences in bindings
     //        reqdVals0 = freevs
     //  - fold bodies, collecting info for reqdVals0.
     //  - pop and save env.
@@ -433,10 +436,10 @@ module Pass2_DetermineReqdItems =
         }
 
     let state0 =
-        { stack         = []
-          reqdItemsMap  = Zmap.empty fclassOrder
-          fclassM       = Zmap.empty valOrder
-          revDeclist    = []
+        { stack = []
+          reqdItemsMap = Zmap.empty fclassOrder
+          fclassM = Zmap.empty valOrder
+          revDeclist = []
           recShortCallS = Zset.empty valOrder }
 
     /// PUSH = start collecting for fclass
@@ -458,9 +461,9 @@ module Pass2_DetermineReqdItems =
             | []                             -> internalError "trl: popFrame has empty stack"
             | (fclass, _reqdVals0, env) :: stack -> (* ASSERT: same fclass *)
                 {state with
-                   stack        = stack
+                   stack = stack
                    reqdItemsMap = Zmap.add  fclass env   state.reqdItemsMap
-                   fclassM      = List.fold (fun mp (k, v) -> Zmap.add k v mp) state.fclassM fclass.Pairs }
+                   fclassM = List.fold (fun mp (k, v) -> Zmap.add k v mp) state.fclassM fclass.Pairs }
 
     /// Log requirements for gv in the relevant stack frames
     let LogRequiredFrom gv items state =
@@ -523,7 +526,7 @@ module Pass2_DetermineReqdItems =
              // what determines env?
              let frees = FreeInBindings tlrBs
              // put in env
-             let reqdTypars0  = frees.FreeTyvars.FreeTypars |> Zset.elements     
+             let reqdTypars0 = frees.FreeTyvars.FreeTypars |> Zset.elements     
              // occurrences contribute to env 
              let reqdVals0 = frees.FreeLocals |> Zset.elements
              // tlrBs are not reqdVals0 for themselves 
@@ -576,16 +579,16 @@ module Pass2_DetermineReqdItems =
         if verboseTLR then dprintf "CloseReqdTypars------\n"
 
         let closeStep reqdItemsMap changed fc (env: ReqdItemsForDefn) =
-            let directCallReqdEnvs   = env.ReqdSubEnvs
+            let directCallReqdEnvs = env.ReqdSubEnvs
             let directCallReqdTypars = directCallReqdEnvs |> List.map (fun f ->
-                                            let fc  = Zmap.force f  fclassM ("reqdTyparsFor", nameOfVal)
+                                            let fc = Zmap.force f  fclassM ("reqdTyparsFor", nameOfVal)
                                             let env = Zmap.force fc reqdItemsMap    ("reqdTyparsFor", string)
                                             env.reqdTypars)
 
             let reqdTypars0 = env.reqdTypars
-            let reqdTypars  = List.fold Zset.union reqdTypars0 directCallReqdTypars
+            let reqdTypars = List.fold Zset.union reqdTypars0 directCallReqdTypars
             let changed = changed || (not (Zset.equal reqdTypars0 reqdTypars))
-            let env   = {env with reqdTypars = reqdTypars}
+            let env = {env with reqdTypars = reqdTypars}
 #if DEBUG
             if verboseTLR then
                 dprintf "closeStep: fc=%30A nSubs=%d reqdTypars0=%s reqdTypars=%s\n" fc directCallReqdEnvs.Length (showTyparSet reqdTypars0) (showTyparSet reqdTypars)
@@ -620,18 +623,18 @@ module Pass2_DetermineReqdItems =
         // Walk the entire assembly
         let z = FoldImplFile folder z expr
         // project results from the state
-        let reqdItemsMap          = z.reqdItemsMap
-        let fclassM       = z.fclassM
-        let declist       = List.rev z.revDeclist
+        let reqdItemsMap = z.reqdItemsMap
+        let fclassM = z.fclassM
+        let declist = List.rev z.revDeclist
         let recShortCallS = z.recShortCallS
         // diagnostic dump
 #if DEBUG
         if verboseTLR then DumpReqdValMap reqdItemsMap
 #endif
         // close the reqdTypars under the subEnv reln
-        let reqdItemsMap    = CloseReqdTypars fclassM reqdItemsMap
+        let reqdItemsMap = CloseReqdTypars fclassM reqdItemsMap
         // filter out trivial fclass - with no TLR defns
-        let reqdItemsMap    = Zmap.remove (BindingGroupSharingSameReqdItems List.empty) reqdItemsMap
+        let reqdItemsMap = Zmap.remove (BindingGroupSharingSameReqdItems []) reqdItemsMap
         // restrict declist to those with reqdItemsMap bindings (the non-trivial ones)
         let declist = List.filter (Zmap.memberOf reqdItemsMap) declist
 #if DEBUG
@@ -694,10 +697,10 @@ exception AbortTLR of range
 /// Define  for each vi in vals(env).
 ///  This is the cmap for the env.
 
-///  reqdTypars     = env.reqdTypars
+///  reqdTypars = env.reqdTypars
 ///  carriers = aenvi|i
-///  pack     = TBIND(aenvi = vi)            for each (aenvi, vi) in cmap
-///  unpack   = TBIND(vj = aenvFor(vj))      for each vj in reqvals(env).
+///  pack = TBIND(aenvi = vi)            for each (aenvi, vi) in cmap
+///  unpack = TBIND(vj = aenvFor(vj))      for each vj in reqvals(env).
 ///         and TBIND(asubEnvi = aenvFor(v)) for each (asubEnvi, v) in cmap(subEnvk) ranging over required subEnvk.
 /// where
 ///   aenvFor(v) = aenvi where (v, aenvi) in cmap.
@@ -759,19 +762,19 @@ let FlatEnvPacks g fclassM topValS declist (reqdItemsMap: Zmap List.map (fun v -> (v, (mkCompGenLocal env.m v.LogicalName v.Type |> fst)))
-       let cmap      = Zmap.ofList valOrder cmapPairs
+       let cmap = Zmap.ofList valOrder cmapPairs
        let aenvFor     v = Zmap.force v cmap ("aenvFor", nameOfVal)
        let aenvExprFor v = exprForVal env.m (aenvFor v)
 
        // build PackedReqdItems
-       let reqdTypars   = env.reqdTypars
-       let aenvs  = Zmap.values cmap
-       let pack   = cmapPairs |> List.map (fun (v, aenv) -> mkInvisibleBind aenv (exprForVal env.m v))
+       let reqdTypars = env.reqdTypars
+       let aenvs = Zmap.values cmap
+       let pack = cmapPairs |> List.map (fun (v, aenv) -> mkInvisibleBind aenv (exprForVal env.m v))
        let unpack =
            let unpackCarrier (v, aenv) = mkInvisibleBind (setValHasNoArity v) (exprForVal env.m aenv)
            let unpackSubenv f =
-               let subCMap  = carrierMapFor f
-               let vaenvs   = Zmap.toList subCMap
+               let subCMap = carrierMapFor f
+               let vaenvs = Zmap.toList subCMap
                vaenvs |> List.map (fun (subv, subaenv) -> mkBind DebugPointAtBinding.NoneAtInvisible subaenv (aenvExprFor subv))
            List.map unpackCarrier (Zmap.toList cmap) @
            List.collect unpackSubenv env.ReqdSubEnvs
@@ -785,15 +788,15 @@ let FlatEnvPacks g fclassM topValS declist (reqdItemsMap: Zmap showL (valL v)))
-        let fc     = Zmap.force f fclassM ("createFHat - fc", nameOfVal)
-        let envp   = Zmap.force fc envPackM ("CreateNewValuesForTLR - envp", string)
-        let name   = f.LogicalName (* + "_TLR_" + string wf *)
-        let m      = f.Range
-        let tps, tau    = f.TypeScheme
+        let wf = Zmap.force f arityM ("createFHat - wf", (fun v -> showL (valL v)))
+        let fc = Zmap.force f fclassM ("createFHat - fc", nameOfVal)
+        let envp = Zmap.force fc envPackM ("CreateNewValuesForTLR - envp", string)
+        let name = f.LogicalName (* + "_TLR_" + string wf *)
+        let m = f.Range
+        let tps, tau = f.TypeScheme
         let argtys, res = stripFunTy g tau
-        let newTps    = envp.ep_etps @ tps
+        let newTps = envp.ep_etps @ tps
+
         let fHatTy =
             let newArgtys = List.map typeOfVal envp.ep_aenvs @ argtys
-            mkLambdaTy newTps newArgtys res
+            mkLambdaTy g newTps newArgtys res
+
         let fHatArity = MakeSimpleArityInfo newTps (envp.ep_aenvs.Length + wf)
+
         let fHatName =
             // Ensure that we have an g.CompilerGlobalState
             assert(g.CompilerGlobalState |> Option.isSome)
@@ -866,9 +872,9 @@ let CreateNewValuesForTLR g tlrS arityM fclassM envPackM =
         let fHat = mkLocalNameTypeArity f.IsCompilerGenerated m fHatName fHatTy (Some fHatArity)
         fHat
 
-    let fs     = Zset.elements tlrS
+    let fs = Zset.elements tlrS
     let ffHats = List.map (fun f -> f, createFHat f) fs
-    let fHatM  = Zmap.ofList valOrder ffHats
+    let fHatM = Zmap.ofList valOrder ffHats
     fHatM
 
 
@@ -897,8 +903,8 @@ module Pass4_RewriteAssembly =
     // pass4: rwstate (z state)
     //-------------------------------------------------------------------------
 
-    type IsRecursive   = IsRec | NotRec
-    type LiftedDeclaration  = IsRecursive * Bindings (* where bool=true if letrec *)
+    type IsRecursive = IsRec | NotRec
+    type LiftedDeclaration = IsRecursive * Bindings (* where bool=true if letrec *)
 
     /// This state is related to lifting to top-level (which is actually disabled right now)
     /// This is to ensure the TLR constants get initialised once.
@@ -944,7 +950,7 @@ module Pass4_RewriteAssembly =
           [], z
 
     /// pop and set preDecs  as "LiftedDeclaration tree"
-    let PopPreDecs z     = {z with rws_preDecs=emptyTR}, z.rws_preDecs
+    let PopPreDecs z = {z with rws_preDecs=emptyTR}, z.rws_preDecs
 
     let SetPreDecs z pdt = {z with rws_preDecs=pdt}
 
@@ -974,7 +980,7 @@ module Pass4_RewriteAssembly =
     // pass4: lowertop - convert_vterm_bind on TopLevel binds
     //-------------------------------------------------------------------------
 
-    let AdjustBindToTopVal g (TBind(v, repr, _))  =
+    let AdjustBindToTopVal g (TBind(v, repr, _)) =
         match v.ValReprInfo with
         | None -> 
             v.SetValReprInfo (Some (InferArityOfExprBinding g AllowTypeDirectedDetupling.Yes v repr ))
@@ -992,55 +998,66 @@ module Pass4_RewriteAssembly =
     //   let f vss = fHat f_freeVars vss
     //   let fHat f_freeVars vss = f_body[, f_freeVars]
     let TransTLRBindings penv (binds: Bindings) =
-        if isNil binds then List.empty, List.empty else
-        let fc   = BindingGroupSharingSameReqdItems binds
+        let g = penv.g
+        if isNil binds then [], [] else
+        let fc = BindingGroupSharingSameReqdItems binds
         let envp = Zmap.force fc penv.envPackM ("TransTLRBindings", string)
 
         let fRebinding (TBind(fOrig, b, letSeqPtOpt)) =
             let m = fOrig.Range
             let tps, vss, _b, rty = stripTopLambda (b, fOrig.Type)
             let aenvExprs = envp.ep_aenvs |> List.map (exprForVal m)
-            let vsExprs   = vss |> List.map (mkRefTupledVars penv.g m)
-            let fHat      = Zmap.force fOrig penv.fHatM ("fRebinding", nameOfVal)
-            (* REVIEW: is this mutation really, really necessary? *)
-            (* Why are we applying TLR if the thing already has an arity? *)
+            let vsExprs = vss |> List.map (mkRefTupledVars penv.g m)
+            let fHat = Zmap.force fOrig penv.fHatM ("fRebinding", nameOfVal)
+
+            // REVIEW: is this mutation really, really necessary? 
+            // Why are we applying TLR if the thing already has an arity? 
             let fOrig = setValHasNoArity fOrig
+
             let fBind =
-               mkMultiLambdaBind fOrig letSeqPtOpt m tps vss
-                   (mkApps penv.g
-                            ((exprForVal m fHat, fHat.Type),
-                             [List.map mkTyparTy (envp.ep_etps @ tps)],
-                             aenvExprs @ vsExprs, m), rty)
+                 mkMultiLambdaBind g fOrig letSeqPtOpt m tps vss
+                     (mkApps penv.g
+                         ((exprForVal m fHat, fHat.Type),
+                          [List.map mkTyparTy (envp.ep_etps @ tps)],
+                          aenvExprs @ vsExprs, m), rty)
             fBind
 
         let fHatNewBinding (shortRecBinds: Bindings) (TBind(f, b, letSeqPtOpt)) =
-            let wf   = Zmap.force f penv.arityM ("fHatNewBinding - arityM", nameOfVal)
+            let wf = Zmap.force f penv.arityM ("fHatNewBinding - arityM", nameOfVal)
             let fHat = Zmap.force f penv.fHatM  ("fHatNewBinding - fHatM", nameOfVal)
+
             // Take off the variables
             let tps, vss, b, rty = stripTopLambda (b, f.Type)
+
             // Don't take all the variables - only up to length wf
             let vssTake, vssDrop = List.splitAt wf vss
-            // put the variables back on
-            let b, rty = mkMultiLambdasCore b.Range vssDrop (b, rty)
+
+            // Put the variables back on
+            let b, rty = mkMultiLambdasCore g b.Range vssDrop (b, rty)
+
             // fHat, args
             let m = fHat.Range
+
             // Add the type variables to the front
-            let fHat_tps  = envp.ep_etps @ tps
+            let fHat_tps = envp.ep_etps @ tps
+
             // Add the 'aenv' and original taken variables to the front
             let fHat_args = List.map List.singleton envp.ep_aenvs @ vssTake
             let fHat_body = mkLetsFromBindings m envp.ep_unpack b
             let fHat_body = mkLetsFromBindings m shortRecBinds  fHat_body  // bind "f" if have short recursive calls (somewhere)
+
             // fHat binding, f rebinding
-            let fHatBind   = mkMultiLambdaBind fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body, rty)
+            let fHatBind = mkMultiLambdaBind g fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body, rty)
             fHatBind
+
         let rebinds = binds |> List.map fRebinding
         let shortRecBinds = rebinds |> List.filter (fun b -> penv.recShortCallS.Contains(b.Var))
-        let newBinds      = binds |> List.map (fHatNewBinding shortRecBinds)
+        let newBinds = binds |> List.map (fHatNewBinding shortRecBinds)
         newBinds, rebinds
 
     let GetAEnvBindings penv fc =
         match Zmap.tryFind fc penv.envPackM with
-        | None      -> List.empty           // no env for this mutual binding
+        | None      -> []           // no env for this mutual binding
         | Some envp -> envp.ep_pack // environment pack bindings
 
     let forceTopBindToHaveArity penv (bind: Binding) =
@@ -1082,10 +1099,10 @@ module Pass4_RewriteAssembly =
 
                    let f = fvref.Deref
                    (* replace by direct call to corresponding fHat (and additional closure args) *)
-                   let fc   = Zmap.force f  penv.fclassM ("TransApp - fc", nameOfVal)
+                   let fc = Zmap.force f  penv.fclassM ("TransApp - fc", nameOfVal)
                    let envp = Zmap.force fc penv.envPackM ("TransApp - envp", string)
                    let fHat = Zmap.force f  penv.fHatM ("TransApp - fHat", nameOfVal)
-                   let tys  = (List.map mkTyparTy envp.ep_etps) @ tys
+                   let tys = (List.map mkTyparTy envp.ep_etps) @ tys
                    let aenvExprs = List.map (exprForVal vm) envp.ep_aenvs
                    let args = aenvExprs @ args
                    mkApps penv.g ((exprForVal vm fHat, fHat.Type), [tys], args, m) (* change, direct fHat call with closure (reqdTypars, aenvs) *)
@@ -1120,7 +1137,7 @@ module Pass4_RewriteAssembly =
         //     - patch it.
         | Expr.App (f, fty, tys, args, m) ->
            // pass over f, args subexprs
-           let f, z      = TransExpr penv z f
+           let f, z = TransExpr penv z f
            let args, z = List.mapFold (TransExpr penv) z args
            // match app, and fixup if needed
            let f, fty, tys, args, m = destApp (f, fty, tys, args, m)
@@ -1139,7 +1156,7 @@ module Pass4_RewriteAssembly =
 
         // ilobj - has implicit lambda exprs and recursive/base references
         | Expr.Obj (_, ty, basev, basecall, overrides, iimpls, m) ->
-            let basecall, z  = TransExpr penv z basecall
+            let basecall, z = TransExpr penv z basecall
             let overrides, z = List.mapFold (TransMethod penv) z overrides
             let iimpls, z =
                 (z, iimpls) ||> List.mapFold (fun z (tType, objExprs) ->
@@ -1168,7 +1185,7 @@ module Pass4_RewriteAssembly =
         // Lift minimally to ensure the defn is not lifted up and over defns on which it depends (disabled)
         | Expr.Match (spBind, exprm, dtree, targets, m, ty) ->
             let targets = Array.toList targets
-            let dtree, z   = TransDecisionTree penv z dtree
+            let dtree, z = TransDecisionTree penv z dtree
             let targets, z = List.mapFold (TransDecisionTreeTarget penv) z targets
             // TransDecisionTreeTarget wraps EnterInner/exitInnter, so need to collect any top decs 
             let pds,z = ExtractPreDecs z
@@ -1225,14 +1242,14 @@ module Pass4_RewriteAssembly =
          | Expr.LetRec (binds, e, m, _) ->
              let z = EnterInner z
              // For letrec, preDecs from RHS must mutually recurse with those from the bindings
-             let z, pdsPrior    = PopPreDecs z
-             let binds, z       = List.mapFold (TransBindingRhs penv) z binds
-             let z, pdsRhs      = PopPreDecs z
+             let z, pdsPrior = PopPreDecs z
+             let binds, z = List.mapFold (TransBindingRhs penv) z binds
+             let z, pdsRhs = PopPreDecs z
              let binds, rebinds = TransBindings   IsRec penv binds
-             let z, binds       = LiftTopBinds IsRec penv z   binds (* factor Top* repr binds *)
-             let z, rebinds     = LiftTopBinds IsRec penv z rebinds
-             let z, pdsBind     = PopPreDecs z
-             let z             = SetPreDecs z (TreeNode [pdsPrior;RecursivePreDecs pdsBind pdsRhs])
+             let z, binds = LiftTopBinds IsRec penv z   binds (* factor Top* repr binds *)
+             let z, rebinds = LiftTopBinds IsRec penv z rebinds
+             let z, pdsBind = PopPreDecs z
+             let z = SetPreDecs z (TreeNode [pdsPrior;RecursivePreDecs pdsBind pdsRhs])
              let z = ExitInner z
              let pds, z = ExtractPreDecs z
              // tailcall
@@ -1244,11 +1261,11 @@ module Pass4_RewriteAssembly =
          | Expr.Let    (bind, e, m, _) ->
 
              // For let, preDecs from RHS go before those of bindings, which is collection order
-             let bind, z       = TransBindingRhs penv z bind
+             let bind, z = TransBindingRhs penv z bind
              let binds, rebinds = TransBindings   NotRec penv [bind]
              // factor Top* repr binds
-             let z, binds       = LiftTopBinds NotRec penv z   binds
-             let z, rebinds     = LiftTopBinds NotRec penv z rebinds
+             let z, binds = LiftTopBinds NotRec penv z   binds
+             let z, rebinds = LiftTopBinds NotRec penv z rebinds
              // any lifted PreDecs from binding, if so wrap them...
              let pds, z = ExtractPreDecs z
              // tailcall
@@ -1291,7 +1308,7 @@ module Pass4_RewriteAssembly =
            TDSuccess(es, n), z
 
        | TDBind (bind, rest) ->
-           let bind, z       = TransBindingRhs penv z bind
+           let bind, z = TransBindingRhs penv z bind
            let rest, z = TransDecisionTree penv z rest
            TDBind(bind, rest), z
 
@@ -1302,7 +1319,7 @@ module Pass4_RewriteAssembly =
                TCase(discrim, dtree), z
 
            let cases, z = List.mapFold (TransDecisionTreeCase penv) z cases
-           let dflt, z  = Option.mapFold (TransDecisionTree penv) z dflt
+           let dflt, z = Option.mapFold (TransDecisionTree penv) z dflt
            TDSwitch (e, cases, dflt, m), z
 
     and TransDecisionTreeTarget penv z (TTarget(vs, e, flags)) =
@@ -1379,7 +1396,7 @@ let MakeTopLevelRepresentationDecisions ccu g expr =
 
       // pass3
       let envPackM = ChooseReqdItemPackings g fclassM topValS  declist reqdItemsMap
-      let fHatM    = CreateNewValuesForTLR g tlrS arityM fclassM envPackM
+      let fHatM = CreateNewValuesForTLR g tlrS arityM fclassM envPackM
 
       // pass4: rewrite
       if verboseTLR then dprintf "TransExpr(rw)------\n"
diff --git a/src/fsharp/LowerStateMachines.fs b/src/fsharp/LowerStateMachines.fs
index b7a05925120..8319045a31d 100644
--- a/src/fsharp/LowerStateMachines.fs
+++ b/src/fsharp/LowerStateMachines.fs
@@ -215,7 +215,7 @@ type LowerStateMachine(g: TcGlobals) =
                 None
             else
                 let macroParams = List.concat macroParamsCurried
-                let macroVal2 = mkLambdas m macroTypars macroParams (macroBody, tyOfExpr g macroBody)
+                let macroVal2 = mkLambdas g m macroTypars macroParams (macroBody, tyOfExpr g macroBody)
                 if args.Length < macroParams.Length then 
                     //warning(Error(FSComp.SR.stateMachineMacroUnderapplied(), m))
                     None
@@ -232,7 +232,7 @@ type LowerStateMachine(g: TcGlobals) =
         | NewDelegateExpr g (_, macroParamsCurried, macroBody, _, _) -> 
             let m = expr.Range
             let macroParams = List.concat macroParamsCurried
-            let macroVal2 = mkLambdas m [] macroParams (macroBody, tyOfExpr g macroBody)
+            let macroVal2 = mkLambdas g m [] macroParams (macroBody, tyOfExpr g macroBody)
             if args.Length < macroParams.Length then 
                 //warning(Error(FSComp.SR.stateMachineMacroUnderapplied(), m))
                 None
diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs
index 5f9c47e5ca4..43a4990b484 100644
--- a/src/fsharp/MethodCalls.fs
+++ b/src/fsharp/MethodCalls.fs
@@ -625,13 +625,16 @@ type CalledMeth<'T>
                         match epinfos with 
                         | [pinfo] when pinfo.HasSetter && not pinfo.IsIndexer -> 
                             let pminfo = pinfo.SetterMethod
-                            let pminst = match minfo with
-                                         | MethInfo.FSMeth(_, TType.TType_app(_, types), _, _) -> types
-                                         | _ -> freshenMethInfo m pminfo
+                            let pminst =
+                                match minfo with
+                                | MethInfo.FSMeth(_, TType.TType_app(_, types), _, _) -> types
+                                | _ -> freshenMethInfo m pminfo
+
+                            let pminst =
+                                match tyargsOpt with
+                                | Some(TType.TType_app(_, types)) -> types
+                                | _ -> pminst
 
-                            let pminst = match tyargsOpt with
-                                         | Some(TType.TType_app(_, types)) -> types
-                                         | _ -> pminst
                             Choice1Of2(AssignedItemSetter(id, AssignedPropSetter(pinfo, pminfo, pminst), e))
                         |  _ ->    
                             match infoReader.GetILFieldInfosOfType(Some(nm), ad, m, returnedObjTy) with
@@ -1175,7 +1178,7 @@ let MethInfoChecks g amap isInstance tyargsOpt objArgs ad m (minfo: MethInfo)  =
         match objArgs, ad with 
         | [objArg], AccessibleFrom(paths, Some tcref) -> 
             let objArgTy = tyOfExpr g objArg 
-            let ty = generalizedTyconRef tcref
+            let ty = generalizedTyconRef g tcref
             // We get to keep our rights if the type we're in subsumes the object argument type
             if TypeFeasiblySubsumesType 0 g amap m ty CanCoerce objArgTy then
                 ad
@@ -1882,7 +1885,7 @@ module ProvidedMethodCalls =
                 let vsT = List.map addVar vs
                 let delegateBodyExprT = exprToExpr delegateBodyExpr
                 List.iter removeVar vs
-                let lambdaExpr = mkLambdas m [] vsT (delegateBodyExprT, tyOfExpr g delegateBodyExprT)
+                let lambdaExpr = mkLambdas g m [] vsT (delegateBodyExprT, tyOfExpr g delegateBodyExprT)
                 let lambdaExprTy = tyOfExpr g lambdaExpr
                 let infoReader = InfoReader(g, amap)
                 let exprT = CoerceFromFSharpFuncToDelegate g amap infoReader AccessorDomain.AccessibleFromSomewhere lambdaExprTy m lambdaExpr delegateTyT
@@ -2199,7 +2202,7 @@ let GenWitnessExprLambda amap g m (traitInfo: TraitConstraintInfo) =
     let vsl = List.mapSquared fst vse
     match GenWitnessExpr amap g m traitInfo (List.concat (List.mapSquared snd vse)) with 
     | Some expr -> 
-        Choice2Of2 (mkMemberLambdas m [] None None vsl (expr, tyOfExpr g expr))
+        Choice2Of2 (mkMemberLambdas g m [] None None vsl (expr, tyOfExpr g expr))
     | None -> 
         Choice1Of2 traitInfo
 
diff --git a/src/fsharp/MethodOverrides.fs b/src/fsharp/MethodOverrides.fs
index 421630da530..12b6be23306 100644
--- a/src/fsharp/MethodOverrides.fs
+++ b/src/fsharp/MethodOverrides.fs
@@ -272,7 +272,7 @@ module DispatchSlotChecking =
     let OverrideImplementsDispatchSlot g amap m dispatchSlot availPriorOverride =
         IsExactMatch g amap m dispatchSlot availPriorOverride &&
         // The override has to actually be in some subtype of the dispatch slot
-        ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef availPriorOverride.BoundingTyconRef) dispatchSlot.DeclaringTyconRef
+        ExistsHeadTypeInEntireHierarchy g amap m (generalizedTyconRef g availPriorOverride.BoundingTyconRef) dispatchSlot.DeclaringTyconRef
 
     /// Check if a dispatch slot is already implemented
     let DispatchSlotIsAlreadyImplemented g amap m availPriorOverridesKeyed (dispatchSlot: MethInfo) =
@@ -460,7 +460,7 @@ module DispatchSlotChecking =
     /// Finds the override interface methods from the most specific overrides by the given method.
     let GetMostSpecificOverrideInterfaceMethodsByMethod g amap m (mostSpecificOverrides: NameMultiMap) (minfo: MethInfo) =
         let overrideBy = GetInheritedMemberOverrideInfo g amap m OverrideCanImplement.CanImplementAnyInterfaceSlot minfo
-        let minfoTy = generalizedTyconRef minfo.ApparentEnclosingTyconRef
+        let minfoTy = generalizedTyconRef g minfo.ApparentEnclosingTyconRef
         NameMultiMap.find minfo.LogicalName mostSpecificOverrides
         |> List.filter (fun (overridenTy, minfo2) -> 
             typeEquiv g overridenTy minfoTy && 
@@ -584,11 +584,9 @@ module DispatchSlotChecking =
                     // dispatch slots are ordered from the derived classes to base
                     // so we can check the topmost dispatch slot if it is final
                     match dispatchSlots with
-                    | meth :: _ when meth.IsFinal -> errorR(Error(FSComp.SR.tcCannotOverrideSealedMethod (sprintf "%s::%s" (meth.ApparentEnclosingType.ToString()) meth.LogicalName), m))
+                    | meth :: _ when meth.IsFinal -> errorR(Error(FSComp.SR.tcCannotOverrideSealedMethod((sprintf "%s::%s" (NicePrint.stringOfTy denv  meth.ApparentEnclosingType) meth.LogicalName)), m))
                     | _ -> ()
 
-
-
     /// Get the slots of a type that can or must be implemented. This depends
     /// partly on the full set of interface types that are being implemented
     /// simultaneously, e.g.
@@ -718,7 +716,7 @@ module DispatchSlotChecking =
         let tcaug = tycon.TypeContents        
         let interfaces = tycon.ImmediateInterfacesOfFSharpTycon |> List.map (fun (ity, _compgen, m) -> (ity, m))
 
-        let overallTy = generalizedTyconRef (mkLocalTyconRef tycon)
+        let overallTy = generalizedTyconRef g (mkLocalTyconRef tycon)
 
         let allReqdTys = (overallTy, tycon.Range) :: interfaces 
 
diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs
index a01f5254010..48b1c487122 100644
--- a/src/fsharp/NameResolution.fs
+++ b/src/fsharp/NameResolution.fs
@@ -500,7 +500,7 @@ let private GetCSharpStyleIndexedExtensionMembersForTyconRef (amap: Import.Impor
 
     if IsTyconRefUsedForCSharpStyleExtensionMembers g m tcrefOfStaticClass then
         let pri = NextExtensionMethodPriority()
-        let ty = generalizedTyconRef tcrefOfStaticClass
+        let ty = generalizedTyconRef g tcrefOfStaticClass
 
         let minfos = GetImmediateIntrinsicMethInfosOfType (None, AccessorDomain.AccessibleFromSomeFSharpCode) g amap m ty
         [ for minfo in minfos do
@@ -771,9 +771,8 @@ let AddActivePatternResultTagsToNameEnv (apinfo: ActivePatternInfo) nenv apOvera
             ||> List.foldBack (fun (j, nm) acc -> acc.Add(nm, Item.ActivePatternResult(apinfo, apOverallTy, j, m))) }
 
 /// Generalize a union case, from Cons --> List.Cons
-let GeneralizeUnionCaseRef (ucref: UnionCaseRef) =
-    UnionCaseInfo (fst (generalizeTyconRef ucref.TyconRef), ucref)
-
+let GeneralizeUnionCaseRef (ucref: UnionCaseRef) = 
+    UnionCaseInfo (generalTyconRefInst ucref.TyconRef, ucref)
 
 /// Add type definitions to the sub-table of the environment indexed by name and arity
 let AddTyconsByDemangledNameAndArity (bulkAddMode: BulkAdd) (tcrefs: TyconRef[]) (tab: LayeredMap) =
@@ -1266,7 +1265,7 @@ and private AddPartsOfTyconRefToNameEnv bulkAddMode ownDefinition (g: TcGlobals)
                 protectAssemblyExploration
                     false
                     (fun () ->
-                        let ty = generalizedTyconRef tcref
+                        let ty = generalizedTyconRef g tcref
                         isClassTy g ty || isStructTy g ty)
 
             if mayHaveConstruction then
@@ -1282,7 +1281,7 @@ and private AddPartsOfTyconRefToNameEnv bulkAddMode ownDefinition (g: TcGlobals)
     let nenv = AddStaticPartsOfTyconRefToNameEnv bulkAddMode ownDefinition g amap m nenv None tcref
     let nenv = 
         if CanAutoOpenTyconRef g m tcref then
-            let ty = generalizedTyconRef tcref
+            let ty = generalizedTyconRef g tcref
             AddStaticContentOfTypeToNameEnv g amap ad m nenv ty
         else
             nenv
@@ -4066,9 +4065,13 @@ let rec ResolvePartialLongIdentInType (ncenv: NameResolver) nenv isApplicableMet
       (rfinfos |> List.collect (fun x -> x.FieldType |> ResolvePartialLongIdentInType ncenv nenv isApplicableMeth m ad false rest)) @
 
       // e.g. ..
-      let FullTypeOfPinfo(pinfo: PropInfo) =
-          let rty = pinfo.GetPropertyType(amap, m)
-          let rty = if pinfo.IsIndexer then mkRefTupledTy g (pinfo.GetParamTypes(amap, m)) --> rty else rty
+      // e.g. .. 
+      let FullTypeOfPinfo (pinfo: PropInfo) = 
+          let rty = pinfo.GetPropertyType(amap, m) 
+          let rty = 
+              if pinfo.IsIndexer then 
+                  mkFunTy g (mkRefTupledTy g (pinfo.GetParamTypes(amap, m))) rty
+              else rty 
           rty
 
       (ty
@@ -4255,10 +4258,11 @@ let rec ResolvePartialLongIdentInModuleOrNamespace (ncenv: NameResolver) nenv is
 
       @ (LookupTypeNameInEntityNoArity m id modref.ModuleOrNamespaceType
          |> List.collect (fun tycon ->
-             let tcref = modref.NestedTyconRef tycon
-             if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref allowObsolete) then
-                 tcref |> generalizedTyconRef |> ResolvePartialLongIdentInType ncenv nenv isApplicableMeth m ad true rest
-             else
+             let tcref = modref.NestedTyconRef tycon 
+             if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref allowObsolete) then 
+                 let ty = generalizedTyconRef g tcref 
+                 ResolvePartialLongIdentInType ncenv nenv isApplicableMeth m ad true rest ty
+             else 
                  []))
 
 /// Try to resolve a long identifier as type.
@@ -4516,7 +4520,7 @@ and ResolvePartialLongIdentToClassOrRecdFieldsImpl (ncenv: NameResolver) (nenv:
            nenv.eFieldLabels
            |> Seq.collect (fun (KeyValue(_, v)) -> v)
            |> Seq.map (fun fref ->
-                let typeInsts = fref.TyconRef.TyparsNoRange |> List.map (fun tyar -> tyar.AsType)
+                let typeInsts = fref.TyconRef.TyparsNoRange |> List.map mkTyparTy
                 Item.RecdField(RecdFieldInfo(typeInsts, fref)))
            |> List.ofSeq
 
@@ -4753,11 +4757,15 @@ let rec ResolvePartialLongIdentInTypeForItem (ncenv: NameResolver) nenv m ad sta
           for rfinfo in rfinfos do
               yield! ResolvePartialLongIdentInTypeForItem ncenv nenv m ad false rest item rfinfo.FieldType
 
-          // e.g. ..
-          let fullTypeOfPinfo (pinfo: PropInfo) =
-              let rty = pinfo.GetPropertyType(amap, m)
-              let rty = if pinfo.IsIndexer then mkRefTupledTy g (pinfo.GetParamTypes(amap, m)) --> rty else  rty
-              rty
+          // e.g. .. 
+          let fullTypeOfPinfo (pinfo: PropInfo) = 
+              let rty = pinfo.GetPropertyType(amap, m) 
+              let rty = 
+                  if pinfo.IsIndexer then 
+                      mkFunTy g (mkRefTupledTy g (pinfo.GetParamTypes(amap, m))) rty
+                  else
+                      rty 
+              rty      
 
           let pinfos =
               ty
@@ -4869,9 +4877,10 @@ let rec ResolvePartialLongIdentInModuleOrNamespaceForItem (ncenv: NameResolver)
             | _ -> ()
 
             for tycon in LookupTypeNameInEntityNoArity m id modref.ModuleOrNamespaceType do
-                 let tcref = modref.NestedTyconRef tycon
-                 if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref true) then
-                     yield! tcref |> generalizedTyconRef |> ResolvePartialLongIdentInTypeForItem ncenv nenv m ad true rest item
+                 let tcref = modref.NestedTyconRef tycon 
+                 if not (IsTyconUnseenObsoleteSpec ad g ncenv.amap m tcref true) then 
+                     let ty = tcref |> generalizedTyconRef g
+                     yield! ResolvePartialLongIdentInTypeForItem ncenv nenv m ad true rest item ty
     }
 
 let rec PartialResolveLookupInModuleOrNamespaceAsModuleOrNamespaceThenLazy f plid (modref: ModuleOrNamespaceRef) =
diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs
index 3689cfcad5d..219a370d417 100755
--- a/src/fsharp/NicePrint.fs
+++ b/src/fsharp/NicePrint.fs
@@ -1502,7 +1502,7 @@ module InfoMemberPrinting =
 
     let prettyLayoutOfPropInfoFreeStyle g amap m denv (pinfo: PropInfo) =
         let rty = pinfo.GetPropertyType(amap, m) 
-        let rty = if pinfo.IsIndexer then mkRefTupledTy g (pinfo.GetParamTypes(amap, m)) --> rty else rty 
+        let rty = if pinfo.IsIndexer then mkFunTy g (mkRefTupledTy g (pinfo.GetParamTypes(amap, m))) rty else  rty 
         let rty, _ = PrettyTypes.PrettifyType g rty
         let nameL = ConvertValNameToDisplayLayout false (tagProperty >> tagNavArbValRef pinfo.ArbitraryValRef >> wordL) pinfo.PropertyName
         let getterSetter =
@@ -1662,7 +1662,7 @@ module TastDefinitionPrinting =
         let tycon = tcref.Deref
         let repr = tycon.TypeReprInfo
         let isMeasure = (tycon.TypeOrMeasureKind = TyparKind.Measure)
-        let _, ty = generalizeTyconRef tcref 
+        let ty = generalizedTyconRef g tcref 
 
         let start, tagger =
             if isStructTy g ty then
diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs
index 0129e841089..486defdf952 100644
--- a/src/fsharp/Optimizer.fs
+++ b/src/fsharp/Optimizer.fs
@@ -564,7 +564,10 @@ let BindInternalLocalVal cenv (v: Val) vval env =
         env
         
 let BindExternalLocalVal cenv (v: Val) vval env = 
+    let g = cenv.g
+
     let vval = if v.IsMutable then {vval with ValExprInfo=UnknownValue } else vval
+
     let env =
         match vval.ValExprInfo with 
         | UnknownValue -> env  
@@ -578,10 +581,10 @@ let BindExternalLocalVal cenv (v: Val) vval env =
     //
     // A similar code path exists in ilxgen.fs for the tables of "representations" for values
     let env = 
-        if cenv.g.compilingFslib then 
+        if g.compilingFslib then 
             // Passing an empty remap is sufficient for FSharp.Core.dll because it turns out the remapped type signature can
             // still be resolved.
-            match tryRescopeVal cenv.g.fslibCcu Remap.Empty v with 
+            match tryRescopeVal g.fslibCcu Remap.Empty v with 
             | ValueSome vref -> BindValueForFslib vref.nlr v vval env 
             | _ -> env
         else env
@@ -654,6 +657,8 @@ let TryGetInfoForNonLocalEntityRef env (nleref: NonLocalEntityRef) =
     | None -> None
               
 let GetInfoForNonLocalVal cenv env (vref: ValRef) =
+    let g = cenv.g
+
     if vref.IsDispatchSlot then 
         UnknownValInfo
     // REVIEW: optionally turn x-module on/off on per-module basis or  
@@ -665,8 +670,8 @@ let GetInfoForNonLocalVal cenv env (vref: ValRef) =
             | None -> 
                   //dprintn ("\n\n*** Optimization info for value "+n+" from module "+(full_name_of_nlpath smv)+" not found, module contains values: "+String.concat ", " (NameMap.domainL structInfo.ValInfos))  
                   //System.Diagnostics.Debug.Assert(false, sprintf "Break for module %s, value %s" (full_name_of_nlpath smv) n)
-                  if cenv.g.compilingFslib then 
-                      match structInfo.ValInfos.TryFindForFslib (cenv.g, vref) with 
+                  if g.compilingFslib then 
+                      match structInfo.ValInfos.TryFindForFslib (g, vref) with 
                       | true, ninfo -> snd ninfo
                       | _ -> UnknownValInfo
                   else
@@ -1447,6 +1452,8 @@ and OpHasEffect g m op =
 
 
 let TryEliminateBinding cenv _env bind e2 _m =
+    let g = cenv.g
+
     let (TBind(vspec1, e1, spBind)) = bind
     // don't eliminate bindings if we're not optimizing AND the binding is not a compiler generated variable
     if not (cenv.optimizing && cenv.settings.EliminateImmediatelyConsumedLocals()) && 
@@ -1472,7 +1479,7 @@ let TryEliminateBinding cenv _env bind e2 _m =
               match argsr with 
               | Expr.Val (VRefLocal vspec2, _, _) :: argsr2
                  when valEq vspec1 vspec2 && IsUniqueUse vspec2 (List.rev rargsl@argsr2) -> Some(List.rev rargsl, argsr2)
-              | argsrh :: argsrt when not (ExprHasEffect cenv.g argsrh) -> GetImmediateUseContext (argsrh :: rargsl) argsrt 
+              | argsrh :: argsrt when not (ExprHasEffect g argsrh) -> GetImmediateUseContext (argsrh :: rargsl) argsrt 
               | _ -> None
 
         let (DebugPoints(e2, recreate0)) = e2
@@ -1491,9 +1498,9 @@ let TryEliminateBinding cenv _env bind e2 _m =
 
          // Immediate consumption of delegate via an application in a sequential, e.g. 'let part1 = e in part1.Invoke(args); rest'
          // See https://github.com/fsharp/fslang-design/blob/master/tooling/FST-1034-lambda-optimizations.md
-         | Expr.Sequential(DebugPoints(DelegateInvokeExpr cenv.g (invokeRef, f0ty, tyargs, DebugPoints (Expr.Val (VRefLocal vspec2, _, _), recreate2), args, _), recreate1), rest, NormalSeq, m)  
+         | Expr.Sequential(DebugPoints(DelegateInvokeExpr g (invokeRef, f0ty, tyargs, DebugPoints (Expr.Val (VRefLocal vspec2, _, _), recreate2), args, _), recreate1), rest, NormalSeq, m)  
              when IsUniqueUse vspec2 (rest :: args) -> 
-               let invoke = MakeFSharpDelegateInvokeAndTryBetaReduce cenv.g (invokeRef, recreate2 e1, f0ty, tyargs, args, m)
+               let invoke = MakeFSharpDelegateInvokeAndTryBetaReduce g (invokeRef, recreate2 e1, f0ty, tyargs, args, m)
                Some (Expr.Sequential(recreate1 invoke, rest, NormalSeq, m)  |> recreate0)
 
          // Immediate consumption of value by a pattern match 'let x = e in match x with ...'
@@ -1510,8 +1517,8 @@ let TryEliminateBinding cenv _env bind e2 _m =
          // Note: do not include functions with a single arg of unit type, introduced by abstractBigTargets 
          | Expr.App (f, f0ty, tyargs, args, m) ->
              match GetImmediateUseContext [] (f :: args) with 
-             | Some([], rargs) -> Some (MakeApplicationAndBetaReduce cenv.g (e1, f0ty, [tyargs], rargs, m) |> recreate0)
-             | Some(f :: largs, rargs) -> Some (MakeApplicationAndBetaReduce cenv.g (f, f0ty, [tyargs], largs @ (e1 :: rargs), m) |> recreate0)
+             | Some([], rargs) -> Some (MakeApplicationAndBetaReduce g (e1, f0ty, [tyargs], rargs, m) |> recreate0)
+             | Some(f :: largs, rargs) -> Some (MakeApplicationAndBetaReduce g (f, f0ty, [tyargs], largs @ (e1 :: rargs), m) |> recreate0)
              | None -> None
 
          // Bug 6311: a special case of nested elimination of locals (which really should be handled more generally)
@@ -1659,7 +1666,10 @@ let MakeMutableStructuralBindingForTupleElement (v: Val) i (arg: Expr) argTy =
     ve, mkCompGenBind v arg
 
 let ExpandStructuralBindingRaw cenv expr =
+    let g = cenv.g
+
     assert cenv.settings.ExpandStructuralValues()
+
     match expr with
     | Expr.Let (TBind(v, rhs, tgtSeqPtOpt), body, m, _) 
         when (isRefTupleExpr rhs &&
@@ -1668,9 +1678,9 @@ let ExpandStructuralBindingRaw cenv expr =
           if List.forall ExprIsValue args then
               expr (* avoid re-expanding when recursion hits original binding *)
           else
-              let argTys = destRefTupleTy cenv.g v.Type
+              let argTys = destRefTupleTy g v.Type
               let ves, binds = List.mapi2 (MakeStructuralBindingTemp v) args argTys |> List.unzip
-              let tuple = mkRefTupled cenv.g m ves argTys
+              let tuple = mkRefTupled g m ves argTys
               mkLetsBind m binds (mkLet tgtSeqPtOpt m v tuple body)
     | expr -> expr
 
@@ -1792,10 +1802,13 @@ let TryRewriteBranchingTupleBinding g (v: Val) rhs tgtSeqPtOpt body m =
     | _ -> None
 
 let rec ExpandStructuralBinding cenv expr =
+    let g = cenv.g
+
     assert cenv.settings.ExpandStructuralValues()
+
     match expr with
     | Expr.Let (TBind(v, rhs, tgtSeqPtOpt), body, m, _)
-        when (isRefTupleTy cenv.g v.Type &&
+        when (isRefTupleTy g v.Type &&
               not (isRefTupleExpr rhs) &&
               CanExpandStructuralBinding v) ->
         match RearrangeTupleBindings rhs (fun top -> mkLet DebugPointAtBinding.NoneAtLet m v top body) with
@@ -1807,18 +1820,18 @@ let rec ExpandStructuralBinding cenv expr =
             | _ -> e2
         | None ->
             // RearrangeTupleBindings could have failed because the rhs branches
-            TryRewriteBranchingTupleBinding cenv.g v rhs tgtSeqPtOpt body m |> Option.defaultValue expr
+            TryRewriteBranchingTupleBinding g v rhs tgtSeqPtOpt body m |> Option.defaultValue expr
 
     // Expand 'let v = Some arg in ...' to 'let tmp = arg in let v = Some tp in ...'
     // Used to give names to values of optional arguments prior as we inline.
     | Expr.Let (TBind(v, Expr.Op(TOp.UnionCase uc, _, [arg], _), tgtSeqPtOpt), body, m, _)
-        when isOptionTy cenv.g v.Type && 
+        when isOptionTy g v.Type && 
              not (ExprIsValue arg) && 
-             cenv.g.unionCaseRefEq uc (mkSomeCase cenv.g) &&
+             g.unionCaseRefEq uc (mkSomeCase g) &&
              CanExpandStructuralBinding v ->
-            let argTy = destOptionTy cenv.g v.Type 
+            let argTy = destOptionTy g v.Type 
             let vi, vie = MakeStructuralBindingTempVal v 0 arg argTy
-            let newExpr = mkSome cenv.g argTy vie m
+            let newExpr = mkSome g argTy vie m
             mkLet tgtSeqPtOpt m vi arg (mkLet DebugPointAtBinding.NoneAtLet m v newExpr body)
 
     | e ->
@@ -1985,12 +1998,12 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                 | QuerySelect g (qTy, _, resultElemTy, _, _) 
                 | QueryYield g (qTy, resultElemTy, _) 
                 | QueryYieldFrom g (qTy, resultElemTy, _) 
-                     when typeEquiv cenv.g qTy (mkAppTy cenv.g.tcref_System_Collections_IEnumerable []) -> 
+                     when typeEquiv g qTy (mkAppTy g.tcref_System_Collections_IEnumerable []) -> 
 
-                    match tryRewriteToSeqCombinators cenv.g e with 
+                    match tryRewriteToSeqCombinators g e with 
                     | Some newSource -> 
                         //printfn "Eliminating because source is not IQueryable"
-                        Some (mkCallSeq cenv.g newSource.Range resultElemTy (mkCallSeqDelay cenv.g newSource.Range resultElemTy (mkUnitDelayLambda cenv.g newSource.Range newSource) ), 
+                        Some (mkCallSeq g newSource.Range resultElemTy (mkCallSeqDelay g newSource.Range resultElemTy (mkUnitDelayLambda g newSource.Range newSource) ), 
                               Some(resultElemTy, qTy) )
                     | None -> 
                         //printfn "Not compiling to state machines, but still optimizing the use of quotations away"
@@ -2001,7 +2014,7 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                     | Some (newSeqSource, newSeqSourceIsEnumerableInfo) -> 
                         let newSeqSourceAsQuerySource = 
                             match newSeqSourceIsEnumerableInfo with 
-                            | Some (resultElemTy, qTy) -> mkCallNewQuerySource cenv.g newSeqSource.Range resultElemTy qTy newSeqSource 
+                            | Some (resultElemTy, qTy) -> mkCallNewQuerySource g newSeqSource.Range resultElemTy qTy newSeqSource 
                             | None -> newSeqSource
                         Some (replace newSeqSourceAsQuerySource, None)
                     | None -> None
@@ -2016,8 +2029,8 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                 let resultExprAfterConvertToResultTy = 
                     match reqdResultInfo, exprIsEnumerableInfo with 
                     | Some _, Some _ | None, None -> resultExpr // the expression is a QuerySource, the result is a QuerySource, nothing to do
-                    | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable cenv.g expr.Range resultElemTy (TType_app(cenv.g.tcref_System_Collections_IEnumerable, [])) resultExpr
-                    | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource cenv.g expr.Range resultElemTy qTy resultExpr 
+                    | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy (TType_app(g.tcref_System_Collections_IEnumerable, [])) resultExpr
+                    | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource g expr.Range resultElemTy qTy resultExpr 
                 Some resultExprAfterConvertToResultTy
             | None -> 
                 None
@@ -2070,9 +2083,11 @@ let rec IsDebugPipeRightExpr cenv expr =
 let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
     cenv.stackGuard.Guard <| fun () ->
 
+    let g = cenv.g
+
     // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need
     // complete inference types.
-    let expr = NormalizeAndAdjustPossibleSubsumptionExprs cenv.g expr
+    let expr = NormalizeAndAdjustPossibleSubsumptionExprs g expr
 
     let expr = stripExpr expr
 
@@ -2108,7 +2123,7 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
 
     | Expr.Obj (_, ty, basev, createExpr, overrides, iimpls, m) -> 
         match expr with 
-        | NewDelegateExpr cenv.g (lambdaId, vsl, body, _, remake) -> 
+        | NewDelegateExpr g (lambdaId, vsl, body, _, remake) -> 
             OptimizeNewDelegateExpr cenv env (lambdaId, vsl, body, remake)
         | _ -> 
             OptimizeObjectExpr cenv env (ty, basev, createExpr, overrides, iimpls, m)
@@ -2118,7 +2133,7 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
 
     | Expr.App (f, fty, tyargs, argsl, m) -> 
         match expr with
-        | DelegateInvokeExpr cenv.g (iref, fty, tyargs, delegatef, args, m) ->
+        | DelegateInvokeExpr g (iref, fty, tyargs, delegatef, args, m) ->
             OptimizeFSharpDelegateInvoke cenv env (iref, delegatef, fty, tyargs, args, m) 
         | _ -> 
         let attempt = 
@@ -2135,7 +2150,7 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
 
     | Expr.Lambda (_lambdaId, _, _, argvs, _body, m, rty) -> 
         let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal)
-        let ty = mkMultiLambdaTy m argvs rty
+        let ty = mkMultiLambdaTy g m argvs rty
         OptimizeLambdas None cenv env topValInfo expr ty
 
     | Expr.TyLambda (_lambdaId, tps, _body, _m, rty) -> 
@@ -2144,7 +2159,7 @@ let rec OptimizeExpr cenv (env: IncrementalOptimizationEnv) expr =
         OptimizeLambdas None cenv env topValInfo expr ty
 
     | Expr.TyChoose _ -> 
-        OptimizeExpr cenv env (ChooseTyparSolutionsForFreeChoiceTypars cenv.g cenv.amap expr)
+        OptimizeExpr cenv env (ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr)
 
     | Expr.Match (spMatch, exprm, dtree, targets, m, ty) -> 
         OptimizeMatch cenv env (spMatch, exprm, dtree, targets, m, ty)
@@ -2220,6 +2235,8 @@ and OptimizeInterfaceImpl cenv env baseValOpt (ty, overrides) =
 
 /// Make and optimize String.Concat calls
 and MakeOptimizedSystemStringConcatCall cenv env m args =
+    let g = cenv.g
+
     let rec optimizeArg argExpr accArgs =
         match argExpr, accArgs with
         | Expr.Op(TOp.ILCall(_, _, _, _, _, _, _, ilMethRef, _, _, _), _, [ Expr.Op(TOp.Array, _, args, _) ], _), _ 
@@ -2234,7 +2251,7 @@ and MakeOptimizedSystemStringConcatCall cenv env m args =
 #if STRING_CONSTANT_FOLDING
         // Optimize string constants, e.g. "1" + "2" will turn into "12"
         | Expr.Const (Const.String str1, _, _), Expr.Const (Const.String str2, _, _) :: accArgs ->
-            mkString cenv.g m (str1 + str2) :: accArgs
+            mkString g m (str1 + str2) :: accArgs
 #endif
 
         | arg, _ -> arg :: accArgs
@@ -2250,14 +2267,14 @@ and MakeOptimizedSystemStringConcatCall cenv env m args =
         | [ arg ] ->
             arg
         | [ arg1; arg2 ] -> 
-            mkStaticCall_String_Concat2 cenv.g m arg1 arg2
+            mkStaticCall_String_Concat2 g m arg1 arg2
         | [ arg1; arg2; arg3 ] ->
-            mkStaticCall_String_Concat3 cenv.g m arg1 arg2 arg3
+            mkStaticCall_String_Concat3 g m arg1 arg2 arg3
         | [ arg1; arg2; arg3; arg4 ] ->
-            mkStaticCall_String_Concat4 cenv.g m arg1 arg2 arg3 arg4
+            mkStaticCall_String_Concat4 g m arg1 arg2 arg3 arg4
         | args ->
-            let arg = mkArray (cenv.g.string_ty, args, m)
-            mkStaticCall_String_Concat_Array cenv.g m arg
+            let arg = mkArray (g.string_ty, args, m)
+            mkStaticCall_String_Concat_Array g m arg
 
     match expr with
     | Expr.Op(TOp.ILCall(_, _, _, _, _, _, _, ilMethRef, _, _, _) as op, tyargs, args, m) 
@@ -2269,11 +2286,13 @@ and MakeOptimizedSystemStringConcatCall cenv env m args =
 /// Optimize/analyze an application of an intrinsic operator to arguments
 and OptimizeExprOp cenv env (op, tyargs, args, m) =
 
+    let g = cenv.g
+
     // Special cases 
     match op, tyargs, args with 
     | TOp.Coerce, [toty;fromty], [arg] -> 
         let argR, einfo = OptimizeExpr cenv env arg
-        if typeEquiv cenv.g toty fromty then argR, einfo 
+        if typeEquiv g toty fromty then argR, einfo 
         else 
           mkCoerceExpr(argR, toty, m, fromty), 
           { TotalSize=einfo.TotalSize + 1
@@ -2294,7 +2313,7 @@ and OptimizeExprOp cenv env (op, tyargs, args, m) =
         newExpr,
         { TotalSize = 1
           FunctionSize = 1
-          HasEffect = OpHasEffect cenv.g m newOp
+          HasEffect = OpHasEffect g m newOp
           MightMakeCriticalTailcall = false
           Info = ValueOfExpr newExpr }
 
@@ -2318,14 +2337,14 @@ and OptimizeExprOp cenv env (op, tyargs, args, m) =
    // guarantees to optimize.
   
     | TOp.ILCall (_, _, _, _, _, _, _, ilMethRef, _, _, _), _, [arg]
-        when (ilMethRef.DeclaringTypeRef.Name = cenv.g.ilg.typ_Array.TypeRef.Name &&
+        when (ilMethRef.DeclaringTypeRef.Name = g.ilg.typ_Array.TypeRef.Name &&
               ilMethRef.Name = "get_Length" &&
-              isArray1DTy cenv.g (tyOfExpr cenv.g arg)) -> 
-         OptimizeExpr cenv env (Expr.Op (TOp.ILAsm (i_ldlen, [cenv.g.int_ty]), [], [arg], m))
+              isArray1DTy g (tyOfExpr g arg)) -> 
+         OptimizeExpr cenv env (Expr.Op (TOp.ILAsm (i_ldlen, [g.int_ty]), [], [arg], m))
 
     // Empty IL instruction lists are used as casts in prim-types.fs. But we can get rid of them 
     // if the types match up. 
-    | TOp.ILAsm ([], [ty]), _, [a] when typeEquiv cenv.g (tyOfExpr cenv.g a) ty -> OptimizeExpr cenv env a
+    | TOp.ILAsm ([], [ty]), _, [a] when typeEquiv g (tyOfExpr g a) ty -> OptimizeExpr cenv env a
 
     // Optimize calls when concatenating strings, e.g. "1" + "2" + "3" + "4" .. etc.
     | TOp.ILCall(_, _, _, _, _, _, _, ilMethRef, _, _, _), _, [ Expr.Op(TOp.Array, _, args, _) ] 
@@ -2358,24 +2377,29 @@ and OptimizeExprOpReductionsAfter cenv env (op, tyargs, argsR, arginfos, m) =
     | None -> OptimizeExprOpFallback cenv env (op, tyargs, argsR, m) arginfos UnknownValue
 
 and OptimizeExprOpFallback cenv env (op, tyargs, argsR, m) arginfos valu =
+    let g = cenv.g
+
     // The generic case - we may collect information, but the construction/projection doesn't disappear 
     let argsTSize = AddTotalSizes arginfos
     let argsFSize = AddFunctionSizes arginfos
     let argEffects = OrEffects arginfos
     let argValues = List.map (fun x -> x.Info) arginfos
-    let effect = OpHasEffect cenv.g m op
+    let effect = OpHasEffect g m op
     let cost, valu = 
       match op with
       | TOp.UnionCase c -> 2, MakeValueInfoForUnionCase c (Array.ofList argValues)
-      | TOp.ExnConstr _ -> 2, valu (* REVIEW: information collection possible here *)
+      | TOp.ExnConstr _ -> 2, valu
+
       | TOp.Tuple tupInfo -> 
           let isStruct = evalTupInfoIsStruct tupInfo 
           if isStruct then 0, valu 
           else 1,MakeValueInfoForTuple (Array.ofList argValues)
+
       | TOp.AnonRecd anonInfo -> 
           let isStruct = evalAnonInfoIsStruct anonInfo 
           if isStruct then 0, valu 
           else 1, valu
+
       | TOp.AnonRecdGet _ 
       | TOp.ValFieldGet _     
       | TOp.TupleFieldGet _    
@@ -2384,6 +2408,7 @@ and OptimizeExprOpFallback cenv env (op, tyargs, argsR, m) arginfos valu =
       | TOp.UnionCaseTagGet _ -> 
           // REVIEW: reduction possible here, and may be very effective
           1, valu 
+
       | TOp.UnionCaseProof _ -> 
           // We count the proof as size 0
           // We maintain the value of the source of the proof-cast if it is known to be a UnionCaseValue
@@ -2392,9 +2417,11 @@ and OptimizeExprOpFallback cenv env (op, tyargs, argsR, m) arginfos valu =
               | StripUnionCaseValue (uc, info) -> UnionCaseValue(uc, info) 
               | _ -> valu
           0, valu
+
       | TOp.ILAsm (instrs, retTypes) -> 
           min instrs.Length 1, 
-          mkAssemblyCodeValueInfo cenv.g instrs argValues retTypes
+          mkAssemblyCodeValueInfo g instrs argValues retTypes
+
       | TOp.Bytes bytes -> bytes.Length/10, valu
       | TOp.UInt16s bytes -> bytes.Length/10, valu
       | TOp.ValFieldGetAddr _     
@@ -2403,6 +2430,7 @@ and OptimizeExprOpFallback cenv env (op, tyargs, argsR, m) arginfos valu =
       | TOp.UnionCaseFieldSet _ | TOp.RefAddrGet _ | TOp.Coerce | TOp.Reraise
       | TOp.UnionCaseFieldGetAddr _   
       | TOp.ExnFieldSet _ -> 1, valu
+
       | TOp.Recd (ctorInfo, tcref) ->
           let finfos = tcref.AllInstanceFieldsAsList
           // REVIEW: this seems a little conservative: Allocating a record with a mutable field 
@@ -2441,7 +2469,9 @@ and OptimizeExprOpFallback cenv env (op, tyargs, argsR, m) arginfos valu =
 
 /// Optimize/analyze a constant node
 and OptimizeConst cenv env expr (c, m, ty) = 
-    match TryEliminateDesugaredConstants cenv.g m c with 
+    let g = cenv.g
+
+    match TryEliminateDesugaredConstants g m c with 
     | Some e -> 
         OptimizeExpr cenv env e
     | None ->
@@ -2455,9 +2485,11 @@ and OptimizeConst cenv env expr (c, m, ty) =
 
 /// Optimize/analyze a record lookup. 
 and TryOptimizeRecordFieldGet cenv _env (e1info, (RecdFieldRef (rtcref, _) as r), _tinst, m) =
+    let g = cenv.g
+
     match destRecdValue e1info.Info with
     | Some finfos when cenv.settings.EliminateRecdFieldGet && not e1info.HasEffect ->
-        match TryFindFSharpAttribute cenv.g cenv.g.attrib_CLIMutableAttribute rtcref.Attribs with
+        match TryFindFSharpAttribute g g.attrib_CLIMutableAttribute rtcref.Attribs with
         | Some _ -> None
         | None ->
             let n = r.Index
@@ -2475,14 +2507,17 @@ and TryOptimizeTupleFieldGet cenv _env (_tupInfo, e1info, tys, n, m) =
     | _ -> None
       
 and TryOptimizeUnionCaseGet cenv _env (e1info, cspec, _tys, n, m) =
+    let g = cenv.g
     match e1info.Info with
-    | StripUnionCaseValue(cspec2, args) when cenv.settings.EliminateUnionCaseFieldGet() && not e1info.HasEffect && cenv.g.unionCaseRefEq cspec cspec2 ->
+    | StripUnionCaseValue(cspec2, args) when cenv.settings.EliminateUnionCaseFieldGet() && not e1info.HasEffect && g.unionCaseRefEq cspec cspec2 ->
         if n >= args.Length then errorR(InternalError( "TryOptimizeUnionCaseGet: term argument out of range", m))
         Some args.[n]
     | _ -> None
 
 /// Optimize/analyze a for-loop
 and OptimizeFastIntegerForLoop cenv env (spFor, spTo, v, e1, dir, e2, e3, m) =
+    let g = cenv.g
+
     let e1R, e1info = OptimizeExpr cenv env e1 
     let e2R, e2info = OptimizeExpr cenv env e2 
     let env = BindInternalValToUnknown cenv v env 
@@ -2496,7 +2531,7 @@ and OptimizeFastIntegerForLoop cenv env (spFor, spTo, v, e1, dir, e2, e3, m) =
         | FSharpForLoopUp, Expr.Op (TOp.ILAsm ([ (AI_sub | AI_sub_ovf)], _), _, [Expr.Op (TOp.ILAsm ([ I_ldlen; (AI_conv DT_I4)], _), _, [arre], _); Expr.Const (Const.Int32 1, _, _)], _) 
                   when not (snd(OptimizeExpr cenv env arre)).HasEffect -> 
 
-            mkLdlen cenv.g e2R.Range arre, CSharpForLoopUp
+            mkLdlen g e2R.Range arre, CSharpForLoopUp
 
         | FSharpForLoopUp, Expr.Op (TOp.ILAsm ([ (AI_sub | AI_sub_ovf)], _), _, [Expr.Op (TOp.ILCall(_,_,_,_,_,_,_, mth, _,_,_), _, [arre], _) as lenOp; Expr.Const (Const.Int32 1, _, _)], _) 
                   when 
@@ -2509,7 +2544,7 @@ and OptimizeFastIntegerForLoop cenv env (spFor, spTo, v, e1, dir, e2, e3, m) =
         // detect upwards for loops with constant bounds, but not MaxValue!
         | FSharpForLoopUp, Expr.Const (Const.Int32 n, _, _) 
                   when n < System.Int32.MaxValue -> 
-            mkIncr cenv.g e2R.Range e2R, CSharpForLoopUp
+            mkIncr g e2R.Range e2R, CSharpForLoopUp
 
         | _ ->
             e2R, dir
@@ -2518,9 +2553,9 @@ and OptimizeFastIntegerForLoop cenv env (spFor, spTo, v, e1, dir, e2, e3, m) =
     let eff = OrEffects einfos 
     (* neither bounds nor body has an effect, and loops always terminate, hence eliminate the loop *)
     if cenv.settings.EliminateForLoop && not eff then 
-        mkUnit cenv.g m, { TotalSize=0; FunctionSize=0; HasEffect=false; MightMakeCriticalTailcall=false; Info=UnknownValue }
+        mkUnit g m, { TotalSize=0; FunctionSize=0; HasEffect=false; MightMakeCriticalTailcall=false; Info=UnknownValue }
     else
-        let exprR = mkIntegerForLoop cenv.g (spFor, spTo, v, e1R, dir, e2R, e3R, m) 
+        let exprR = mkIntegerForLoop g (spFor, spTo, v, e1R, dir, e2R, e3R, m) 
         exprR, { TotalSize=AddTotalSizes einfos + forAndWhileLoopSize
                  FunctionSize=AddFunctionSizes einfos + forAndWhileLoopSize
                  HasEffect=eff
@@ -2549,16 +2584,18 @@ and OptimizeLetRec cenv env (binds, bodyExpr, m) =
 /// Optimize/analyze a linear sequence of sequential execution or RletR bindings.
 and OptimizeLinearExpr cenv env expr contf =
 
+    let g = cenv.g
+
     // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need
     // complete inference types.
-    let expr = DetectAndOptimizeForEachExpression cenv.g OptimizeAllForExpressions expr
+    let expr = DetectAndOptimizeForEachExpression g OptimizeAllForExpressions expr
     let expr = if cenv.settings.ExpandStructuralValues() then ExpandStructuralBinding cenv expr else expr 
     let expr = stripExpr expr
 
     // Matching on 'match __resumableEntry() with ...` is really a first-class language construct which we 
     // don't optimize separately
     match expr with 
-    | ResumableEntryMatchExpr cenv.g (noneBranchExpr, someVar, someBranchExpr, rebuild) -> 
+    | ResumableEntryMatchExpr g (noneBranchExpr, someVar, someBranchExpr, rebuild) -> 
         let noneBranchExprR, e1info = OptimizeExpr cenv env noneBranchExpr 
         let env = BindInternalValToUnknown cenv someVar env 
         let someBranchExprR, e2info = OptimizeExpr cenv env someBranchExpr 
@@ -2653,14 +2690,18 @@ and OptimizeLinearExpr cenv env expr contf =
 
 /// Optimize/analyze a try/finally construct.
 and OptimizeTryFinally cenv env (spTry, spFinally, e1, e2, m, ty) =
+    let g = cenv.g
+
     let e1R, e1info = OptimizeExpr cenv env e1 
     let e2R, e2info = OptimizeExpr cenv env e2 
+
     let info = 
         { TotalSize = e1info.TotalSize + e2info.TotalSize + tryFinallySize
           FunctionSize = e1info.FunctionSize + e2info.FunctionSize + tryFinallySize
           HasEffect = e1info.HasEffect || e2info.HasEffect
           MightMakeCriticalTailcall = false // no tailcalls from inside in try/finally
           Info = UnknownValue } 
+
     // try-finally, so no effect means no exception can be raised, so just sequence the finally
     if cenv.settings.EliminateTryWithAndTryFinally && not e1info.HasEffect then 
         let e1R2 = 
@@ -2669,12 +2710,15 @@ and OptimizeTryFinally cenv env (spTry, spFinally, e1, e2, m, ty) =
             | DebugPointAtTry.No -> e1R
         Expr.Sequential (e1R2, e2R, ThenDoSeq, m), info 
     else
-        mkTryFinally cenv.g (e1R, e2R, m, ty, spTry, spFinally), 
+        mkTryFinally g (e1R, e2R, m, ty, spTry, spFinally), 
         info
 
 /// Optimize/analyze a try/with construct.
 and OptimizeTryWith cenv env (e1, vf, ef, vh, eh, m, ty, spTry, spWith) =
+    let g = cenv.g
+
     let e1R, e1info = OptimizeExpr cenv env e1    
+
     // try-with, so no effect means no exception can be raised, so discard the with 
     if cenv.settings.EliminateTryWithAndTryFinally && not e1info.HasEffect then 
         e1R, e1info 
@@ -2682,25 +2726,30 @@ and OptimizeTryWith cenv env (e1, vf, ef, vh, eh, m, ty, spTry, spWith) =
         let envinner = BindInternalValToUnknown cenv vf (BindInternalValToUnknown cenv vh env)
         let efR, efinfo = OptimizeExpr cenv envinner ef 
         let ehR, ehinfo = OptimizeExpr cenv envinner eh 
+
         let info = 
             { TotalSize = e1info.TotalSize + efinfo.TotalSize+ ehinfo.TotalSize + tryWithSize
               FunctionSize = e1info.FunctionSize + efinfo.FunctionSize+ ehinfo.FunctionSize + tryWithSize
               HasEffect = e1info.HasEffect || efinfo.HasEffect || ehinfo.HasEffect
               MightMakeCriticalTailcall = false
               Info = UnknownValue } 
-        mkTryWith cenv.g (e1R, vf, efR, vh, ehR, m, ty, spTry, spWith), 
-        info
+
+        let exprR = mkTryWith g (e1R, vf, efR, vh, ehR, m, ty, spTry, spWith)
+        exprR, info
 
 /// Optimize/analyze a while loop
 and OptimizeWhileLoop cenv env (spWhile, marker, e1, e2, m) =
+    let g = cenv.g
     let e1R, e1info = OptimizeExpr cenv env e1 
     let e2R, e2info = OptimizeExpr cenv env e2 
-    mkWhile cenv.g (spWhile, marker, e1R, e2R, m), 
-    { TotalSize = e1info.TotalSize + e2info.TotalSize + forAndWhileLoopSize
-      FunctionSize = e1info.FunctionSize + e2info.FunctionSize + forAndWhileLoopSize
-      HasEffect = true // may not terminate
-      MightMakeCriticalTailcall = false
-      Info = UnknownValue }
+    let exprR = mkWhile g (spWhile, marker, e1R, e2R, m)
+    let info =
+        { TotalSize = e1info.TotalSize + e2info.TotalSize + forAndWhileLoopSize
+          FunctionSize = e1info.FunctionSize + e2info.FunctionSize + forAndWhileLoopSize
+          HasEffect = true // may not terminate
+          MightMakeCriticalTailcall = false
+          Info = UnknownValue }
+    exprR, info
 
 /// Optimize/analyze a call to a 'member' constraint. Try to resolve the call to 
 /// a witness (should always be possible due to compulsory inlining of any
@@ -2708,8 +2757,10 @@ and OptimizeWhileLoop cenv env (spWhile, marker, e1, e2, m) =
 /// not-yet-inlined generic code)
 and OptimizeTraitCall cenv env (traitInfo, args, m) =
 
+    let g = cenv.g
+
     // Resolve the static overloading early (during the compulsory rewrite phase) so we can inline. 
-    match ConstraintSolver.CodegenWitnessExprForTraitConstraint cenv.TcVal cenv.g cenv.amap m traitInfo args with
+    match ConstraintSolver.CodegenWitnessExprForTraitConstraint cenv.TcVal g cenv.amap m traitInfo args with
 
     | OkResult (_, Some expr) -> OptimizeExpr cenv env expr
 
@@ -2719,19 +2770,22 @@ and OptimizeTraitCall cenv env (traitInfo, args, m) =
         OptimizeExprOpFallback cenv env (TOp.TraitCall traitInfo, [], argsR, m) arginfos UnknownValue 
 
 and CopyExprForInlining cenv isInlineIfLambda expr (m: range) = 
+    let g = cenv.g
     // 'InlineIfLambda' doesn't erase ranges, e.g. if the lambda is user code.
     if isInlineIfLambda then
         expr
-        |> copyExpr cenv.g CloneAll
+        |> copyExpr g CloneAll
     else
         expr
-        |> copyExpr cenv.g CloneAllAndMarkExprValsAsCompilerGenerated
+        |> copyExpr g CloneAllAndMarkExprValsAsCompilerGenerated
         |> remarkExpr m
 
 /// Make optimization decisions once we know the optimization information
 /// for a value
 and TryOptimizeVal cenv env (vOpt: ValRef option, mustInline, inlineIfLambda, valInfoForVal, m) = 
 
+    let g = cenv.g
+
     match valInfoForVal with 
     // Inline all constants immediately 
     | ConstValue (c, ty) -> 
@@ -2760,7 +2814,7 @@ and TryOptimizeVal cenv env (vOpt: ValRef option, mustInline, inlineIfLambda, va
               Some(exprForValRef m vR)
 
     | ConstExprValue(_size, expr) ->
-        Some (remarkExpr m (copyExpr cenv.g CloneAllAndMarkExprValsAsCompilerGenerated expr))
+        Some (remarkExpr m (copyExpr g CloneAllAndMarkExprValsAsCompilerGenerated expr))
 
     | CurriedLambdaValue (_, _, _, expr, _) when mustInline || inlineIfLambda ->
         let exprCopy = CopyExprForInlining cenv inlineIfLambda expr m
@@ -2794,6 +2848,9 @@ and AddValEqualityInfo g m (v: ValRef) info =
 
 /// Optimize/analyze a use of a value
 and OptimizeVal cenv env expr (v: ValRef, m) =
+
+    let g = cenv.g
+
     let valInfoForVal = GetInfoForVal cenv env m v 
 
     match TryOptimizeVal cenv env (Some v, v.MustInline, v.InlineIfLambda, valInfoForVal.ValExprInfo, m) with
@@ -2802,7 +2859,7 @@ and OptimizeVal cenv env expr (v: ValRef, m) =
        match e with 
        | Expr.TyLambda _ 
        | Expr.Lambda _ ->
-           e, (AddValEqualityInfo cenv.g m v 
+           e, (AddValEqualityInfo g m v 
                     { Info=valInfoForVal.ValExprInfo 
                       HasEffect=false 
                       MightMakeCriticalTailcall = false
@@ -2810,14 +2867,14 @@ and OptimizeVal cenv env expr (v: ValRef, m) =
                       TotalSize=10})
        | _ -> 
            let e, einfo = OptimizeExpr cenv env e 
-           e, AddValEqualityInfo cenv.g m v einfo 
+           e, AddValEqualityInfo g m v einfo 
 
     | None -> 
        if v.MustInline then
            error(Error(FSComp.SR.optFailedToInlineValue(v.DisplayName), m))
        if v.InlineIfLambda then 
            warning(Error(FSComp.SR.optFailedToInlineSuggestedValue(v.DisplayName), m))
-       expr, (AddValEqualityInfo cenv.g m v 
+       expr, (AddValEqualityInfo g m v 
                     { Info=valInfoForVal.ValExprInfo 
                       HasEffect=false 
                       MightMakeCriticalTailcall = false
@@ -2826,33 +2883,36 @@ and OptimizeVal cenv env expr (v: ValRef, m) =
 
 /// Attempt to replace an application of a value by an alternative value.
 and StripToNominalTyconRef cenv ty = 
-    match tryAppTy cenv.g ty with
+    let g = cenv.g
+    match tryAppTy g ty with
     | ValueSome x -> x
     | _ ->
-        if isRefTupleTy cenv.g ty then
-            let tyargs = destRefTupleTy cenv.g ty
-            mkCompiledTupleTyconRef cenv.g false (List.length tyargs), tyargs 
+        if isRefTupleTy g ty then
+            let tyargs = destRefTupleTy g ty
+            mkCompiledTupleTyconRef g false (List.length tyargs), tyargs 
         else failwith "StripToNominalTyconRef: unreachable" 
 
 and CanDevirtualizeApplication cenv v vref ty args = 
-     valRefEq cenv.g v vref
-     && not (isUnitTy cenv.g ty)
-     && isAppTy cenv.g ty 
-     // Exclusion: Some unions have null as representations 
-     && not (IsUnionTypeWithNullAsTrueValue cenv.g (fst(StripToNominalTyconRef cenv ty)).Deref)  
-     // If we de-virtualize an operation on structs then we have to take the address of the object argument
-     // Hence we have to actually have the object argument available to us, 
-     && (not (isStructTy cenv.g ty) || not (isNil args)) 
+    let g = cenv.g
+    valRefEq g v vref
+    && not (isUnitTy g ty)
+    && isAppTy g ty 
+    // Exclusion: Some unions have null as representations 
+    && not (IsUnionTypeWithNullAsTrueValue g (fst(StripToNominalTyconRef cenv ty)).Deref)  
+    // If we de-virtualize an operation on structs then we have to take the address of the object argument
+    // Hence we have to actually have the object argument available to us, 
+    && (not (isStructTy g ty) || not (isNil args)) 
 
 and TakeAddressOfStructArgumentIfNeeded cenv (vref: ValRef) ty args m =
-    if vref.IsInstanceMember && isStructTy cenv.g ty then 
+    let g = cenv.g
+    if vref.IsInstanceMember && isStructTy g ty then 
         match args with 
         | objArg :: rest -> 
             // We set NeverMutates here, allowing more address-taking. This is valid because we only ever use DevirtualizeApplication to transform 
             // known calls to known generated F# code for CompareTo, Equals and GetHashCode.
             // If we ever reuse DevirtualizeApplication to transform an arbitrary virtual call into a 
             // direct call then this assumption is not valid.
-            let wrap, objArgAddress, _readonly, _writeonly = mkExprAddrOfExpr cenv.g true false NeverMutates objArg None m
+            let wrap, objArgAddress, _readonly, _writeonly = mkExprAddrOfExpr g true false NeverMutates objArg None m
             wrap, (objArgAddress :: rest)
         | _ -> 
             // no wrapper, args stay the same 
@@ -2861,13 +2921,14 @@ and TakeAddressOfStructArgumentIfNeeded cenv (vref: ValRef) ty args m =
         id, args
 
 and DevirtualizeApplication cenv env (vref: ValRef) ty tyargs args m =
+    let g = cenv.g
     let wrap, args = TakeAddressOfStructArgumentIfNeeded cenv vref ty args m
-    let transformedExpr = wrap (MakeApplicationAndBetaReduce cenv.g (exprForValRef m vref, vref.Type, (if isNil tyargs then [] else [tyargs]), args, m))
+    let transformedExpr = wrap (MakeApplicationAndBetaReduce g (exprForValRef m vref, vref.Type, (if isNil tyargs then [] else [tyargs]), args, m))
     OptimizeExpr cenv env transformedExpr
   
 and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
+    let g = cenv.g
     match f, tyargs, args with 
-
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericComparisonIntrinsic when type is known 
     // to be augmented with a visible comparison value. 
     //
@@ -2879,14 +2940,14 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
     //
     // If C is a struct type then we have to take the address of 'c'
     
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_comparison_inner_vref ty args ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_comparison_inner_vref ty args ->
          
         let tcref, tyargs = StripToNominalTyconRef cenv ty
         match tcref.GeneratedCompareToValues with 
         | Some (_, vref) -> Some (DevirtualizeApplication cenv env vref ty tyargs args m)
         | _ -> None
         
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_comparison_withc_inner_vref ty args ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_comparison_withc_inner_vref ty args ->
          
         let tcref, tyargs = StripToNominalTyconRef cenv ty
         match tcref.GeneratedCompareToWithComparerValues, args with 
@@ -2894,7 +2955,7 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
             // the target takes a tupled argument, so we need to reorder the arg expressions in the
             // arg list, and create a tuple of y & comp
             // push the comparer to the end and box the argument
-            let args2 = [x; mkRefTupledNoTypes cenv.g m [mkCoerceExpr(y, cenv.g.obj_ty, m, ty) ; comp]]
+            let args2 = [x; mkRefTupledNoTypes g m [mkCoerceExpr(y, g.obj_ty, m, ty) ; comp]]
             Some (DevirtualizeApplication cenv env vref ty tyargs args2 m)
         | _ -> None
         
@@ -2902,7 +2963,7 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
     // to be augmented with a visible equality-without-comparer value. 
     //   REVIEW: GenericEqualityIntrinsic (which has no comparer) implements PER semantics (5537: this should be ER semantics)
     //           We are devirtualizing to a Equals(T) method which also implements PER semantics (5537: this should be ER semantics)
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_equality_er_inner_vref ty args ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_equality_er_inner_vref ty args ->
          
         let tcref, tyargs = StripToNominalTyconRef cenv ty 
         match tcref.GeneratedHashAndEqualsValues with 
@@ -2910,35 +2971,35 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
         | _ -> None
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericEqualityWithComparerFast
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_equality_withc_inner_vref ty args ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_equality_withc_inner_vref ty args ->
         let tcref, tyargs = StripToNominalTyconRef cenv ty
         match tcref.GeneratedHashAndEqualsWithComparerValues, args with
         | Some (_, _, withcEqualsVal), [comp; x; y] -> 
             // push the comparer to the end and box the argument
-            let args2 = [x; mkRefTupledNoTypes cenv.g m [mkCoerceExpr(y, cenv.g.obj_ty, m, ty) ; comp]]
+            let args2 = [x; mkRefTupledNoTypes g m [mkCoerceExpr(y, g.obj_ty, m, ty) ; comp]]
             Some (DevirtualizeApplication cenv env withcEqualsVal ty tyargs args2 m)
         | _ -> None 
       
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericEqualityWithComparer
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_equality_per_inner_vref ty args && not(isRefTupleTy cenv.g ty) ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_equality_per_inner_vref ty args && not(isRefTupleTy g ty) ->
        let tcref, tyargs = StripToNominalTyconRef cenv ty
        match tcref.GeneratedHashAndEqualsWithComparerValues, args with
        | Some (_, _, withcEqualsVal), [x; y] -> 
-           let args2 = [x; mkRefTupledNoTypes cenv.g m [mkCoerceExpr(y, cenv.g.obj_ty, m, ty); (mkCallGetGenericPEREqualityComparer cenv.g m)]]
+           let args2 = [x; mkRefTupledNoTypes g m [mkCoerceExpr(y, g.obj_ty, m, ty); (mkCallGetGenericPEREqualityComparer g m)]]
            Some (DevirtualizeApplication cenv env withcEqualsVal ty tyargs args2 m)
        | _ -> None     
     
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericHashIntrinsic
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_hash_inner_vref ty args ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_hash_inner_vref ty args ->
         let tcref, tyargs = StripToNominalTyconRef cenv ty
         match tcref.GeneratedHashAndEqualsWithComparerValues, args with
         | Some (_, withcGetHashCodeVal, _), [x] -> 
-            let args2 = [x; mkCallGetGenericEREqualityComparer cenv.g m]
+            let args2 = [x; mkCallGetGenericEREqualityComparer g m]
             Some (DevirtualizeApplication cenv env withcGetHashCodeVal ty tyargs args2 m)
         | _ -> None 
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericHashWithComparerIntrinsic
-    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v cenv.g.generic_hash_withc_inner_vref ty args ->
+    | Expr.Val (v, _, _), [ty], _ when CanDevirtualizeApplication cenv v g.generic_hash_withc_inner_vref ty args ->
         let tcref, tyargs = StripToNominalTyconRef cenv ty
         match tcref.GeneratedHashAndEqualsWithComparerValues, args with
         | Some (_, withcGetHashCodeVal, _), [comp; x] -> 
@@ -2947,86 +3008,86 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
         | _ -> None 
 
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericComparisonWithComparerIntrinsic for tuple types
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.generic_comparison_inner_vref && isRefTupleTy cenv.g ty ->
-        let tyargs = destRefTupleTy cenv.g ty 
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.generic_comparison_inner_vref && isRefTupleTy g ty ->
+        let tyargs = destRefTupleTy g ty 
         let vref = 
             match tyargs.Length with 
-            | 2 -> Some cenv.g.generic_compare_withc_tuple2_vref 
-            | 3 -> Some cenv.g.generic_compare_withc_tuple3_vref 
-            | 4 -> Some cenv.g.generic_compare_withc_tuple4_vref 
-            | 5 -> Some cenv.g.generic_compare_withc_tuple5_vref 
+            | 2 -> Some g.generic_compare_withc_tuple2_vref 
+            | 3 -> Some g.generic_compare_withc_tuple3_vref 
+            | 4 -> Some g.generic_compare_withc_tuple4_vref 
+            | 5 -> Some g.generic_compare_withc_tuple5_vref 
             | _ -> None
         match vref with 
-        | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs (mkCallGetGenericComparer cenv.g m :: args) m)            
+        | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs (mkCallGetGenericComparer g m :: args) m)            
         | None -> None
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericHashWithComparerIntrinsic for tuple types
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.generic_hash_inner_vref && isRefTupleTy cenv.g ty ->
-        let tyargs = destRefTupleTy cenv.g ty 
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.generic_hash_inner_vref && isRefTupleTy g ty ->
+        let tyargs = destRefTupleTy g ty 
         let vref = 
             match tyargs.Length with 
-            | 2 -> Some cenv.g.generic_hash_withc_tuple2_vref 
-            | 3 -> Some cenv.g.generic_hash_withc_tuple3_vref 
-            | 4 -> Some cenv.g.generic_hash_withc_tuple4_vref 
-            | 5 -> Some cenv.g.generic_hash_withc_tuple5_vref 
+            | 2 -> Some g.generic_hash_withc_tuple2_vref 
+            | 3 -> Some g.generic_hash_withc_tuple3_vref 
+            | 4 -> Some g.generic_hash_withc_tuple4_vref 
+            | 5 -> Some g.generic_hash_withc_tuple5_vref 
             | _ -> None
         match vref with 
-        | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs (mkCallGetGenericEREqualityComparer cenv.g m :: args) m)            
+        | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs (mkCallGetGenericEREqualityComparer g m :: args) m)            
         | None -> None
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericEqualityIntrinsic for tuple types
     //  REVIEW (5537): GenericEqualityIntrinsic implements PER semantics, and we are replacing it to something also
     //                 implementing PER semantics. However GenericEqualityIntrinsic should implement ER semantics.
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.generic_equality_per_inner_vref && isRefTupleTy cenv.g ty ->
-        let tyargs = destRefTupleTy cenv.g ty 
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.generic_equality_per_inner_vref && isRefTupleTy g ty ->
+        let tyargs = destRefTupleTy g ty 
         let vref = 
             match tyargs.Length with 
-            | 2 -> Some cenv.g.generic_equals_withc_tuple2_vref 
-            | 3 -> Some cenv.g.generic_equals_withc_tuple3_vref 
-            | 4 -> Some cenv.g.generic_equals_withc_tuple4_vref 
-            | 5 -> Some cenv.g.generic_equals_withc_tuple5_vref 
+            | 2 -> Some g.generic_equals_withc_tuple2_vref 
+            | 3 -> Some g.generic_equals_withc_tuple3_vref 
+            | 4 -> Some g.generic_equals_withc_tuple4_vref 
+            | 5 -> Some g.generic_equals_withc_tuple5_vref 
             | _ -> None
         match vref with 
-        | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs (mkCallGetGenericPEREqualityComparer cenv.g m :: args) m)            
+        | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs (mkCallGetGenericPEREqualityComparer g m :: args) m)            
         | None -> None
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericComparisonWithComparerIntrinsic for tuple types
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.generic_comparison_withc_inner_vref && isRefTupleTy cenv.g ty ->
-        let tyargs = destRefTupleTy cenv.g ty 
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.generic_comparison_withc_inner_vref && isRefTupleTy g ty ->
+        let tyargs = destRefTupleTy g ty 
         let vref = 
             match tyargs.Length with 
-            | 2 -> Some cenv.g.generic_compare_withc_tuple2_vref 
-            | 3 -> Some cenv.g.generic_compare_withc_tuple3_vref 
-            | 4 -> Some cenv.g.generic_compare_withc_tuple4_vref 
-            | 5 -> Some cenv.g.generic_compare_withc_tuple5_vref 
+            | 2 -> Some g.generic_compare_withc_tuple2_vref 
+            | 3 -> Some g.generic_compare_withc_tuple3_vref 
+            | 4 -> Some g.generic_compare_withc_tuple4_vref 
+            | 5 -> Some g.generic_compare_withc_tuple5_vref 
             | _ -> None
         match vref with 
         | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs args m)            
         | None -> None
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericHashWithComparerIntrinsic for tuple types
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.generic_hash_withc_inner_vref && isRefTupleTy cenv.g ty ->
-        let tyargs = destRefTupleTy cenv.g ty 
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.generic_hash_withc_inner_vref && isRefTupleTy g ty ->
+        let tyargs = destRefTupleTy g ty 
         let vref = 
             match tyargs.Length with 
-            | 2 -> Some cenv.g.generic_hash_withc_tuple2_vref 
-            | 3 -> Some cenv.g.generic_hash_withc_tuple3_vref 
-            | 4 -> Some cenv.g.generic_hash_withc_tuple4_vref 
-            | 5 -> Some cenv.g.generic_hash_withc_tuple5_vref 
+            | 2 -> Some g.generic_hash_withc_tuple2_vref 
+            | 3 -> Some g.generic_hash_withc_tuple3_vref 
+            | 4 -> Some g.generic_hash_withc_tuple4_vref 
+            | 5 -> Some g.generic_hash_withc_tuple5_vref 
             | _ -> None
         match vref with 
         | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs args m)            
         | None -> None
         
     // Optimize/analyze calls to LanguagePrimitives.HashCompare.GenericEqualityWithComparerIntrinsic for tuple types
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.generic_equality_withc_inner_vref && isRefTupleTy cenv.g ty ->
-        let tyargs = destRefTupleTy cenv.g ty 
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.generic_equality_withc_inner_vref && isRefTupleTy g ty ->
+        let tyargs = destRefTupleTy g ty 
         let vref = 
             match tyargs.Length with 
-            | 2 -> Some cenv.g.generic_equals_withc_tuple2_vref 
-            | 3 -> Some cenv.g.generic_equals_withc_tuple3_vref 
-            | 4 -> Some cenv.g.generic_equals_withc_tuple4_vref 
-            | 5 -> Some cenv.g.generic_equals_withc_tuple5_vref 
+            | 2 -> Some g.generic_equals_withc_tuple2_vref 
+            | 3 -> Some g.generic_equals_withc_tuple3_vref 
+            | 4 -> Some g.generic_equals_withc_tuple4_vref 
+            | 5 -> Some g.generic_equals_withc_tuple5_vref 
             | _ -> None
         match vref with 
         | Some vref -> Some (DevirtualizeApplication cenv env vref ty tyargs args m)            
@@ -3035,22 +3096,22 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
     // Calls to LanguagePrimitives.IntrinsicFunctions.UnboxGeneric can be optimized to calls to UnboxFast when we know that the 
     // target type isn't 'NullNotLiked', i.e. that the target type is not an F# union, record etc. 
     // Note UnboxFast is just the .NET IL 'unbox.any' instruction. 
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.unbox_vref && 
-                                   canUseUnboxFast cenv.g m ty ->
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.unbox_vref && 
+                                   canUseUnboxFast g m ty ->
 
-        Some(DevirtualizeApplication cenv env cenv.g.unbox_fast_vref ty tyargs args m)
+        Some(DevirtualizeApplication cenv env g.unbox_fast_vref ty tyargs args m)
         
     // Calls to LanguagePrimitives.IntrinsicFunctions.TypeTestGeneric can be optimized to calls to TypeTestFast when we know that the 
     // target type isn't 'NullNotTrueValue', i.e. that the target type is not an F# union, record etc. 
     // Note TypeTestFast is just the .NET IL 'isinst' instruction followed by a non-null comparison 
-    | Expr.Val (v, _, _), [ty], _ when valRefEq cenv.g v cenv.g.istype_vref && 
-                                   canUseTypeTestFast cenv.g ty ->
+    | Expr.Val (v, _, _), [ty], _ when valRefEq g v g.istype_vref && 
+                                   canUseTypeTestFast g ty ->
 
-        Some(DevirtualizeApplication cenv env cenv.g.istype_fast_vref ty tyargs args m)
+        Some(DevirtualizeApplication cenv env g.istype_fast_vref ty tyargs args m)
         
     // Don't fiddle with 'methodhandleof' calls - just remake the application
-    | Expr.Val (vref, _, _), _, _ when valRefEq cenv.g vref cenv.g.methodhandleof_vref ->
-        Some( MakeApplicationAndBetaReduce cenv.g (exprForValRef m vref, vref.Type, (if isNil tyargs then [] else [tyargs]), args, m), 
+    | Expr.Val (vref, _, _), _, _ when valRefEq g vref g.methodhandleof_vref ->
+        Some( MakeApplicationAndBetaReduce g (exprForValRef m vref, vref.Type, (if isNil tyargs then [] else [tyargs]), args, m), 
               { TotalSize=1
                 FunctionSize=1
                 HasEffect=false
@@ -3061,6 +3122,7 @@ and TryDevirtualizeApplication cenv env (f, tyargs, args, m) =
 
 /// Attempt to inline an application of a known value at callsites
 and TryInlineApplication cenv env finfo (tyargs: TType list, args: Expr list, m) =
+    let g = cenv.g
     // Considering inlining app 
     match finfo.Info with 
     | StripLambdaValue (lambdaId, arities, size, f2, f2ty) when
@@ -3088,13 +3150,13 @@ and TryInlineApplication cenv env finfo (tyargs: TType list, args: Expr list, m)
         // confuse the optimizer if the assembly is referenced on 4.0, since there will be no value to tie back
         // to FSharp.Core                              
         let isValFromLazyExtensions =
-            if cenv.g.compilingFslib then
+            if g.compilingFslib then
                 false
             else
                 match finfo.Info with
                 | ValValue(vref, _) ->
                     match vref.ApparentEnclosingEntity with
-                    | Parent tcr when (tyconRefEq cenv.g cenv.g.lazy_tcr_canon tcr) ->
+                    | Parent tcr when (tyconRefEq g g.lazy_tcr_canon tcr) ->
                             match tcr.CompiledRepresentation with
                             | CompiledTypeRepr.ILAsmNamed(iltr, _, _) -> 
                                 match iltr.Scope with
@@ -3109,7 +3171,7 @@ and TryInlineApplication cenv env finfo (tyargs: TType list, args: Expr list, m)
         let isSecureMethod =
           match finfo.Info with
           | ValValue(vref, _) ->
-                vref.Attribs |> List.exists (fun a -> (IsSecurityAttribute cenv.g cenv.amap cenv.casApplied a m) || (IsSecurityCriticalAttribute cenv.g a))
+                vref.Attribs |> List.exists (fun a -> (IsSecurityAttribute g cenv.amap cenv.casApplied a m) || (IsSecurityCriticalAttribute g a))
           | _ -> false                              
 
         if isSecureMethod then None else
@@ -3130,9 +3192,9 @@ and TryInlineApplication cenv env finfo (tyargs: TType list, args: Expr list, m)
         // inlining kicking into effect 
         let argsR = args |> List.map (fun e -> let eR, _einfo = OptimizeExpr cenv env e in eR) 
 
-        // Beta reduce. MakeApplicationAndBetaReduce cenv.g does all the hard work. 
+        // Beta reduce. MakeApplicationAndBetaReduce g does all the hard work. 
         // Inlining: beta reducing 
-        let exprR = MakeApplicationAndBetaReduce cenv.g (f2R, f2ty, [tyargs], argsR, m)
+        let exprR = MakeApplicationAndBetaReduce g (f2R, f2ty, [tyargs], argsR, m)
         // Inlining: reoptimizing
         Some(OptimizeExpr cenv {env with dontInline= Zset.add lambdaId env.dontInline} exprR)
           
@@ -3452,18 +3514,20 @@ and OptimizeFSharpDelegateInvoke cenv env (invokeRef, f0, f0ty, tyargs, args, m)
 
 /// Optimize/analyze a lambda expression
 and OptimizeLambdas (vspec: Val option) cenv env topValInfo e ety = 
-    match e with 
+    let g = cenv.g
+
+    match e with
     | Expr.Lambda (lambdaId, _, _, _, _, m, _)  
     | Expr.TyLambda (lambdaId, _, _, m, _) ->
         let env = { env with methEnv = { pipelineCount = 0 }}
-        let tps, ctorThisValOpt, baseValOpt, vsl, body, bodyty = IteratedAdjustArityOfLambda cenv.g cenv.amap topValInfo e
+        let tps, ctorThisValOpt, baseValOpt, vsl, body, bodyty = IteratedAdjustArityOfLambda g cenv.amap topValInfo e
         let env = { env with functionVal = (match vspec with None -> None | Some v -> Some (v, topValInfo)) }
         let env = Option.foldBack (BindInternalValToUnknown cenv) ctorThisValOpt env
         let env = Option.foldBack (BindInternalValToUnknown cenv) baseValOpt env
         let env = BindTypeVarsToUnknown tps env
         let env = List.foldBack (BindInternalValsToUnknown cenv) vsl env
         let bodyR, bodyinfo = OptimizeExpr cenv env body
-        let exprR = mkMemberLambdas m tps ctorThisValOpt baseValOpt vsl (bodyR, bodyty)
+        let exprR = mkMemberLambdas g m tps ctorThisValOpt baseValOpt vsl (bodyR, bodyty)
         let arities = vsl.Length
         let arities = if isNil tps then arities else 1+arities
         let bsize = bodyinfo.TotalSize
@@ -3504,7 +3568,7 @@ and OptimizeLambdas (vspec: Val option) cenv env topValInfo e ety =
               if fvs.UsesMethodLocalConstructs || fvs.FreeLocals.Contains baseVal then 
                   UnknownValue
               else 
-                  let expr2 = mkMemberLambdas m tps ctorThisValOpt None vsl (bodyR, bodyty)
+                  let expr2 = mkMemberLambdas g m tps ctorThisValOpt None vsl (bodyR, bodyty)
                   CurriedLambdaValue (lambdaId, arities, bsize, expr2, ety) 
                   
         let estimatedSize = 
@@ -3521,12 +3585,13 @@ and OptimizeLambdas (vspec: Val option) cenv env topValInfo e ety =
     | _ -> OptimizeExpr cenv env e 
       
 and OptimizeNewDelegateExpr cenv env (lambdaId, vsl, body, remake) = 
+    let g = cenv.g
     let env = List.foldBack (BindInternalValsToUnknown cenv) vsl env
     let bodyR, bodyinfo = OptimizeExpr cenv env body
     let arities = vsl.Length
     let bsize = bodyinfo.TotalSize
     let exprR = remake bodyR
-    let valu = CurriedLambdaValue (lambdaId, arities, bsize, exprR, tyOfExpr cenv.g exprR) 
+    let valu = CurriedLambdaValue (lambdaId, arities, bsize, exprR, tyOfExpr g exprR) 
 
     exprR, { TotalSize=bsize + closureTotalSize (* estimate size of new syntactic closure - expensive, in contrast to a method *)
              FunctionSize=1 
@@ -3553,13 +3618,14 @@ and OptimizeDecisionTreeTargets cenv env m targets =
     OptimizeList (OptimizeDecisionTreeTarget cenv env m) (Array.toList targets)
 
 and ReshapeExpr cenv (shape, e) = 
-  match shape, e with 
-  | TupleValue subshapes, Expr.Val (_vref, _vFlags, m) ->
-      let tinst = destRefTupleTy cenv.g (tyOfExpr cenv.g e)
-      let subshapes = Array.toList subshapes
-      mkRefTupled cenv.g m (List.mapi (fun i subshape -> ReshapeExpr cenv (subshape, mkTupleFieldGet cenv.g (tupInfoRef, e, tinst, i, m))) subshapes) tinst
-  | _ ->  
-      e
+    let g = cenv.g
+    match shape, e with 
+    | TupleValue subshapes, Expr.Val (_vref, _vFlags, m) ->
+        let tinst = destRefTupleTy g (tyOfExpr g e)
+        let subshapes = Array.toList subshapes
+        mkRefTupled g m (List.mapi (fun i subshape -> ReshapeExpr cenv (subshape, mkTupleFieldGet g (tupInfoRef, e, tinst, i, m))) subshapes) tinst
+    | _ ->  
+        e
 
 and OptimizeExprThenConsiderSplit cenv env e = 
   let eR, einfo = OptimizeExpr cenv env e
@@ -3568,6 +3634,7 @@ and OptimizeExprThenConsiderSplit cenv env e =
 
 /// Decide whether to List.unzip a sub-expression into a new method
 and ComputeSplitToMethodCondition flag threshold cenv env (e: Expr, einfo) = 
+    let g = cenv.g
     flag &&
     // NOTE: The method splitting optimization is completely disabled if we are not taking tailcalls.
     cenv.emitTailcalls &&
@@ -3587,25 +3654,26 @@ and ComputeSplitToMethodCondition flag threshold cenv env (e: Expr, einfo) =
             // All the free variables (apart from things with an arity, i.e. compiled as methods) should be normal, i.e. not base/this etc. 
             (v.BaseOrThisInfo = NormalVal && 
              // None of them should be byrefs 
-             not (isByrefLikeTy cenv.g m v.Type) && 
+             not (isByrefLikeTy g m v.Type) && 
              //  None of them should be local polymorphic constrained values 
-             not (IsGenericValWithGenericConstraints cenv.g v) &&
+             not (IsGenericValWithGenericConstraints g v) &&
              // None of them should be mutable 
              not v.IsMutable)))) &&
-    not (isByrefLikeTy cenv.g m (tyOfExpr cenv.g e)) 
+    not (isByrefLikeTy g m (tyOfExpr g e)) 
 
 and ConsiderSplitToMethod flag threshold cenv env (e, einfo) = 
+    let g = cenv.g
     if ComputeSplitToMethodCondition flag threshold cenv env (e, einfo) then
         let m = e.Range
-        let uv, _ue = mkCompGenLocal m "unitVar" cenv.g.unit_ty
-        let ty = tyOfExpr cenv.g e
+        let uv, _ue = mkCompGenLocal m "unitVar" g.unit_ty
+        let ty = tyOfExpr g e
         let nm = 
             match env.latestBoundId with 
             | Some id -> id.idText+suffixForVariablesThatMayNotBeEliminated 
             | None -> suffixForVariablesThatMayNotBeEliminated 
-        let fv, fe = mkCompGenLocal m nm (cenv.g.unit_ty --> ty)
+        let fv, fe = mkCompGenLocal m nm (mkFunTy g g.unit_ty ty)
         mkInvisibleLet m fv (mkLambda m uv (e, ty)) 
-          (primMkApp (fe, (cenv.g.unit_ty --> ty)) [] [mkUnit cenv.g m] m), 
+          (primMkApp (fe, (mkFunTy g g.unit_ty ty)) [] [mkUnit g m] m), 
         {einfo with FunctionSize=callSize }
     else
         e, einfo 
@@ -3650,6 +3718,7 @@ and OptimizeDecisionTreeTarget cenv env _m (TTarget(vs, expr, flags)) =
 
 /// Optimize/analyze a decision tree
 and OptimizeDecisionTree cenv env m x =
+    let g = cenv.g
     match x with 
     | TDSuccess (es, n) -> 
         let esR, einfos = OptimizeExprsThenConsiderSplits cenv env es 
@@ -3678,13 +3747,14 @@ and OptimizeDecisionTree cenv env m x =
         //
         // However, we are not allowed to copy expressions in patcompile.fs because type checking is not complete (see FSharp 1.0 bug 4821).
         // Hence we do it here. There is no doubt a better way to do this.
-        let e = if typeEquiv cenv.g (tyOfExpr cenv.g e) cenv.g.bool_ty then copyExpr cenv.g CloneAll e else e
+        let e = if typeEquiv g (tyOfExpr g e) g.bool_ty then copyExpr g CloneAll e else e
 
         OptimizeSwitch cenv env (e, cases, dflt, m)
 
 and TryOptimizeDecisionTreeTest cenv test vinfo = 
+    let g = cenv.g
     match test, vinfo with 
-    | DecisionTreeTest.UnionCase (c1, _), StripUnionCaseValue(c2, _) -> Some(cenv.g.unionCaseRefEq c1 c2)
+    | DecisionTreeTest.UnionCase (c1, _), StripUnionCaseValue(c2, _) -> Some(g.unionCaseRefEq c1 c2)
     | DecisionTreeTest.ArrayLength _, _ -> None
     | DecisionTreeTest.Const c1, StripConstValue c2 -> if c1 = Const.Zero || c2 = Const.Zero then None else Some(c1=c2)
     | DecisionTreeTest.IsNull, StripConstValue c2 -> Some(c2=Const.Zero)
@@ -3728,6 +3798,7 @@ and OptimizeSwitchFallback cenv env (eR, einfo, cases, dflt, m) =
     TDSwitch (eR, casesR, dfltR, m), info
 
 and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
+    let g = cenv.g
     try 
         
         // The aim here is to stop method splitting for direct-self-tailcalls. We do more than that: if an expression
@@ -3741,7 +3812,7 @@ and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
         let exprOptimized, einfo = 
             let env = if vref.IsCompilerGenerated && Option.isSome env.latestBoundId then env else {env with latestBoundId=Some vref.Id} 
             let cenv = if vref.InlineInfo.MustInline then { cenv with optimizing=false} else cenv 
-            let arityInfo = InferArityOfExprBinding cenv.g AllowTypeDirectedDetupling.No vref expr
+            let arityInfo = InferArityOfExprBinding g AllowTypeDirectedDetupling.No vref expr
             let exprOptimized, einfo = OptimizeLambdas (Some vref) cenv env arityInfo expr vref.Type 
             let size = localVarSize 
             exprOptimized, {einfo with FunctionSize=einfo.FunctionSize+size; TotalSize = einfo.TotalSize+size} 
@@ -3777,20 +3848,20 @@ and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
                // Bug 4916: do not record inline data for initialization trigger expressions
                // Note: we can't eliminate these value infos at the file boundaries because that would change initialization
                // order
-               IsCompiledAsStaticPropertyWithField cenv.g vref ||
+               IsCompiledAsStaticPropertyWithField g vref ||
                
                (vref.InlineInfo = ValInline.Never) ||
                // MarshalByRef methods may not be inlined
                (match vref.DeclaringEntity with 
                 | Parent tcref -> 
-                    match cenv.g.system_MarshalByRefObject_tcref with
+                    match g.system_MarshalByRefObject_tcref with
                     | None -> false
                     | Some mbrTyconRef ->
                     // Check we can deref system_MarshalByRefObject_tcref. When compiling against the Silverlight mscorlib we can't
                     if mbrTyconRef.TryDeref.IsSome then
                         // Check if this is a subtype of MarshalByRefObject
-                        assert cenv.g.system_MarshalByRefObject_ty.IsSome
-                        ExistsSameHeadTypeInHierarchy cenv.g cenv.amap vref.Range (generalizedTyconRef tcref) cenv.g.system_MarshalByRefObject_ty.Value
+                        assert g.system_MarshalByRefObject_ty.IsSome
+                        ExistsSameHeadTypeInHierarchy g cenv.amap vref.Range (generalizedTyconRef g tcref) g.system_MarshalByRefObject_ty.Value
                     else 
                         false
                 | ParentNone -> false) ||
@@ -3799,24 +3870,24 @@ and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
                // ilxgen.fs, hence treat them as if no-inline (when preparing the inline information for 
                // FSharp.Core).
                (let nvref = mkLocalValRef vref 
-                cenv.g.compilingFslib &&
-                   (valRefEq cenv.g nvref cenv.g.seq_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_generated_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_finally_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_using_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_append_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_empty_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_delay_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_singleton_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_map_vref ||
-                    valRefEq cenv.g nvref cenv.g.seq_collect_vref ||
-                    valRefEq cenv.g nvref cenv.g.reference_equality_inner_vref ||
-                    valRefEq cenv.g nvref cenv.g.generic_comparison_inner_vref ||
-                    valRefEq cenv.g nvref cenv.g.generic_comparison_withc_inner_vref ||
-                    valRefEq cenv.g nvref cenv.g.generic_equality_er_inner_vref ||
-                    valRefEq cenv.g nvref cenv.g.generic_equality_per_inner_vref ||
-                    valRefEq cenv.g nvref cenv.g.generic_equality_withc_inner_vref ||
-                    valRefEq cenv.g nvref cenv.g.generic_hash_inner_vref))
+                g.compilingFslib &&
+                   (valRefEq g nvref g.seq_vref ||
+                    valRefEq g nvref g.seq_generated_vref ||
+                    valRefEq g nvref g.seq_finally_vref ||
+                    valRefEq g nvref g.seq_using_vref ||
+                    valRefEq g nvref g.seq_append_vref ||
+                    valRefEq g nvref g.seq_empty_vref ||
+                    valRefEq g nvref g.seq_delay_vref ||
+                    valRefEq g nvref g.seq_singleton_vref ||
+                    valRefEq g nvref g.seq_map_vref ||
+                    valRefEq g nvref g.seq_collect_vref ||
+                    valRefEq g nvref g.reference_equality_inner_vref ||
+                    valRefEq g nvref g.generic_comparison_inner_vref ||
+                    valRefEq g nvref g.generic_comparison_withc_inner_vref ||
+                    valRefEq g nvref g.generic_equality_er_inner_vref ||
+                    valRefEq g nvref g.generic_equality_per_inner_vref ||
+                    valRefEq g nvref g.generic_equality_withc_inner_vref ||
+                    valRefEq g nvref g.generic_hash_inner_vref))
             then {einfo with Info=UnknownValue} 
             else einfo 
         if vref.MustInline && IsPartialExprVal einfo.Info then 
@@ -3828,10 +3899,12 @@ and OptimizeBinding cenv isRec env (TBind(vref, expr, spBind)) =
         errorRecovery exn vref.Range 
         raise (ReportedError (Some exn))
           
-and OptimizeBindings cenv isRec env xs = List.mapFold (OptimizeBinding cenv isRec) env xs
+and OptimizeBindings cenv isRec env xs =
+    List.mapFold (OptimizeBinding cenv isRec) env xs
     
-and OptimizeModuleExpr cenv env x = 
-    match x with   
+and OptimizeModuleExprWithSig cenv env mexpr = 
+    let g = cenv.g
+    match mexpr with   
     | ModuleOrNamespaceExprWithSig(mty, def, m) -> 
         // Optimize the module implementation
         let (def, info), (_env, bindInfosColl) = OptimizeModuleDef cenv (env, []) def  
@@ -3842,7 +3915,8 @@ and OptimizeModuleExpr cenv env x =
         // the application of the signature. If it contains extra elements we'll accidentally eliminate
         // bindings.
          
-        let _renaming, hidden as rpi = ComputeRemappingFromImplementationToSignature cenv.g def mty 
+        let _renaming, hidden as rpi = ComputeRemappingFromImplementationToSignature g def mty
+
         let def = 
             if not cenv.settings.LocalOptimizationsEnabled then def else 
 
@@ -3857,7 +3931,7 @@ and OptimizeModuleExpr cenv env x =
                     hidden.HiddenVals.Contains bind.Var && 
 
                     // Check the thing is not compiled as a static field or property, since reflected definitions and other reflective stuff might need it
-                    not (IsCompiledAsStaticProperty cenv.g bind.Var))
+                    not (IsCompiledAsStaticProperty g bind.Var))
 
             let deadSet = Zset.addList (dead |> List.map (fun (bind, _) -> bind.Var)) (Zset.empty valOrder)
 
@@ -3906,7 +3980,7 @@ and OptimizeModuleExpr cenv env x =
             
             elimModDef def 
 
-        let info = AbstractAndRemapModulInfo "defs" cenv.g m rpi info
+        let info = AbstractAndRemapModulInfo "defs" g m rpi info
 
         ModuleOrNamespaceExprWithSig(mty, def, m), info 
 
@@ -3929,7 +4003,7 @@ and OptimizeModuleDef cenv (env, bindInfosColl) input =
         (env, bindInfosColl)
 
     | TMAbstract mexpr -> 
-        let mexpr, info = OptimizeModuleExpr cenv env mexpr
+        let mexpr, info = OptimizeModuleExprWithSig cenv env mexpr
         let env = BindValsInModuleOrNamespace cenv info env
         (TMAbstract mexpr, info), (env, bindInfosColl)
 
@@ -3973,6 +4047,7 @@ and OptimizeModuleDefs cenv (env, bindInfosColl) defs =
     (defs, UnionOptimizationInfos minfos), (env, bindInfosColl)
    
 and OptimizeImplFileInternal cenv env isIncrementalFragment fsiMultiAssemblyEmit hidden implFile =
+    let g = cenv.g
     let (TImplFile (qname, pragmas, mexpr, hasExplicitEntryPoint, isScript, anonRecdTypes, namedDebugPointsForInlinedCode)) = implFile
     let env, mexprR, minfo, hidden = 
         match mexpr with 
@@ -3996,13 +4071,13 @@ and OptimizeImplFileInternal cenv env isIncrementalFragment fsiMultiAssemblyEmit
             env, ModuleOrNamespaceExprWithSig(mty, defR, m), minfo, hidden
         | _ ->
             // This optimizes and builds minfo w.r.t. the signature
-            let mexprR, minfo = OptimizeModuleExpr cenv env mexpr
+            let mexprR, minfo = OptimizeModuleExprWithSig cenv env mexpr
             let hidden = ComputeSignatureHidingInfoAtAssemblyBoundary mexpr.Type hidden
             let minfoExternal = AbstractLazyModulInfoByHiding true hidden minfo
             let env =
                 // In F# interactive multi-assembly mode, internals are not accessible in the 'env' used intra-assembly
                 // In regular fsc compilation, internals are accessible in the 'env' used intra-assembly
-                if cenv.g.isInteractive && fsiMultiAssemblyEmit then
+                if g.isInteractive && fsiMultiAssemblyEmit then
                     BindValsInModuleOrNamespace cenv minfoExternal env
                 else
                     BindValsInModuleOrNamespace cenv minfo env
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index e7554a1f8c7..76546b51019 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -378,13 +378,20 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
         match visitAppTyOpt with 
         | Some visitAppTy -> visitAppTy (tcref, tinst)
         | None -> ()
+
     | TType_anon (anonInfo, tys) -> 
         RecordAnonRecdInfo cenv anonInfo
         CheckTypesDeep cenv f g env tys
 
-    | TType_ucase (_, tinst) -> CheckTypesDeep cenv f g env tinst
-    | TType_tuple (_, tys) -> CheckTypesDeep cenv f g env tys
-    | TType_fun (s, t) -> CheckTypeDeep cenv f g env true s; CheckTypeDeep cenv f g env true t
+    | TType_ucase (_, tinst) ->
+        CheckTypesDeep cenv f g env tinst
+
+    | TType_tuple (_, tys) ->
+        CheckTypesDeep cenv f g env tys
+
+    | TType_fun (s, t) ->
+        CheckTypeDeep cenv f g env true s; CheckTypeDeep cenv f g env true t
+
     | TType_var tp -> 
           if not tp.IsSolved then 
               match visitTyparOpt with 
@@ -1341,7 +1348,7 @@ and CheckApplication cenv env expr (f, tyargs, argsl, m) context =
 
 and CheckLambda cenv env expr (argvs, m, rty) = 
     let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) 
-    let ty = mkMultiLambdaTy m argvs rty in 
+    let ty = mkMultiLambdaTy cenv.g m argvs rty in 
     CheckLambdas false None cenv env false topValInfo false expr m ty PermitByRefExpr.Yes
 
 and CheckTyLambda cenv env expr (tps, m, rty) = 
@@ -2181,8 +2188,8 @@ let CheckModuleBinding cenv env (TBind(v, e, _) as bind) =
             if v.IsExtensionMember then 
                 tcref.ModuleOrNamespaceType.AllValsAndMembersByLogicalNameUncached.[v.LogicalName] |> List.iter (fun v2 -> 
                     if v2.IsExtensionMember && not (valEq v v2) && (v.CompiledName cenv.g.CompilerGlobalState) = (v2.CompiledName cenv.g.CompilerGlobalState) then
-                        let minfo1 =  FSMeth(g, generalizedTyconRef tcref, mkLocalValRef v, Some 0UL)
-                        let minfo2 =  FSMeth(g, generalizedTyconRef tcref, mkLocalValRef v2, Some 0UL)
+                        let minfo1 =  FSMeth(g, generalizedTyconRef g tcref, mkLocalValRef v, Some 0UL)
+                        let minfo2 =  FSMeth(g, generalizedTyconRef g tcref, mkLocalValRef v2, Some 0UL)
                         if tyconRefEq g v.MemberApparentEntity v2.MemberApparentEntity && 
                            MethInfosEquivByNameAndSig EraseAll true g cenv.amap v.Range minfo1 minfo2 then 
                             errorR(Duplicate(kind, v.DisplayName, v.Range)))
@@ -2242,7 +2249,7 @@ let CheckEntityDefn cenv env (tycon: Entity) =
     let g = cenv.g
     let m = tycon.Range 
     let tcref = mkLocalTyconRef tycon
-    let ty = generalizedTyconRef tcref
+    let ty = generalizedTyconRef g tcref
 
     let env = { env with reflect = env.reflect || HasFSharpAttribute g g.attrib_ReflectedDefinitionAttribute tycon.Attribs }
     let env = BindTypars g env (tycon.Typars m)
@@ -2519,7 +2526,7 @@ let CheckEntityDefn cenv env (tycon: Entity) =
                 |> List.filter (isInterfaceTy g)
             CheckMultipleInterfaceInstantiations cenv ty interfaces false m
         
-        // Check struct fields. We check these late because we have to have first checked that the structs are
+        // Check fields. We check these late because we have to have first checked that the structs are
         // free of cycles
         if tycon.IsStructOrEnumTycon then 
             for f in tycon.AllInstanceFieldsAsList do
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index b697bf7b7e9..ebae193960c 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -483,7 +483,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
         QP.mkSequential(ConvExpr cenv env x0, ConvExpr cenv env x1)
 
     | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy g ty ->
-        let f = mkLambdas m tps tmvs (e, GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod))
+        let f = mkLambdas g m tps tmvs (e, GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod))
         let fR = ConvExpr cenv env f
         let tyargR = ConvType cenv env m ctyp
         QP.mkDelegate(tyargR, fR)
@@ -614,7 +614,7 @@ and private ConvExprCore cenv (env : QuotationTranslationEnv) (expr: Expr) : QP.
             let parentTyconR = ConvTyconRef cenv tcref m
             let propRetTypeR = ConvType cenv env m fspec.FormalType
             let callArgR = ConvExpr cenv env obj
-            let exnTypeR = ConvType cenv env m (generalizedTyconRef tcref)
+            let exnTypeR = ConvType cenv env m (generalizedTyconRef g tcref)
             QP.mkPropGet( (parentTyconR, fspec.LogicalName, propRetTypeR, []), [], [QP.mkCoerce (exnTypeR, callArgR)])
 
         | TOp.Coerce, [tgtTy;srcTy], [x]  ->
@@ -923,10 +923,11 @@ and ConvValRef holeOk cenv env m (vref: ValRef) tyargs =
     EmitDebugInfoIfNecessary cenv env m (ConvValRefCore holeOk cenv env m vref tyargs)
 
 and private ConvValRefCore holeOk cenv env m (vref: ValRef) tyargs =
+    let g = cenv.g
     let v = vref.Deref
     if env.isinstVals.ContainsVal v then
         let ty, e = env.isinstVals.[v]
-        ConvExpr cenv env (mkCallUnbox cenv.g m ty e)
+        ConvExpr cenv env (mkCallUnbox g m ty e)
     elif env.substVals.ContainsVal v then
         let e = env.substVals.[v]
         ConvExpr cenv env e
@@ -987,7 +988,8 @@ and FilterMeasureTyargs tys =
     tys |> List.filter (fun ty -> match ty with TType_measure _ -> false | _ -> true)
 
 and ConvType cenv env m ty =
-    match stripTyEqnsAndMeasureEqns cenv.g ty with
+    let g = cenv.g
+    match stripTyEqnsAndMeasureEqns g ty with
     | TType_app(tcref, [tyarg]) when isArrayTyconRef cenv.g tcref ->
         QP.mkArrayTy(rankOfArrayTyconRef cenv.g tcref, ConvType cenv env m tyarg)
 
@@ -1000,15 +1002,25 @@ and ConvType cenv env m ty =
 #endif
         QP.mkILNamedTy(ConvTyconRef cenv tcref m, ConvTypes cenv env m tyargs)
 
-    | TType_fun(a, b)          -> QP.mkFunTy(ConvType cenv env m a, ConvType cenv env m b)
-    | TType_tuple(tupInfo, l)  -> ConvType cenv env m (mkCompiledTupleTy cenv.g (evalTupInfoIsStruct tupInfo) l)
-    | TType_anon(anonInfo, tinst) ->
+    | TType_fun(a, b) -> 
+        QP.mkFunTy(ConvType cenv env m a, ConvType cenv env m b)
+
+    | TType_tuple(tupInfo, l)  -> 
+        ConvType cenv env m (mkCompiledTupleTy cenv.g (evalTupInfoIsStruct tupInfo) l)
+
+    | TType_anon(anonInfo, tinst) -> 
         let tref = anonInfo.ILTypeRef
         let tinstR = ConvTypes cenv env m tinst
         QP.mkILNamedTy(ConvILTypeRefUnadjusted cenv m tref, tinstR)
-    | TType_var(tp)           -> QP.mkVarTy(ConvTyparRef cenv env m tp)
-    | TType_forall(_spec, _ty)   -> wfail(Error(FSComp.SR.crefNoInnerGenericsInQuotations(), m))
-    | _ -> wfail(Error (FSComp.SR.crefQuotationsCantContainThisType(), m))
+
+    | TType_var(tp) ->
+        QP.mkVarTy(ConvTyparRef cenv env m tp)
+
+    | TType_forall(_spec, _ty) ->
+        wfail(Error(FSComp.SR.crefNoInnerGenericsInQuotations(), m))
+
+    | _ ->
+        wfail(Error (FSComp.SR.crefQuotationsCantContainThisType(), m))
 
 and ConvTypes cenv env m tys =
     List.map (ConvType cenv env m) (FilterMeasureTyargs tys)
diff --git a/src/fsharp/SignatureConformance.fs b/src/fsharp/SignatureConformance.fs
index ab6d5bcced8..dee10480f40 100644
--- a/src/fsharp/SignatureConformance.fs
+++ b/src/fsharp/SignatureConformance.fs
@@ -219,8 +219,8 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) =
                     false
                 else
 
-                let aNull2 = TypeNullIsExtraValue g m (generalizedTyconRef (mkLocalTyconRef implTycon))
-                let fNull2 = TypeNullIsExtraValue g m (generalizedTyconRef (mkLocalTyconRef implTycon))
+                let aNull2 = TypeNullIsExtraValue g m (generalizedTyconRef g (mkLocalTyconRef implTycon))
+                let fNull2 = TypeNullIsExtraValue g m (generalizedTyconRef g (mkLocalTyconRef implTycon))
                 if aNull2 && not fNull2 then 
                     errorR(Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleImplementationSaysNull2(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m))
                     false
@@ -229,8 +229,8 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) =
                     false
                 else
 
-                let aSealed = isSealedTy g (generalizedTyconRef (mkLocalTyconRef implTycon))
-                let fSealed = isSealedTy g (generalizedTyconRef (mkLocalTyconRef sigTycon))
+                let aSealed = isSealedTy g (generalizedTyconRef g (mkLocalTyconRef implTycon))
+                let fSealed = isSealedTy g (generalizedTyconRef g (mkLocalTyconRef sigTycon))
                 if aSealed && not fSealed then 
                     errorR(Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleImplementationSealed(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m))
                     false
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 49dc04c11b5..881fe612bb3 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -1114,9 +1114,9 @@ let unionCaseRefOrder =
 // Make some common types
 //---------------------------------------------------------------------------
 
-let mkFunTy d r = TType_fun (d, r)
-
-let (-->) d r = mkFunTy d r
+let mkFunTy (g: TcGlobals) d r =
+    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
+    TType_fun (d, r)
 
 let mkForallTy d r = TType_forall (d, r)
 
@@ -1124,7 +1124,9 @@ let mkForallTyIfNeeded d r = if isNil d then r else mkForallTy d r
 
 let (+->) d r = mkForallTyIfNeeded d r
 
-let mkIteratedFunTy dl r = List.foldBack (-->) dl r
+let mkIteratedFunTy g dl r = List.foldBack (mkFunTy g) dl r
+
+let mkLambdaTy g tps tys rty = mkForallTyIfNeeded tps (mkIteratedFunTy g tys rty)
 
 let mkLambdaArgTy m tys = 
     match tys with 
@@ -1133,8 +1135,8 @@ let mkLambdaArgTy m tys =
     | _ -> mkRawRefTupleTy tys
 
 let typeOfLambdaArg m vs = mkLambdaArgTy m (typesOfVals vs)
-let mkMultiLambdaTy m vs rty = mkFunTy (typeOfLambdaArg m vs) rty 
-let mkLambdaTy tps tys rty = mkForallTyIfNeeded tps (mkIteratedFunTy tys rty)
+
+let mkMultiLambdaTy g m vs rty = mkFunTy g (typeOfLambdaArg m vs) rty 
 
 /// When compiling FSharp.Core.dll we have to deal with the non-local references into
 /// the library arising from env.fs. Part of this means that we have to be able to resolve these
@@ -1246,29 +1248,29 @@ let mkTypeChoose m vs b = match vs with [] -> b | _ -> Expr.TyChoose (vs, b, m)
 let mkObjExpr (ty, basev, basecall, overrides, iimpls, m) = 
     Expr.Obj (newUnique(), ty, basev, basecall, overrides, iimpls, m) 
 
-let mkLambdas m tps (vs: Val list) (b, rty) = 
-    mkTypeLambda m tps (List.foldBack (fun v (e, ty) -> mkLambda m v (e, ty), v.Type --> ty) vs (b, rty))
+let mkLambdas g m tps (vs: Val list) (b, rty) = 
+    mkTypeLambda m tps (List.foldBack (fun v (e, ty) -> mkLambda m v (e, ty), mkFunTy g v.Type ty) vs (b, rty))
 
-let mkMultiLambdasCore m vsl (b, rty) = 
-    List.foldBack (fun v (e, ty) -> mkMultiLambda m v (e, ty), typeOfLambdaArg m v --> ty) vsl (b, rty)
+let mkMultiLambdasCore g m vsl (b, rty) = 
+    List.foldBack (fun v (e, ty) -> mkMultiLambda m v (e, ty), mkFunTy g (typeOfLambdaArg m v) ty) vsl (b, rty)
 
-let mkMultiLambdas m tps vsl (b, rty) = 
-    mkTypeLambda m tps (mkMultiLambdasCore m vsl (b, rty) )
+let mkMultiLambdas g m tps vsl (b, rty) = 
+    mkTypeLambda m tps (mkMultiLambdasCore g m vsl (b, rty) )
 
-let mkMemberLambdas m tps ctorThisValOpt baseValOpt vsl (b, rty) = 
+let mkMemberLambdas g m tps ctorThisValOpt baseValOpt vsl (b, rty) = 
     let expr = 
         match ctorThisValOpt, baseValOpt with
-        | None, None -> mkMultiLambdasCore m vsl (b, rty)
+        | None, None -> mkMultiLambdasCore g m vsl (b, rty)
         | _ -> 
             match vsl with 
             | [] -> error(InternalError("mk_basev_multi_lambdas_core: can't attach a basev to a non-lambda expression", m))
             | h :: t -> 
-                let b, rty = mkMultiLambdasCore m t (b, rty)
-                (rebuildLambda m ctorThisValOpt baseValOpt h (b, rty), (typeOfLambdaArg m h --> rty))
+                let b, rty = mkMultiLambdasCore g m t (b, rty)
+                (rebuildLambda m ctorThisValOpt baseValOpt h (b, rty), (mkFunTy g (typeOfLambdaArg m h) rty))
     mkTypeLambda m tps expr
 
-let mkMultiLambdaBind v letSeqPtOpt m tps vsl (b, rty) = 
-    TBind(v, mkMultiLambdas m tps vsl (b, rty), letSeqPtOpt)
+let mkMultiLambdaBind g v letSeqPtOpt m tps vsl (b, rty) = 
+    TBind(v, mkMultiLambdas g m tps vsl (b, rty), letSeqPtOpt)
 
 let mkBind seqPtOpt v e = TBind(v, e, seqPtOpt)
 
@@ -2501,13 +2503,18 @@ let ArgInfosOfPropertyVal g (v: Val) =
 // Generalize type constructors to types
 //---------------------------------------------------------------------------
 
-let generalTyconRefInst (tc: TyconRef) = generalizeTypars tc.TyparsNoRange
+let generalTyconRefInst (tcref: TyconRef) = 
+    generalizeTypars tcref.TyparsNoRange
 
-let generalizeTyconRef tc = 
-    let tinst = generalTyconRefInst tc
-    tinst, TType_app(tc, tinst)
+let generalizeTyconRef (g: TcGlobals) tcref = 
+    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
+    let tinst = generalTyconRefInst tcref
+    tinst, TType_app(tcref, tinst)
 
-let generalizedTyconRef tc = TType_app(tc, generalTyconRefInst tc)
+let generalizedTyconRef (g: TcGlobals) tcref = 
+    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
+    let tinst = generalTyconRefInst tcref
+    TType_app(tcref, tinst)
 
 let isTTyparSupportsStaticMethod = function TyparConstraint.MayResolveMember _ -> true | _ -> false
 let isTTyparCoercesToType = function TyparConstraint.CoercesTo _ -> true | _ -> false
@@ -6069,7 +6076,7 @@ let mkRefTupledTy g tys = mkAnyTupledTy g tupInfoRef tys
 
 let mkRefTupledVarsTy g vs = mkRefTupledTy g (typesOfVals vs)
 
-let mkMethodTy g argtys rty = mkIteratedFunTy (List.map (mkRefTupledTy g) argtys) rty 
+let mkMethodTy g argtys rty = mkIteratedFunTy g (List.map (mkRefTupledTy g) argtys) rty 
 
 let mkArrayType (g: TcGlobals) ty = TType_app (g.array_tcr_nice, [ty])
 
@@ -6109,7 +6116,7 @@ let rec tyOfExpr g expr =
     | Expr.Const (_, _, ty) -> ty
     | Expr.Val (vref, _, _) -> vref.Type
     | Expr.Sequential (a, b, k, _) -> tyOfExpr g (match k with NormalSeq -> b | ThenDoSeq -> a)
-    | Expr.Lambda (_, _, _, vs, _, _, rty) -> (mkRefTupledVarsTy g vs --> rty)
+    | Expr.Lambda (_, _, _, vs, _, _, rty) -> mkFunTy g (mkRefTupledVarsTy g vs) rty
     | Expr.TyLambda (_, tyvs, _, _, rty) -> (tyvs +-> rty)
     | Expr.Let (_, e, _, _) 
     | Expr.TyChoose (_, e, _)
@@ -7866,7 +7873,7 @@ let AdjustValForExpectedArity g m (vref: ValRef) flags topValInfo =
     let call = MakeApplicationAndBetaReduce g (Expr.Val (vref, flags, m), vref.Type, [tyargs'], (List.map (mkRefTupledVars g m) vsl), m)
     let tauexpr, tauty = 
         List.foldBack 
-            (fun vs (e, ty) -> mkMultiLambda m vs (e, ty), (mkRefTupledVarsTy g vs --> ty))
+            (fun vs (e, ty) -> mkMultiLambda m vs (e, ty), (mkFunTy g (mkRefTupledVarsTy g vs) ty))
             vsl
             (call, rty')
     // Build a type-lambda expression for the toplevel value if needed... 
@@ -8095,8 +8102,8 @@ let AdjustPossibleSubsumptionExpr g (expr: Expr) (suppliedArgs: Expr list) : (Ex
                         
                         let inpsAsVars, inpsAsExprs = inpArgTys |> List.mapi (fun j ty -> mkCompGenLocal appm ("arg" + string i + string j) ty) |> List.unzip
                         let inpsAsActualArg = CoerceDetupled inpArgTys inpsAsExprs actualArgTys
-                        let inpCloVarType = (mkFunTy (mkRefTupledTy g actualArgTys) cloVar.Type)
-                        let newResTy = mkFunTy inpArgTy resTy
+                        let inpCloVarType = mkFunTy g (mkRefTupledTy g actualArgTys) cloVar.Type
+                        let newResTy = mkFunTy g inpArgTy resTy
                         let inpCloVar, inpCloVarAsExpr = mkCompGenLocal appm ("clo" + string i) inpCloVarType
                         let newRes = 
                             // For the final arg we can skip introducing the dummy variable
@@ -8522,7 +8529,7 @@ let TypeNullNotLiked g m ty =
     && not (TypeNullIsTrueValue g ty) 
     && not (TypeNullNever g ty) 
 
-// The non-inferring counter-part to SolveTypeSupportsNull
+// The non-inferring counter-part to SolveTypeUseSupportsNull
 let TypeSatisfiesNullConstraint g m ty = 
     TypeNullIsExtraValue g m ty  
 
@@ -8793,7 +8800,7 @@ type ActivePatternInfo with
         else mkOptionTy g choicety
     
     member apinfo.OverallType g m dty rtys isStruct = 
-        mkFunTy dty (apinfo.ResultType g m rtys isStruct)
+        mkFunTy g dty (apinfo.ResultType g m rtys isStruct)
 
 //---------------------------------------------------------------------------
 // Active pattern validation
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index a05dfaf9237..454d64537a4 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -34,10 +34,7 @@ val getMeasureOfType: TcGlobals -> TType -> (TyconRef * Measure) option
 val stripTyEqnsWrtErasure: Erasure -> TcGlobals -> TType -> TType
 
 /// Build a function type
-val mkFunTy: TType -> TType -> TType
-
-/// Build a function type
-val ( --> ): TType -> TType -> TType
+val mkFunTy: TcGlobals -> TType -> TType -> TType
 
 /// Build a type-forall anonymous generic type if necessary
 val mkForallTyIfNeeded: Typars -> TType -> TType
@@ -45,16 +42,16 @@ val mkForallTyIfNeeded: Typars -> TType -> TType
 val ( +-> ): Typars -> TType -> TType
 
 /// Build a curried function type
-val mkIteratedFunTy: TTypes -> TType -> TType
+val mkIteratedFunTy: TcGlobals -> TTypes -> TType -> TType
 
 /// Get the natural type of a single argument amongst a set of curried arguments
 val typeOfLambdaArg: range -> Val list -> TType
 
-/// Get the curried type corresponding to a lambda 
-val mkMultiLambdaTy: range -> Val list -> TType -> TType
+/// Get the type corresponding to a lambda 
+val mkLambdaTy: TcGlobals -> Typars -> TTypes -> TType -> TType
 
 /// Get the curried type corresponding to a lambda 
-val mkLambdaTy: Typars -> TTypes -> TType -> TType
+val mkMultiLambdaTy: TcGlobals -> range -> Val list -> TType -> TType
 
 /// Module publication, used while compiling fslib.
 val ensureCcuHasModuleOrNamespaceAtPath: CcuThunk -> Ident list -> CompilationPath -> XmlDoc -> unit 
@@ -146,16 +143,16 @@ val mkObjExpr: TType * Val option * Expr * ObjExprMethod list * (TType * ObjExpr
 val mkTypeChoose: range -> Typars -> Expr -> Expr
 
 /// Build an iterated (curried) lambda expression
-val mkLambdas: range -> Typars -> Val list -> Expr * TType -> Expr
+val mkLambdas: TcGlobals -> range -> Typars -> Val list -> Expr * TType -> Expr
 
 /// Build an iterated (tupled+curried) lambda expression
-val mkMultiLambdasCore: range -> Val list list -> Expr * TType -> Expr * TType
+val mkMultiLambdasCore: TcGlobals -> range -> Val list list -> Expr * TType -> Expr * TType
 
 /// Build an iterated generic (type abstraction + tupled+curried) lambda expression
-val mkMultiLambdas: range -> Typars -> Val list list -> Expr * TType -> Expr
+val mkMultiLambdas: TcGlobals -> range -> Typars -> Val list list -> Expr * TType -> Expr
 
 /// Build a lambda expression that corresponds to the implementation of a member
-val mkMemberLambdas: range -> Typars -> Val option -> Val option -> Val list list -> Expr * TType -> Expr
+val mkMemberLambdas: TcGlobals -> range -> Typars -> Val option -> Val option -> Val list list -> Expr * TType -> Expr
 
 /// Build a 'while' loop expression
 val mkWhile: TcGlobals -> DebugPointAtWhile * SpecialWhileLoopMarker * Expr * Expr * range -> Expr
@@ -185,7 +182,7 @@ val mkLetsFromBindings: range -> Bindings -> Expr -> Expr
 val mkLet: DebugPointAtBinding -> range -> Val -> Expr -> Expr -> Expr
 
 /// Make a binding that binds a function value to a lambda taking multiple arguments
-val mkMultiLambdaBind: Val -> DebugPointAtBinding -> range -> Typars -> Val list list -> Expr * TType -> Binding
+val mkMultiLambdaBind: TcGlobals -> Val -> DebugPointAtBinding -> range -> Typars -> Val list list -> Expr * TType -> Binding
 
 // Compiler generated bindings may involve a user variable.
 // Compiler generated bindings may give rise to a sequence point if they are part of
@@ -554,12 +551,14 @@ val instTyparConstraints: TyparInst -> TyparConstraint list -> TyparConstraint l
 
 val instTrait: TyparInst -> TraitConstraintInfo -> TraitConstraintInfo 
 
+val generalTyconRefInst : TyconRef -> TypeInst
+
 /// From typars to types 
 val generalizeTypars: Typars -> TypeInst
 
-val generalizeTyconRef: TyconRef -> TTypes * TType
+val generalizeTyconRef: TcGlobals -> TyconRef -> TTypes * TType
 
-val generalizedTyconRef: TyconRef -> TType
+val generalizedTyconRef: TcGlobals -> TyconRef -> TType
 
 val mkTyparToTyparRenaming: Typars -> Typars -> TyparInst * TTypes
 
diff --git a/src/fsharp/autobox.fs b/src/fsharp/autobox.fs
index e018a8f1ffa..ac1a0e102fa 100644
--- a/src/fsharp/autobox.fs
+++ b/src/fsharp/autobox.fs
@@ -36,7 +36,7 @@ let DecideEscapes syntacticArgs body =
     frees.FreeLocals |> Zset.filter isMutableEscape 
 
 /// Find all the mutable locals that escape a lambda expression, ignoring the arguments to the lambda
-let DecideLambda exprF cenv topValInfo expr ety z   = 
+let DecideLambda exprF cenv topValInfo expr ety z = 
     match stripDebugPoints expr with 
     | Expr.Lambda _
     | Expr.TyLambda _ ->
@@ -75,11 +75,12 @@ let DecideExprOp exprF noInterceptF (z: Zset) (expr: Expr) (op, tyargs, arg
 
 /// Find all the mutable locals that escape a lambda expression or object expression 
 let DecideExpr cenv exprF noInterceptF z expr  = 
+    let g = cenv.g
     match stripDebugPoints expr with 
     | Expr.Lambda (_, _ctorThisValOpt, _baseValOpt, argvs, _, m, rty) -> 
         let topValInfo = ValReprInfo ([], [argvs |> List.map (fun _ -> ValReprInfo.unnamedTopArg1)], ValReprInfo.unnamedRetVal) 
-        let ty = mkMultiLambdaTy m argvs rty 
-        DecideLambda (Some exprF)  cenv topValInfo expr ty z
+        let ty = mkMultiLambdaTy g m argvs rty 
+        DecideLambda (Some exprF) cenv topValInfo expr ty z
 
     | Expr.TyLambda (_, tps, _, _m, rty)  -> 
         let topValInfo = ValReprInfo (ValReprInfo.InferTyparInfo tps, [], ValReprInfo.unnamedRetVal) 
diff --git a/src/fsharp/service/FSharpCheckerResults.fs b/src/fsharp/service/FSharpCheckerResults.fs
index 971b8593974..b9b2e0450a0 100644
--- a/src/fsharp/service/FSharpCheckerResults.fs
+++ b/src/fsharp/service/FSharpCheckerResults.fs
@@ -456,7 +456,7 @@ type internal TypeCheckInfo
               let ad =
                 match vref.BaseOrThisInfo, ad with
                 | ValBaseOrThisInfo.NormalVal, AccessibleFrom(paths, Some tcref) ->
-                    let tcref = generalizedTyconRef tcref
+                    let tcref = generalizedTyconRef g tcref
                     // check that type of value is the same or subtype of tcref
                     // yes - allow access to protected members
                     // no - strip ability to access protected members
diff --git a/src/fsharp/service/SemanticClassification.fs b/src/fsharp/service/SemanticClassification.fs
index 917f7eda9bd..228c80d22e6 100644
--- a/src/fsharp/service/SemanticClassification.fs
+++ b/src/fsharp/service/SemanticClassification.fs
@@ -138,7 +138,7 @@ module TcResolutionsExtensions =
                     protectAssemblyExplorationNoReraise false false (fun () -> ExistsHeadTypeInEntireHierarchy g amap range0 vref.Type g.tcref_System_IDisposable)
 
                 let isStructTyconRef (tyconRef: TyconRef) = 
-                    let ty = generalizedTyconRef tyconRef
+                    let ty = generalizedTyconRef g tyconRef
                     let underlyingTy = stripTyEqnsAndMeasureEqns g ty
                     isStructTy g underlyingTy
 
diff --git a/src/fsharp/service/ServiceDeclarationLists.fs b/src/fsharp/service/ServiceDeclarationLists.fs
index 8cb0d8de6e5..50bde0b7b5e 100644
--- a/src/fsharp/service/ServiceDeclarationLists.fs
+++ b/src/fsharp/service/ServiceDeclarationLists.fs
@@ -167,7 +167,7 @@ module DeclarationListHelpers =
         // Union tags (constructors)
         | Item.UnionCase(ucinfo, _) -> 
             let uc = ucinfo.UnionCase 
-            let rty = generalizedTyconRef ucinfo.TyconRef
+            let rty = generalizedTyconRef g ucinfo.TyconRef
             let recd = uc.RecdFields 
             let layout = 
                 wordL (tagText (FSComp.SR.typeInfoUnionCase())) ^^
@@ -682,7 +682,7 @@ module internal DescriptionListsImpl =
                 match ucinfo.UnionCase.RecdFields with
                 | [f] -> [PrettyParamOfUnionCaseField g denv NicePrint.isGeneratedUnionCaseField -1 f]
                 | fs -> fs |> List.mapi (PrettyParamOfUnionCaseField g denv NicePrint.isGeneratedUnionCaseField)
-            let rty = generalizedTyconRef ucinfo.TyconRef
+            let rty = generalizedTyconRef g ucinfo.TyconRef
             let rtyL = NicePrint.layoutType denv rty
             prettyParams, rtyL
 
diff --git a/src/fsharp/symbols/Exprs.fs b/src/fsharp/symbols/Exprs.fs
index 97af23bf405..a199e6b7e0c 100644
--- a/src/fsharp/symbols/Exprs.fs
+++ b/src/fsharp/symbols/Exprs.fs
@@ -325,15 +325,19 @@ module FSharpExprConvert =
         | _ -> None
 
     let ConvType cenv ty = FSharpType(cenv, ty)
+
     let ConvTypes cenv tys = List.map (ConvType cenv) tys
+
     let ConvILTypeRefApp (cenv: SymbolEnv) m tref tyargs = 
         let tcref = Import.ImportILTypeRef cenv.amap m tref
         ConvType cenv (mkAppTy tcref tyargs)
 
     let ConvUnionCaseRef cenv (ucref: UnionCaseRef) = FSharpUnionCase(cenv, ucref)
+
     let ConvRecdFieldRef cenv (rfref: RecdFieldRef) = FSharpField(cenv, rfref )
 
     let rec exprOfExprAddr (cenv: SymbolEnv) expr = 
+        let g = cenv.g
         match expr with 
         | Expr.Op (op, tyargs, args, m) -> 
             match op, args, tyargs  with
@@ -345,20 +349,23 @@ module FSharpExprConvert =
             | TOp.ILAsm ([ I_ldsflda fspec ], retTypes), _, _  -> mkAsmExpr ([ mkNormalLdsfld fspec ], tyargs, args, retTypes, m)
             | TOp.ILAsm ([ I_ldelema(_ro, _isNativePtr, shape, _tyarg) ], _), arr :: idxs, [elemty]  -> 
                 match shape.Rank, idxs with 
-                | 1, [idx1] -> mkCallArrayGet cenv.g m elemty arr idx1
-                | 2, [idx1; idx2] -> mkCallArray2DGet cenv.g m elemty arr idx1 idx2
-                | 3, [idx1; idx2; idx3] -> mkCallArray3DGet cenv.g m elemty arr idx1 idx2 idx3
-                | 4, [idx1; idx2; idx3; idx4] -> mkCallArray4DGet cenv.g m elemty arr idx1 idx2 idx3 idx4
+                | 1, [idx1] -> mkCallArrayGet g m elemty arr idx1
+                | 2, [idx1; idx2] -> mkCallArray2DGet g m elemty arr idx1 idx2
+                | 3, [idx1; idx2; idx3] -> mkCallArray3DGet g m elemty arr idx1 idx2 idx3
+                | 4, [idx1; idx2; idx3; idx4] -> mkCallArray4DGet g m elemty arr idx1 idx2 idx3 idx4
                 | _ -> expr
             | _ -> expr
         | _ -> expr
 
 
-    let Mk cenv m ty e = FSharpExpr(cenv, None, e, m, ty)
+    let Mk cenv m ty e =
+        FSharpExpr(cenv, None, e, m, ty)
 
-    let Mk2 cenv (orig: Expr) e = FSharpExpr(cenv, None, e, orig.Range, tyOfExpr cenv.g orig)
+    let Mk2 cenv (orig: Expr) e =
+        FSharpExpr(cenv, None, e, orig.Range, tyOfExpr cenv.g orig)
 
-    let rec ConvLValueExpr (cenv: SymbolEnv) env expr = ConvExpr cenv env (exprOfExprAddr cenv expr)
+    let rec ConvLValueExpr (cenv: SymbolEnv) env expr =
+        ConvExpr cenv env (exprOfExprAddr cenv expr)
 
     and ConvExpr cenv env expr = 
         Mk2 cenv expr (ConvExprPrim cenv env expr) 
@@ -367,7 +374,8 @@ module FSharpExprConvert =
         ConvExprPrimLinear cenv env expr (fun exprR -> contF (Mk2 cenv expr exprR))
 
     // Tail recursive function to process the subset of expressions considered "linear"
-    and ConvExprPrimLinear cenv env expr contF = 
+    and ConvExprPrimLinear cenv env expr contF =
+        let g = cenv.g
 
         match expr with 
         // Large lists 
@@ -393,7 +401,7 @@ module FSharpExprConvert =
         // Put in ConvExprPrimLinear because of the overlap with Expr.Sequential below
         //
         // TODO: allow clients to see static initialization checks if they want to
-        | Expr.Sequential (ObjectInitializationCheck cenv.g, x1, NormalSeq, _) 
+        | Expr.Sequential (ObjectInitializationCheck g, x1, NormalSeq, _) 
         | Expr.Sequential (StaticInitializationCount, x1, NormalSeq, _)              
         | Expr.Sequential (StaticInitializationCheck, x1, NormalSeq, _) ->
             ConvExprPrim cenv env x1 |> contF
@@ -407,7 +415,7 @@ module FSharpExprConvert =
         | Expr.Sequential (x0, x1, ThenDoSeq, _) ->
             E.Sequential(ConvExpr cenv env x0, ConvExpr cenv env x1) |> contF
 
-        | ModuleValueOrMemberUse cenv.g (vref, vFlags, _f, _fty, tyargs, curriedArgs) when (nonNil tyargs || nonNil curriedArgs) && vref.IsMemberOrModuleBinding ->
+        | ModuleValueOrMemberUse g (vref, vFlags, _f, _fty, tyargs, curriedArgs) when (nonNil tyargs || nonNil curriedArgs) && vref.IsMemberOrModuleBinding ->
             ConvModuleValueOrMemberUseLinear cenv env (expr, vref, vFlags, tyargs, curriedArgs) contF
 
         | Expr.Match (_spBind, m, dtree, tgs, _, retTy) ->
@@ -427,10 +435,11 @@ module FSharpExprConvert =
     /// A nasty function copied from creflect.fs. Made nastier by taking a continuation to process the 
     /// arguments to the call in a tail-recursive fashion.
     and ConvModuleValueOrMemberUseLinear (cenv: SymbolEnv) env (expr: Expr, vref, vFlags, tyargs, curriedArgs) contF =
-        let m = expr.Range 
+        let g = cenv.g
+        let m = expr.Range
 
         let numEnclTypeArgs, _, isNewObj, _valUseFlags, _isSelfInit, takesInstanceArg, _isPropGet, _isPropSet = 
-            GetMemberCallInfo cenv.g (vref, vFlags)
+            GetMemberCallInfo g (vref, vFlags)
 
         let isMember, tps, curriedArgInfos = 
 
@@ -438,12 +447,12 @@ module FSharpExprConvert =
             | Some _ when not vref.IsExtensionMember -> 
                 // This is an application of a member method
                 // We only count one argument block for these.
-                let tps, curriedArgInfos, _, _ = GetTypeOfMemberInFSharpForm cenv.g vref 
+                let tps, curriedArgInfos, _, _ = GetTypeOfMemberInFSharpForm g vref 
                 true, tps, curriedArgInfos
             | _ -> 
                 // This is an application of a module value or extension member
                 let arities = arityOfVal vref.Deref 
-                let tps, curriedArgInfos, _, _ = GetTopValTypeInFSharpForm cenv.g arities vref.Type m
+                let tps, curriedArgInfos, _, _ = GetTopValTypeInFSharpForm g arities vref.Type m
                 false, tps, curriedArgInfos
 
         // Compute the object arguments as they appear in a compiled call
@@ -466,8 +475,8 @@ module FSharpExprConvert =
                 | None -> failwith ("no arity information found for F# value "+vref.LogicalName)
                 | Some a -> a 
 
-            let expr, exprty = AdjustValForExpectedArity cenv.g m vref vFlags topValInfo 
-            let splitCallExpr = MakeApplicationAndBetaReduce cenv.g (expr, exprty, [tyargs], curriedArgs, m)
+            let expr, exprty = AdjustValForExpectedArity g m vref vFlags topValInfo 
+            let splitCallExpr = MakeApplicationAndBetaReduce g (expr, exprty, [tyargs], curriedArgs, m)
             // tailcall
             ConvExprPrimLinear cenv env splitCallExpr contF
 
@@ -501,7 +510,7 @@ module FSharpExprConvert =
 
     and GetWitnessArgs cenv (env: ExprTranslationEnv) (vref: ValRef) m tps tyargs : FSharpExpr list =
         let g = cenv.g
-        if cenv.g.langVersion.SupportsFeature(Features.LanguageFeature.WitnessPassing) && not env.suppressWitnesses then 
+        if g.langVersion.SupportsFeature(Features.LanguageFeature.WitnessPassing) && not env.suppressWitnesses then 
             let witnessExprs = 
                 match ConstraintSolver.CodegenWitnessesForTyparInst cenv.tcValF g cenv.amap m tps tyargs with
                 // There is a case where optimized code makes expressions that do a shift-left on the 'char'
@@ -521,12 +530,14 @@ module FSharpExprConvert =
             []
 
     and ConvExprPrim (cenv: SymbolEnv) (env: ExprTranslationEnv) expr = 
+        let g = cenv.g
+        
         // Eliminate integer 'for' loops 
-        let expr = DetectAndOptimizeForEachExpression cenv.g OptimizeIntRangesOnly expr
+        let expr = DetectAndOptimizeForEachExpression g OptimizeIntRangesOnly expr
 
         // Eliminate subsumption coercions for functions. This must be done post-typechecking because we need
         // complete inference types.
-        let expr = NormalizeAndAdjustPossibleSubsumptionExprs cenv.g expr
+        let expr = NormalizeAndAdjustPossibleSubsumptionExprs g expr
 
         // Remove TExpr_ref nodes
         let expr = stripExpr expr 
@@ -545,7 +556,7 @@ module FSharpExprConvert =
         | Expr.Sequential _ ->
             ConvExprPrimLinear cenv env expr id
 
-        | ModuleValueOrMemberUse cenv.g (vref, vFlags, _f, _fty, tyargs, curriedArgs) when (* (nonNil tyargs || nonNil curriedArgs) && *) vref.IsMemberOrModuleBinding ->
+        | ModuleValueOrMemberUse g (vref, vFlags, _f, _fty, tyargs, curriedArgs) when (* (nonNil tyargs || nonNil curriedArgs) && *) vref.IsMemberOrModuleBinding ->
             // Process applications of top-level values in a tail-recursive way
             ConvModuleValueOrMemberUseLinear cenv env (expr, vref, vFlags, tyargs, curriedArgs) id
 
@@ -569,7 +580,7 @@ module FSharpExprConvert =
             E.LetRec(bindsR, bodyR) 
   
         | Expr.Lambda (_, _, _, vs, b, _, _) -> 
-            let v, b = MultiLambdaToTupledLambda cenv.g vs b 
+            let v, b = MultiLambdaToTupledLambda g vs b 
             let vR = ConvVal cenv v 
             let bR  = ConvExpr cenv (env.BindVal v) b 
             E.Lambda(vR, bR) 
@@ -582,8 +593,8 @@ module FSharpExprConvert =
             let env = env.BindTypars (Seq.zip tps gps |> Seq.toList)
             E.TypeLambda(gps, ConvExpr cenv env b) 
 
-        | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy cenv.g ty -> 
-            let f = mkLambdas m tps tmvs (e, GetFSharpViewOfReturnType cenv.g (returnTyOfMethod cenv.g tmethod))
+        | Expr.Obj (_, ty, _, _, [TObjExprMethod(TSlotSig(_, ctyp, _, _, _, _), _, tps, [tmvs], e, _) as tmethod], _, m) when isDelegateTy g ty -> 
+            let f = mkLambdas g m tps tmvs (e, GetFSharpViewOfReturnType g (returnTyOfMethod g tmethod))
             let fR = ConvExpr cenv env f 
             let tyargR = ConvType cenv ctyp 
             E.NewDelegate(tyargR, fR) 
@@ -592,7 +603,7 @@ module FSharpExprConvert =
             ConvExprPrim cenv env x
 
         | Expr.TyChoose _  -> 
-            ConvExprPrim cenv env (ChooseTyparSolutionsForFreeChoiceTypars cenv.g cenv.amap expr)
+            ConvExprPrim cenv env (ChooseTyparSolutionsForFreeChoiceTypars g cenv.amap expr)
 
         | Expr.Obj (_lambdaId, ty, _basev, basecall, overrides, iimpls, _m)      -> 
             let basecallR = ConvExpr cenv env basecall
@@ -619,12 +630,12 @@ module FSharpExprConvert =
                 E.NewUnionCase(typR, mkR, argsR) 
 
             | TOp.AnonRecd anonInfo, _, _ -> 
-                let typR = ConvType cenv (mkAnyAnonRecdTy cenv.g anonInfo tyargs)
+                let typR = ConvType cenv (mkAnyAnonRecdTy g anonInfo tyargs)
                 let argsR = ConvExprs cenv env args
                 E.NewAnonRecord(typR, argsR) 
 
             | TOp.Tuple tupInfo, tyargs, _ -> 
-                let tyR = ConvType cenv (mkAnyTupledTy cenv.g tupInfo tyargs)
+                let tyR = ConvType cenv (mkAnyTupledTy g tupInfo tyargs)
                 let argsR = ConvExprs cenv env args
                 E.NewTuple(tyR, argsR) 
 
@@ -640,7 +651,7 @@ module FSharpExprConvert =
                 E.UnionCaseGet(ConvExpr cenv env e1, typR, mkR, projR) 
 
             | TOp.AnonRecdGet (anonInfo, n), tyargs, [e1] -> 
-                let typR = ConvType cenv (mkAnyAnonRecdTy cenv.g anonInfo tyargs)
+                let typR = ConvType cenv (mkAnyAnonRecdTy g anonInfo tyargs)
                 E.AnonRecordGet(ConvExpr cenv env e1, typR, n) 
 
             | TOp.UnionCaseFieldSet (ucref, n), tyargs, [e1;e2] -> 
@@ -667,7 +678,7 @@ module FSharpExprConvert =
                 E.FSharpFieldGet(Some objR, typR, projR) 
 
             | TOp.TupleFieldGet (tupInfo, n), tyargs, [e] -> 
-                let tyR = ConvType cenv (mkAnyTupledTy cenv.g tupInfo tyargs)
+                let tyR = ConvType cenv (mkAnyTupledTy g tupInfo tyargs)
                 E.TupleGet(tyR, n, ConvExpr cenv env e) 
 
             | TOp.ILAsm ([ I_ldfld (_, _, fspec) ], _), enclTypeArgs, [obj] -> 
@@ -693,50 +704,50 @@ module FSharpExprConvert =
             | TOp.ILAsm ([ ], [tty]), _, [arg] -> 
                 match tty with
                 | TTypeConvOp cenv convOp ->
-                    let ty = tyOfExpr cenv.g arg
-                    let op = convOp cenv.g m ty arg
+                    let ty = tyOfExpr g arg
+                    let op = convOp g m ty arg
                     ConvExprPrim cenv env op
                 | _ ->
                     ConvExprPrim cenv env arg
 
             | TOp.ILAsm ([ I_box _ ], _), [ty], [arg] -> 
-                let op = mkCallBox cenv.g m ty arg
+                let op = mkCallBox g m ty arg
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ I_unbox_any _ ], _), [ty], [arg] -> 
-                let op = mkCallUnbox cenv.g m ty arg
+                let op = mkCallUnbox g m ty arg
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ I_isinst _ ], _), [ty], [arg] -> 
-                let op = mkCallTypeTest cenv.g m ty arg
+                let op = mkCallTypeTest g m ty arg
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ I_call (Normalcall, mspec, None) ], _), _, [arg]
               when mspec.MethodRef.DeclaringTypeRef.Name = "System.String" && mspec.Name = "GetHashCode" ->
-                let ty = tyOfExpr cenv.g arg
-                let op = mkCallHash cenv.g m ty arg
+                let ty = tyOfExpr g arg
+                let op = mkCallHash g m ty arg
                 ConvExprPrim cenv env op
 
             | TOp.ILCall (_, _, _, _, _, _, _, ilMethRef, _, _, _), [],
               [Expr.Op (TOp.ILAsm ([ I_ldtoken (ILToken.ILType _) ], _), [ty], _, _)]
               when ilMethRef.DeclaringTypeRef.Name = "System.Type" && ilMethRef.Name = "GetTypeFromHandle" -> 
-                let op = mkCallTypeOf cenv.g m ty
+                let op = mkCallTypeOf g m ty
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ EI_ilzero _ ], _), [ty], _ -> 
                 E.DefaultValue (ConvType cenv ty)
 
             | TOp.ILAsm ([ AI_ldnull; AI_cgt_un ], _), _, [arg] -> 
-                let elemTy = tyOfExpr cenv.g arg
+                let elemTy = tyOfExpr g arg
                 let nullVal = mkNull m elemTy
-                let op = mkCallNotEqualsOperator cenv.g m elemTy arg nullVal
+                let op = mkCallNotEqualsOperator g m elemTy arg nullVal
                 let env = { env with suppressWitnesses=true }
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ I_ldlen; AI_conv DT_I4 ], _), _, [arr] -> 
-                let arrayTy = tyOfExpr cenv.g arr
-                let elemTy = destArrayTy cenv.g arrayTy
-                let op = mkCallArrayLength cenv.g m elemTy arr
+                let arrayTy = tyOfExpr g arr
+                let elemTy = destArrayTy g arrayTy
+                let op = mkCallArrayLength g m elemTy arr
                 let env = { env with suppressWitnesses=true }
                 ConvExprPrim cenv env op
 
@@ -744,53 +755,53 @@ module FSharpExprConvert =
                 E.NewArray(ConvType cenv elemTy, ConvExprs cenv env xa)
 
             | TOp.ILAsm ([ I_ldelem_any (ILArrayShape [(Some 0, None)], _)], _), [elemTy], [arr; idx1]  -> 
-                let op = mkCallArrayGet cenv.g m elemTy arr idx1
+                let op = mkCallArrayGet g m elemTy arr idx1
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ I_stelem_any (ILArrayShape [(Some 0, None)], _)], _), [elemTy], [arr; idx1; v]  -> 
-                let op = mkCallArraySet cenv.g m elemTy arr idx1 v
+                let op = mkCallArraySet g m elemTy arr idx1 v
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ ILUnaryOp unaryOp ], _), _, [arg] -> 
-                let ty = tyOfExpr cenv.g arg
-                let op = unaryOp cenv.g m ty arg
+                let ty = tyOfExpr g arg
+                let op = unaryOp g m ty arg
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ ILBinaryOp binaryOp ], _), _, [arg1;arg2] -> 
-                let ty = tyOfExpr cenv.g arg1
-                let op = binaryOp cenv.g m ty arg1 arg2
+                let ty = tyOfExpr g arg1
+                let op = binaryOp g m ty arg1 arg2
                 ConvExprPrim cenv env op
 
             // For units of measure some binary operators change their return type, e.g. a * b where each is int gives int
             | TOp.ILAsm ([ ILMulDivOp (binaryOp, isMul) ], _), _, [arg1;arg2] -> 
-                let argty1 = tyOfExpr cenv.g arg1
-                let argty2 = tyOfExpr cenv.g arg2
+                let argty1 = tyOfExpr g arg1
+                let argty2 = tyOfExpr g arg2
                 let rty = 
-                    match getMeasureOfType cenv.g argty1, getMeasureOfType cenv.g argty2 with
+                    match getMeasureOfType g argty1, getMeasureOfType g argty2 with
                     | Some (tcref, ms1), Some (_tcref2, ms2)  ->  mkAppTy tcref [TType_measure (Measure.Prod(ms1, if isMul then ms2 else Measure.Inv ms2))]
                     | Some _, None  -> argty1
                     | None, Some _ -> argty2
                     | None, None -> argty1
-                let op = binaryOp cenv.g m argty1 argty2 rty arg1 arg2
+                let op = binaryOp g m argty1 argty2 rty arg1 arg2
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ ILConvertOp convertOp1; ILConvertOp convertOp2 ], _), _, [arg] -> 
-                let ty1 = tyOfExpr cenv.g arg
-                let op1 = convertOp1 cenv.g m ty1 arg
-                let ty2 = tyOfExpr cenv.g op1
-                let op2 = convertOp2 cenv.g m ty2 op1
+                let ty1 = tyOfExpr g arg
+                let op1 = convertOp1 g m ty1 arg
+                let ty2 = tyOfExpr g op1
+                let op2 = convertOp2 g m ty2 op1
                 ConvExprPrim cenv env op2
 
             | TOp.ILAsm ([ ILConvertOp convertOp ], [TType_app (tcref,_)]), _, [arg] -> 
-                let ty = tyOfExpr cenv.g arg
+                let ty = tyOfExpr g arg
                 let op =
-                    if tyconRefEq cenv.g tcref cenv.g.char_tcr then
-                        mkCallToCharOperator cenv.g m ty arg
-                    else convertOp cenv.g m ty arg
+                    if tyconRefEq g tcref g.char_tcr then
+                        mkCallToCharOperator g m ty arg
+                    else convertOp g m ty arg
                 ConvExprPrim cenv env op
 
             | TOp.ILAsm ([ I_throw ], _), _, [arg1]  -> 
-                let raiseExpr = mkCallRaise cenv.g m (tyOfExpr cenv.g expr) arg1 
+                let raiseExpr = mkCallRaise g m (tyOfExpr g expr) arg1 
                 ConvExprPrim cenv env raiseExpr        
 
             | TOp.ILAsm (instrs, _), tyargs, args                         -> 
@@ -817,7 +828,7 @@ module FSharpExprConvert =
                 let fspec = exnc.TrueInstanceFieldsAsList.[i]
                 let fref = mkRecdFieldRef tcref fspec.LogicalName
                 let typR = ConvType cenv (mkAppTy tcref tyargs)
-                let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, cenv.g.exn_ty))
+                let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, g.exn_ty))
                 E.FSharpFieldGet(Some objR, typR, ConvRecdFieldRef cenv fref) 
 
             | TOp.ExnFieldSet (tcref, i), [], [obj;e2] -> 
@@ -825,18 +836,18 @@ module FSharpExprConvert =
                 let fspec = exnc.TrueInstanceFieldsAsList.[i]
                 let fref = mkRecdFieldRef tcref fspec.LogicalName
                 let typR = ConvType cenv (mkAppTy tcref tyargs)
-                let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, cenv.g.exn_ty))
+                let objR = ConvExpr cenv env (mkCoerceExpr (obj, mkAppTy tcref [], m, g.exn_ty))
                 E.FSharpFieldSet(Some objR, typR, ConvRecdFieldRef cenv fref, ConvExpr cenv env e2) 
 
             | TOp.Coerce, [tgtTy;srcTy], [x]  -> 
-                if typeEquiv cenv.g tgtTy srcTy then 
+                if typeEquiv g tgtTy srcTy then 
                     ConvExprPrim cenv env x
                 else
                     E.Coerce(ConvType cenv tgtTy, ConvExpr cenv env x) 
 
             | TOp.Reraise, [toTy], []         -> 
                 // rebuild reraise() and Convert 
-                mkReraiseLibCall cenv.g toTy m |> ConvExprPrim cenv env 
+                mkReraiseLibCall g toTy m |> ConvExprPrim cenv env 
 
             | TOp.LValueOp (LAddrOf _, vref), [], [] -> 
                 E.AddressOf(ConvExpr cenv env (exprForValRef m vref)) 
@@ -856,16 +867,16 @@ module FSharpExprConvert =
             | TOp.While (dp, _), [], [Expr.Lambda (_, _, _, [_], test, _, _);Expr.Lambda (_, _, _, [_], body, _, _)]  -> 
                     E.WhileLoop(ConvExpr cenv env test, ConvExpr cenv env body, dp) 
         
-            | TOp.IntegerForLoop (dpFor, dpEquals, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody cenv.g (arr, elemTy, body)] ->
+            | TOp.IntegerForLoop (dpFor, dpEquals, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], SimpleArrayLoopUpperBound, lm, _); SimpleArrayLoopBody g (arr, elemTy, body)] ->
                 let lim1 = 
-                    let len = mkCallArrayLength cenv.g lm elemTy arr // Array.length arr
-                    mkCallSubtractionOperator cenv.g lm cenv.g.int32_ty len (mkOne cenv.g lm) // len - 1
+                    let len = mkCallArrayLength g lm elemTy arr // Array.length arr
+                    mkCallSubtractionOperator g lm g.int32_ty len (mkOne g lm) // len - 1
                 E.IntegerForLoop(ConvExpr cenv env lim0, ConvExpr cenv env lim1, ConvExpr cenv env body, dir <> FSharpForLoopDown, dpFor, dpEquals) 
 
             | TOp.IntegerForLoop (doFor, doEquals, dir), [], [Expr.Lambda (_, _, _, [_], lim0, _, _); Expr.Lambda (_, _, _, [_], lim1, lm, _); body]  -> 
                 let lim1 =
                     if dir = CSharpForLoopUp then
-                        mkCallSubtractionOperator cenv.g lm cenv.g.int32_ty lim1 (mkOne cenv.g lm) // len - 1
+                        mkCallSubtractionOperator g lm g.int32_ty lim1 (mkOne g lm) // len - 1
                     else lim1
                 E.IntegerForLoop(ConvExpr cenv env lim0, ConvExpr cenv env lim1, ConvExpr cenv env body, dir <> FSharpForLoopDown, doFor, doEquals) 
 
@@ -882,9 +893,9 @@ module FSharpExprConvert =
                 let envh = env.BindVal vh
                 E.TryWith(ConvExpr cenv env e1, vfR, ConvExpr cenv envf ef, vhR, ConvExpr cenv envh eh, dpTry, dpWith) 
 
-            | TOp.Bytes bytes, [], [] -> E.Const(box bytes, ConvType cenv (tyOfExpr cenv.g expr))
+            | TOp.Bytes bytes, [], [] -> E.Const(box bytes, ConvType cenv (tyOfExpr g expr))
 
-            | TOp.UInt16s arr, [], [] -> E.Const(box arr, ConvType cenv (tyOfExpr cenv.g expr))
+            | TOp.UInt16s arr, [], [] -> E.Const(box arr, ConvType cenv (tyOfExpr g expr))
               
             | TOp.UnionCaseProof _, _, [e]       -> ConvExprPrim cenv env e  // Note: we erase the union case proof conversions when converting to quotations
             | TOp.UnionCaseTagGet tycr, tyargs, [arg1]          -> 
@@ -899,7 +910,7 @@ module FSharpExprConvert =
                 E.TraitCall(tysR, nm, memFlags, argtysR, tyargsR, argsR) 
 
             | TOp.RefAddrGet readonly, [ty], [e]  -> 
-                let replExpr = mkRecdFieldGetAddrViaExprAddr(readonly, e, mkRefCellContentsRef cenv.g, [ty], m)
+                let replExpr = mkRecdFieldGetAddrViaExprAddr(readonly, e, mkRefCellContentsRef g, [ty], m)
                 ConvExprPrim cenv env replExpr
 
             | _ -> wfail (sprintf "unhandled construct in AST", m)
@@ -963,6 +974,7 @@ module FSharpExprConvert =
             Some(vR, rhsR, bind.DebugPoint), envinner
 
     and ConvILCall (cenv: SymbolEnv) env (isNewObj, valUseFlags, ilMethRef, enclTypeArgs, methTypeArgs, callArgs, m) =
+        let g = cenv.g
         let isNewObj = (isNewObj || (match valUseFlags with CtorValUsedAsSuperInit | CtorValUsedAsSelfInit -> true | _ -> false))
         let methName = ilMethRef.Name
         let isPropGet = methName.StartsWithOrdinal("get_")
@@ -979,7 +991,7 @@ module FSharpExprConvert =
                 let parent = ILTypeRef.Create(e.Scope, e.Enclosing.Tail, e.Enclosing.Head)
                 Import.ImportILTypeRef cenv.amap m parent, Some e.Name
                 
-        let enclosingType = generalizedTyconRef tcref
+        let enclosingType = generalizedTyconRef g tcref
         
         let makeCall minfo =
             ConvObjectModelCallLinear cenv env (isNewObj, minfo, enclTypeArgs, methTypeArgs, [], callArgs) id   
@@ -987,7 +999,7 @@ module FSharpExprConvert =
         let makeFSCall isMember (vr: ValRef) =
             let memOrVal =
                 if isMember then
-                    let minfo = MethInfo.FSMeth(cenv.g, enclosingType, vr, None)
+                    let minfo = MethInfo.FSMeth(g, enclosingType, vr, None)
                     FSharpMemberOrFunctionOrValue(cenv, minfo)
                 else
                     FSharpMemberOrFunctionOrValue(cenv, vr)
@@ -1004,7 +1016,7 @@ module FSharpExprConvert =
             let ccu = nlr.EnclosingEntity.nlr.Ccu
             let vName = nlr.ItemKey.PartialKey.LogicalName // this is actually compiled name
             let findByName =
-                enclosingEntity.MembersOfFSharpTyconSorted |> List.filter (fun v -> (v.CompiledName cenv.g.CompilerGlobalState) = vName)
+                enclosingEntity.MembersOfFSharpTyconSorted |> List.filter (fun v -> (v.CompiledName g.CompilerGlobalState) = vName)
             match findByName with
             | [v] -> 
                 makeFSCall isMember v
@@ -1014,7 +1026,7 @@ module FSharpExprConvert =
                     let findModuleMemberByName = 
                         enclosingEntity.ModuleOrNamespaceType.AllValsAndMembers 
                         |> Seq.filter (fun v -> 
-                            (v.CompiledName cenv.g.CompilerGlobalState) = vName &&
+                            (v.CompiledName g.CompilerGlobalState) = vName &&
                                 match v.DeclaringEntity with
                                 | Parent p -> p.PublicPath = enclosingEntity.PublicPath
                                 | _ -> false 
@@ -1030,7 +1042,7 @@ module FSharpExprConvert =
                             let name = PrettyNaming.ChopPropertyName vName          
                             let findByName =
                                 enclosingEntity.ModuleOrNamespaceType.AllValsAndMembers 
-                                |> Seq.filter (fun v -> (v.CompiledName cenv.g.CompilerGlobalState) = name)
+                                |> Seq.filter (fun v -> (v.CompiledName g.CompilerGlobalState) = name)
                                 |> List.ofSeq
                             match findByName with
                             | [ v ] ->
@@ -1085,7 +1097,7 @@ module FSharpExprConvert =
                         | _ ->
                             failwith "Failed to recognize union type member"
                 else
-                    let names = enclosingEntity.MembersOfFSharpTyconSorted |> List.map (fun v -> v.CompiledName cenv.g.CompilerGlobalState) |> String.concat ", "
+                    let names = enclosingEntity.MembersOfFSharpTyconSorted |> List.map (fun v -> v.CompiledName g.CompilerGlobalState) |> String.concat ", "
                     failwithf "Member '%s' not found in type %s, found: %s" vName enclosingEntity.DisplayName names
             | _ -> // member is overloaded
                 match nlr.ItemKey.TypeForLinkage with
@@ -1142,12 +1154,12 @@ module FSharpExprConvert =
                 let argtys = [ ilMethRef.ArgTypes |> List.map (ImportILTypeFromMetadata cenv.amap m scoref tinst1 tinst2) ]
                 let rty = 
                     match ImportReturnTypeFromMetadata cenv.amap m ilMethRef.ReturnType emptyILCustomAttrs scoref tinst1 tinst2 with 
-                    | None -> if isCtor then  enclosingType else cenv.g.unit_ty
+                    | None -> if isCtor then  enclosingType else g.unit_ty
                     | Some ty -> ty
 
                 let linkageType = 
-                    let ty = mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) argtys) rty
-                    let ty = if isStatic then ty else mkFunTy enclosingType ty 
+                    let ty = mkIteratedFunTy g (List.map (mkRefTupledTy g) argtys) rty
+                    let ty = if isStatic then ty else mkFunTy g enclosingType ty 
                     mkForallTyIfNeeded (typars1 @ typars2) ty
 
                 let argCount = List.sum (List.map List.length argtys)  + (if isStatic then 0 else 1)
@@ -1203,10 +1215,11 @@ module FSharpExprConvert =
             contF ((varsR, targetR) :: restR)))
 
     and ConvValRef cenv env m (vref: ValRef) =
+        let g = cenv.g
         let v = vref.Deref
         if env.isinstVals.ContainsVal v then 
             let ty, e = env.isinstVals.[v]
-            ConvExprPrim cenv env (mkCallUnbox cenv.g m ty e)
+            ConvExprPrim cenv env (mkCallUnbox g m ty e)
         elif env.substVals.ContainsVal v then 
             let e = env.substVals.[v]
             ConvExprPrim cenv env e
@@ -1222,7 +1235,8 @@ module FSharpExprConvert =
         FSharpMemberOrFunctionOrValue(cenv, vref) 
 
     and ConvConst cenv env m c ty =
-        match TryEliminateDesugaredConstants cenv.g m c with 
+        let g = cenv.g
+        match TryEliminateDesugaredConstants g m c with 
         | Some e -> ConvExprPrim cenv env e
         | None ->
             let tyR = ConvType cenv ty
@@ -1251,74 +1265,77 @@ module FSharpExprConvert =
 
     and ConvDecisionTreePrim cenv env dtreeRetTy x = 
         match x with 
-        | TDSwitch(e1, csl, dfltOpt, m) -> 
+        | TDSwitch(inpExpr, csl, dfltOpt, m) -> 
             let acc = 
                 match dfltOpt with 
                 | Some d -> ConvDecisionTreePrim cenv env dtreeRetTy d 
                 | None -> wfail( "FSharp.Compiler.Service cannot yet return this kind of pattern match", m)
-            (csl, acc) ||> List.foldBack (fun (TCase(discrim, dtree)) acc -> 
-                    let acc = acc |> Mk cenv m dtreeRetTy
-                    match discrim with 
-                    | DecisionTreeTest.UnionCase (ucref, tyargs) -> 
-                        let objR = ConvExpr cenv env e1
-                        let ucR = ConvUnionCaseRef cenv ucref 
-                        let utypR = ConvType cenv (mkAppTy ucref.TyconRef tyargs)
-                        E.IfThenElse (E.UnionCaseTest (objR, utypR, ucR) |> Mk cenv m cenv.g.bool_ty, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
-                    | DecisionTreeTest.Const (Const.Bool true) -> 
-                        let e1R = ConvExpr cenv env e1
-                        E.IfThenElse (e1R, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
-                    | DecisionTreeTest.Const (Const.Bool false) -> 
-                        let e1R = ConvExpr cenv env e1
-                        // Note, reverse the branches
-                        E.IfThenElse (e1R, acc, ConvDecisionTree cenv env dtreeRetTy dtree m) 
-                    | DecisionTreeTest.Const c -> 
-                        let ty = tyOfExpr cenv.g e1
-                        let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (c, m, ty))
-                        let eqR = ConvExpr cenv env eq 
-                        E.IfThenElse (eqR, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
-                    | DecisionTreeTest.IsNull -> 
-                        // Decompile cached isinst tests
-                        match e1 with 
-                        | Expr.Val (vref, _, _) when env.isinstVals.ContainsVal vref.Deref  ->
-                            let ty, e =  env.isinstVals.[vref.Deref]
-                            let tyR = ConvType cenv ty
-                            let eR = ConvExpr cenv env e
-                            // note: reverse the branches - a null test is a failure of an isinst test
-                            E.IfThenElse (E.TypeTest (tyR, eR) |> Mk cenv m cenv.g.bool_ty, acc, ConvDecisionTree cenv env dtreeRetTy dtree m) 
-                        | _ -> 
-                            let ty = tyOfExpr cenv.g e1
-                            let eqR =
-                                let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (Const.Zero, m, ty))
-                                let env = { env with suppressWitnesses = true }
-                                ConvExpr cenv env eq 
-                            E.IfThenElse (eqR, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
-                    | DecisionTreeTest.IsInst (_srcty, tgty) -> 
-                        let e1R = ConvExpr cenv env e1
-                        E.IfThenElse (E.TypeTest (ConvType cenv tgty, e1R)  |> Mk cenv m cenv.g.bool_ty, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
-                    | DecisionTreeTest.ActivePatternCase _ -> wfail("unexpected Test.ActivePatternCase test in quoted expression", m)
-                    | DecisionTreeTest.ArrayLength _ -> wfail("FSharp.Compiler.Service cannot yet return array pattern matching", m)
-                    | DecisionTreeTest.Error m -> wfail("error recovery", m))
+
+            (csl, acc) ||> List.foldBack (ConvDecisionTreeCase (cenv: SymbolEnv) env m inpExpr dtreeRetTy)
 
         | TDSuccess (args, n) -> 
-                // TAST stores pattern bindings in reverse order for some reason
-                // Reverse them here to give a good presentation to the user
-                let args = List.rev args
-                let argsR = ConvExprs cenv env args          
-                E.DecisionTreeSuccess(n, argsR)
+            // TAST stores pattern bindings in reverse order for some reason
+            // Reverse them here to give a good presentation to the user
+            let args = List.rev args
+            let argsR = ConvExprs cenv env args          
+            E.DecisionTreeSuccess(n, argsR)
           
         | TDBind(bind, rest) -> 
-                // The binding may be a compiler-generated binding that gets removed in the quotation presentation
-                match ConvLetBind cenv env bind with 
-                | None, env -> ConvDecisionTreePrim cenv env dtreeRetTy rest 
-                | Some bindR, env -> E.Let(bindR, ConvDecisionTree cenv env dtreeRetTy rest bind.Var.Range) 
+            // The binding may be a compiler-generated binding that gets removed in the quotation presentation
+            match ConvLetBind cenv env bind with 
+            | None, env -> ConvDecisionTreePrim cenv env dtreeRetTy rest 
+            | Some bindR, env -> E.Let(bindR, ConvDecisionTree cenv env dtreeRetTy rest bind.Var.Range) 
+
+    and ConvDecisionTreeCase (cenv: SymbolEnv) env m inpExpr dtreeRetTy dcase acc = 
+        let g = cenv.g
+        let (TCase(discrim, dtree)) = dcase
+        let acc = acc |> Mk cenv m dtreeRetTy
+        match discrim with 
+        | DecisionTreeTest.UnionCase (ucref, tyargs) -> 
+            let objR = ConvExpr cenv env inpExpr
+            let ucR = ConvUnionCaseRef cenv ucref 
+            let utypR = ConvType cenv (mkAppTy ucref.TyconRef tyargs)
+            E.IfThenElse (E.UnionCaseTest (objR, utypR, ucR) |> Mk cenv m g.bool_ty, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
+        | DecisionTreeTest.Const (Const.Bool true) -> 
+            let e1R = ConvExpr cenv env inpExpr
+            E.IfThenElse (e1R, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
+        | DecisionTreeTest.Const (Const.Bool false) -> 
+            let e1R = ConvExpr cenv env inpExpr
+            // Note, reverse the branches
+            E.IfThenElse (e1R, acc, ConvDecisionTree cenv env dtreeRetTy dtree m) 
+        | DecisionTreeTest.Const c -> 
+            let ty = tyOfExpr g inpExpr
+            let eq = mkCallEqualsOperator g m ty inpExpr (Expr.Const (c, m, ty))
+            let eqR = ConvExpr cenv env eq 
+            E.IfThenElse (eqR, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
+        | DecisionTreeTest.IsNull -> 
+            // Decompile cached isinst tests
+            match inpExpr with 
+            | Expr.Val (vref, _, _) when env.isinstVals.ContainsVal vref.Deref  ->
+                let ty, e =  env.isinstVals.[vref.Deref]
+                let tyR = ConvType cenv ty
+                let eR = ConvExpr cenv env e
+                // note: reverse the branches - a null test is a failure of an isinst test
+                E.IfThenElse (E.TypeTest (tyR, eR) |> Mk cenv m g.bool_ty, acc, ConvDecisionTree cenv env dtreeRetTy dtree m) 
+            | _ -> 
+                let ty = tyOfExpr g inpExpr
+                let eqR =
+                    let eq = mkCallEqualsOperator g m ty inpExpr (Expr.Const (Const.Zero, m, ty))
+                    let env = { env with suppressWitnesses = true }
+                    ConvExpr cenv env eq 
+                E.IfThenElse (eqR, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
+        | DecisionTreeTest.IsInst (_srcty, tgty) -> 
+            let e1R = ConvExpr cenv env inpExpr
+            E.IfThenElse (E.TypeTest (ConvType cenv tgty, e1R)  |> Mk cenv m g.bool_ty, ConvDecisionTree cenv env dtreeRetTy dtree m, acc) 
+        | DecisionTreeTest.ActivePatternCase _ -> wfail("unexpected Test.ActivePatternCase test in quoted expression", m)
+        | DecisionTreeTest.ArrayLength _ -> wfail("FSharp.Compiler.Service cannot yet return array pattern matching", m)
+        | DecisionTreeTest.Error m -> wfail("error recovery", m)
 
     /// Wrap the conversion in a function to make it on-demand.  Any pattern matching on the FSharpExpr will
     /// force the evaluation of the entire conversion process eagerly.
     let ConvExprOnDemand cenv env expr = 
         FSharpExpr(cenv, Some(fun () -> ConvExpr cenv env expr), E.Unused, expr.Range, tyOfExpr cenv.g expr)
 
-
-
 /// The contents of the F# assembly as provided through the compiler API
 type FSharpAssemblyContents(cenv: SymbolEnv, mimpls: TypedImplFile list) = 
 
@@ -1333,17 +1350,18 @@ and FSharpImplementationFileDeclaration =
     | InitAction of action: FSharpExpr
 
 and FSharpImplementationFileContents(cenv, mimpl) = 
+    let g = cenv.g
     let (TImplFile (qname, _pragmas, ModuleOrNamespaceExprWithSig(_, mdef, _), hasExplicitEntryPoint, isScript, _anonRecdTypes, _)) = mimpl 
     let rec getDecls2 (ModuleOrNamespaceExprWithSig(_mty, def, _m)) = getDecls def
     and getBind (bind: Binding) = 
         let v = bind.Var
         assert v.IsCompiledAsTopLevel
-        let topValInfo = InferArityOfExprBinding cenv.g AllowTypeDirectedDetupling.Yes v bind.Expr
-        let tps, _ctorThisValOpt, _baseValOpt, vsl, body, _bodyty = IteratedAdjustArityOfLambda cenv.g cenv.amap topValInfo bind.Expr
+        let topValInfo = InferArityOfExprBinding g AllowTypeDirectedDetupling.Yes v bind.Expr
+        let tps, _ctorThisValOpt, _baseValOpt, vsl, body, _bodyty = IteratedAdjustArityOfLambda g cenv.amap topValInfo bind.Expr
         let v = FSharpMemberOrFunctionOrValue(cenv, mkLocalValRef v)
         let gps = v.GenericParameters
         let vslR = List.map (List.map (FSharpExprConvert.ConvVal cenv)) vsl 
-        let env = ExprTranslationEnv.Empty(cenv.g).BindTypars (Seq.zip tps gps |> Seq.toList)
+        let env = ExprTranslationEnv.Empty(g).BindTypars (Seq.zip tps gps |> Seq.toList)
         let env = env.BindCurriedVals vsl 
         let e = FSharpExprConvert.ConvExprOnDemand cenv env body
         FSharpImplementationFileDeclaration.MemberOrFunctionOrValue(v, vslR, e) 
@@ -1367,7 +1385,7 @@ and FSharpImplementationFileContents(cenv, mimpl) =
         | TMDefOpens _ ->
             [ ]
         | TMDefDo(expr, _m)  ->
-            [ let expr = FSharpExprConvert.ConvExprOnDemand cenv (ExprTranslationEnv.Empty(cenv.g)) expr
+            [ let expr = FSharpExprConvert.ConvExprOnDemand cenv (ExprTranslationEnv.Empty(g)) expr
               yield FSharpImplementationFileDeclaration.InitAction expr  ]
         | TMDefs mdefs -> 
             [ for mdef in mdefs do yield! getDecls mdef ]
diff --git a/src/fsharp/symbols/SymbolHelpers.fs b/src/fsharp/symbols/SymbolHelpers.fs
index 9a269a67a40..a73af2a3831 100644
--- a/src/fsharp/symbols/SymbolHelpers.fs
+++ b/src/fsharp/symbols/SymbolHelpers.fs
@@ -616,7 +616,7 @@ module internal SymbolHelpers =
                 | ValueSome tcr1 ->
                     g.suppressed_types 
                     |> List.exists (fun supp ->
-                        let generalizedSupp = generalizedTyconRef supp
+                        let generalizedSupp = generalizedTyconRef g supp
                         // check the display name is precisely the one we're suppressing
                         match tryTcrefOfAppTy g generalizedSupp with
                         | ValueSome tcr2 ->
@@ -769,7 +769,7 @@ module internal SymbolHelpers =
             match item with
             | Item.Types(_, TType_app(tcref, _) :: _)
             | Item.UnqualifiedType(tcref :: _) ->
-                let ty = generalizedTyconRef tcref
+                let ty = generalizedTyconRef g tcref
                 ExistsHeadTypeInEntireHierarchy g amap range0 ty g.tcref_System_Attribute
             | _ -> false
         with _ -> false
@@ -891,7 +891,7 @@ module internal SymbolHelpers =
         | Item.UnqualifiedType (tcref :: _)
         | Item.ExnCase tcref -> 
             // strip off any abbreviation
-            match generalizedTyconRef tcref with 
+            match generalizedTyconRef g tcref with 
             | AppTy g (tcref, _)  -> Some (ticksAndArgCountTextOfTyconRef tcref)
             | _ -> None
 
diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs
index 446935b2064..53c9d4bf7bc 100644
--- a/src/fsharp/symbols/Symbols.fs
+++ b/src/fsharp/symbols/Symbols.fs
@@ -586,32 +586,32 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
     member x.DeclaredInterfaces = 
         if isUnresolved() then makeReadOnlyCollection [] else
         ErrorLogger.protectAssemblyExploration [] (fun () -> 
-            [ for ty in GetImmediateInterfacesOfType SkipUnrefInterfaces.Yes cenv.g cenv.amap range0 (generalizedTyconRef entity) do 
+            [ for ty in GetImmediateInterfacesOfType SkipUnrefInterfaces.Yes cenv.g cenv.amap range0 (generalizedTyconRef cenv.g entity) do 
                  yield FSharpType(cenv, ty) ])
         |> makeReadOnlyCollection
 
     member x.AllInterfaces = 
         if isUnresolved() then makeReadOnlyCollection [] else
         ErrorLogger.protectAssemblyExploration [] (fun () -> 
-            [ for ty in AllInterfacesOfType  cenv.g cenv.amap range0 AllowMultiIntfInstantiations.Yes (generalizedTyconRef entity) do 
+            [ for ty in AllInterfacesOfType  cenv.g cenv.amap range0 AllowMultiIntfInstantiations.Yes (generalizedTyconRef cenv.g entity) do 
                  yield FSharpType(cenv, ty) ])
         |> makeReadOnlyCollection
     
     member x.IsAttributeType =
         if isUnresolved() then false else
-        let ty = generalizedTyconRef entity
+        let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration false <| fun () -> 
         ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_Attribute
         
     member x.IsDisposableType =
         if isUnresolved() then false else
-        let ty = generalizedTyconRef entity
+        let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration false <| fun () -> 
         ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_IDisposable
 
     member x.BaseType = 
         checkIsResolved()        
-        GetSuperTypeOfType cenv.g cenv.amap range0 (generalizedTyconRef entity) 
+        GetSuperTypeOfType cenv.g cenv.amap range0 (generalizedTyconRef cenv.g entity) 
         |> Option.map (fun ty -> FSharpType(cenv, ty)) 
         
     member _.UsesPrefixDisplay = 
@@ -623,7 +623,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
     member x.MembersFunctionsAndValues = 
       if isUnresolved() then makeReadOnlyCollection [] else
       protect <| fun () -> 
-        ([ let _, entityTy = generalizeTyconRef entity
+        ([ let entityTy = generalizedTyconRef cenv.g entity
            let createMember (minfo: MethInfo) =
                if minfo.IsConstructor then FSharpMemberOrFunctionOrValue(cenv, C minfo, Item.CtorGroup (minfo.DisplayName, [minfo]))
                else FSharpMemberOrFunctionOrValue(cenv, M minfo, Item.MethodGroup (minfo.DisplayName, [minfo], None))
@@ -654,10 +654,10 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
                    yield FSharpMemberOrFunctionOrValue(cenv, V vref, Item.Value vref) 
                    match v.MemberInfo.Value.MemberFlags.MemberKind, v.ApparentEnclosingEntity with
                    | SynMemberKind.PropertyGet, Parent p -> 
-                        let pinfo = FSProp(cenv.g, generalizedTyconRef p, Some vref, None)
+                        let pinfo = FSProp(cenv.g, generalizedTyconRef cenv.g p, Some vref, None)
                         yield FSharpMemberOrFunctionOrValue(cenv, P pinfo, Item.Property (pinfo.PropertyName, [pinfo]))
                    | SynMemberKind.PropertySet, Parent p -> 
-                        let pinfo = FSProp(cenv.g, generalizedTyconRef p, None, Some vref)
+                        let pinfo = FSProp(cenv.g, generalizedTyconRef cenv.g p, None, Some vref)
                         yield FSharpMemberOrFunctionOrValue(cenv, P pinfo, Item.Property (pinfo.PropertyName, [pinfo]))
                    | _ -> ()
 
@@ -1679,7 +1679,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
             | M m | C m -> 
                 let rty = m.GetFSharpReturnTy(cenv.amap, range0, m.FormalMethodInst)
                 let argtysl = m.GetParamTypes(cenv.amap, range0, m.FormalMethodInst) 
-                mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) argtysl) rty
+                mkIteratedFunTy cenv.g (List.map (mkRefTupledTy cenv.g) argtysl) rty
             | V v -> v.TauType
         FSharpType(cenv, ty)
 
@@ -1815,9 +1815,9 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
             logicalName.Length > 4 && logicalName.StartsWithOrdinal("add_") &&
 
             let eventName = logicalName.[4..]
-            let entityTy = generalizedTyconRef m.DeclaringTyconRef
+            let entityTy = generalizedTyconRef cenv.g m.DeclaringTyconRef
             not (isNil (cenv.infoReader.GetImmediateIntrinsicEventsOfType (Some eventName, AccessibleFromSomeFSharpCode, range0, entityTy))) ||
-            let declaringTy = generalizedTyconRef m.DeclaringTyconRef
+            let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef
             match GetImmediateIntrinsicPropInfosOfType (Some eventName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy with 
             | pinfo :: _  -> pinfo.IsFSharpEventProperty
             | _ -> false
@@ -1832,9 +1832,9 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
             logicalName.Length > 4 && logicalName.StartsWithOrdinal("remove_") &&
 
             let eventName = logicalName.[7..]
-            let entityTy = generalizedTyconRef m.DeclaringTyconRef
+            let entityTy = generalizedTyconRef cenv.g m.DeclaringTyconRef
             not (isNil (cenv.infoReader.GetImmediateIntrinsicEventsOfType (Some eventName, AccessibleFromSomeFSharpCode, range0, entityTy))) ||
-            let declaringTy = generalizedTyconRef m.DeclaringTyconRef
+            let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef
             match GetImmediateIntrinsicPropInfosOfType (Some eventName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy with 
             | pinfo :: _ -> pinfo.IsFSharpEventProperty
             | _ -> false
@@ -1848,7 +1848,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
             logicalName.Length > 4 && logicalName.StartsWithOrdinal("get_") &&
 
             let propName = ChopPropertyName(logicalName)
-            let declaringTy = generalizedTyconRef m.DeclaringTyconRef
+            let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef
             not (isNil (GetImmediateIntrinsicPropInfosOfType (Some propName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy))
         | V v -> v.IsPropertyGetterMethod
         | _ -> false
@@ -1861,7 +1861,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
             logicalName.Length > 4 && logicalName.StartsWithOrdinal("set_") &&
 
             let propName = ChopPropertyName(logicalName) 
-            let declaringTy = generalizedTyconRef m.DeclaringTyconRef
+            let declaringTy = generalizedTyconRef cenv.g m.DeclaringTyconRef
             not (isNil (GetImmediateIntrinsicPropInfosOfType (Some propName, AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 declaringTy))
         | V v -> v.IsPropertySetterMethod
         | _ -> false
@@ -2235,7 +2235,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
                 | M m | C m -> 
                     let rty = m.GetFSharpReturnTy(cenv.amap, range0, m.FormalMethodInst)
                     let argtysl = m.GetParamTypes(cenv.amap, range0, m.FormalMethodInst) 
-                    mkIteratedFunTy (List.map (mkRefTupledTy cenv.g) argtysl) rty
+                    mkIteratedFunTy cenv.g (List.map (mkRefTupledTy cenv.g) argtysl) rty
                 | V v -> v.TauType
             NicePrint.prettyLayoutOfTypeNoCx (context.Contents cenv.g) ty
             |> LayoutRender.toArray

From 9aaeb6fda2e656e62347ffb1fb2efdc7c7bdf66c Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 12:47:23 +0000
Subject: [PATCH 064/112] fix change to diagnostic

---
 src/fsharp/MethodOverrides.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/MethodOverrides.fs b/src/fsharp/MethodOverrides.fs
index 12b6be23306..b59d43de0d0 100644
--- a/src/fsharp/MethodOverrides.fs
+++ b/src/fsharp/MethodOverrides.fs
@@ -584,7 +584,7 @@ module DispatchSlotChecking =
                     // dispatch slots are ordered from the derived classes to base
                     // so we can check the topmost dispatch slot if it is final
                     match dispatchSlots with
-                    | meth :: _ when meth.IsFinal -> errorR(Error(FSComp.SR.tcCannotOverrideSealedMethod((sprintf "%s::%s" (NicePrint.stringOfTy denv  meth.ApparentEnclosingType) meth.LogicalName)), m))
+                    | meth :: _ when meth.IsFinal -> errorR(Error(FSComp.SR.tcCannotOverrideSealedMethod (sprintf "%s::%s" (meth.ApparentEnclosingType.ToString()) meth.LogicalName), m))
                     | _ -> ()
 
     /// Get the slots of a type that can or must be implemented. This depends

From b62363a27c4271d22bbe9c4245f2b1a5654e6f4d Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 14:11:16 +0000
Subject: [PATCH 065/112] simplify diff

---
 FSharp.Profiles.props                         |    4 +-
 src/fsharp/AccessibilityLogic.fs              |    6 +-
 src/fsharp/CompilerImports.fs                 |   10 +-
 .../DependencyManager/DependencyProvider.fs   |   18 +-
 .../DependencyManager/DependencyProvider.fsi  |   18 +-
 src/fsharp/ErrorLogger.fs                     |    7 +-
 src/fsharp/ExtensionTyping.fs                 |  156 +-
 src/fsharp/ExtensionTyping.fsi                |   34 +-
 .../FSharp.Build/FSharpCommandLineBuilder.fs  |   30 +-
 .../FSharp.Build/FSharpEmbedResXSource.fs     |    9 +-
 src/fsharp/FSharp.Build/Fsc.fs                |  168 +-
 src/fsharp/FSharp.Build/Fsi.fs                |   79 +-
 src/fsharp/FSharp.Build/SubstituteText.fs     |   12 +-
 src/fsharp/FSharp.Build/WriteCodeFragment.fs  |   32 +-
 src/fsharp/FxResolver.fs                      |   12 +-
 src/fsharp/TypedTree.fs                       |   13 -
 src/fsharp/TypedTreeOps.fs                    |    6 +-
 src/fsharp/TypedTreeOps.fsi                   |    6 +-
 src/fsharp/absil/illib.fs                     |   13 +-
 src/fsharp/absil/illib.fsi                    |   10 +
 src/fsharp/absil/ilnativeres.fs               |    6 +-
 src/fsharp/absil/ilread.fs                    |   12 +-
 src/fsharp/absil/ilreflect.fs                 |   24 +-
 src/fsharp/absil/ilsign.fs                    |    6 +-
 src/fsharp/absil/ilsupp.fs                    |    6 +-
 src/fsharp/fsi/console.fs                     |   12 +-
 src/fsharp/fsi/fsi.fs                         |   22 +-
 src/fsharp/import.fs                          |    6 +-
 src/fsharp/infos.fs                           |    9 +-
 src/fsharp/lib.fs                             |    6 +-
 src/fsharp/service/QuickParse.fs              |   18 +-
 src/fsharp/service/QuickParse.fsi             |   18 +-
 src/fsharp/service/SemanticClassification.fs  |    2 +-
 src/fsharp/service/ServiceLexing.fs           |   13 +-
 src/fsharp/service/ServiceUntypedParse.fs     | 1724 -----------------
 src/fsharp/tainted.fs                         |   10 +-
 src/fsharp/tainted.fsi                        |    6 +-
 src/fsharp/utils/FileSystem.fs                |   18 +-
 38 files changed, 219 insertions(+), 2342 deletions(-)
 delete mode 100755 src/fsharp/service/ServiceUntypedParse.fs

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index bf70817359f..5f6accdbdda 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -1,9 +1,9 @@
 
 
 
-  
+  
   
     BUILDING_WITH_LKG;NO_CHECKNULLS;$(DefineConstants)
   
diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index 7dafdde8dc4..e65eb7be1a2 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -372,11 +372,7 @@ let IsPropInfoAccessible g amap m ad = function
     | ProvidedProp (amap, tppi, m) as pp-> 
         let access = 
             let a = tppi.PUntaint((fun ppi -> 
-#if NO_CHECKNULLS
-                let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo) =
-#else
-                let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo?) = // TODO NULLNESS: using ProvidedMethodBase? gives a nullness warning
-#endif
+                let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo MaybeNull) =
                     match mi with
                     | Null -> None
                     | NonNull mi -> 
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 9fc63ab60e5..002c4fd7405 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1145,18 +1145,10 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         | _ -> None
 
 #if !NO_EXTENSIONTYPING
-#if NO_CHECKNULLS
-    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
-#else
-    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
-#endif
+    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
         match assembly with
         | Tainted.Null -> false,None
-#if NO_CHECKNULLS
-        | assembly ->
-#else
         | Tainted.NonNull assembly ->
-#endif
         let aname = assembly.PUntaint((fun a -> a.GetName()), m)
         let ilShortAssemName = aname.Name
         match tcImports.FindCcu (ctok, m, ilShortAssemName, lookupOnly=true) with
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fs b/src/fsharp/DependencyManager/DependencyProvider.fs
index 6d523fb62a7..30ac37e51a2 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/DependencyManager/DependencyProvider.fs
@@ -379,11 +379,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
         FSComp.SR.packageManagerUnknown(packageManagerKey, String.Join(", ", searchPaths, compilerTools), registeredKeys)
 
     /// Fetch a dependencymanager that supports a specific key
-#if NO_CHECKNULLS
-    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string * IDependencyManagerProvider =
-#else
-    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string? * IDependencyManagerProvider? =
-#endif
+    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string MaybeNull * IDependencyManagerProvider MaybeNull =
         try
             if path.Contains ":" && not (Path.IsPathRooted path) then
                 let managers = RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
@@ -406,11 +402,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
             null, null
 
     /// Fetch a dependencymanager that supports a specific key
-#if NO_CHECKNULLS
-    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider =
-#else
-    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider? =
-#endif
+    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider MaybeNull =
 
         try
             RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
@@ -430,11 +422,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                        packageManagerTextLines: (string * string) seq,
                        reportError: ResolvingErrorReport,
                        executionTfm: string,
-#if NO_CHECKNULLS
-                       []executionRid: string,
-#else
-                       []executionRid: string?,
-#endif
+                       []executionRid: string MaybeNull,
                        []implicitIncludeDir: string,
                        []mainScriptName: string,
                        []fileName: string,
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fsi b/src/fsharp/DependencyManager/DependencyProvider.fsi
index a58dc2cec33..5cac6828984 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fsi
+++ b/src/fsharp/DependencyManager/DependencyProvider.fsi
@@ -90,22 +90,10 @@ type DependencyProvider =
     member CreatePackageManagerUnknownError: string seq * string * string * ResolvingErrorReport -> int * string
 
     /// Resolve reference for a list of package manager lines
-#if NO_CHECKNULLS
-    member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
-#else
-    member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
-#endif
+    member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
 
     /// Fetch a dependencymanager that supports a specific key
-#if NO_CHECKNULLS
-    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider
-#else
-    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider?
-#endif
+    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider MaybeNull
 
     /// TryFindDependencyManagerInPath - given a #r "key:sometext" go and find a DependencyManager that satisfies the key
-#if NO_CHECKNULLS
-    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string * IDependencyManagerProvider
-#else
-    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string? * IDependencyManagerProvider?
-#endif
+    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string MaybeNull * IDependencyManagerProvider MaybeNull
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index db32d54f354..5d490bd3a6c 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -655,13 +655,8 @@ let NewlineifyErrorString (message:string) = message.Replace(stringThatIsAProxyF
 /// fixes given string by replacing all control chars with spaces.
 /// NOTE: newlines are recognized and replaced with stringThatIsAProxyForANewlineInFlatErrors (ASCII 29, the 'group separator'), 
 /// which is decoded by the IDE with 'NewlineifyErrorString' back into newlines, so that multi-line errors can be displayed in QuickInfo
-#if NO_CHECKNULLS
-let NormalizeErrorString (text : string) =
-    if isNull text then nullArg "text"
-#else
-let NormalizeErrorString (text : string?) =
+let NormalizeErrorString (text : string MaybeNull) =
     let text = nullArgCheck "text" text
-#endif
 
     let text = text.Trim()
 
diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 43ddb469235..3243a6f40c2 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -226,11 +226,7 @@ module internal ExtensionTyping =
         resolver.PUntaint((fun tp -> tp.GetType().Name), m)
 
     /// Validate a provided namespace name
-#if NO_CHECKNULLS
-    let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string) =
-#else
-    let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp:string?) =
-#endif
+    let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string MaybeNull) =
         match nsp with 
         | Null -> ()
         | NonNull nsp -> 
@@ -349,18 +345,10 @@ module internal ExtensionTyping =
         member _.IsSuppressRelocate = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.SuppressRelocate)) <> enum 0  
         member _.IsErased = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.IsErased)) <> enum 0  
         member _.IsGenericType = x.IsGenericType
-#if NO_CHECKNULLS
-        member _.Namespace : string = x.Namespace
-#else
-        member _.Namespace : string? = x.Namespace
-#endif
+        member _.Namespace : string MaybeNull = x.Namespace
         member _.FullName = x.FullName
         member _.IsArray = x.IsArray
-#if NO_CHECKNULLS
-        member _.Assembly: ProvidedAssembly = x.Assembly |> ProvidedAssembly.Create
-#else
-        member _.Assembly: ProvidedAssembly? = x.Assembly |> ProvidedAssembly.Create
-#endif
+        member _.Assembly: ProvidedAssembly MaybeNull = x.Assembly |> ProvidedAssembly.Create
         member _.GetInterfaces() = x.GetInterfaces() |> ProvidedType.CreateArray ctxt
         member _.GetMethods() = x.GetMethods bindingFlags |> ProvidedMethodInfo.CreateArray ctxt
         member _.GetEvents() = x.GetEvents bindingFlags |> ProvidedEventInfo.CreateArray ctxt
@@ -378,11 +366,7 @@ module internal ExtensionTyping =
         member _.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
         /// Type.BaseType can be null when Type is interface or object
         member _.BaseType = x.BaseType |> ProvidedType.Create ctxt
-#if NO_CHECKNULLS
-        member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[] = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
-#else
-        member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[]? = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
-#endif
+        member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[] MaybeNull = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
         /// Type.GetElementType can be null if i.e. Type is not array\pointer\byref type
         member _.GetElementType() = x.GetElementType() |> ProvidedType.Create ctxt
         member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
@@ -419,11 +403,7 @@ module internal ExtensionTyping =
 
         member _.AsProvidedVar name = ProvidedVar.CreateNonNull ctxt (Quotations.Var(name, x))
 
-#if NO_CHECKNULLS
-        static member Create ctxt x : ProvidedType = 
-#else
-        static member Create ctxt x : ProvidedType? = 
-#endif
+        static member Create ctxt x : ProvidedType MaybeNull = 
             match x with 
             | Null -> null 
             | NonNull t -> ProvidedType (t, ctxt)
@@ -435,11 +415,7 @@ module internal ExtensionTyping =
             | Null -> nullArg name 
             | t -> ProvidedType (t, ctxt)
 
-#if NO_CHECKNULLS
-        static member CreateArray ctxt (xs: Type[]) : ProvidedType[] = 
-#else
-        static member CreateArray ctxt (xs: Type[]?) : ProvidedType[]? = 
-#endif
+        static member CreateArray ctxt (xs: Type[] MaybeNull) : ProvidedType[] MaybeNull = 
             match xs with
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedType.CreateNonNull ctxt)
@@ -464,11 +440,7 @@ module internal ExtensionTyping =
         []
 #endif
         IProvidedCustomAttributeProvider =
-#if NO_CHECKNULLS
-        abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string * int * int) option 
-#else
-        abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string? * int * int) option 
-#endif
+        abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string MaybeNull * int * int) option 
 
         abstract GetXmlDocAttributes : provider: ITypeProvider -> string[]
 
@@ -550,22 +522,14 @@ module internal ExtensionTyping =
         /// ParameterInfo.ParameterType cannot be null
         member _.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType
         
-#if NO_CHECKNULLS
-        static member Create ctxt (x: ParameterInfo) : ProvidedParameterInfo = 
-#else
-        static member Create ctxt (x: ParameterInfo?) : ProvidedParameterInfo? = 
-#endif
+        static member Create ctxt (x: ParameterInfo MaybeNull) : ProvidedParameterInfo MaybeNull = 
             match x with 
             | Null -> null 
             | NonNull x -> ProvidedParameterInfo (x, ctxt)
 
         static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
         
-#if NO_CHECKNULLS
-        static member CreateArray ctxt (xs: ParameterInfo[]) : ProvidedParameterInfo[] = 
-#else
-        static member CreateArray ctxt (xs: ParameterInfo[]?) : ProvidedParameterInfo[]? = 
-#endif
+        static member CreateArray ctxt (xs: ParameterInfo[] MaybeNull) : ProvidedParameterInfo[] MaybeNull = 
             match xs with 
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
@@ -597,11 +561,7 @@ module internal ExtensionTyping =
 
         member _.GetManifestModuleContents(provider: ITypeProvider) = provider.GetGeneratedAssemblyContents x
 
-#if NO_CHECKNULLS
-        static member Create x : ProvidedAssembly = match x with null -> null | t -> ProvidedAssembly (t)
-#else
-        static member Create x : ProvidedAssembly? = match x with null -> null | t -> ProvidedAssembly (t)
-#endif
+        static member Create x : ProvidedAssembly MaybeNull = match x with null -> null | t -> ProvidedAssembly (t)
 
         member _.Handle = x
 
@@ -699,20 +659,12 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedFieldInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member Create ctxt x : ProvidedFieldInfo = 
-#else
-        static member Create ctxt x : ProvidedFieldInfo? = 
-#endif
+        static member Create ctxt x : ProvidedFieldInfo MaybeNull = 
             match x with 
             | Null -> null 
             | NonNull x -> ProvidedFieldInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member CreateArray ctxt (xs: FieldInfo[]) : ProvidedFieldInfo[] = 
-#else
-        static member CreateArray ctxt (xs: FieldInfo[]?) : ProvidedFieldInfo[]? = 
-#endif
+        static member CreateArray ctxt (xs: FieldInfo[] MaybeNull) : ProvidedFieldInfo[] MaybeNull = 
             match xs with 
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt)
@@ -747,20 +699,12 @@ module internal ExtensionTyping =
         static member CreateNonNull ctxt (x: MethodInfo) : ProvidedMethodInfo = 
             ProvidedMethodInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member Create ctxt (x: MethodInfo) : ProvidedMethodInfo = 
-#else
-        static member Create ctxt (x: MethodInfo?) : ProvidedMethodInfo? = 
-#endif
+        static member Create ctxt (x: MethodInfo MaybeNull) : ProvidedMethodInfo MaybeNull = 
             match x with 
             | Null -> null
             | NonNull x -> ProvidedMethodInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member CreateArray ctxt (xs: MethodInfo[]) : ProvidedMethodInfo[] = 
-#else
-        static member CreateArray ctxt (xs: MethodInfo[]?) : ProvidedMethodInfo[]? = 
-#endif
+        static member CreateArray ctxt (xs: MethodInfo[] MaybeNull) : ProvidedMethodInfo[] MaybeNull = 
             match xs with 
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt)
@@ -786,20 +730,12 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedPropertyInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member Create ctxt x : ProvidedPropertyInfo = 
-#else
-        static member Create ctxt x : ProvidedPropertyInfo? = 
-#endif
+        static member Create ctxt x : ProvidedPropertyInfo MaybeNull =
             match x with 
             | Null -> null 
             | NonNull x -> ProvidedPropertyInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member CreateArray ctxt xs : ProvidedPropertyInfo[] = 
-#else
-        static member CreateArray ctxt (xs: PropertyInfo[]?) : ProvidedPropertyInfo[]? = 
-#endif
+        static member CreateArray ctxt (xs: PropertyInfo[] MaybeNull) : ProvidedPropertyInfo[] MaybeNull = 
             match xs with
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt)
@@ -831,20 +767,12 @@ module internal ExtensionTyping =
         
         static member CreateNonNull ctxt x = ProvidedEventInfo (x, ctxt)
         
-#if NO_CHECKNULLS
-        static member Create ctxt x : ProvidedEventInfo = 
-#else
-        static member Create ctxt x : ProvidedEventInfo? = 
-#endif
+        static member Create ctxt x : ProvidedEventInfo MaybeNull = 
             match x with 
             | Null -> null 
             | NonNull x -> ProvidedEventInfo (x, ctxt)
         
-#if NO_CHECKNULLS
-        static member CreateArray ctxt xs : ProvidedEventInfo[] = 
-#else
-        static member CreateArray ctxt (xs: EventInfo[]?) : ProvidedEventInfo[]? = 
-#endif
+        static member CreateArray ctxt (xs: EventInfo[] MaybeNull) : ProvidedEventInfo[] MaybeNull = 
             match xs with 
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt)
@@ -872,20 +800,12 @@ module internal ExtensionTyping =
 
         static member CreateNonNull ctxt x = ProvidedConstructorInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member Create ctxt (x: ConstructorInfo) : ProvidedConstructorInfo = 
-#else
-        static member Create ctxt (x: ConstructorInfo?) : ProvidedConstructorInfo? = 
-#endif
+        static member Create ctxt (x: ConstructorInfo MaybeNull) : ProvidedConstructorInfo MaybeNull = 
             match x with 
             | Null -> null 
             | NonNull x -> ProvidedConstructorInfo (x, ctxt)
 
-#if NO_CHECKNULLS
-        static member CreateArray ctxt xs : ProvidedConstructorInfo[] = 
-#else
-        static member CreateArray ctxt (xs: ConstructorInfo[]?) : ProvidedConstructorInfo[]? = 
-#endif
+        static member CreateArray ctxt (xs: ConstructorInfo[] MaybeNull) : ProvidedConstructorInfo[] MaybeNull = 
             match xs with 
             | Null -> null
             | NonNull xs -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt)
@@ -976,11 +896,7 @@ module internal ExtensionTyping =
             | Quotations.Patterns.Var v ->
                 Some (ProvidedVarExpr (ProvidedVar.CreateNonNull ctxt v))
             | _ -> None
-#if NO_CHECKNULLS
-        static member Create ctxt t : ProvidedExpr = 
-#else
-        static member Create ctxt t : ProvidedExpr? = 
-#endif
+        static member Create ctxt t : ProvidedExpr MaybeNull = 
             match box t with 
             | Null -> null 
             | _ -> ProvidedExpr (t, ctxt)
@@ -1202,11 +1118,7 @@ module internal ExtensionTyping =
         | -1 -> ()
         | n -> errorR(Error(FSComp.SR.etIllegalCharactersInTypeName(string expectedName.[n], expectedName), m))  
 
-#if NO_CHECKNULLS
-        let staticParameters = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
-#else
-        let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
-#endif
+        let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
         if staticParameters.PUntaint((fun a -> (nonNull a).Length), m)  = 0 then 
             ValidateProvidedTypeAfterStaticInstantiation(m, st, expectedPath, expectedName)
 
@@ -1214,11 +1126,7 @@ module internal ExtensionTyping =
     /// Resolve a (non-nested) provided type given a full namespace name and a type name. 
     /// May throw an exception which will be turned into an error message by one of the 'Try' function below.
     /// If resolution is successful the type is then validated.
-#if NO_CHECKNULLS
-    let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
-#else
-    let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
-#endif
+    let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
         let displayName = String.Join(".", moduleOrNamespace)
 
         // Try to find the type in the given provided namespace
@@ -1402,11 +1310,7 @@ module internal ExtensionTyping =
             | None -> None
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-#if NO_CHECKNULLS
-    let GetPartsOfNamespaceRecover(namespaceName: string) = 
-#else
-    let GetPartsOfNamespaceRecover(namespaceName: string?) = 
-#endif
+    let GetPartsOfNamespaceRecover(namespaceName: string MaybeNull) = 
         match namespaceName with 
         | Null -> [] 
         | NonNull namespaceName -> 
@@ -1414,11 +1318,7 @@ module internal ExtensionTyping =
             else splitNamespace (nonNull namespaceName)
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-#if NO_CHECKNULLS
-    let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string) = 
-#else
-    let GetProvidedNamespaceAsPath (m, resolver:Tainted, namespaceName:string?) = 
-#endif
+    let GetProvidedNamespaceAsPath (m, resolver: Tainted, namespaceName:string MaybeNull) =
         match namespaceName with 
         | Null -> [] 
         | NonNull namespaceName -> 
@@ -1431,11 +1331,7 @@ module internal ExtensionTyping =
         // Can't use st.Fullname because it may be like IEnumerable
         // We want [System;Collections;Generic]
         let namespaceParts = GetPartsOfNamespaceRecover(st.PUntaint((fun st -> st.Namespace), range))
-#if NO_CHECKNULLS
-        let rec walkUpNestedClasses(st: Tainted, soFar) =
-#else
-        let rec walkUpNestedClasses(st: Tainted, soFar) =
-#endif
+        let rec walkUpNestedClasses(st: Tainted, soFar) =
             match st with
             | Tainted.Null -> soFar
             | Tainted.NonNull st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), soFar) @ [st.PUntaint((fun st -> st.Name), range)]
diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi
index 65aaaa3e95a..19cd689a04a 100755
--- a/src/fsharp/ExtensionTyping.fsi
+++ b/src/fsharp/ExtensionTyping.fsi
@@ -95,20 +95,12 @@ module internal ExtensionTyping =
         member IsSuppressRelocate : bool
         member IsErased : bool
         member IsGenericType : bool
-#if NO_CHECKNULLS
-        member Namespace : string
-#else
-        member Namespace : string?
-#endif
+        member Namespace : string MaybeNull
         member FullName : string
         member IsArray : bool
         member GetInterfaces : unit -> ProvidedType[]
         member Assembly : ProvidedAssembly
-#if NO_CHECKNULLS
-        member BaseType : ProvidedType
-#else
-        member BaseType : ProvidedType?
-#endif
+        member BaseType : ProvidedType MaybeNull
         member GetNestedType : string -> ProvidedType
         member GetNestedTypes : unit -> ProvidedType[]
         member GetAllNestedTypes : unit -> ProvidedType[]
@@ -162,11 +154,7 @@ module internal ExtensionTyping =
 #endif
         IProvidedCustomAttributeProvider =
         abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool
-#if NO_CHECKNULLS
-        abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string * int * int) option 
-#else
-        abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string? * int * int) option 
-#endif
+        abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string MaybeNull * int * int) option 
         abstract GetXmlDocAttributes : provider:ITypeProvider -> string[]
         abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
         
@@ -186,11 +174,7 @@ module internal ExtensionTyping =
 #endif
         ProvidedMemberInfo = 
         member Name :string
-#if NO_CHECKNULLS
-        member DeclaringType : ProvidedType
-#else
-        member DeclaringType : ProvidedType?
-#endif
+        member DeclaringType : ProvidedType MaybeNull
         interface IProvidedCustomAttributeProvider 
 
     and [] 
@@ -265,15 +249,9 @@ module internal ExtensionTyping =
         ProvidedPropertyInfo = 
         inherit ProvidedMemberInfo
 
-#if NO_CHECKNULLS
-        member GetGetMethod : unit -> ProvidedMethodInfo
-
-        member GetSetMethod : unit -> ProvidedMethodInfo
-#else
-        member GetGetMethod : unit -> ProvidedMethodInfo?
+        member GetGetMethod : unit -> ProvidedMethodInfo MaybeNull
 
-        member GetSetMethod : unit -> ProvidedMethodInfo?
-#endif
+        member GetSetMethod : unit -> ProvidedMethodInfo MaybeNull
 
         member GetIndexParameters : unit -> ProvidedParameterInfo[]
 
diff --git a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
index b725a048c62..8a96999bcc0 100644
--- a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
+++ b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
@@ -12,6 +12,16 @@ open Internal.Utilities
 []
 do()
 
+// Shim to match nullness checking library support in preview
+[]
+module Utils = 
+#if NO_CHECKNULLS
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+    type MaybeNull<'T when 'T : null> = 'T
+#else
+    type MaybeNull<'T when 'T : not null> = 'T?
+#endif
+
 type FSharpCommandLineBuilder () =
 
     // In addition to generating a command-line that will be handed to cmd.exe, we also generate
@@ -32,7 +42,7 @@ type FSharpCommandLineBuilder () =
     /// Return a full command line (with quoting for the cmd.exe shell)
     override x.ToString() = builder.ToString()
 
-    member x.AppendFileNamesIfNotNull(filenames:ITaskItem[], sep:string) =
+    member x.AppendFileNamesIfNotNull(filenames:ITaskItem[], sep: string) =
         builder.AppendFileNamesIfNotNull(filenames, sep)
         // do not update "args", not used
         for item in filenames do
@@ -42,7 +52,7 @@ type FSharpCommandLineBuilder () =
             if s <> String.Empty then
                 srcs <- tmp.ToString() :: srcs
 
-    member x.AppendSwitchesIfNotNull(switch:string, values:string[], sep:string) =
+    member x.AppendSwitchesIfNotNull(switch: string, values: string[], sep: string) =
         builder.AppendSwitchIfNotNull(switch, values, sep)
         let tmp = new CommandLineBuilder()
         tmp.AppendSwitchUnquotedIfNotNull(switch, values, sep)
@@ -50,11 +60,7 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- s :: args
 
-#if NO_CHECKNULLS
-    member x.AppendSwitchIfNotNull(switch:string, value:string, ?metadataNames:string[]) =
-#else
-    member x.AppendSwitchIfNotNull(switch:string, value:string?, ?metadataNames:string[]) =
-#endif
+    member x.AppendSwitchIfNotNull(switch: string, value: string MaybeNull, ?metadataNames: string[]) =
         let metadataNames = defaultArg metadataNames [||]
         builder.AppendSwitchIfNotNull(switch, value)
         let tmp = new CommandLineBuilder()
@@ -69,14 +75,10 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- s :: args
 
-#if NO_CHECKNULLS
-    member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string) =
-#else
-    member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string?) =
-#endif
+    member x.AppendSwitchUnquotedIfNotNull(switch: string, value: string MaybeNull) =
         assert(switch = "")  // we only call this method for "OtherFlags"
         // Unfortunately we still need to mimic what cmd.exe does, but only for "OtherFlags".
-        let ParseCommandLineArgs(commandLine:string) = // returns list in reverse order
+        let ParseCommandLineArgs(commandLine: string) = // returns list in reverse order
             let mutable args = []
             let mutable i = 0 // index into commandLine
             let len = commandLine.Length
@@ -103,7 +105,7 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- ParseCommandLineArgs(s) @ args
 
-    member x.AppendSwitch(switch:string) =
+    member x.AppendSwitch(switch: string) =
         builder.AppendSwitch(switch)
         args <- switch :: args
 
diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
index 6118402ae0d..2a461846dd8 100644
--- a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
+++ b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
@@ -13,13 +13,8 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type FSharpEmbedResXSource() =
-#if NO_CHECKNULLS
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-#else
-    let mutable _buildEngine : IBuildEngine? = null
-    let mutable _hostObject : ITaskHost? = null
-#endif
+    let mutable _buildEngine : IBuildEngine MaybeNull = null
+    let mutable _hostObject : ITaskHost MaybeNull = null
     let mutable _embeddedText : ITaskItem[] = [||]
     let mutable _generatedSource : ITaskItem[] = [||]
     let mutable _outputPath : string = ""
diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs
index 67a6fa88ef8..76b804165e4 100644
--- a/src/fsharp/FSharp.Build/Fsc.fs
+++ b/src/fsharp/FSharp.Build/Fsc.fs
@@ -11,13 +11,6 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 open Internal.Utilities
 
-#if NO_CHECKNULLS
-// Shim to match nullness checking library support in preview
-[]
-module Utils = 
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-#endif
-
 //There are a lot of flags on fsc.exe.
 //For now, not all of them are represented in the "Fsc class" object model.
 //The goal is to have the most common/important flags available via the Fsc class, and the
@@ -28,28 +21,28 @@ type public Fsc () as this =
 
     inherit ToolTask ()
 
-    let mutable capturedArguments : string list = []  // list of individual args, to pass to HostObject Compile()
-    let mutable capturedFilenames : string list = []  // list of individual source filenames, to pass to HostObject Compile()
-    let mutable commandLineArgs : ITaskItem list = []
+    let mutable capturedArguments: string list = []  // list of individual args, to pass to HostObject Compile()
+    let mutable capturedFilenames: string list = []  // list of individual source filenames, to pass to HostObject Compile()
+    let mutable commandLineArgs: ITaskItem list = []
     let mutable compilerTools: ITaskItem [] = [||]
     let mutable debugSymbols = false
-    let mutable defineConstants : ITaskItem[] = [||]
-    let mutable delaySign : bool = false
-    let mutable deterministic : bool = false
+    let mutable defineConstants: ITaskItem[] = [||]
+    let mutable delaySign: bool = false
+    let mutable deterministic: bool = false
     let mutable embedAllSources = false
-    let mutable embeddedFiles : ITaskItem[] = [||]
-    let mutable highEntropyVA : bool = false
+    let mutable embeddedFiles: ITaskItem[] = [||]
+    let mutable highEntropyVA: bool = false
     let mutable noFramework = false
-    let mutable optimize  : bool = true
-    let mutable prefer32bit : bool = false
-    let mutable publicSign : bool = false
-    let mutable provideCommandLineArgs : bool = false
-    let mutable references : ITaskItem[] = [||]
-    let mutable resources : ITaskItem[] = [||]
-    let mutable skipCompilerExecution : bool  = false
-    let mutable sources : ITaskItem[] = [||]
-    let mutable tailcalls : bool = true
-    let mutable toolExe : string = "fsc.exe"
+    let mutable optimize: bool = true
+    let mutable prefer32bit: bool = false
+    let mutable publicSign: bool = false
+    let mutable provideCommandLineArgs: bool = false
+    let mutable references: ITaskItem[] = [||]
+    let mutable resources: ITaskItem[] = [||]
+    let mutable skipCompilerExecution: bool  = false
+    let mutable sources: ITaskItem[] = [||]
+    let mutable tailcalls: bool = true
+    let mutable toolExe: string = "fsc.exe"
     let defaultToolPath =
         let locationOfThisDll =
             try Some(Path.GetDirectoryName(typeof.Assembly.Location))
@@ -57,78 +50,44 @@ type public Fsc () as this =
         match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with
         | Some s -> s
         | None -> ""
-    let mutable treatWarningsAsErrors : bool = false
-    let mutable useStandardResourceNames : bool = false
-    let mutable vserrors : bool = false
-    let mutable utf8output : bool = false
-
-#if NO_CHECKNULLS
-    let mutable baseAddress : string = null
-    let mutable codePage : string = null
-    let mutable debugType : string = null
-    let mutable disabledWarnings : string = null
-    let mutable documentationFile : string = null
-    let mutable dotnetFscCompilerPath : string = null
-    let mutable generateInterfaceFile : string = null
-    let mutable keyFile : string = null
-    let mutable langVersion : string = null
-    let mutable otherFlags : string = null
-    let mutable outputAssembly : string = null 
-    let mutable pathMap : string = null
-    let mutable pdbFile : string = null
-    let mutable platform : string = null
-    let mutable preferredUILang : string = null
-    let mutable referencePath : string = null
-    let mutable sourceLink : string = null
-    let mutable subsystemVersion : string = null
-    let mutable targetProfile : string = null
-    let mutable targetType : string = null
-    let mutable warningsAsErrors : string = null
-    let mutable warningsNotAsErrors : string = null
-    let mutable versionFile : string = null
-    let mutable warningLevel : string = null
-    let mutable warnOn : string = null
-    let mutable win32icon: string = null
-    let mutable win32res : string = null
-    let mutable win32manifest : string = null
-    let mutable vslcid : string = null
-    let mutable checksumAlgorithm: string = null
-    let mutable codePage : string = null
-#else
-    let mutable baseAddress : string? = null
-    let mutable codePage : string? = null
-    let mutable debugType : string? = null
-    let mutable disabledWarnings : string? = null
-    let mutable documentationFile : string? = null
-    let mutable dotnetFscCompilerPath : string? = null
-    let mutable generateInterfaceFile : string? = null
-    let mutable keyFile : string? = null
-    let mutable langVersion : string? = null
-    let mutable otherFlags : string? = null
-    let mutable outputAssembly : string? = null 
-    let mutable pathMap : string? = null
-    let mutable pdbFile : string? = null
-    let mutable platform : string? = null
-    let mutable preferredUILang : string? = null
-    let mutable referencePath : string? = null
-    let mutable sourceLink : string? = null
-    let mutable subsystemVersion : string? = null
-    let mutable targetProfile : string? = null
-    let mutable targetType : string? = null
-    let mutable warnOn: string? = null
-    let mutable warningsAsErrors : string? = null
-    let mutable warningsNotAsErrors : string? = null
-    let mutable versionFile : string? = null
-    let mutable warningLevel : string? = null
-    let mutable win32icon: string? = null
-    let mutable win32res : string? = null
-    let mutable win32manifest : string? = null
-    let mutable vslcid : string? = null
-    let mutable checksumAlgorithm: string? = null
-    let mutable codePage : string? = null
-#endif
-
-    let mutable toolPath : string =
+    let mutable treatWarningsAsErrors: bool = false
+    let mutable useStandardResourceNames: bool = false
+    let mutable vserrors: bool = false
+    let mutable utf8output: bool = false
+
+    let mutable baseAddress: string MaybeNull = null
+    let mutable codePage: string MaybeNull = null
+    let mutable debugType: string MaybeNull = null
+    let mutable disabledWarnings: string MaybeNull = null
+    let mutable documentationFile: string MaybeNull = null
+    let mutable dotnetFscCompilerPath: string MaybeNull = null
+    let mutable generateInterfaceFile: string MaybeNull = null
+    let mutable keyFile: string MaybeNull = null
+    let mutable langVersion: string MaybeNull = null
+    let mutable otherFlags: string MaybeNull = null
+    let mutable outputAssembly: string MaybeNull = null 
+    let mutable pathMap: string MaybeNull = null
+    let mutable pdbFile: string MaybeNull = null
+    let mutable platform: string MaybeNull = null
+    let mutable preferredUILang: string MaybeNull = null
+    let mutable referencePath: string MaybeNull = null
+    let mutable sourceLink: string MaybeNull = null
+    let mutable subsystemVersion: string MaybeNull = null
+    let mutable targetProfile: string MaybeNull = null
+    let mutable targetType: string MaybeNull = null
+    let mutable warnOn: string MaybeNull = null
+    let mutable warningsAsErrors: string MaybeNull = null
+    let mutable warningsNotAsErrors: string MaybeNull = null
+    let mutable versionFile: string MaybeNull = null
+    let mutable warningLevel: string MaybeNull = null
+    let mutable win32icon: string MaybeNull = null
+    let mutable win32res: string MaybeNull = null
+    let mutable win32manifest: string MaybeNull = null
+    let mutable vslcid: string MaybeNull = null
+    let mutable checksumAlgorithm: string MaybeNull = null
+    let mutable codePage: string MaybeNull = null
+
+    let mutable toolPath: string =
         let locationOfThisDll =
             try Some(Path.GetDirectoryName(typeof.Assembly.Location))
             with _ -> None
@@ -139,11 +98,7 @@ type public Fsc () as this =
 
     /// Trim whitespace ... spaces, tabs, newlines,returns, Double quotes and single quotes
     let wsCharsToTrim = [| ' '; '\t'; '\"'; '\'' |]
-#if NO_CHECKNULLS
-    let splitAndWsTrim (s:string) =
-#else
-    let splitAndWsTrim (s:string?) =
-#endif
+    let splitAndWsTrim (s: string MaybeNull) =
         match s with
         | Null -> [||]
         | NonNull s ->
@@ -207,12 +162,10 @@ type public Fsc () as this =
         builder.AppendSwitchIfNotNull("--pdb:", pdbFile)
 // Platform
         builder.AppendSwitchIfNotNull("--platform:",
-#if NO_CHECKNULLS
-            let ToUpperInvariant (s:string) =
-#else
-            let ToUpperInvariant (s:string?) =
-#endif
+
+            let ToUpperInvariant (s: string MaybeNull) =
                 match s with Null -> null | NonNull s -> s.ToUpperInvariant()
+
             match ToUpperInvariant(platform), prefer32bit, ToUpperInvariant(targetType) with
                 | "ANYCPU", true, "EXE"
                 | "ANYCPU", true, "WINEXE" -> "anycpu32bitpreferred"
@@ -220,6 +173,7 @@ type public Fsc () as this =
                 | "X86",  _, _  -> "x86"
                 | "X64",  _, _  -> "x64"
                 | _ -> null)
+
         // checksumAlgorithm
         builder.AppendSwitchIfNotNull("--checksumalgorithm:",
             match checksumAlgorithm with
diff --git a/src/fsharp/FSharp.Build/Fsi.fs b/src/fsharp/FSharp.Build/Fsi.fs
index ef873597ff2..0f0161f999b 100644
--- a/src/fsharp/FSharp.Build/Fsi.fs
+++ b/src/fsharp/FSharp.Build/Fsi.fs
@@ -11,13 +11,6 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 open Internal.Utilities
 
-#if NO_CHECKNULLS
-[]
-// Shim to match nullness checking library support in preview
-module UtilsFsi = 
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-#endif
-
 //There are a lot of flags on fsi.exe.
 //For now, not all of them are represented in the "Fsi class" object model.
 //The goal is to have the most common/important flags available via the Fsi class, and the
@@ -28,61 +21,45 @@ type public Fsi () as this =
 
     inherit ToolTask ()
 
-    let mutable capturedArguments : string list = []  // list of individual args, to pass to HostObject Compile()
-    let mutable capturedFilenames : string list = []  // list of individual source filenames, to pass to HostObject Compile()
-    let mutable commandLineArgs : ITaskItem list = []
-    let mutable defineConstants : ITaskItem[] = [||]
+    let mutable capturedArguments: string list = []  // list of individual args, to pass to HostObject Compile()
+    let mutable capturedFilenames: string list = []  // list of individual source filenames, to pass to HostObject Compile()
+    let mutable commandLineArgs: ITaskItem list = []
+    let mutable defineConstants: ITaskItem[] = [||]
     let mutable fsiExec = false
     let mutable noFramework = false
     let mutable optimize = true
     let mutable provideCommandLineArgs = false
-    let mutable references : ITaskItem[] = [||]
-    let mutable resources : ITaskItem[] = [||]
+    let mutable references: ITaskItem[] = [||]
+    let mutable resources: ITaskItem[] = [||]
     let mutable skipCompilerExecution = false
-    let mutable sources : ITaskItem[] = [||]
-    let mutable loadSources : ITaskItem[] = [||]
-    let mutable useSources : ITaskItem[] = [||]
-    let mutable tailcalls : bool = true
-    let mutable toolExe : string = "fsi.exe"
-    let mutable toolPath : string =
+    let mutable sources: ITaskItem[] = [||]
+    let mutable loadSources: ITaskItem[] = [||]
+    let mutable useSources: ITaskItem[] = [||]
+    let mutable tailcalls: bool = true
+    let mutable toolExe: string = "fsi.exe"
+    let mutable toolPath: string =
         let locationOfThisDll =
             try Some(Path.GetDirectoryName(typeof.Assembly.Location))
             with _ -> None
         match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with
         | Some s -> s
         | None -> ""
-    let mutable treatWarningsAsErrors : bool = false
-    let mutable utf8output : bool = false
-
-#if NO_CHECKNULLS
-    let mutable codePage : string = null
-    let mutable disabledWarnings : string = null
-    let mutable dotnetFsiCompilerPath : string = null
-    let mutable otherFlags : string = null
-    let mutable langVersion : string = null
-    let mutable preferredUILang : string = null
-    let mutable targetProfile : string = null
-    let mutable targetType : string = null
-    let mutable referencePath : string = null
-    let mutable warningsAsErrors : string = null
-    let mutable warningsNotAsErrors : string = null
-    let mutable warningLevel : string = null
-    let mutable vslcid : string = null
-#else
-    let mutable codePage : string? = null
-    let mutable disabledWarnings : string? = null
-    let mutable dotnetFsiCompilerPath : string? = null
-    let mutable otherFlags : string? = null
-    let mutable langVersion : string? = null
-    let mutable preferredUILang : string? = null
-    let mutable targetProfile : string? = null
-    let mutable targetType : string? = null
-    let mutable referencePath : string? = null
-    let mutable warningsAsErrors : string? = null
-    let mutable warningsNotAsErrors : string? = null
-    let mutable warningLevel : string? = null
-    let mutable vslcid : string? = null
-#endif
+    let mutable treatWarningsAsErrors: bool = false
+    let mutable utf8output: bool = false
+
+    let mutable codePage: string MaybeNull = null
+    let mutable disabledWarnings: string MaybeNull = null
+    let mutable dotnetFsiCompilerPath: string MaybeNull = null
+    let mutable otherFlags: string MaybeNull = null
+    let mutable langVersion: string MaybeNull = null
+    let mutable preferredUILang: string MaybeNull = null
+    let mutable targetProfile: string MaybeNull = null
+    let mutable targetType: string MaybeNull = null
+    let mutable referencePath: string MaybeNull = null
+    let mutable warningsAsErrors: string MaybeNull = null
+    let mutable warningsNotAsErrors: string MaybeNull = null
+    let mutable warningLevel: string MaybeNull = null
+    let mutable vslcid: string MaybeNull = null
 
     // See bug 6483; this makes parallel build faster, and is fine to set unconditionally
     do this.YieldDuringToolExecution <- true
diff --git a/src/fsharp/FSharp.Build/SubstituteText.fs b/src/fsharp/FSharp.Build/SubstituteText.fs
index 1898a295132..76ad0ac273a 100644
--- a/src/fsharp/FSharp.Build/SubstituteText.fs
+++ b/src/fsharp/FSharp.Build/SubstituteText.fs
@@ -10,15 +10,9 @@ open Microsoft.Build.Utilities
 
 type SubstituteText () =
 
-#if NO_CHECKNULLS
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-    let mutable embeddedResources : ITaskItem[] = [||]
-#else
-    let mutable _buildEngine : IBuildEngine? = null
-    let mutable _hostObject : ITaskHost? = null
-    let mutable embeddedResources : ITaskItem[]? = [||]
-#endif
+    let mutable _buildEngine : IBuildEngine MaybeNull = null
+    let mutable _hostObject : ITaskHost MaybeNull = null
+    let mutable embeddedResources : ITaskItem[] MaybeNull = [||]
 
     let mutable copiedFiles = new ResizeArray()
 
diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
index aeffde86e41..a0aa31f98f7 100644
--- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs
+++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
@@ -12,25 +12,11 @@ open System.Text
 open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
-#if NO_CHECKNULLS
-[]
-// Shim to match nullness checking library support in preview
-module UtilsWriteCodeFragment = 
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-#endif
-
 type WriteCodeFragment() =
-#if NO_CHECKNULLS
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-    let mutable _outputDirectory : ITaskItem = null
-    let mutable _outputFile : ITaskItem = null
-#else
-    let mutable _buildEngine : IBuildEngine? = null
-    let mutable _hostObject : ITaskHost? = null
-    let mutable _outputDirectory : ITaskItem? = null
-    let mutable _outputFile : ITaskItem? = null
-#endif
+    let mutable _buildEngine : IBuildEngine MaybeNull = null
+    let mutable _hostObject : ITaskHost MaybeNull = null
+    let mutable _outputDirectory : ITaskItem MaybeNull = null
+    let mutable _outputFile : ITaskItem MaybeNull = null
     let mutable _language : string = ""
     let mutable _assemblyAttributes : ITaskItem[] = [||]
 
@@ -139,15 +125,6 @@ type WriteCodeFragment() =
 
                 if _language.ToLowerInvariant() = "f#" then code.AppendLine("do()") |> ignore
 
-#if NO_CHECKNULLS
-                let fileName = _outputFile.ItemSpec
-
-                let outputFileItem =
-                    if not (isNull _outputFile) && not (isNull _outputDirectory) && not (Path.IsPathRooted(fileName)) then
-                        TaskItem(Path.Combine(_outputDirectory.ItemSpec, fileName)) :> ITaskItem
-                    else
-                        _outputFile
-#else
                 let fileName = outputFile.ItemSpec
 
                 let outputFileItem =
@@ -158,7 +135,6 @@ type WriteCodeFragment() =
                             outputFile
                         else
                             TaskItem(Path.Combine(outputDirectory.ItemSpec, fileName)) :> ITaskItem
-#endif
 
                 let codeText = code.ToString()
                 File.WriteAllText(fileName, codeText)
diff --git a/src/fsharp/FxResolver.fs b/src/fsharp/FxResolver.fs
index e9afc142179..d2cb4a4e1e5 100644
--- a/src/fsharp/FxResolver.fs
+++ b/src/fsharp/FxResolver.fs
@@ -48,21 +48,13 @@ type internal FxResolver(assumeDotNetFramework: bool, projectDir: string, useSdk
             let outputList = ResizeArray()
             let mutable errorslock = obj
             let mutable outputlock = obj
-#if NO_CHECKNULLS
-            let outputDataReceived (message: string) =
-#else
-            let outputDataReceived (message: string?) =
-#endif
+            let outputDataReceived (message: string MaybeNull) =
                 match message with
                 | Null -> ()
                 | NonNull message ->
                     lock outputlock (fun () -> outputList.Add(message))
 
-#if NO_CHECKNULLS
-            let errorDataReceived (message: string) =
-#else
-            let errorDataReceived (message: string?) =
-#endif
+            let errorDataReceived (message: string MaybeNull) =
                 match message with
                 | Null -> ()
                 | NonNull message ->
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index b2d099d21b9..1fbd995272b 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -5380,15 +5380,10 @@ type CcuThunk =
     {
       /// ccu.target is null when a reference is missing in the transitive closure of static references that
       /// may potentially be required for the metadata of referenced DLLs.
-#if NO_CHECKNULLS
       mutable target: CcuData
-#else
-      mutable target: CcuData?
-#endif
       name: CcuReference
     }
 
-#if NO_CHECKNULLS
     /// Dereference the assembly reference 
     member ccu.Deref = 
         if isNull (box ccu.target) then 
@@ -5397,14 +5392,6 @@ type CcuThunk =
    
     /// Indicates if this assembly reference is unresolved
     member ccu.IsUnresolvedReference = isNull (box ccu.target)
-#else
-    member ccu.Deref = 
-        match ccu.target with 
-        | null -> raise(UnresolvedReferenceNoRange ccu.name)
-        | NonNullQuick tg -> tg
-
-    member ccu.IsUnresolvedReference = isNull ccu.target
-#endif
    
     /// Ensure the ccu is derefable in advance. Supply a path to attach to any resulting error message.
     member ccu.EnsureDerefable(requiringPath: string[]) = 
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index a184cb32591..90a0679e08f 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -7660,11 +7660,7 @@ let mkCompilationMappingAttrForQuotationResource (g: TcGlobals) (nm, tys: ILType
 let isTypeProviderAssemblyAttr (cattr: ILAttribute) = 
     cattr.Method.DeclaringType.BasicQualifiedName = typeof.FullName
 
-#if NO_CHECKNULLS
-let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) : string option = 
-#else
-let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) : string? option = 
-#endif
+let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) : string MaybeNull option = 
     if isTypeProviderAssemblyAttr cattr then 
         let parms, _args = decodeILAttribData cattr 
         match parms with // The first parameter to the attribute is the name of the assembly with the compiler extensions.
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index 4a9b81b2695..d4287c005a0 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -2175,11 +2175,7 @@ val TryFindAttributeUsageAttribute: TcGlobals -> range -> TyconRef -> bool optio
 
 #if !NO_EXTENSIONTYPING
 /// returns Some(assemblyName) for success
-#if NO_CHECKNULLS
-val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string option
-#else
-val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string? option
-#endif
+val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string MaybeNull option
 #endif
 
 val IsSignatureDataVersionAttr: ILAttribute -> bool
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index d76c5a52cc3..a248a13e480 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -36,11 +36,18 @@ module internal PervasiveAutoOpens =
 
     let inline isNotNull x = not (isNull x)
 
+#if NO_CHECKNULLS
+    type MaybeNull<'T when 'T : null> = 'T
+#else
+    type MaybeNull<'T when 'T : not null> = 'T?
+#endif
+
 #if NO_CHECKNULLS
     // Shim to match nullness checking library support in preview
     let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
     let inline nonNull<'T when 'T : null> (x: 'T) = x
     let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+    let inline nullArgCheck paramName (x: 'T MaybeNull) = match x with null -> raise (ArgumentNullException(paramName)) | v -> v
 #endif
 
     let inline (===) x y = LanguagePrimitives.PhysicalEquality x y
@@ -110,11 +117,7 @@ module internal PervasiveAutoOpens =
 type InlineDelayInit<'T when 'T : not struct> = 
     new (f: unit -> 'T) = {store = Unchecked.defaultof<'T>; func = Func<_>(f) } 
     val mutable store : 'T
-#if NO_CHECKNULLS
-    val mutable func : Func<'T>
-#else
-    val mutable func : Func<'T> ?
-#endif
+    val mutable func : Func<'T> MaybeNull
     member x.Value = 
         match x.func with 
         | null -> x.store 
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index 28aad0140d0..d5675426725 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -25,10 +25,20 @@ module internal PervasiveAutoOpens =
 
     val inline isNotNull: x:'a -> bool when 'a: null
 
+    /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
+    /// replacement for 'string?' for example for future FS-1060.
 #if NO_CHECKNULLS
+    type MaybeNull<'T when 'T : null> = 'T
+#else
+    type MaybeNull<'T when 'T : not null> = 'T?
+#endif
+
+#if NO_CHECKNULLS
+    val inline (|NonNullQuick|): 'T -> 'T when 'T : null
     val inline (|NonNullQuick|): 'T -> 'T when 'T : null
     val inline (|Null|NonNull|): 'T -> Choice when 'T : null
     val inline nonNull: x:'T -> 'T when 'T : null
+    val inline nullArgCheck: paramName: string -> x: MaybeNull<'T> -> 'T    
 #endif
 
     val inline ( === ): x:'a -> y:'a -> bool when 'a: not struct
diff --git a/src/fsharp/absil/ilnativeres.fs b/src/fsharp/absil/ilnativeres.fs
index a9fa5ae2a63..9875e1262e1 100644
--- a/src/fsharp/absil/ilnativeres.fs
+++ b/src/fsharp/absil/ilnativeres.fs
@@ -29,11 +29,7 @@ let inline DWORD s = uint32 s
 let inline WCHAR s = char s
 let inline BYTE s = byte s
 
-#if NO_CHECKNULLS
-type ResourceException(name: string, ?inner: Exception) =
-#else
-type ResourceException(name: string, ?inner: Exception?) =
-#endif
+type ResourceException(name: string, ?inner: Exception MaybeNull) =
     inherit Exception (name, Option.toObj inner)
 
 type RESOURCE_STRING () =
diff --git a/src/fsharp/absil/ilread.fs b/src/fsharp/absil/ilread.fs
index eb4bf50d6a4..c0839d1cd0f 100644
--- a/src/fsharp/absil/ilread.fs
+++ b/src/fsharp/absil/ilread.fs
@@ -189,11 +189,7 @@ type WeakByteFile(fileName: string, chunk: (int * int) option) =
     let fileStamp = FileSystem.GetLastWriteTimeShim fileName
 
     /// The weak handle to the bytes for the file
-#if NO_CHECKNULLS
-    let weakBytes = WeakReference(null)
-#else
-    let weakBytes = WeakReference< byte[]? >(null)
-#endif
+    let weakBytes = WeakReference< byte[] MaybeNull>(null)
 
     member _.FileName = fileName
 
@@ -764,11 +760,7 @@ let mkCacheInt32 lowMem _inbase _nm _sz =
 
 let mkCacheGeneric lowMem _inbase _nm _sz =
     if lowMem then (fun f x -> f x) else
-#if NO_CHECKNULLS
-    let mutable cache = null
-#else
-    let mutable cache : ConcurrentDictionary<_, _>? = null // TODO NULLNESS: this explicit annotation should not be needed
-#endif
+    let mutable cache : ConcurrentDictionary<_, _> MaybeNull = null // TODO NULLNESS: this explicit annotation should not be needed
     let mutable count = 0
 #if STATISTICS
     addReport (fun oc -> if !count <> 0 then oc.WriteLine ((_inbase + string !count + " " + _nm + " cache hits"): string))
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index e585e31da58..b6aa8d8b712 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -388,11 +388,7 @@ let emEnv0 =
       emEntryPts = []
       delayedFieldInits = [] }
 
-#if NO_CHECKNULLS
-let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type, typB, typeDef) =
-#else
-let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type?, typB, typeDef) =
-#endif
+let envBindTypeRef emEnv (tref: ILTypeRef) (typT: System.Type MaybeNull, typB, typeDef) =
     match typT with
     | Null -> failwithf "binding null type in envBindTypeRef: %s\n" tref.Name
     | NonNull typT ->
@@ -765,11 +761,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
               parentT.GetMethod(mref.Name, cconv ||| BindingFlags.Public ||| BindingFlags.NonPublic,
                                 null,
                                 argTs,
-#if NO_CHECKNULLS
-                                (null: ParameterModifier[]))
-#else
-                                (null:ParameterModifier[]?))
-#endif
+                                (null:ParameterModifier[] MaybeNull))
             // This can fail if there is an ambiguity w.r.t. return type
             with _ -> null
         if (isNotNull methInfo && equalTypes resT methInfo.ReturnType) then
@@ -779,11 +771,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
     else
         queryableTypeGetMethodBySearch cenv emEnv parentT mref
 
-#if NO_CHECKNULLS
-let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo =
-#else
-let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo? =
-#endif
+let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo MaybeNull =
     if (parentTI.IsGenericType &&
         not (equalTypes parentTI (getTypeConstructor parentTI)))
     then TypeBuilder.GetMethod(parentTI, methInfo )
@@ -839,11 +827,7 @@ let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) :
     | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName), range0))
     | NonNull res -> res
 
-#if NO_CHECKNULLS
-let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo =
-#else
-let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo? =
-#endif
+let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo MaybeNull =
     if parentTI.IsGenericType then TypeBuilder.GetConstructor(parentTI, consInfo) else consInfo
 
 /// convConstructorSpec (like convMethodSpec)
diff --git a/src/fsharp/absil/ilsign.fs b/src/fsharp/absil/ilsign.fs
index ad802648e2a..d48d59cef56 100644
--- a/src/fsharp/absil/ilsign.fs
+++ b/src/fsharp/absil/ilsign.fs
@@ -150,11 +150,7 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
 
     let toCLRKeyBlob (rsaParameters: RSAParameters) (algId: int) : byte[] = 
 
-#if NO_CHECKNULLS
-        let validateRSAField (field: byte[]) expected (name: string) =
-#else
-        let validateRSAField (field: byte[]?) expected (name: string) =
-#endif
+        let validateRSAField (field: byte[] MaybeNull) expected (name: string) =
             match field with 
             | Null -> ()
             | NonNull field ->
diff --git a/src/fsharp/absil/ilsupp.fs b/src/fsharp/absil/ilsupp.fs
index 199911ce39d..ff925fbe9ec 100644
--- a/src/fsharp/absil/ilsupp.fs
+++ b/src/fsharp/absil/ilsupp.fs
@@ -802,11 +802,7 @@ type ISymUnmanagedWriter2 =
     abstract GetDebugInfo: iDD: ImageDebugDirectory byref *
                           cData: int *
                           pcData: int byref *
-#if NO_CHECKNULLS
-                          []data : byte[] -> unit
-#else
-                          []data : byte[]? -> unit
-#endif
+                          []data : byte[] MaybeNull -> unit
     abstract DefineSequencePoints: document: ISymUnmanagedDocumentWriter *
                                   spCount: int *
                                   []offsets: int [] *
diff --git a/src/fsharp/fsi/console.fs b/src/fsharp/fsi/console.fs
index e7e939ae183..a0e651f67ea 100644
--- a/src/fsharp/fsi/console.fs
+++ b/src/fsharp/fsi/console.fs
@@ -45,20 +45,12 @@ type internal History() =
 
     member x.Clear() = list.Clear(); current <- -1
 
-#if NO_CHECKNULLS
-    member x.Add (line: string) =
-#else
-    member x.Add (line: string?) = 
-#endif
+    member x.Add (line: string MaybeNull) = 
         match line with 
         | Null | "" -> ()
         | NonNull line -> list.Add(line)
 
-#if NO_CHECKNULLS
-    member x.AddLast (line: string) =
-#else
-    member x.AddLast (line: string?) =  
-#endif
+    member x.AddLast (line: string MaybeNull) =  
         match line with 
         | Null | "" -> ()
         | NonNull line ->
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index 58d0b4f8231..81ca07d1b69 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -2270,11 +2270,7 @@ module internal MagicAssemblyResolution =
 
     let Install(tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput) =
 
-#if NO_CHECKNULLS
-        let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, _fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly = 
-#else
-        let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, _fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly? = 
-#endif
+        let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, _fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) : Assembly MaybeNull = 
 
            try
                // Grab the name of the assembly
@@ -2403,11 +2399,7 @@ type internal FsiStdinLexerProvider
         let initialLightSyntaxStatus = tcConfigB.light <> Some false
         LightSyntaxStatus (initialLightSyntaxStatus, false (* no warnings *))
 
-#if NO_CHECKNULLS
-    let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string) =
-#else
-    let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string?) =
-#endif
+    let LexbufFromLineReader (fsiStdinSyphon: FsiStdinSyphon) (readF: unit -> string MaybeNull) =
         UnicodeLexing.FunctionAsLexbuf
           (true, tcConfigB.langVersion, (fun (buf: char[], start, len) ->
             //fprintf fsiConsoleOutput.Out "Calling ReadLine\n"
@@ -2417,11 +2409,7 @@ type internal FsiStdinLexerProvider
             |  Some(Null) | None ->
                  if progress then fprintfn fsiConsoleOutput.Out "End of file from TextReader.ReadLine"
                  0
-#if NO_CHECKNULLS
-            | Some input ->
-#else
             | Some (NonNull input) ->
-#endif
                 let input  = input + "\n"
                 let ninput = input.Length
                 if ninput > len then fprintf fsiConsoleOutput.Error  "%s" (FSIstrings.SR.fsiLineTooLong())
@@ -2435,11 +2423,7 @@ type internal FsiStdinLexerProvider
     // Reading stdin as a lex stream
     //----------------------------------------------------------------------------
 
-#if NO_CHECKNULLS
-    let removeZeroCharsFromString (str:string) =
-#else
-    let removeZeroCharsFromString (str:string?) : string? =
-#endif
+    let removeZeroCharsFromString (str:string MaybeNull) : string MaybeNull =
         match str with 
         | Null -> str
         | NonNull str -> 
diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs
index b51cd6780fa..171bf0bdf40 100644
--- a/src/fsharp/import.fs
+++ b/src/fsharp/import.fs
@@ -37,11 +37,7 @@ type AssemblyLoader =
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly.
-#if NO_CHECKNULLS
-    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
-#else
-    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
-#endif
+    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
 
     /// Record a root for a [] type to help guide static linking & type relocation
     abstract RecordGeneratedTypeRoot : ProviderGeneratedType -> unit
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index e49845df751..83f7ec76073 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -695,17 +695,14 @@ let OptionalArgInfoOfProvidedParameter (amap: Import.ImportMap) m (provParam : T
         NotOptional
 
 /// Compute the ILFieldInit for the given provided constant value for a provided enum type.
-#if NO_CHECKNULLS
-let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo) err = 
+let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo MaybeNull) err = 
     match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase)),m) with 
+#if NO_CHECKNULLS
     | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name),m),mi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m))   
-    | Tainted.NonNull meth -> meth
 #else
-let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo?) err = 
-    match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase?)),m) with 
     | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name),m),mi.PUntaint((fun mi -> (nonNull mi.DeclaringType).Name), m)), m))   // TODO NULLNESS: type isntantiation should not be needed
-    | Tainted.NonNull meth -> meth
 #endif
+    | Tainted.NonNull meth -> meth
 
 /// Try to get an arbitrary ProvidedMethodInfo associated with a property.
 let ArbitraryMethodInfoOfPropertyInfo (pi: Tainted) m =
diff --git a/src/fsharp/lib.fs b/src/fsharp/lib.fs
index 73309884395..7513d37e6cb 100755
--- a/src/fsharp/lib.fs
+++ b/src/fsharp/lib.fs
@@ -472,11 +472,7 @@ module internal AsyncUtil =
                         // Continuations that Async.FromContinuations provide do QUWI/SyncContext.Post,
                         // so the order is not overly relevant but still.
                         List.rev savedConts)
-#if NO_CHECKNULLS
-            let postOrQueue (sc: SynchronizationContext, cont) =
-#else
-            let postOrQueue (sc: SynchronizationContext?, cont) =
-#endif
+            let postOrQueue (sc: SynchronizationContext MaybeNull, cont) =
                 match sc with
                 | null -> ThreadPool.QueueUserWorkItem(fun _ -> cont res) |> ignore
                 | NonNullQuick sc ->
diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs
index c9d5758f985..03f826b5317 100644
--- a/src/fsharp/service/QuickParse.fs
+++ b/src/fsharp/service/QuickParse.fs
@@ -71,11 +71,7 @@ module QuickParse =
       | true, _, true when name.Length > 2 -> isValidStrippedName (name.AsSpan(1, name.Length - 2)) 0
       | _ -> false
     
-#if NO_CHECKNULLS
-    let GetCompleteIdentifierIslandImpl (lineStr: string) (index: int) : (string * int * bool) option =
-#else
-    let GetCompleteIdentifierIslandImpl (lineStr: string?) (index: int) : (string * int * bool) option =
-#endif
+    let GetCompleteIdentifierIslandImpl (lineStr: string MaybeNull) (index: int) : (string * int * bool) option =
         match lineStr with 
         | Null -> None
         | NonNull lineStr -> 
@@ -186,11 +182,7 @@ module QuickParse =
     let private defaultName = [], ""
 
     /// Get the partial long name of the identifier to the left of index.
-#if NO_CHECKNULLS
-    let GetPartialLongName(lineStr: string, index: int) =
-#else
-    let GetPartialLongName(lineStr: string?, index: int) =
-#endif
+    let GetPartialLongName(lineStr: string MaybeNull, index: int) =
         match lineStr with
         | Null -> defaultName
         | NonNull lineStr ->
@@ -231,11 +223,7 @@ module QuickParse =
 
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-#if NO_CHECKNULLS
-    let GetPartialLongNameEx(lineStr: string, index: int) : PartialLongName =
-#else
-    let GetPartialLongNameEx(lineStr: string?, index: int) : PartialLongName =
-#endif
+    let GetPartialLongNameEx(lineStr: string MaybeNull, index: int) : PartialLongName =
         match lineStr with
         | Null -> PartialLongName.Empty(index)
         | NonNull lineStr ->
diff --git a/src/fsharp/service/QuickParse.fsi b/src/fsharp/service/QuickParse.fsi
index 57018400172..a8ff219130f 100644
--- a/src/fsharp/service/QuickParse.fsi
+++ b/src/fsharp/service/QuickParse.fsi
@@ -71,26 +71,14 @@ module public QuickParse =
     /// a call to `DeclItemsForNamesAtPosition` for intellisense. This will
     /// allow us to use find the correct qualified items rather than resorting
     /// to the more expensive and less accurate environment lookup.
-#if NO_CHECKNULLS
-    val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string -> index: int -> (string * int * bool) option
-#else
-    val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string? -> index: int -> (string * int * bool) option
-#endif
+    val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string MaybeNull -> index: int -> (string * int * bool) option
     
     /// Get the partial long name of the identifier to the left of index.
-#if NO_CHECKNULLS
-    val GetPartialLongName : lineStr: string * index: int -> string list * string
-#else
-    val GetPartialLongName : lineStr: string? * index: int -> string list * string
-#endif
+    val GetPartialLongName : lineStr: string MaybeNull * index: int -> string list * string
     
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-#if NO_CHECKNULLS
-    val GetPartialLongNameEx : lineStr: string * index: int -> PartialLongName
-#else
-    val GetPartialLongNameEx : lineStr: string? * index: int -> PartialLongName
-#endif
+    val GetPartialLongNameEx : lineStr: string MaybeNull * index: int -> PartialLongName
     
     /// Tests whether the user is typing something like "member x." or "override (*comment*) x."
     val TestMemberOrOverrideDeclaration : tokens: FSharpTokenInfo[] -> bool
\ No newline at end of file
diff --git a/src/fsharp/service/SemanticClassification.fs b/src/fsharp/service/SemanticClassification.fs
index 8be055c516e..de290aec655 100644
--- a/src/fsharp/service/SemanticClassification.fs
+++ b/src/fsharp/service/SemanticClassification.fs
@@ -251,7 +251,7 @@ module TcResolutionsExtensions =
                                 add m SemanticClassificationType.Method
 
                     // Special case measures for struct types
-                    | Item.Types(_, TType_app(tyconRef, (TType_measure _ :: _), _) :: _), LegitTypeOccurence, _, _, _, m when isStructTyconRef tyconRef ->
+                    | Item.Types(_, TType_app(tyconRef, TType_measure _ :: _, _) :: _), LegitTypeOccurence, _, _, _, m when isStructTyconRef tyconRef ->
                         add m SemanticClassificationType.ValueType
 
                     | Item.Types (_, ty :: _), LegitTypeOccurence, _, _, _, m ->
diff --git a/src/fsharp/service/ServiceLexing.fs b/src/fsharp/service/ServiceLexing.fs
index e4631974348..5deb61a62de 100644
--- a/src/fsharp/service/ServiceLexing.fs
+++ b/src/fsharp/service/ServiceLexing.fs
@@ -277,14 +277,15 @@ module internal TokenClassifications =
         | HIGH_PRECEDENCE_PAREN_APP | FIXED
         | HIGH_PRECEDENCE_BRACK_APP
         | AMBIVALENT
-        | TYPE_COMING_SOON | TYPE_IS_HERE | MODULE_COMING_SOON | MODULE_IS_HERE
-          -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
+        | TYPE_COMING_SOON | TYPE_IS_HERE | MODULE_COMING_SOON | MODULE_IS_HERE ->
+            (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
               
-        | BEGIN  
-          -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
+        | BEGIN ->
+            (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
+
+        | END ->
+            (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
 
-        | END 
-          -> (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
         | HASH_LIGHT _
         | HASH_LINE _
         | HASH_IF _
diff --git a/src/fsharp/service/ServiceUntypedParse.fs b/src/fsharp/service/ServiceUntypedParse.fs
deleted file mode 100755
index b5617cb1130..00000000000
--- a/src/fsharp/service/ServiceUntypedParse.fs
+++ /dev/null
@@ -1,1724 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-//----------------------------------------------------------------------------
-// Open up the compiler as an incremental service for parsing,
-// type checking and intellisense-like environment-reporting.
-//--------------------------------------------------------------------------
-
-namespace FSharp.Compiler.SourceCodeServices
-
-open System
-open System.IO
-open System.Collections.Generic
-open System.Diagnostics
-open System.Text.RegularExpressions
- 
-open FSharp.Compiler
-open FSharp.Compiler.AbstractIL.Internal.Library  
-open FSharp.Compiler.CompilerConfig
-open FSharp.Compiler.Lib
-open FSharp.Compiler.SourceCodeServices.PrettyNaming
-open FSharp.Compiler.SyntaxTree
-open FSharp.Compiler.SyntaxTreeOps
-open FSharp.Compiler.Text
-open FSharp.Compiler.Text.Pos
-open FSharp.Compiler.Text.Range
-
-/// Methods for dealing with F# sources files.
-module SourceFile =
-
-    /// Source file extensions
-    let private compilableExtensions = FSharpSigFileSuffixes @ FSharpImplFileSuffixes @ FSharpScriptFileSuffixes
-
-    /// Single file projects extensions
-    let private singleFileProjectExtensions = FSharpScriptFileSuffixes
-
-    /// Whether or not this file is compilable
-    let IsCompilable file =
-        let ext = Path.GetExtension file
-        compilableExtensions |> List.exists(fun e->0 = String.Compare(e, ext, StringComparison.OrdinalIgnoreCase))
-
-    /// Whether or not this file should be a single-file project
-    let MustBeSingleFileProject file =
-        let ext = Path.GetExtension file
-        singleFileProjectExtensions |> List.exists(fun e-> 0 = String.Compare(e, ext, StringComparison.OrdinalIgnoreCase))
-
-module SourceFileImpl =
-    let IsInterfaceFile file =
-        let ext = Path.GetExtension file
-        0 = String.Compare(".fsi", ext, StringComparison.OrdinalIgnoreCase)
-
-    /// Additional #defines that should be in place when editing a file in a file editor such as VS.
-    let AdditionalDefinesForUseInEditor(isInteractive: bool) =
-        if isInteractive then ["INTERACTIVE";"EDITING"] // This is still used by the foreground parse
-        else ["COMPILED";"EDITING"]
-           
-type CompletionPath = string list * string option // plid * residue
-
-[]
-type InheritanceOrigin = 
-    | Class
-    | Interface
-    | Unknown
-
-[]
-type InheritanceContext = 
-    | Class
-    | Interface
-    | Unknown
-
-[]
-type RecordContext =
-    | CopyOnUpdate of range: range * path: CompletionPath
-    | Constructor of typeName: string
-    | New of path: CompletionPath
-
-[]
-type CompletionContext = 
-    /// Completion context cannot be determined due to errors
-    | Invalid
-
-    /// Completing something after the inherit keyword
-    | Inherit of context: InheritanceContext * path: CompletionPath
-
-    /// Completing records field
-    | RecordField of context: RecordContext
-
-    | RangeOperator
-
-    /// Completing named parameters\setters in parameter list of constructor\method calls
-    /// end of name ast node * list of properties\parameters that were already set
-    | ParameterList of pos * HashSet
-
-    | AttributeApplication
-
-    | OpenDeclaration of isOpenType: bool
-
-    /// Completing pattern type (e.g. foo (x: |))
-    | PatternType
-
-//----------------------------------------------------------------------------
-// FSharpParseFileResults
-//----------------------------------------------------------------------------
-
-[]
-type FSharpParseFileResults(errors: FSharpDiagnostic[], input: ParsedInput option, parseHadErrors: bool, dependencyFiles: string[]) = 
-
-    member _.Errors = errors
-
-    member _.ParseHadErrors = parseHadErrors
-
-    member _.ParseTree = input
-
-    member scope.TryRangeOfNameOfNearestOuterBindingContainingPos pos =
-        let tryGetIdentRangeFromBinding binding =
-            match binding with
-            | SynBinding.Binding (_, _, _, _, _, _, _, headPat, _, _, _, _) ->
-                match headPat with
-                | SynPat.LongIdent (longIdentWithDots, _, _, _, _, _) ->
-                    Some longIdentWithDots.Range
-                | SynPat.Named(_, ident, false, _, _) ->
-                    Some ident.idRange
-                | _ ->
-                    None
-
-        let rec walkBinding expr workingRange =
-            match expr with
-
-            // This lets us dive into subexpressions that may contain the binding we're after
-            | SynExpr.Sequential (_, _, expr1, expr2, _) ->
-                if rangeContainsPos expr1.Range pos then
-                    walkBinding expr1 workingRange
-                else
-                    walkBinding expr2 workingRange
-
-
-            | SynExpr.LetOrUse(_, _, bindings, bodyExpr, _) ->
-                let potentialNestedRange =
-                    bindings
-                    |> List.tryFind (fun binding -> rangeContainsPos binding.RangeOfBindingAndRhs pos)
-                    |> Option.bind tryGetIdentRangeFromBinding
-                match potentialNestedRange with
-                | Some range ->
-                    walkBinding bodyExpr range
-                | None ->
-                    walkBinding bodyExpr workingRange
-
-            
-            | _ ->
-                Some workingRange
-
-        match scope.ParseTree with
-        | Some input ->
-            AstTraversal.Traverse(pos, input, { new AstTraversal.AstVisitorBase<_>() with
-                member _.VisitExpr(_, _, defaultTraverse, expr) =                        
-                    defaultTraverse expr
-
-                override _.VisitBinding(defaultTraverse, binding) =
-                    match binding with
-                    | SynBinding.Binding (_, _, _, _, _, _, _, _, _, expr, _range, _) as b when rangeContainsPos b.RangeOfBindingAndRhs pos ->
-                        match tryGetIdentRangeFromBinding b with
-                        | Some range -> walkBinding expr range
-                        | None -> None
-                    | _ -> defaultTraverse binding })
-        | None -> None
-    
-    member scope.TryIdentOfPipelineContainingPosAndNumArgsApplied pos =
-        match scope.ParseTree with
-        | Some input ->
-            AstTraversal.Traverse(pos, input, { new AstTraversal.AstVisitorBase<_>() with
-                member _.VisitExpr(_, _, defaultTraverse, expr) =
-                    match expr with
-                    | SynExpr.App (_, _, SynExpr.App(_, true, SynExpr.Ident ident, _, _), argExpr, _) when rangeContainsPos argExpr.Range pos ->
-                        match argExpr with
-                        | SynExpr.App(_, _, _, SynExpr.Paren(expr, _, _, _), _) when rangeContainsPos expr.Range pos ->
-                            None
-                        | _ ->
-                            if ident.idText = "op_PipeRight" then
-                                Some (ident, 1)
-                            elif ident.idText = "op_PipeRight2" then
-                                Some (ident, 2)
-                            elif ident.idText = "op_PipeRight3" then
-                                Some (ident, 3)
-                            else
-                                None
-                    | _ -> defaultTraverse expr
-            })
-        | None -> None
-    
-    member scope.IsPosContainedInApplication pos =
-        match scope.ParseTree with
-        | Some input ->
-            let result =
-                AstTraversal.Traverse(pos, input, { new AstTraversal.AstVisitorBase<_>() with
-                    member _.VisitExpr(_, traverseSynExpr, defaultTraverse, expr) =
-                        match expr with
-                        | SynExpr.App(_, _, _, SynExpr.CompExpr (_, _, expr, _), range) when rangeContainsPos range pos ->
-                            traverseSynExpr expr
-                        | SynExpr.App (_, _, _, _, range) when rangeContainsPos range pos ->
-                            Some range
-                        | _ -> defaultTraverse expr
-                })
-            result.IsSome
-        | None -> false
-
-    member scope.TryRangeOfFunctionOrMethodBeingApplied pos =
-        let rec getIdentRangeForFuncExprInApp traverseSynExpr expr pos =
-            match expr with
-            | SynExpr.Ident ident -> Some ident.idRange
-            
-            | SynExpr.LongIdent (_, _, _, range) -> Some range
-
-            | SynExpr.Paren (expr, _, _, range) when rangeContainsPos range pos ->
-                getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-            | SynExpr.App (_, _, funcExpr, argExpr, _) ->
-                match argExpr with
-                | SynExpr.App (_, _, _, _, range) when rangeContainsPos range pos ->
-                    getIdentRangeForFuncExprInApp traverseSynExpr argExpr pos
-
-                // Special case: `async { ... }` is actually a CompExpr inside of the argExpr of a SynExpr.App
-                | SynExpr.CompExpr (_, _, expr, range) when rangeContainsPos range pos ->
-                    getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-                | SynExpr.Paren (expr, _, _, range) when rangeContainsPos range pos ->
-                    getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-                | _ ->
-                    match funcExpr with
-                    | SynExpr.App (_, true, _, _, _) when rangeContainsPos argExpr.Range pos ->
-                        // x |> List.map 
-                        // Don't dive into the funcExpr (the operator expr)
-                        // because we dont want to offer sig help for that!
-                        getIdentRangeForFuncExprInApp traverseSynExpr argExpr pos
-                    | _ ->
-                        // Generally, we want to dive into the func expr to get the range
-                        // of the identifier of the function we're after
-                        getIdentRangeForFuncExprInApp traverseSynExpr funcExpr pos
-
-            | SynExpr.LetOrUse (_, _, bindings, body, range) when rangeContainsPos range pos  ->
-                let binding =
-                    bindings
-                    |> List.tryFind (fun x -> rangeContainsPos x.RangeOfBindingAndRhs pos)
-                match binding with
-                | Some(SynBinding.Binding(_, _, _, _, _, _, _, _, _, expr, _, _)) ->
-                    getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-                | None ->
-                    getIdentRangeForFuncExprInApp traverseSynExpr body pos
-
-            | SynExpr.IfThenElse (ifExpr, thenExpr, elseExpr, _, _, _, range) when rangeContainsPos range pos ->
-                if rangeContainsPos ifExpr.Range pos then
-                    getIdentRangeForFuncExprInApp traverseSynExpr ifExpr pos
-                elif rangeContainsPos thenExpr.Range pos then
-                    getIdentRangeForFuncExprInApp traverseSynExpr thenExpr pos
-                else
-                    match elseExpr with
-                    | None -> None
-                    | Some expr ->
-                        getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-            | SynExpr.Match (_, expr, clauses, range) when rangeContainsPos range pos ->
-                if rangeContainsPos expr.Range pos then
-                    getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-                else
-                    let clause = clauses |> List.tryFind (fun clause -> rangeContainsPos clause.Range pos)
-                    match clause with
-                    | None -> None
-                    | Some clause ->
-                        match clause with
-                        | SynMatchClause.Clause (_, whenExpr, resultExpr, _, _) ->
-                            match whenExpr with
-                            | None ->
-                                getIdentRangeForFuncExprInApp traverseSynExpr resultExpr pos
-                            | Some whenExpr ->
-                                if rangeContainsPos whenExpr.Range pos then
-                                    getIdentRangeForFuncExprInApp traverseSynExpr whenExpr pos
-                                else
-                                    getIdentRangeForFuncExprInApp traverseSynExpr resultExpr pos
-
-
-            // Ex: C.M(x, y, ...) <--- We want to find where in the tupled application the call is being made
-            | SynExpr.Tuple(_, exprs, _, tupRange) when rangeContainsPos tupRange pos ->
-                let expr = exprs |> List.tryFind (fun expr -> rangeContainsPos expr.Range pos)
-                match expr with
-                | None -> None
-                | Some expr ->
-                    getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-            // Capture the body of a lambda, often nested in a call to a collection function
-            | SynExpr.Lambda(_, _, _args, body, _, _) when rangeContainsPos body.Range pos -> 
-                getIdentRangeForFuncExprInApp traverseSynExpr body pos
-
-            | SynExpr.Do(expr, range) when rangeContainsPos range pos ->
-                getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-            | SynExpr.Assert(expr, range) when rangeContainsPos range pos ->
-                getIdentRangeForFuncExprInApp traverseSynExpr expr pos
-
-            | SynExpr.ArbitraryAfterError (_debugStr, range) when rangeContainsPos range pos -> 
-                Some range
-
-            | expr ->
-                traverseSynExpr expr
-                |> Option.map (fun expr -> expr)
-
-        match scope.ParseTree with
-        | Some input ->
-            AstTraversal.Traverse(pos, input, { new AstTraversal.AstVisitorBase<_>() with
-                member _.VisitExpr(_, traverseSynExpr, defaultTraverse, expr) =
-                    match expr with
-                    | SynExpr.App (_, _, _funcExpr, _, range) as app when rangeContainsPos range pos ->
-                        getIdentRangeForFuncExprInApp traverseSynExpr app pos
-                    | _ -> defaultTraverse expr
-            })
-        | None -> None
-
-    member scope.GetAllArgumentsForFunctionApplicationAtPostion pos =
-        match input with
-        | Some input -> SynExprAppLocationsImpl.getAllCurriedArgsAtPosition pos input
-        | None -> None
-
-    member scope.TryRangeOfParenEnclosingOpEqualsGreaterUsage opGreaterEqualPos =
-        let (|Ident|_|) ofName =
-            function | SynExpr.Ident ident when ident.idText = ofName -> Some ()
-                     | _ -> None
-        let (|InfixAppOfOpEqualsGreater|_|) =
-          function | SynExpr.App(ExprAtomicFlag.NonAtomic, false, SynExpr.App(ExprAtomicFlag.NonAtomic, true, Ident "op_EqualsGreater", actualParamListExpr, _), actualLambdaBodyExpr, _) ->
-                        Some (actualParamListExpr, actualLambdaBodyExpr)
-                   | _ -> None
-
-        match scope.ParseTree with
-        | Some parseTree ->
-            AstTraversal.Traverse(opGreaterEqualPos, parseTree, { new AstTraversal.AstVisitorBase<_>() with
-                member _.VisitExpr(_, _, defaultTraverse, expr) =
-                    match expr with
-                    | SynExpr.Paren((InfixAppOfOpEqualsGreater(lambdaArgs, lambdaBody) as app), _, _, _) ->
-                        Some (app.Range, lambdaArgs.Range, lambdaBody.Range)
-                    | _ -> defaultTraverse expr
-                member _.VisitBinding(defaultTraverse, binding) =
-                    match binding with
-                    | SynBinding.Binding (_, SynBindingKind.NormalBinding, _, _, _, _, _, _, _, (InfixAppOfOpEqualsGreater(lambdaArgs, lambdaBody) as app), _, _) ->
-                        Some(app.Range, lambdaArgs.Range, lambdaBody.Range)
-                    | _ -> defaultTraverse binding })
-        | None -> None
-    
-    member scope.TryRangeOfExprInYieldOrReturn pos =
-        match scope.ParseTree with
-        | Some parseTree ->
-            AstTraversal.Traverse(pos, parseTree, { new AstTraversal.AstVisitorBase<_>() with 
-                member _.VisitExpr(_path, _, defaultTraverse, expr) =
-                    match expr with
-                    | SynExpr.YieldOrReturn(_, expr, range)
-                    | SynExpr.YieldOrReturnFrom(_, expr, range) when rangeContainsPos range pos ->
-                        Some expr.Range
-                    | _ -> defaultTraverse expr })
-        | None -> None
-
-    member scope.TryRangeOfRecordExpressionContainingPos pos =
-        match input with
-        | Some input ->
-            AstTraversal.Traverse(pos, input, { new AstTraversal.AstVisitorBase<_>() with 
-                member _.VisitExpr(_, _, defaultTraverse, expr) =
-                    match expr with
-                    | SynExpr.Record(_, _, _, range) when rangeContainsPos range pos ->
-                        Some range
-                    | _ -> defaultTraverse expr })
-        | None ->
-            None
-
-    member _.TryRangeOfRefCellDereferenceContainingPos expressionPos =
-        match input with
-        | Some input ->
-            AstTraversal.Traverse(expressionPos, input, { new AstTraversal.AstVisitorBase<_>() with 
-                member _.VisitExpr(_, _, defaultTraverse, expr) =
-                    match expr with
-                    | SynExpr.App(_, false, SynExpr.Ident funcIdent, expr, _) ->
-                        if funcIdent.idText = "op_Dereference" && rangeContainsPos expr.Range expressionPos then
-                            Some funcIdent.idRange
-                        else
-                            None
-                    | _ -> defaultTraverse expr })
-        | None ->
-            None
-
-    member _.FindNoteworthyParamInfoLocations pos = 
-        match input with
-        | Some input -> FSharpNoteworthyParamInfoLocations.Find(pos, input)
-        | _ -> None
-
-    member _.IsPositionContainedInACurriedParameter pos =
-        match input with
-        | Some input ->
-            let result =
-                AstTraversal.Traverse(pos, input, { new AstTraversal.AstVisitorBase<_>() with 
-                    member _.VisitExpr(_path, traverseSynExpr, defaultTraverse, expr) =
-                        defaultTraverse(expr)
-
-                    override _.VisitBinding (_, binding) =
-                        match binding with
-                        | Binding(_, _, _, _, _, _, valData, _, _, _, range, _) when rangeContainsPos range pos ->
-                            let info = valData.SynValInfo.CurriedArgInfos
-                            let mutable found = false
-                            for group in info do
-                                for arg in group do
-                                    match arg.Ident with
-                                    | Some ident when rangeContainsPos ident.idRange pos ->
-                                        found <- true
-                                    | _ -> ()
-                            if found then Some range else None
-                        | _ ->
-                            None
-                })
-            result.IsSome
-        | _ -> false
-    
-    /// Get declared items and the selected item at the specified location
-    member _.GetNavigationItemsImpl() =
-       ErrorScope.Protect range0 
-            (fun () -> 
-                match input with
-                | Some (ParsedInput.ImplFile _ as p) ->
-                    FSharpNavigation.getNavigation p
-                | Some (ParsedInput.SigFile _) ->
-                    FSharpNavigation.empty
-                | _ -> 
-                    FSharpNavigation.empty)
-            (fun err -> 
-                Trace.TraceInformation(sprintf "FCS: recovering from error in GetNavigationItemsImpl: '%s'" err)
-                FSharpNavigation.empty)
-            
-    member _.ValidateBreakpointLocationImpl pos =
-        let isMatchRange m = rangeContainsPos m pos || m.StartLine = pos.Line
-
-        // Process let-binding
-        let findBreakPoints () = 
-            let checkRange m = [ if isMatchRange m then yield m ]
-            let walkBindSeqPt sp = [ match sp with DebugPointAtBinding m -> yield! checkRange m | _ -> () ]
-            let walkForSeqPt sp = [ match sp with DebugPointAtFor.Yes m -> yield! checkRange m | _ -> () ]
-            let walkWhileSeqPt sp = [ match sp with DebugPointAtWhile.Yes m -> yield! checkRange m | _ -> () ]
-            let walkTrySeqPt sp = [ match sp with DebugPointAtTry.Yes m -> yield! checkRange m | _ -> () ]
-            let walkWithSeqPt sp = [ match sp with DebugPointAtWith.Yes m -> yield! checkRange m | _ -> () ]
-            let walkFinallySeqPt sp = [ match sp with DebugPointAtFinally.Yes m -> yield! checkRange m | _ -> () ]
-
-            let rec walkBind (Binding(_, _, _, _, _, _, SynValData(memFlagsOpt, _, _), synPat, _, synExpr, _, spInfo)) =
-                [ // Don't yield the binding sequence point if there are any arguments, i.e. we're defining a function or a method
-                  let isFunction = 
-                      Option.isSome memFlagsOpt ||
-                      match synPat with 
-                      | SynPat.LongIdent (_, _, _, SynArgPats.Pats args, _, _) when not (List.isEmpty args) -> true
-                      | _ -> false
-                  if not isFunction then 
-                      yield! walkBindSeqPt spInfo
-
-                  yield! walkExpr (isFunction || (match spInfo with DebugPointAtBinding _ -> false | _-> true)) synExpr ]
-
-            and walkExprs es = List.collect (walkExpr false) es
-            and walkBinds es = List.collect walkBind es
-            and walkMatchClauses cl = 
-                [ for (Clause(_, whenExpr, e, _, _)) in cl do 
-                    match whenExpr with 
-                    | Some e -> yield! walkExpr false e 
-                    | _ -> ()
-                    yield! walkExpr true e ]
-
-            and walkExprOpt (spAlways: bool) eOpt = [ match eOpt with Some e -> yield! walkExpr spAlways e | _ -> () ]
-            
-            and IsBreakableExpression e =
-                match e with
-                | SynExpr.Match _
-                | SynExpr.IfThenElse _
-                | SynExpr.For _
-                | SynExpr.ForEach _
-                | SynExpr.While _ -> true
-                | _ -> not (IsControlFlowExpression e)
-
-            // Determine the breakpoint locations for an expression. spAlways indicates we always
-            // emit a breakpoint location for the expression unless it is a syntactic control flow construct
-            and walkExpr (spAlways: bool)  e =
-                let m = e.Range
-                if not (isMatchRange m) then [] else
-                [ if spAlways && IsBreakableExpression e then 
-                      yield! checkRange m
-
-                  match e with
-                  | SynExpr.ArbitraryAfterError _ 
-                  | SynExpr.LongIdent _
-                  | SynExpr.LibraryOnlyILAssembly _
-                  | SynExpr.LibraryOnlyStaticOptimization _
-                  | SynExpr.Null _
-                  | SynExpr.Ident _
-                  | SynExpr.ImplicitZero _
-                  | SynExpr.Const _ -> 
-                     ()
-
-                  | SynExpr.Quote (_, _, e, _, _)
-                  | SynExpr.TypeTest (e, _, _)
-                  | SynExpr.Upcast (e, _, _)
-                  | SynExpr.AddressOf (_, e, _, _)
-                  | SynExpr.CompExpr (_, _, e, _) 
-                  | SynExpr.ArrayOrListOfSeqExpr (_, e, _)
-                  | SynExpr.Typed (e, _, _)
-                  | SynExpr.FromParseError (e, _) 
-                  | SynExpr.DiscardAfterMissingQualificationAfterDot (e, _) 
-                  | SynExpr.Do (e, _)
-                  | SynExpr.Assert (e, _)
-                  | SynExpr.Fixed (e, _)
-                  | SynExpr.DotGet (e, _, _, _) 
-                  | SynExpr.LongIdentSet (_, e, _)
-                  | SynExpr.New (_, _, e, _) 
-                  | SynExpr.TypeApp (e, _, _, _, _, _, _) 
-                  | SynExpr.LibraryOnlyUnionCaseFieldGet (e, _, _, _) 
-                  | SynExpr.Downcast (e, _, _)
-                  | SynExpr.InferredUpcast (e, _)
-                  | SynExpr.InferredDowncast (e, _)
-                  | SynExpr.Lazy (e, _)
-                  | SynExpr.TraitCall (_, _, e, _)
-                  | SynExpr.Paren (e, _, _, _) -> 
-                      yield! walkExpr false e
-
-                  | SynExpr.InterpolatedString (parts, _, _) -> 
-                      yield! walkExprs [ for part in parts do 
-                                            match part with 
-                                            | SynInterpolatedStringPart.String _ -> ()
-                                            | SynInterpolatedStringPart.FillExpr (fillExpr, _) -> yield fillExpr ]
-
-                  | SynExpr.YieldOrReturn (_, e, _)
-                  | SynExpr.YieldOrReturnFrom (_, e, _)
-                  | SynExpr.DoBang  (e, _) ->
-                      yield! checkRange e.Range
-                      yield! walkExpr false e
-
-                  | SynExpr.NamedIndexedPropertySet (_, e1, e2, _)
-                  | SynExpr.DotSet (e1, _, e2, _)
-                  | SynExpr.Set (e1, e2, _)
-                  | SynExpr.LibraryOnlyUnionCaseFieldSet (e1, _, _, e2, _)
-                  | SynExpr.App (_, _, e1, e2, _) -> 
-                      yield! walkExpr false e1 
-                      yield! walkExpr false e2
-
-                  | SynExpr.ArrayOrList (_, es, _)
-                  | SynExpr.Tuple (_, es, _, _) -> 
-                      yield! walkExprs es
-
-                  | SynExpr.Record (_, copyExprOpt, fs, _) ->
-                      match copyExprOpt with
-                      | Some (e, _) -> yield! walkExpr true e
-                      | None -> ()
-                      yield! walkExprs (fs |> List.choose p23)
-
-                  | SynExpr.AnonRecd (_isStruct, copyExprOpt, fs, _) ->
-                      match copyExprOpt with
-                      | Some (e, _) -> yield! walkExpr true e
-                      | None -> ()
-                      yield! walkExprs (fs |> List.map snd)
-
-                  | SynExpr.ObjExpr (_, args, bs, is, _, _) -> 
-                      match args with
-                      | None -> ()
-                      | Some (arg, _) -> yield! walkExpr false arg
-                      yield! walkBinds bs  
-                      for (InterfaceImpl(_, bs, _)) in is do yield! walkBinds bs
-
-                  | SynExpr.While (spWhile, e1, e2, _) -> 
-                      yield! walkWhileSeqPt spWhile
-                      yield! walkExpr false e1 
-                      yield! walkExpr true e2
-
-                  | SynExpr.JoinIn (e1, _range, e2, _range2) -> 
-                      yield! walkExpr false e1 
-                      yield! walkExpr false e2
-
-                  | SynExpr.For (spFor, _, e1, _, e2, e3, _) -> 
-                      yield! walkForSeqPt spFor
-                      yield! walkExpr false e1 
-                      yield! walkExpr true e2 
-                      yield! walkExpr true e3
-
-                  | SynExpr.ForEach (spFor, _, _, _, e1, e2, _) ->
-                      yield! walkForSeqPt spFor
-                      yield! walkExpr false e1 
-                      yield! walkExpr true e2 
-
-                  | SynExpr.MatchLambda (_isExnMatch, _argm, cl, spBind, _wholem) -> 
-                      yield! walkBindSeqPt spBind
-                      for (Clause(_, whenExpr, e, _, _)) in cl do 
-                          yield! walkExprOpt false whenExpr
-                          yield! walkExpr true e 
-
-                  | SynExpr.Lambda (_, _, _, e, _, _) -> 
-                      yield! walkExpr true e 
-
-                  | SynExpr.Match (spBind, e, cl, _) ->
-                      yield! walkBindSeqPt spBind
-                      yield! walkExpr false e 
-                      for (Clause(_, whenExpr, e, _, _)) in cl do 
-                          yield! walkExprOpt false whenExpr
-                          yield! walkExpr true e 
-
-                  | SynExpr.LetOrUse (_, _, bs, e, _) -> 
-                      yield! walkBinds bs  
-                      yield! walkExpr true e
-
-                  | SynExpr.TryWith (e, _, cl, _, _, spTry, spWith) -> 
-                      yield! walkTrySeqPt spTry
-                      yield! walkWithSeqPt spWith
-                      yield! walkExpr true e 
-                      yield! walkMatchClauses cl
-                  
-                  | SynExpr.TryFinally (e1, e2, _, spTry, spFinally) ->
-                      yield! walkExpr true e1
-                      yield! walkExpr true e2
-                      yield! walkTrySeqPt spTry
-                      yield! walkFinallySeqPt spFinally
-
-                  | SynExpr.SequentialOrImplicitYield (spSeq, e1, e2, _, _)
-                  | SynExpr.Sequential (spSeq, _, e1, e2, _) -> 
-                      yield! walkExpr (match spSeq with DebugPointAtSequential.ExprOnly -> false | _ -> true) e1
-                      yield! walkExpr (match spSeq with DebugPointAtSequential.StmtOnly -> false | _ -> true) e2
-
-                  | SynExpr.IfThenElse (e1, e2, e3opt, spBind, _, _, _) ->
-                      yield! walkBindSeqPt spBind
-                      yield! walkExpr false e1
-                      yield! walkExpr true e2
-                      yield! walkExprOpt true e3opt
-
-                  | SynExpr.DotIndexedGet (e1, es, _, _) -> 
-                      yield! walkExpr false e1 
-                      yield! walkExprs [ for e in es do yield! e.Exprs ]
-
-                  | SynExpr.DotIndexedSet (e1, es, e2, _, _, _) ->
-                      yield! walkExpr false e1 
-                      yield! walkExprs [ for e in es do yield! e.Exprs ]
-                      yield! walkExpr false e2 
-
-                  | SynExpr.DotNamedIndexedPropertySet (e1, _, e2, e3, _) ->
-                      yield! walkExpr false e1 
-                      yield! walkExpr false e2 
-                      yield! walkExpr false e3 
-
-                  | SynExpr.LetOrUseBang (spBind, _, _, _, e1, es, e2, _) -> 
-                      yield! walkBindSeqPt spBind
-                      yield! walkExpr true e1
-                      for (andBangSpBind,_,_,_,eAndBang,_) in es do
-                          yield! walkBindSeqPt andBangSpBind
-                          yield! walkExpr true eAndBang
-                      yield! walkExpr true e2
-
-                  | SynExpr.MatchBang (spBind, e, cl, _) ->
-                      yield! walkBindSeqPt spBind
-                      yield! walkExpr false e 
-                      for (Clause(_, whenExpr, e, _, _)) in cl do 
-                          yield! walkExprOpt false whenExpr
-                          yield! walkExpr true e ]
-            
-            // Process a class declaration or F# type declaration
-            let rec walkTycon (TypeDefn(ComponentInfo(_, _, _, _, _, _, _, _), repr, membDefns, _, m)) =
-                if not (isMatchRange m) then [] else
-                [ for memb in membDefns do yield! walkMember memb
-                  match repr with
-                  | SynTypeDefnRepr.ObjectModel(_, membDefns, _) -> 
-                      for memb in membDefns do yield! walkMember memb
-                  | _ -> () ]
-                      
-            // Returns class-members for the right dropdown                  
-            and walkMember memb =
-                if not (rangeContainsPos memb.Range pos) then [] else
-                [ match memb with
-                  | SynMemberDefn.LetBindings(binds, _, _, _) -> yield! walkBinds binds
-                  | SynMemberDefn.AutoProperty(_attribs, _isStatic, _id, _tyOpt, _propKind, _, _xmlDoc, _access, synExpr, _, _) -> yield! walkExpr true synExpr
-                  | SynMemberDefn.ImplicitCtor(_, _, _, _, _, m) -> yield! checkRange m
-                  | SynMemberDefn.Member(bind, _) -> yield! walkBind bind
-                  | SynMemberDefn.Interface(_, Some membs, _) -> for m in membs do yield! walkMember m
-                  | SynMemberDefn.Inherit(_, _, m) -> 
-                      // can break on the "inherit" clause
-                      yield! checkRange m
-                  | SynMemberDefn.ImplicitInherit(_, arg, _, m) -> 
-                      // can break on the "inherit" clause
-                      yield! checkRange m
-                      yield! walkExpr true arg
-                  | _ -> ()  ]
-
-            // Process declarations nested in a module that should be displayed in the left dropdown
-            // (such as type declarations, nested modules etc.)                            
-            let rec walkDecl decl = 
-                [ match decl with 
-                  | SynModuleDecl.Let(_, binds, m) when isMatchRange m -> 
-                      yield! walkBinds binds
-                  | SynModuleDecl.DoExpr(spExpr, expr, m) when isMatchRange m ->  
-                      yield! walkBindSeqPt spExpr
-                      yield! walkExpr false expr
-                  | SynModuleDecl.ModuleAbbrev _ -> ()
-                  | SynModuleDecl.NestedModule(_, _isRec, decls, _, m) when isMatchRange m ->
-                      for d in decls do yield! walkDecl d
-                  | SynModuleDecl.Types(tydefs, m) when isMatchRange m -> 
-                      for d in tydefs do yield! walkTycon d
-                  | SynModuleDecl.Exception(SynExceptionDefn(SynExceptionDefnRepr(_, _, _, _, _, _), membDefns, _), m) 
-                        when isMatchRange m ->
-                      for m in membDefns do yield! walkMember m
-                  | _ -> () ] 
-                      
-            // Collect all the items in a module  
-            let walkModule (SynModuleOrNamespace(_, _, _, decls, _, _, _, m)) =
-                if isMatchRange m then
-                    List.collect walkDecl decls
-                else
-                    []
-                      
-           /// Get information for implementation file        
-            let walkImplFile (modules: SynModuleOrNamespace list) = List.collect walkModule modules
-                     
-            match input with
-            | Some (ParsedInput.ImplFile (ParsedImplFileInput (modules = modules))) -> walkImplFile modules 
-            | _ -> []
- 
-        ErrorScope.Protect range0 
-            (fun () -> 
-                let locations = findBreakPoints()
-                
-                if pos.Column = 0 then
-                    // we have a breakpoint that was set with mouse at line start
-                    match locations |> List.filter (fun m -> m.StartLine = m.EndLine && pos.Line = m.StartLine) with
-                    | [] ->
-                        match locations |> List.filter (fun m -> rangeContainsPos m pos) with
-                        | [] ->
-                            match locations |> List.filter (fun m -> rangeBeforePos m pos |> not) with
-                            | [] -> Seq.tryHead locations
-                            | locationsAfterPos -> Seq.tryHead locationsAfterPos
-                        | coveringLocations -> Seq.tryLast coveringLocations
-                    | locationsOnSameLine -> Seq.tryHead locationsOnSameLine
-                else
-                    match locations |> List.filter (fun m -> rangeContainsPos m pos) with
-                    | [] ->
-                        match locations |> List.filter (fun m -> rangeBeforePos m pos |> not) with
-                        | [] -> Seq.tryHead locations
-                        | locationsAfterPos -> Seq.tryHead locationsAfterPos
-                    | coveringLocations -> Seq.tryLast coveringLocations)
-            (fun msg -> 
-                Trace.TraceInformation(sprintf "FCS: recovering from error in ValidateBreakpointLocationImpl: '%s'" msg)
-                None)
-            
-    /// When these files appear or disappear the configuration for the current project is invalidated.
-    member _.DependencyFiles = dependencyFiles
-
-    member _.FileName =
-      match input with
-      | Some (ParsedInput.ImplFile (ParsedImplFileInput (fileName = modname))) 
-      | Some (ParsedInput.SigFile (ParsedSigFileInput (fileName = modname))) -> modname
-      | _ -> ""
-    
-    // Get items for the navigation drop down bar       
-    member scope.GetNavigationItems() =
-        // This does not need to be run on the background thread
-        scope.GetNavigationItemsImpl()
-
-    member scope.ValidateBreakpointLocation pos =
-        // This does not need to be run on the background thread
-        scope.ValidateBreakpointLocationImpl pos
-
-type ModuleKind = { IsAutoOpen: bool; HasModuleSuffix: bool }
-
-[]
-type EntityKind =
-    | Attribute
-    | Type
-    | FunctionOrValue of isActivePattern: bool
-    | Module of ModuleKind
-    override x.ToString() = sprintf "%A" x
-
-module UntypedParseImpl =
-    
-    let emptyStringSet = HashSet()
-
-    let GetRangeOfExprLeftOfDot(pos: pos, parseTreeOpt) =
-        match parseTreeOpt with 
-        | None -> None 
-        | Some parseTree ->
-        let CheckLongIdent(longIdent: LongIdent) =
-            // find the longest prefix before the "pos" dot
-            let mutable r = (List.head longIdent).idRange 
-            let mutable couldBeBeforeFront = true
-            for i in longIdent do
-                if posGeq pos i.idRange.End then
-                    r <- unionRanges r i.idRange
-                    couldBeBeforeFront <- false
-            couldBeBeforeFront, r
-
-        AstTraversal.Traverse(pos, parseTree, { new AstTraversal.AstVisitorBase<_>() with
-        member _.VisitExpr(_path, traverseSynExpr, defaultTraverse, expr) =
-            let expr = expr // fix debugger locals
-            match expr with
-            | SynExpr.LongIdent (_, LongIdentWithDots(longIdent, _), _altNameRefCell, _range) -> 
-                let _, r = CheckLongIdent longIdent
-                Some r
-            | SynExpr.LongIdentSet (LongIdentWithDots(longIdent, _), synExpr, _range) -> 
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                else
-                    let _, r = CheckLongIdent longIdent
-                    Some r
-            | SynExpr.DotGet (synExpr, _dotm, LongIdentWithDots(longIdent, _), _range) -> 
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                else
-                    let inFront, r = CheckLongIdent longIdent
-                    if inFront then
-                        Some (synExpr.Range)
-                    else
-                        // see comment below for SynExpr.DotSet
-                        Some ((unionRanges synExpr.Range r))
-            | SynExpr.Set (synExpr, synExpr2, range) ->
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                elif AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr2.Range pos then
-                    traverseSynExpr synExpr2
-                else
-                    Some range
-            | SynExpr.DotSet (synExpr, LongIdentWithDots(longIdent, _), synExpr2, _range) ->
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                elif AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr2.Range pos then
-                    traverseSynExpr synExpr2
-                else
-                    let inFront, r = CheckLongIdent longIdent
-                    if inFront then
-                        Some (synExpr.Range)
-                    else
-                        // f(0).X.Y.Z
-                        //       ^
-                        //      -   r has this value
-                        // ----     synExpr.Range has this value
-                        // ------   we want this value
-                        Some ((unionRanges synExpr.Range r))
-            | SynExpr.DotNamedIndexedPropertySet (synExpr, LongIdentWithDots(longIdent, _), synExpr2, synExpr3, _range) ->  
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                elif AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr2.Range pos then
-                    traverseSynExpr synExpr2
-                elif AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr3.Range pos then
-                    traverseSynExpr synExpr3
-                else
-                    let inFront, r = CheckLongIdent longIdent
-                    if inFront then
-                        Some (synExpr.Range)
-                    else
-                        Some ((unionRanges synExpr.Range r))
-            | SynExpr.DiscardAfterMissingQualificationAfterDot (synExpr, _range) ->  // get this for e.g. "bar()."
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                else
-                    Some (synExpr.Range) 
-            | SynExpr.FromParseError (synExpr, range) -> 
-                if AstTraversal.rangeContainsPosLeftEdgeInclusive synExpr.Range pos then
-                    traverseSynExpr synExpr
-                else
-                    Some range 
-            | SynExpr.App (ExprAtomicFlag.NonAtomic, true, (SynExpr.Ident ident), rhs, _) 
-                when ident.idText = "op_ArrayLookup" 
-                     && not(AstTraversal.rangeContainsPosLeftEdgeInclusive rhs.Range pos) ->
-                match defaultTraverse expr with
-                | None ->
-                    // (expr).(expr) is an ML-deprecated array lookup, but we want intellisense on the dot
-                    // also want it for e.g. [|arr|].(0)
-                    Some (expr.Range) 
-                | x -> x  // we found the answer deeper somewhere in the lhs
-            | SynExpr.Const (SynConst.Double(_), range) -> Some range 
-            | _ -> defaultTraverse expr
-        })
-    
-    /// searches for the expression island suitable for the evaluation by the debugger
-    let TryFindExpressionIslandInPosition(pos: pos, parseTreeOpt) = 
-        match parseTreeOpt with 
-        | None -> None 
-        | Some parseTree ->
-            let getLidParts (lid : LongIdent) = 
-                lid 
-                |> Seq.takeWhile (fun i -> posGeq pos i.idRange.Start)
-                |> Seq.map (fun i -> i.idText)
-                |> Seq.toList
-
-            // tries to locate simple expression island
-            // foundCandidate = false  means that we are looking for the candidate expression
-            // foundCandidate = true - we found candidate (DotGet) and now drill down to the left part
-            let rec TryGetExpression foundCandidate expr = 
-                match expr with
-                | SynExpr.Paren (e, _, _, _) when foundCandidate -> 
-                    TryGetExpression foundCandidate e
-                | SynExpr.LongIdent (_isOptional, LongIdentWithDots(lid, _), _altNameRefCell, _m) -> 
-                    getLidParts lid |> Some
-                | SynExpr.DotGet (leftPart, _, LongIdentWithDots(lid, _), _) when (rangeContainsPos (rangeOfLid lid) pos) || foundCandidate -> 
-                    // requested position is at the lid part of the DotGet
-                    // process left part and append result to the result of processing lid
-                    let leftPartResult = TryGetExpression true leftPart
-                    match leftPartResult with 
-                    | Some leftPartResult ->
-                        [
-                            yield! leftPartResult
-                            yield! getLidParts lid 
-                        ] |> Some
-                    | None -> None
-                | SynExpr.FromParseError (synExpr, _range) -> TryGetExpression foundCandidate synExpr
-                | _ -> None
-
-            let rec walker = 
-                { new AstTraversal.AstVisitorBase<_>() with
-                    member this.VisitExpr(_path, traverseSynExpr, defaultTraverse, expr) =
-                        if rangeContainsPos expr.Range pos then
-                            match TryGetExpression false expr with
-                            | (Some parts) -> parts |> String.concat "." |> Some
-                            | _ -> defaultTraverse expr
-                        else
-                            None }
-            AstTraversal.Traverse(pos, parseTree, walker)
-
-    // Given a cursor position here:
-    //    f(x)   .   ident
-    //                   ^
-    // walk the AST to find the position here:
-    //    f(x)   .   ident
-    //       ^
-    // On success, return Some (thatPos, boolTrueIfCursorIsAfterTheDotButBeforeTheIdentifier)
-    // If there's no dot, return None, so for example
-    //    foo
-    //      ^
-    // would return None
-    // TODO would be great to unify this with GetRangeOfExprLeftOfDot above, if possible, as they are similar
-    let TryFindExpressionASTLeftOfDotLeftOfCursor(pos, parseTreeOpt) =
-        match parseTreeOpt with 
-        | None -> None 
-        | Some parseTree ->
-        let dive x = AstTraversal.dive x
-        let pick x = AstTraversal.pick pos x
-        let walker = 
-            { new AstTraversal.AstVisitorBase<_>() with
-                member this.VisitExpr(_path, traverseSynExpr, defaultTraverse, expr) =
-                    let pick = pick expr.Range
-                    let traverseSynExpr, defaultTraverse, expr = traverseSynExpr, defaultTraverse, expr  // for debugging: debugger does not get object expression params as local vars
-                    if not(rangeContainsPos expr.Range pos) then 
-                        match expr with
-                        | SynExpr.DiscardAfterMissingQualificationAfterDot (e, _m) ->
-                            // This happens with e.g. "f(x)  .   $" when you bring up a completion list a few spaces after a dot.  The cursor is not 'in the parse tree',
-                            // but the dive algorithm will dive down into this node, and this is the one case where we do want to give a result despite the cursor
-                            // not properly being in a node.
-                            match traverseSynExpr e with
-                            | None -> Some (e.Range.End, false)
-                            | r -> r
-                        | _ -> 
-                            // This happens for e.g. "System.Console.[]$", where the ".[]" token is thrown away by the parser and we dive into the System.Console longId 
-                            // even though the cursor/dot is not in there.  In those cases we want to return None, because there is not really a dot completion before
-                            // the cursor location.
-                            None
-                    else
-                        let rec traverseLidOrElse (optExprIfLeftOfLongId : SynExpr option) (LongIdentWithDots(lid, dots) as lidwd) =
-                            let resultIfLeftOfLongId =
-                                match optExprIfLeftOfLongId with
-                                | None -> None
-                                | Some e -> Some (e.Range.End, posGeq lidwd.Range.Start pos)
-                            match dots |> List.mapi (fun i x -> i, x) |> List.rev |> List.tryFind (fun (_, m) -> posGt pos m.Start) with
-                            | None -> resultIfLeftOfLongId
-                            | Some (n, _) -> Some ((List.item n lid).idRange.End, (List.length lid = n+1)    // foo.$
-                                                                              || (posGeq (List.item (n+1) lid).idRange.Start pos))  // foo.$bar
-                        match expr with
-                        | SynExpr.LongIdent (_isOptional, lidwd, _altNameRefCell, _m) ->
-                            traverseLidOrElse None lidwd
-                        | SynExpr.LongIdentSet (lidwd, exprRhs, _m) ->
-                            [ dive lidwd lidwd.Range (traverseLidOrElse None)
-                              dive exprRhs exprRhs.Range traverseSynExpr
-                            ] |> pick expr
-                        | SynExpr.DotGet (exprLeft, dotm, lidwd, _m) ->
-                            let afterDotBeforeLid = mkRange dotm.FileName dotm.End lidwd.Range.Start 
-                            [ dive exprLeft exprLeft.Range traverseSynExpr
-                              dive exprLeft afterDotBeforeLid (fun e -> Some (e.Range.End, true))
-                              dive lidwd lidwd.Range (traverseLidOrElse (Some exprLeft))
-                            ] |> pick expr
-                        | SynExpr.DotSet (exprLeft, lidwd, exprRhs, _m) ->
-                            [ dive exprLeft exprLeft.Range traverseSynExpr
-                              dive lidwd lidwd.Range (traverseLidOrElse(Some exprLeft))
-                              dive exprRhs exprRhs.Range traverseSynExpr
-                            ] |> pick expr
-                        | SynExpr.Set (exprLeft, exprRhs, _m) ->
-                            [ dive exprLeft exprLeft.Range traverseSynExpr
-                              dive exprRhs exprRhs.Range traverseSynExpr
-                            ] |> pick expr
-                        | SynExpr.NamedIndexedPropertySet (lidwd, exprIndexer, exprRhs, _m) ->
-                            [ dive lidwd lidwd.Range (traverseLidOrElse None)
-                              dive exprIndexer exprIndexer.Range traverseSynExpr
-                              dive exprRhs exprRhs.Range traverseSynExpr
-                            ] |> pick expr
-                        | SynExpr.DotNamedIndexedPropertySet (exprLeft, lidwd, exprIndexer, exprRhs, _m) ->
-                            [ dive exprLeft exprLeft.Range traverseSynExpr
-                              dive lidwd lidwd.Range (traverseLidOrElse(Some exprLeft))
-                              dive exprIndexer exprIndexer.Range traverseSynExpr
-                              dive exprRhs exprRhs.Range traverseSynExpr
-                            ] |> pick expr
-                        | SynExpr.Const (SynConst.Double(_), m) ->
-                            if posEq m.End pos then
-                                // the cursor is at the dot
-                                Some (m.End, false)
-                            else
-                                // the cursor is left of the dot
-                                None
-                        | SynExpr.DiscardAfterMissingQualificationAfterDot (e, m) ->
-                            match traverseSynExpr e with
-                            | None -> 
-                                if posEq m.End pos then
-                                    // the cursor is at the dot
-                                    Some (e.Range.End, false)
-                                else
-                                    // the cursor is left of the dot
-                                    None
-                            | r -> r
-                        | SynExpr.App (ExprAtomicFlag.NonAtomic, true, (SynExpr.Ident ident), lhs, _m) 
-                            when ident.idText = "op_ArrayLookup" 
-                                 && not(AstTraversal.rangeContainsPosLeftEdgeInclusive lhs.Range pos) ->
-                            match defaultTraverse expr with
-                            | None ->
-                                // (expr).(expr) is an ML-deprecated array lookup, but we want intellisense on the dot
-                                // also want it for e.g. [|arr|].(0)
-                                Some (lhs.Range.End, false)
-                            | x -> x  // we found the answer deeper somewhere in the lhs
-                        | _ -> defaultTraverse expr }
-        AstTraversal.Traverse(pos, parseTree, walker)
-    
-    let GetEntityKind (pos: pos, input: ParsedInput) : EntityKind option =
-        let (|ConstructorPats|) = function
-            | Pats ps -> ps
-            | NamePatPairs(xs, _) -> List.map snd xs
-
-        /// An recursive pattern that collect all sequential expressions to avoid StackOverflowException
-        let rec (|Sequentials|_|) = function
-            | SynExpr.Sequential (_, _, e, Sequentials es, _) -> Some (e :: es)
-            | SynExpr.Sequential (_, _, e1, e2, _) -> Some [e1; e2]
-            | _ -> None
-
-        let inline isPosInRange range = rangeContainsPos range pos
-
-        let inline ifPosInRange range f =
-            if isPosInRange range then f()
-            else None
-
-        let rec walkImplFileInput (ParsedImplFileInput (modules = moduleOrNamespaceList)) = 
-            List.tryPick (walkSynModuleOrNamespace true) moduleOrNamespaceList
-
-        and walkSynModuleOrNamespace isTopLevel (SynModuleOrNamespace(_, _, _, decls, _, Attributes attrs, _, r)) =
-            List.tryPick walkAttribute attrs
-            |> Option.orElse (ifPosInRange r (fun _ -> List.tryPick (walkSynModuleDecl isTopLevel) decls))
-
-        and walkAttribute (attr: SynAttribute) = 
-            if isPosInRange attr.Range then Some EntityKind.Attribute else None
-            |> Option.orElse (walkExprWithKind (Some EntityKind.Type) attr.ArgExpr)
-
-        and walkTypar (Typar (ident, _, _)) = ifPosInRange ident.idRange (fun _ -> Some EntityKind.Type)
-
-        and walkTyparDecl (SynTyparDecl.TyparDecl (Attributes attrs, typar)) = 
-            List.tryPick walkAttribute attrs
-            |> Option.orElse (walkTypar typar)
-            
-        and walkTypeConstraint = function
-            | SynTypeConstraint.WhereTyparDefaultsToType (t1, t2, _) -> walkTypar t1 |> Option.orElse (walkType t2)
-            | SynTypeConstraint.WhereTyparIsValueType(t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparIsReferenceType(t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparIsUnmanaged(t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparSupportsNull (t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparNotSupportsNull (t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparIsComparable(t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparIsEquatable(t, _) -> walkTypar t
-            | SynTypeConstraint.WhereTyparSubtypeOfType(t, ty, _) -> walkTypar t |> Option.orElse (walkType ty)
-            | SynTypeConstraint.WhereTyparSupportsMember(ts, sign, _) -> 
-                List.tryPick walkType ts |> Option.orElse (walkMemberSig sign)
-            | SynTypeConstraint.WhereTyparIsEnum(t, ts, _) -> walkTypar t |> Option.orElse (List.tryPick walkType ts)
-            | SynTypeConstraint.WhereTyparIsDelegate(t, ts, _) -> walkTypar t |> Option.orElse (List.tryPick walkType ts)
-
-        and walkPatWithKind (kind: EntityKind option) = function
-            | SynPat.Ands (pats, _) -> List.tryPick walkPat pats
-            | SynPat.Named(SynPat.Wild nameRange as pat, _, _, _, _) -> 
-                if isPosInRange nameRange then None
-                else walkPat pat
-            | SynPat.Typed(pat, t, _) -> walkPat pat |> Option.orElse (walkType t)
-            | SynPat.Attrib(pat, Attributes attrs, _) -> walkPat pat |> Option.orElse (List.tryPick walkAttribute attrs)
-            | SynPat.Or(pat1, pat2, _) -> List.tryPick walkPat [pat1; pat2]
-            | SynPat.LongIdent(_, _, typars, ConstructorPats pats, _, r) -> 
-                ifPosInRange r (fun _ -> kind)
-                |> Option.orElse (
-                    typars 
-                    |> Option.bind (fun (SynValTyparDecls (typars, _, constraints)) -> 
-                        List.tryPick walkTyparDecl typars
-                        |> Option.orElse (List.tryPick walkTypeConstraint constraints)))
-                |> Option.orElse (List.tryPick walkPat pats)
-            | SynPat.Tuple(_, pats, _) -> List.tryPick walkPat pats
-            | SynPat.Paren(pat, _) -> walkPat pat
-            | SynPat.ArrayOrList(_, pats, _) -> List.tryPick walkPat pats
-            | SynPat.IsInst(t, _) -> walkType t
-            | SynPat.QuoteExpr(e, _) -> walkExpr e
-            | _ -> None
-
-        and walkPat = walkPatWithKind None
-
-        and walkBinding (SynBinding.Binding(_, _, _, _, Attributes attrs, _, _, pat, returnInfo, e, _, _)) =
-            List.tryPick walkAttribute attrs
-            |> Option.orElse (walkPat pat)
-            |> Option.orElse (walkExpr e)
-            |> Option.orElse (
-                match returnInfo with
-                | Some (SynBindingReturnInfo (t, _, _)) -> walkType t
-                | None -> None)
-
-        and walkInterfaceImpl (InterfaceImpl(_, bindings, _)) =
-            List.tryPick walkBinding bindings
-
-        and walkIndexerArg = function
-            | SynIndexerArg.One (e, _, _) -> walkExpr e
-            | SynIndexerArg.Two(e1, _, e2, _, _, _) -> List.tryPick walkExpr [e1; e2]
-
-        and walkType = function
-            | SynType.LongIdent ident -> 
-                // we protect it with try..with because System.Exception : rangeOfLidwd may raise
-                // at FSharp.Compiler.SyntaxTree.LongIdentWithDots.get_Range() in D:\j\workspace\release_ci_pa---3f142ccc\src\fsharp\ast.fs: line 156
-                try ifPosInRange ident.Range (fun _ -> Some EntityKind.Type) with _ -> None
-            | SynType.App(ty, _, types, _, _, _, _) -> 
-                walkType ty |> Option.orElse (List.tryPick walkType types)
-            | SynType.LongIdentApp(_, _, _, types, _, _, _) -> List.tryPick walkType types
-            | SynType.Tuple(_, ts, _) -> ts |> List.tryPick (fun (_, t) -> walkType t)
-            | SynType.Array(_, t, _) -> walkType t
-            | SynType.Fun(t1, t2, _) -> walkType t1 |> Option.orElse (walkType t2)
-            | SynType.WithGlobalConstraints(t, _, _) -> walkType t
-            | SynType.HashConstraint(t, _) -> walkType t
-            | SynType.MeasureDivide(t1, t2, _) -> walkType t1 |> Option.orElse (walkType t2)
-            | SynType.MeasurePower(t, _, _) -> walkType t
-            | SynType.Paren(t, _) -> walkType t
-            | _ -> None
-
-        and walkClause (Clause(pat, e1, e2, _, _)) =
-            walkPatWithKind (Some EntityKind.Type) pat 
-            |> Option.orElse (walkExpr e2)
-            |> Option.orElse (Option.bind walkExpr e1)
-
-        and walkExprWithKind (parentKind: EntityKind option) = function
-            | SynExpr.LongIdent (_, LongIdentWithDots(_, dotRanges), _, r) ->
-                match dotRanges with
-                | [] when isPosInRange r -> parentKind |> Option.orElse (Some (EntityKind.FunctionOrValue false)) 
-                | firstDotRange :: _  ->
-                    let firstPartRange = 
-                        mkRange "" r.Start (mkPos firstDotRange.StartLine (firstDotRange.StartColumn - 1))
-                    if isPosInRange firstPartRange then
-                        parentKind |> Option.orElse (Some (EntityKind.FunctionOrValue false))
-                    else None
-                | _ -> None
-            | SynExpr.Paren (e, _, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.Quote (_, _, e, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.Typed (e, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.Tuple (_, es, _, _) -> List.tryPick (walkExprWithKind parentKind) es
-            | SynExpr.ArrayOrList (_, es, _) -> List.tryPick (walkExprWithKind parentKind) es
-            | SynExpr.Record (_, _, fields, r) -> 
-                ifPosInRange r (fun _ ->
-                    fields |> List.tryPick (fun (_, e, _) -> e |> Option.bind (walkExprWithKind parentKind)))
-            | SynExpr.New (_, t, e, _) -> walkExprWithKind parentKind e |> Option.orElse (walkType t)
-            | SynExpr.ObjExpr (ty, _, bindings, ifaces, _, _) -> 
-                walkType ty
-                |> Option.orElse (List.tryPick walkBinding bindings)
-                |> Option.orElse (List.tryPick walkInterfaceImpl ifaces)
-            | SynExpr.While (_, e1, e2, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2]
-            | SynExpr.For (_, _, e1, _, e2, e3, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2; e3]
-            | SynExpr.ForEach (_, _, _, _, e1, e2, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2]
-            | SynExpr.ArrayOrListOfSeqExpr (_, e, _) -> walkExprWithKind parentKind e
-            | SynExpr.CompExpr (_, _, e, _) -> walkExprWithKind parentKind e
-            | SynExpr.Lambda (_, _, _, e, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.MatchLambda (_, _, synMatchClauseList, _, _) -> 
-                List.tryPick walkClause synMatchClauseList
-            | SynExpr.Match (_, e, synMatchClauseList, _) -> 
-                walkExprWithKind parentKind e |> Option.orElse (List.tryPick walkClause synMatchClauseList)
-            | SynExpr.Do (e, _) -> walkExprWithKind parentKind e
-            | SynExpr.Assert (e, _) -> walkExprWithKind parentKind e
-            | SynExpr.App (_, _, e1, e2, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2]
-            | SynExpr.TypeApp (e, _, tys, _, _, _, _) -> 
-                walkExprWithKind (Some EntityKind.Type) e |> Option.orElse (List.tryPick walkType tys)
-            | SynExpr.LetOrUse (_, _, bindings, e, _) -> List.tryPick walkBinding bindings |> Option.orElse (walkExprWithKind parentKind e)
-            | SynExpr.TryWith (e, _, clauses, _, _, _, _) -> walkExprWithKind parentKind e |> Option.orElse (List.tryPick walkClause clauses)
-            | SynExpr.TryFinally (e1, e2, _, _, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2]
-            | SynExpr.Lazy (e, _) -> walkExprWithKind parentKind e
-            | Sequentials es -> List.tryPick (walkExprWithKind parentKind) es
-            | SynExpr.IfThenElse (e1, e2, e3, _, _, _, _) -> 
-                List.tryPick (walkExprWithKind parentKind) [e1; e2] |> Option.orElse (match e3 with None -> None | Some e -> walkExprWithKind parentKind e)
-            | SynExpr.Ident ident -> ifPosInRange ident.idRange (fun _ -> Some (EntityKind.FunctionOrValue false))
-            | SynExpr.LongIdentSet (_, e, _) -> walkExprWithKind parentKind e
-            | SynExpr.DotGet (e, _, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.DotSet (e, _, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.Set (e, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.DotIndexedGet (e, args, _, _) -> walkExprWithKind parentKind e |> Option.orElse (List.tryPick walkIndexerArg args)
-            | SynExpr.DotIndexedSet (e, args, _, _, _, _) -> walkExprWithKind parentKind e |> Option.orElse (List.tryPick walkIndexerArg args)
-            | SynExpr.NamedIndexedPropertySet (_, e1, e2, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2]
-            | SynExpr.DotNamedIndexedPropertySet (e1, _, e2, e3, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2; e3]
-            | SynExpr.TypeTest (e, t, _) -> walkExprWithKind parentKind e |> Option.orElse (walkType t)
-            | SynExpr.Upcast (e, t, _) -> walkExprWithKind parentKind e |> Option.orElse (walkType t)
-            | SynExpr.Downcast (e, t, _) -> walkExprWithKind parentKind e |> Option.orElse (walkType t)
-            | SynExpr.InferredUpcast (e, _) -> walkExprWithKind parentKind e
-            | SynExpr.InferredDowncast (e, _) -> walkExprWithKind parentKind e
-            | SynExpr.AddressOf (_, e, _, _) -> walkExprWithKind parentKind e
-            | SynExpr.JoinIn (e1, _, e2, _) -> List.tryPick (walkExprWithKind parentKind) [e1; e2]
-            | SynExpr.YieldOrReturn (_, e, _) -> walkExprWithKind parentKind e
-            | SynExpr.YieldOrReturnFrom (_, e, _) -> walkExprWithKind parentKind e
-            | SynExpr.Match (_, e, synMatchClauseList, _)
-            | SynExpr.MatchBang (_, e, synMatchClauseList, _) -> 
-                walkExprWithKind parentKind e |> Option.orElse (List.tryPick walkClause synMatchClauseList)
-            | SynExpr.LetOrUseBang(_, _, _, _, e1, es, e2, _) ->
-                [
-                    yield e1
-                    for (_,_,_,_,eAndBang,_) in es do
-                        yield eAndBang
-                    yield e2
-                ]
-                |> List.tryPick (walkExprWithKind parentKind) 
-            | SynExpr.DoBang (e, _) -> walkExprWithKind parentKind e
-            | SynExpr.TraitCall (ts, sign, e, _) ->
-                List.tryPick walkTypar ts 
-                |> Option.orElse (walkMemberSig sign)
-                |> Option.orElse (walkExprWithKind parentKind e)
-            | _ -> None
-
-        and walkExpr = walkExprWithKind None
-
-        and walkSimplePat = function
-            | SynSimplePat.Attrib (pat, Attributes attrs, _) ->
-                walkSimplePat pat |> Option.orElse (List.tryPick walkAttribute attrs)
-            | SynSimplePat.Typed(pat, t, _) -> walkSimplePat pat |> Option.orElse (walkType t)
-            | _ -> None
-
-        and walkField (SynField.Field(Attributes attrs, _, _, t, _, _, _, _)) =
-            List.tryPick walkAttribute attrs |> Option.orElse (walkType t)
-
-        and walkValSig (SynValSig.ValSpfn(Attributes attrs, _, _, t, _, _, _, _, _, _, _)) =
-            List.tryPick walkAttribute attrs |> Option.orElse (walkType t)
-
-        and walkMemberSig = function
-            | SynMemberSig.Inherit (t, _) -> walkType t
-            | SynMemberSig.Member(vs, _, _) -> walkValSig vs
-            | SynMemberSig.Interface(t, _) -> walkType t
-            | SynMemberSig.ValField(f, _) -> walkField f
-            | SynMemberSig.NestedType(SynTypeDefnSig.TypeDefnSig (info, repr, memberSigs, _), _) -> 
-                walkComponentInfo false info
-                |> Option.orElse (walkTypeDefnSigRepr repr)
-                |> Option.orElse (List.tryPick walkMemberSig memberSigs)
-
-        and walkMember = function
-            | SynMemberDefn.AbstractSlot (valSig, _, _) -> walkValSig valSig
-            | SynMemberDefn.Member(binding, _) -> walkBinding binding
-            | SynMemberDefn.ImplicitCtor(_, Attributes attrs, SynSimplePats.SimplePats(simplePats, _), _, _, _) -> 
-                List.tryPick walkAttribute attrs |> Option.orElse (List.tryPick walkSimplePat simplePats)
-            | SynMemberDefn.ImplicitInherit(t, e, _, _) -> walkType t |> Option.orElse (walkExpr e)
-            | SynMemberDefn.LetBindings(bindings, _, _, _) -> List.tryPick walkBinding bindings
-            | SynMemberDefn.Interface(t, members, _) -> 
-                walkType t |> Option.orElse (members |> Option.bind (List.tryPick walkMember))
-            | SynMemberDefn.Inherit(t, _, _) -> walkType t
-            | SynMemberDefn.ValField(field, _) -> walkField field
-            | SynMemberDefn.NestedType(tdef, _, _) -> walkTypeDefn tdef
-            | SynMemberDefn.AutoProperty(Attributes attrs, _, _, t, _, _, _, _, e, _, _) -> 
-                List.tryPick walkAttribute attrs
-                |> Option.orElse (Option.bind walkType t)
-                |> Option.orElse (walkExpr e)
-            | _ -> None
-
-        and walkEnumCase (EnumCase(Attributes attrs, _, _, _, _)) = List.tryPick walkAttribute attrs
-
-        and walkUnionCaseType = function
-            | SynUnionCaseType.UnionCaseFields fields -> List.tryPick walkField fields
-            | SynUnionCaseType.UnionCaseFullType(t, _) -> walkType t
-
-        and walkUnionCase (UnionCase(Attributes attrs, _, t, _, _, _)) = 
-            List.tryPick walkAttribute attrs |> Option.orElse (walkUnionCaseType t)
-
-        and walkTypeDefnSimple = function
-            | SynTypeDefnSimpleRepr.Enum (cases, _) -> List.tryPick walkEnumCase cases
-            | SynTypeDefnSimpleRepr.Union(_, cases, _) -> List.tryPick walkUnionCase cases
-            | SynTypeDefnSimpleRepr.Record(_, fields, _) -> List.tryPick walkField fields
-            | SynTypeDefnSimpleRepr.TypeAbbrev(_, t, _) -> walkType t
-            | _ -> None
-
-        and walkComponentInfo isModule (ComponentInfo(Attributes attrs, typars, constraints, _, _, _, _, r)) =
-            if isModule then None else ifPosInRange r (fun _ -> Some EntityKind.Type)
-            |> Option.orElse (
-                List.tryPick walkAttribute attrs
-                |> Option.orElse (List.tryPick walkTyparDecl typars)
-                |> Option.orElse (List.tryPick walkTypeConstraint constraints))
-
-        and walkTypeDefnRepr = function
-            | SynTypeDefnRepr.ObjectModel (_, defns, _) -> List.tryPick walkMember defns
-            | SynTypeDefnRepr.Simple(defn, _) -> walkTypeDefnSimple defn
-            | SynTypeDefnRepr.Exception(_) -> None
-
-        and walkTypeDefnSigRepr = function
-            | SynTypeDefnSigRepr.ObjectModel (_, defns, _) -> List.tryPick walkMemberSig defns
-            | SynTypeDefnSigRepr.Simple(defn, _) -> walkTypeDefnSimple defn
-            | SynTypeDefnSigRepr.Exception(_) -> None
-
-        and walkTypeDefn (TypeDefn (info, repr, members, _, _)) =
-            walkComponentInfo false info
-            |> Option.orElse (walkTypeDefnRepr repr)
-            |> Option.orElse (List.tryPick walkMember members)
-
-        and walkSynModuleDecl isTopLevel (decl: SynModuleDecl) =
-            match decl with
-            | SynModuleDecl.NamespaceFragment fragment -> walkSynModuleOrNamespace isTopLevel fragment
-            | SynModuleDecl.NestedModule(info, _, modules, _, range) ->
-                walkComponentInfo true info
-                |> Option.orElse (ifPosInRange range (fun _ -> List.tryPick (walkSynModuleDecl false) modules))
-            | SynModuleDecl.Open _ -> None
-            | SynModuleDecl.Let (_, bindings, _) -> List.tryPick walkBinding bindings
-            | SynModuleDecl.DoExpr (_, expr, _) -> walkExpr expr
-            | SynModuleDecl.Types (types, _) -> List.tryPick walkTypeDefn types
-            | _ -> None
-
-        match input with 
-        | ParsedInput.SigFile _ -> None
-        | ParsedInput.ImplFile input -> walkImplFileInput input
-
-    type internal TS = AstTraversal.TraverseStep
-    /// Matches the most nested [< and >] pair.
-    let insideAttributeApplicationRegex = Regex(@"(?<=\[\<)(?(.*?))(?=\>\])", RegexOptions.Compiled ||| RegexOptions.ExplicitCapture)
-
-    /// Try to determine completion context for the given pair (row, columns)
-    let TryGetCompletionContext (pos, parsedInput: ParsedInput, lineStr: string) : CompletionContext option = 
-
-        match GetEntityKind(pos, parsedInput) with
-        | Some EntityKind.Attribute -> Some CompletionContext.AttributeApplication
-        | _ ->
-        
-        let parseLid (LongIdentWithDots(lid, dots)) =            
-            let rec collect plid (parts : Ident list) (dots : range list) = 
-                match parts, dots with
-                | [], _ -> Some (plid, None)
-                | x :: xs, ds ->
-                    if rangeContainsPos x.idRange pos then
-                        // pos lies with the range of current identifier
-                        let s = x.idText.Substring(0, pos.Column - x.idRange.Start.Column)
-                        let residue = if s.Length <> 0 then Some s else None
-                        Some (plid, residue)
-                    elif posGt x.idRange.Start pos then
-                        // can happen if caret is placed after dot but before the existing identifier A. $ B
-                        // return accumulated plid with no residue
-                        Some (plid, None)
-                    else
-                        match ds with
-                        | [] -> 
-                            // pos lies after the id and no dots found - return accumulated plid and current id as residue 
-                            Some (plid, Some (x.idText))
-                        | d :: ds ->
-                            if posGeq pos d.End  then 
-                                // pos lies after the dot - proceed to the next identifier
-                                collect ((x.idText) :: plid) xs ds
-                            else
-                                // pos after the id but before the dot
-                                // A $.B - return nothing
-                                None
-
-            match collect [] lid dots with
-            | Some (parts, residue) ->
-                Some ((List.rev parts), residue)
-            | None -> None
-        
-        let (|Class|Interface|Struct|Unknown|Invalid|) synAttributes = 
-            let (|SynAttr|_|) name (attr : SynAttribute) = 
-                match attr with
-                | {TypeName = LongIdentWithDots([x], _)} when x.idText = name -> Some ()
-                | _ -> None
-            
-            let rec getKind isClass isInterface isStruct = 
-                function
-                | [] -> isClass, isInterface, isStruct
-                | (SynAttr "Class") :: xs -> getKind true isInterface isStruct xs
-                | (SynAttr "AbstractClass") :: xs -> getKind true isInterface isStruct xs
-                | (SynAttr "Interface") :: xs -> getKind isClass true isStruct xs
-                | (SynAttr "Struct") :: xs -> getKind isClass isInterface true xs
-                | _ :: xs -> getKind isClass isInterface isStruct xs
-
-            match getKind false false false synAttributes with
-            | false, false, false -> Unknown
-            | true, false, false -> Class
-            | false, true, false -> Interface
-            | false, false, true -> Struct
-            | _ -> Invalid
-
-        let GetCompletionContextForInheritSynMember ((ComponentInfo(Attributes synAttributes, _, _, _, _, _, _, _)), typeDefnKind : SynTypeDefnKind, completionPath) = 
-            
-            let success k = Some (CompletionContext.Inherit (k, completionPath))
-
-            // if kind is specified - take it
-            // if kind is non-specified 
-            //  - try to obtain it from attribute
-            //      - if no attributes present - infer kind from members
-            match typeDefnKind with
-            | TyconClass -> 
-                match synAttributes with
-                | Class | Unknown -> success InheritanceContext.Class
-                | _ -> Some CompletionContext.Invalid // non-matching attributes
-            | TyconInterface -> 
-                match synAttributes with
-                | Interface | Unknown -> success InheritanceContext.Interface
-                | _ -> Some CompletionContext.Invalid // non-matching attributes
-            | TyconStruct -> 
-                // display nothing for structs
-                Some CompletionContext.Invalid
-            | TyconUnspecified ->
-                match synAttributes with
-                | Class -> success InheritanceContext.Class
-                | Interface -> success InheritanceContext.Interface
-                | Unknown -> 
-                    // user do not specify kind explicitly or via attributes
-                    success InheritanceContext.Unknown
-                | _ -> 
-                    // unable to uniquely detect kind from the attributes - return invalid context
-                    Some CompletionContext.Invalid
-            | _ -> None
-
-        let (|Operator|_|) name e = 
-            match e with
-            | SynExpr.App (ExprAtomicFlag.NonAtomic, false, SynExpr.App (ExprAtomicFlag.NonAtomic, true, SynExpr.Ident ident, lhs, _), rhs, _) 
-                when ident.idText = name -> Some (lhs, rhs)
-            | _ -> None
-
-        // checks if we are in rhs of the range operator
-        let isInRhsOfRangeOp (p : AstTraversal.TraversePath) = 
-            match p with
-            | TS.Expr(Operator "op_Range" _) :: _ -> true
-            | _ -> false
-
-        let (|Setter|_|) e =
-            match e with
-            | Operator "op_Equality" (SynExpr.Ident id, _) -> Some id
-            | _ -> None
-
-        let findSetters argList =
-            match argList with
-            | SynExpr.Paren (SynExpr.Tuple (false, parameters, _, _), _, _, _) -> 
-                let setters = HashSet()
-                for p in parameters do
-                    match p with
-                    | Setter id -> ignore(setters.Add id.idText)
-                    | _ -> ()
-                setters
-            | _ -> emptyStringSet
-
-        let endOfLastIdent (lid: LongIdentWithDots) = 
-            let last = List.last lid.Lid
-            last.idRange.End
-
-        let endOfClosingTokenOrLastIdent (mClosing: range option) (lid : LongIdentWithDots) =
-            match mClosing with
-            | Some m -> m.End
-            | None -> endOfLastIdent lid
-
-        let endOfClosingTokenOrIdent (mClosing: range option) (id : Ident) =
-            match mClosing with
-            | Some m -> m.End
-            | None -> id.idRange.End
-
-        let (|NewObjectOrMethodCall|_|) e =
-            match e with
-            | (SynExpr.New (_, SynType.LongIdent typeName, arg, _)) -> 
-                // new A()
-                Some (endOfLastIdent typeName, findSetters arg)
-            | (SynExpr.New (_, SynType.App(StripParenTypes (SynType.LongIdent typeName), _, _, _, mGreaterThan, _, _), arg, _)) -> 
-                // new A<_>()
-                Some (endOfClosingTokenOrLastIdent mGreaterThan typeName, findSetters arg)
-            | (SynExpr.App (_, false, SynExpr.Ident id, arg, _)) -> 
-                // A()
-                Some (id.idRange.End, findSetters arg)
-            | (SynExpr.App (_, false, SynExpr.TypeApp (SynExpr.Ident id, _, _, _, mGreaterThan, _, _), arg, _)) -> 
-                // A<_>()
-                Some (endOfClosingTokenOrIdent mGreaterThan id, findSetters arg)
-            | (SynExpr.App (_, false, SynExpr.LongIdent (_, lid, _, _), arg, _)) -> 
-                // A.B()
-                Some (endOfLastIdent lid, findSetters arg)
-            | (SynExpr.App (_, false, SynExpr.TypeApp (SynExpr.LongIdent (_, lid, _, _), _, _, _, mGreaterThan, _, _), arg, _)) -> 
-                // A.B<_>()
-                Some (endOfClosingTokenOrLastIdent mGreaterThan lid, findSetters arg)
-            | _ -> None
-        
-        let isOnTheRightOfComma (elements: SynExpr list) (commas: range list) current = 
-            let rec loop elements (commas: range list) = 
-                match elements with
-                | x :: xs ->
-                    match commas with
-                    | c :: cs -> 
-                        if x === current then posLt c.End pos || posEq c.End pos 
-                        else loop xs cs
-                    | _ -> false
-                | _ -> false
-            loop elements commas
-
-        let (|PartOfParameterList|_|) precedingArgument path =
-            match path with
-            | TS.Expr(SynExpr.Paren _) :: TS.Expr(NewObjectOrMethodCall args) :: _ -> 
-                if Option.isSome precedingArgument then None else Some args
-            | TS.Expr(SynExpr.Tuple (false, elements, commas, _)) :: TS.Expr(SynExpr.Paren _) :: TS.Expr(NewObjectOrMethodCall args) :: _ -> 
-                match precedingArgument with
-                | None -> Some args
-                | Some e ->
-                    // if expression is passed then
-                    // 1. find it in among elements of the tuple
-                    // 2. find corresponding comma
-                    // 3. check that current position is past the comma
-                    // this is used for cases like (a = something-here.) if the cursor is after .
-                    // in this case this is not object initializer completion context
-                    if isOnTheRightOfComma elements commas e then Some args else None
-            | _ -> None
-
-        let walker = 
-            { 
-                new AstTraversal.AstVisitorBase<_>() with
-                    member _.VisitExpr(path, _, defaultTraverse, expr) = 
-
-                        if isInRhsOfRangeOp path then
-                            match defaultTraverse expr with
-                            | None -> Some CompletionContext.RangeOperator // nothing was found - report that we were in the context of range operator
-                            | x -> x // ok, we found something - return it
-                        else
-                            match expr with
-                            // new A($)
-                            | SynExpr.Const (SynConst.Unit, m) when rangeContainsPos m pos ->
-                                match path with
-                                | TS.Expr(NewObjectOrMethodCall args) :: _ -> 
-                                    Some (CompletionContext.ParameterList args)
-                                | _ -> 
-                                    defaultTraverse expr
-                            // new (... A$)
-                            | SynExpr.Ident id when id.idRange.End = pos ->
-                                match path with
-                                | PartOfParameterList None args -> 
-                                    Some (CompletionContext.ParameterList args)
-                                | _ -> 
-                                    defaultTraverse expr
-                            // new (A$ = 1)
-                            // new (A = 1, $)
-                            | Setter id when id.idRange.End = pos || rangeBeforePos expr.Range pos ->
-                                let precedingArgument = if id.idRange.End = pos then None else Some expr
-                                match path with
-                                | PartOfParameterList precedingArgument args-> 
-                                    Some (CompletionContext.ParameterList args)
-                                | _ -> 
-                                    defaultTraverse expr
-                            
-                            | _ -> defaultTraverse expr
-
-                    member _.VisitRecordField(path, copyOpt, field) = 
-                        let contextFromTreePath completionPath = 
-                            // detect records usage in constructor
-                            match path with
-                            | TS.Expr(_) :: TS.Binding(_) :: TS.MemberDefn(_) :: TS.TypeDefn(SynTypeDefn.TypeDefn(ComponentInfo(_, _, _, [id], _, _, _, _), _, _, _, _)) :: _ ->  
-                                RecordContext.Constructor(id.idText)
-                            | _ -> RecordContext.New completionPath
-                        match field with
-                        | Some field -> 
-                            match parseLid field with
-                            | Some completionPath ->
-                                let recordContext = 
-                                    match copyOpt with
-                                    | Some (s : SynExpr) -> RecordContext.CopyOnUpdate(s.Range, completionPath)
-                                    | None -> contextFromTreePath completionPath
-                                Some (CompletionContext.RecordField recordContext)
-                            | None -> None
-                        | None ->
-                            let recordContext = 
-                                match copyOpt with
-                                | Some s -> RecordContext.CopyOnUpdate(s.Range, ([], None))
-                                | None -> contextFromTreePath ([], None)
-                            Some (CompletionContext.RecordField recordContext)
-                                
-                    member _.VisitInheritSynMemberDefn(componentInfo, typeDefnKind, synType, _members, _range) = 
-                        match synType with
-                        | SynType.LongIdent lidwd ->                                 
-                            match parseLid lidwd with
-                            | Some completionPath -> GetCompletionContextForInheritSynMember (componentInfo, typeDefnKind, completionPath)
-                            | None -> Some (CompletionContext.Invalid) // A $ .B -> no completion list
-
-                        | _ -> None 
-                        
-                    member _.VisitBinding(defaultTraverse, (Binding(headPat = headPat) as synBinding)) = 
-                    
-                        let visitParam = function
-                            | SynPat.Named (range = range) when rangeContainsPos range pos -> 
-                                // parameter without type hint, no completion
-                                Some CompletionContext.Invalid 
-                            | SynPat.Typed(SynPat.Named(SynPat.Wild range, _, _, _, _), _, _) when rangeContainsPos range pos ->
-                                // parameter with type hint, but we are on its name, no completion
-                                Some CompletionContext.Invalid
-                            | _ -> defaultTraverse synBinding
-
-                        match headPat with
-                        | SynPat.LongIdent(longDotId = lidwd) when rangeContainsPos lidwd.Range pos ->
-                            // let fo|o x = ()
-                            Some CompletionContext.Invalid
-                        | SynPat.LongIdent(_, _, _, ctorArgs, _, _) ->
-                            match ctorArgs with
-                            | SynArgPats.Pats pats ->
-                                pats |> List.tryPick (fun pat ->
-                                    match pat with
-                                    | SynPat.Paren(pat, _) -> 
-                                        match pat with
-                                        | SynPat.Tuple(_, pats, _) ->
-                                            pats |> List.tryPick visitParam
-                                        | _ -> visitParam pat
-                                    | SynPat.Wild range when rangeContainsPos range pos -> 
-                                        // let foo (x|
-                                        Some CompletionContext.Invalid
-                                    | _ -> visitParam pat
-                                )
-                            | _ -> defaultTraverse synBinding
-                        | SynPat.Named(range = range) when rangeContainsPos range pos ->
-                            // let fo|o = 1
-                            Some CompletionContext.Invalid
-                        | _ -> defaultTraverse synBinding 
-                    
-                    member _.VisitHashDirective range = 
-                        if rangeContainsPos range pos then Some CompletionContext.Invalid 
-                        else None 
-                        
-                    member _.VisitModuleOrNamespace(SynModuleOrNamespace(longId = idents)) =
-                        match List.tryLast idents with
-                        | Some lastIdent when pos.Line = lastIdent.idRange.EndLine && lastIdent.idRange.EndColumn >= 0 && pos.Column <= lineStr.Length ->
-                            let stringBetweenModuleNameAndPos = lineStr.[lastIdent.idRange.EndColumn..pos.Column - 1]
-                            if stringBetweenModuleNameAndPos |> Seq.forall (fun x -> x = ' ' || x = '.') then
-                                Some CompletionContext.Invalid
-                            else None
-                        | _ -> None 
-
-                    member _.VisitComponentInfo(ComponentInfo(range = range)) = 
-                        if rangeContainsPos range pos then Some CompletionContext.Invalid
-                        else None
-
-                    member _.VisitLetOrUse(_, _, bindings, range) =
-                        match bindings with
-                        | [] when range.StartLine = pos.Line -> Some CompletionContext.Invalid
-                        | _ -> None
-
-                    member _.VisitSimplePats pats =
-                        pats |> List.tryPick (fun pat ->
-                            match pat with
-                            | SynSimplePat.Id(range = range)
-                            | SynSimplePat.Typed(SynSimplePat.Id(range = range), _, _) when rangeContainsPos range pos -> 
-                                Some CompletionContext.Invalid
-                            | _ -> None)
-
-                    member _.VisitModuleDecl(defaultTraverse, decl) =
-                        match decl with
-                        | SynModuleDecl.Open(target, m) -> 
-                            // in theory, this means we're "in an open"
-                            // in practice, because the parse tree/walkers do not handle attributes well yet, need extra check below to ensure not e.g. $here$
-                            //     open System
-                            //     [ true
-                                    | SynOpenDeclTarget.ModuleOrNamespace _ -> false
-                                Some (CompletionContext.OpenDeclaration isOpenType)
-                            else
-                                None
-                        | _ -> defaultTraverse decl
-
-                    member _.VisitType(defaultTraverse, ty) =
-                        match ty with
-                        | SynType.LongIdent _ when rangeContainsPos ty.Range pos ->
-                            Some CompletionContext.PatternType
-                        | _ -> defaultTraverse ty
-            }
-
-        AstTraversal.Traverse(pos, parsedInput, walker)
-        // Uncompleted attribute applications are not presented in the AST in any way. So, we have to parse source string.
-        |> Option.orElseWith (fun _ ->
-             let cutLeadingAttributes (str: string) =
-                 // cut off leading attributes, i.e. we cut "[]" to " >]"
-                 match str.LastIndexOf ';' with
-                 | -1 -> str
-                 | idx when idx < str.Length -> str.[idx + 1..].TrimStart()
-                 | _ -> ""   
-
-             let isLongIdent = Seq.forall (fun c -> IsIdentifierPartCharacter c || c = '.' || c = ':') // ':' may occur in "[]"
-
-             // match the most nested paired [< and >] first
-             let matches = 
-                insideAttributeApplicationRegex.Matches lineStr
-                |> Seq.cast
-                |> Seq.filter (fun m -> m.Index <= pos.Column && m.Index + m.Length >= pos.Column)
-                |> Seq.toArray
-
-             if not (Array.isEmpty matches) then
-                 matches
-                 |> Seq.tryPick (fun m ->
-                      let g = m.Groups.["attribute"]
-                      let col = pos.Column - g.Index
-                      if col >= 0 && col < g.Length then
-                          let str = g.Value.Substring(0, col).TrimStart() // cut other rhs attributes
-                          let str = cutLeadingAttributes str
-                          if isLongIdent str then
-                              Some CompletionContext.AttributeApplication
-                          else None 
-                      else None)
-             else
-                // Paired [< and >] were not found, try to determine that we are after [< without closing >]
-                match lineStr.LastIndexOf("[<", StringComparison.Ordinal) with
-                | -1 -> None
-                | openParenIndex when pos.Column >= openParenIndex + 2 -> 
-                    let str = lineStr.[openParenIndex + 2..pos.Column - 1].TrimStart()
-                    let str = cutLeadingAttributes str
-                    if isLongIdent str then
-                        Some CompletionContext.AttributeApplication
-                    else None
-                | _ -> None)
-
-    /// Check if we are at an "open" declaration
-    let GetFullNameOfSmallestModuleOrNamespaceAtPoint (parsedInput: ParsedInput, pos: pos) = 
-        let mutable path = []
-        let visitor = 
-            { new AstTraversal.AstVisitorBase() with
-                override this.VisitExpr(_path, _traverseSynExpr, defaultTraverse, expr) = 
-                    // don't need to keep going, namespaces and modules never appear inside Exprs
-                    None 
-                override this.VisitModuleOrNamespace(SynModuleOrNamespace(longId = longId; range = range)) =
-                    if rangeContainsPos range pos then 
-                        path <- path @ longId
-                    None // we should traverse the rest of the AST to find the smallest module 
-            }
-        AstTraversal.Traverse(pos, parsedInput, visitor) |> ignore
-        path |> List.map (fun x -> x.idText) |> List.toArray
diff --git a/src/fsharp/tainted.fs b/src/fsharp/tainted.fs
index 381fb6af6d1..bf0796d202a 100644
--- a/src/fsharp/tainted.fs
+++ b/src/fsharp/tainted.fs
@@ -132,11 +132,7 @@ type internal Tainted<'T> (context: TaintedContext, value: 'T) =
         Tainted(context, u)
 
     member this.PApplyArray(f, methodName, range:range) =        
-#if NO_CHECKNULLS
-        let a : 'U[] = this.Protect f range
-#else
-        let a : 'U[]? = this.Protect f range
-#endif
+        let a : 'U[] MaybeNull = this.Protect f range
         match a with 
         | Null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range)
         | NonNull a -> a |> Array.map (fun u -> Tainted(context,u))
@@ -169,10 +165,10 @@ type internal Tainted<'T> (context: TaintedContext, value: 'T) =
 module internal Tainted =
 
 #if NO_CHECKNULLS
-    let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct =
+    let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure id)
 #else
-    let (|Null|NonNull|) (p:Tainted<'T?>) : Choice> when 'T : not null =
+    let (|Null|NonNull|) (p:Tainted<'T?>) : Choice> when 'T : not null =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure nonNull)
 #endif
 
diff --git a/src/fsharp/tainted.fsi b/src/fsharp/tainted.fsi
index c9aedaf6c9e..8500bd0e199 100644
--- a/src/fsharp/tainted.fsi
+++ b/src/fsharp/tainted.fsi
@@ -78,11 +78,7 @@ type internal Tainted<'T> =
     member PApplyWithProvider : ('T * ITypeProvider -> 'U) * range:range -> Tainted<'U>
 
     /// Apply an operation that returns an array. Unwrap array. Any exception will be attributed to the type provider with an error located at the given range.  String is method name of thing-returning-array, to diagnostically attribute if it is null
-#if NO_CHECKNULLS
-    member PApplyArray : ('T -> 'U[]) * string * range:range -> Tainted<'U>[]
-#else
-    member PApplyArray : ('T -> 'U[]?) * string * range:range -> Tainted<'U>[]
-#endif
+    member PApplyArray : ('T -> 'U[] MaybeNull) * string * range:range -> Tainted<'U>[]
 
     /// Apply an operation that returns an option. Unwrap option. Any exception will be attributed to the type provider with an error located at the given range
     member PApplyOption : ('T -> 'U option) * range:range -> Tainted<'U> option
diff --git a/src/fsharp/utils/FileSystem.fs b/src/fsharp/utils/FileSystem.fs
index 0fcb48a4f80..9110a88c563 100644
--- a/src/fsharp/utils/FileSystem.fs
+++ b/src/fsharp/utils/FileSystem.fs
@@ -533,29 +533,17 @@ type DefaultFileSystem() as this =
 
     abstract IsInvalidPathShim: path: string -> bool
     default _.IsInvalidPathShim(path: string) =
-#if NO_CHECKNULLS
-        let isInvalidPath(p: string) = 
-#else
-        let isInvalidPath(p: string?) = 
-#endif
+        let isInvalidPath(p: string MaybeNull) = 
             match p with
             | Null | "" -> true
             | NonNull p -> p.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 
-#if NO_CHECKNULLS
-        let isInvalidFilename(p: string) = 
-#else
-        let isInvalidFilename(p: string?) = 
-#endif
+        let isInvalidFilename(p: string MaybeNull) = 
             match p with
             | Null | "" -> true
             | NonNull p -> p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1
 
-#if NO_CHECKNULLS
-        let isInvalidDirectory(d: string) = 
-#else
-        let isInvalidDirectory(d: string?) = 
-#endif
+        let isInvalidDirectory(d: string MaybeNull) = 
             match d with
             | Null -> true
             | NonNull d -> d.IndexOfAny(Path.GetInvalidPathChars()) <> -1

From 16106797ea8264b1019b479a56f1d4b11c164730 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 15:14:35 +0000
Subject: [PATCH 066/112] cleanup to align with nullness work

---
 .../AssemblyResolveHandler.fs                 |  14 +--
 .../AssemblyResolveHandler.fsi                |   2 +-
 .../DependencyManager/DependencyProvider.fs   |  33 +++---
 .../NativeDllResolveHandler.fs                |  10 +-
 .../NativeDllResolveHandler.fsi               |   4 +-
 src/fsharp/ErrorLogger.fs                     |   8 +-
 src/fsharp/ExtensionTyping.fs                 | 111 ++++++++++--------
 src/fsharp/absil/illib.fs                     |  12 +-
 src/fsharp/absil/illib.fsi                    |  22 +++-
 src/fsharp/absil/ilreflect.fs                 |   2 +-
 .../service/ServiceParamInfoLocations.fs      |   4 +-
 src/fsharp/symbols/Symbols.fs                 |  13 +-
 src/fsharp/tainted.fs                         |  44 +++----
 src/fsharp/tainted.fsi                        |   4 +-
 src/fsharp/utils/FileSystem.fs                |  70 +++++++++--
 .../DependencyManagerInteractiveTests.fs      |   6 +-
 16 files changed, 224 insertions(+), 135 deletions(-)

diff --git a/src/fsharp/DependencyManager/AssemblyResolveHandler.fs b/src/fsharp/DependencyManager/AssemblyResolveHandler.fs
index bd12e6a955d..40d973c8d03 100644
--- a/src/fsharp/DependencyManager/AssemblyResolveHandler.fs
+++ b/src/fsharp/DependencyManager/AssemblyResolveHandler.fs
@@ -12,7 +12,7 @@ open Internal.Utilities.FSharpEnvironment
 type AssemblyResolutionProbe = delegate of Unit -> seq
 
 /// Type that encapsulates AssemblyResolveHandler for managed packages
-type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProbe) as this =
+type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProbe option) as this =
     let assemblyLoadContextType: Type = Type.GetType("System.Runtime.Loader.AssemblyLoadContext, System.Runtime.Loader", false)
 
     let loadFromAssemblyPathMethod =
@@ -36,8 +36,8 @@ type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProb
 
         let assemblyPaths =
             match assemblyProbingPaths with
-            | null -> Seq.empty
-            | _ ->  assemblyProbingPaths.Invoke()
+            | None -> Seq.empty
+            | Some assemblyProbingPaths ->  assemblyProbingPaths.Invoke()
 
         try
             // args.Name is a displayname formatted assembly version.
@@ -55,7 +55,7 @@ type AssemblyResolveHandlerCoreclr (assemblyProbingPaths: AssemblyResolutionProb
             eventInfo.RemoveEventHandler(defaultAssemblyLoadContext, handler)
 
 /// Type that encapsulates AssemblyResolveHandler for managed packages
-type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProbe) =
+type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProbe option) =
 
     let resolveAssemblyNET (assemblyName: AssemblyName): Assembly =
 
@@ -64,8 +64,8 @@ type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProb
 
         let assemblyPaths =
             match assemblyProbingPaths with
-            | null -> Seq.empty
-            | _ ->  assemblyProbingPaths.Invoke()
+            | None -> Seq.empty
+            | Some assemblyProbingPaths ->  assemblyProbingPaths.Invoke()
 
         try
             // args.Name is a displayname formatted assembly version.
@@ -85,7 +85,7 @@ type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProb
         member _x.Dispose() =
             AppDomain.CurrentDomain.remove_AssemblyResolve(handler)
 
-type AssemblyResolveHandler (assemblyProbingPaths: AssemblyResolutionProbe) =
+type AssemblyResolveHandler (assemblyProbingPaths: AssemblyResolutionProbe option) =
 
     let handler =
         if isRunningOnCoreClr then
diff --git a/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi b/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi
index 9718eb9f2d4..ee4edc144ca 100644
--- a/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi
+++ b/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi
@@ -12,6 +12,6 @@ type AssemblyResolutionProbe = delegate of Unit -> seq
 type AssemblyResolveHandler =
 
     /// Construct a new DependencyProvider
-    new: assemblyProbingPaths: AssemblyResolutionProbe -> AssemblyResolveHandler
+    new: assemblyProbingPaths: AssemblyResolutionProbe option -> AssemblyResolveHandler
 
     interface IDisposable
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fs b/src/fsharp/DependencyManager/DependencyProvider.fs
index 95d2a7d280d..fef925ff2be 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/DependencyManager/DependencyProvider.fs
@@ -76,6 +76,9 @@ module ReflectionHelper =
             e.InnerException
         | _ -> e
 
+    // Shim to match nullness checking library support
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+
 /// Indicate the type of error to report
 []
 type ErrorReportType =
@@ -287,16 +290,13 @@ type ReflectionDependencyManagerProvider(theType: Type,
 
 /// Provides DependencyManagement functions.
 /// Class is IDisposable
-type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativeProbingRoots: NativeResolutionProbe) =
+type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe option, nativeProbingRoots: NativeResolutionProbe option) =
 
     // Note: creating a NativeDllResolveHandler currently installs process-wide handlers
     let dllResolveHandler = new NativeDllResolveHandler(nativeProbingRoots)
 
     // Note: creating a AssemblyResolveHandler currently installs process-wide handlers
-    let assemblyResolveHandler = 
-        match assemblyProbingPaths with 
-        | null -> { new IDisposable with member _.Dispose() = () }
-        | _ -> new AssemblyResolveHandler(assemblyProbingPaths) :> IDisposable
+    let assemblyResolveHandler = new AssemblyResolveHandler(assemblyProbingPaths) :> IDisposable
 
     // Resolution Path = Location of FSharp.Compiler.Service.dll
     let assemblySearchPaths = lazy (
@@ -355,9 +355,11 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr
 
     let cache = ConcurrentDictionary<_,Result>(HashIdentity.Structural)
 
-    new (nativeProbingRoots: NativeResolutionProbe) = new DependencyProvider(null, nativeProbingRoots)
+    new (assemblyProbingPaths: AssemblyResolutionProbe, nativeProbingRoots: NativeResolutionProbe) = new DependencyProvider(Some assemblyProbingPaths, Some nativeProbingRoots)
+
+    new (nativeProbingRoots: NativeResolutionProbe) = new DependencyProvider(None, Some nativeProbingRoots)
 
-    new () = new DependencyProvider(null, null)
+    new () = new DependencyProvider(None, None)
 
     /// Returns a formatted help messages for registered dependencymanagers for the host to present
     member _.GetRegisteredDependencyManagerHelpText (compilerTools, outputDir, errorReport) = [|
@@ -382,31 +384,31 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr
                 | None ->
                     let err, msg = this.CreatePackageManagerUnknownError(compilerTools, outputDir, path.Split(':').[0], reportError)
                     reportError.Invoke(ErrorReportType.Error, err, msg)
-                    null, Unchecked.defaultof
+                    null, null
 
                 | Some kv -> path, kv.Value
             else
-                path, Unchecked.defaultof
+                path, null
         with 
         | e ->
             let e = stripTieWrapper e
             let err, msg = FSComp.SR.packageManagerError(e.Message)
             reportError.Invoke(ErrorReportType.Error, err, msg)
-            null, Unchecked.defaultof
+            null, null
 
     /// Fetch a dependencymanager that supports a specific key
     member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider =
         try
             RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
             |> Map.tryFind key
-            |> Option.defaultValue Unchecked.defaultof
+            |> Option.toObj
 
         with
         | e ->
             let e = stripTieWrapper e
             let err, msg = FSComp.SR.packageManagerError(e.Message)
             reportError.Invoke(ErrorReportType.Error, err, msg)
-            Unchecked.defaultof
+            null
 
     /// Resolve reference for a list of package manager lines
     member _.Resolve (packageManager:IDependencyManagerProvider,
@@ -426,10 +428,9 @@ type DependencyProvider (assemblyProbingPaths: AssemblyResolutionProbe, nativePr
             cache.GetOrAdd(key, System.Func<_,_>(fun _ -> 
                 try
                     let executionRid =
-                        if isNull executionRid then
-                            RidHelpers.platformRid
-                        else
-                            executionRid
+                        match executionRid with
+                        | Null -> RidHelpers.platformRid
+                        | NonNull executionRid -> executionRid
                     Ok (packageManager.ResolveDependencies(implicitIncludeDir, mainScriptName, fileName, scriptExt, packageManagerTextLines, executionTfm, executionRid, timeout))
 
                 with e ->
diff --git a/src/fsharp/DependencyManager/NativeDllResolveHandler.fs b/src/fsharp/DependencyManager/NativeDllResolveHandler.fs
index b389ef1976b..c39cbb7659d 100644
--- a/src/fsharp/DependencyManager/NativeDllResolveHandler.fs
+++ b/src/fsharp/DependencyManager/NativeDllResolveHandler.fs
@@ -16,7 +16,7 @@ open FSharp.Compiler.IO
 type NativeResolutionProbe = delegate of Unit -> seq
 
 /// Type that encapsulates Native library probing for managed packages
-type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe) =
+type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe option) =
 
     let nativeLibraryTryLoad =
         let nativeLibraryType: Type = Type.GetType("System.Runtime.InteropServices.NativeLibrary, System.Runtime.InteropServices", false)
@@ -75,8 +75,8 @@ type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe)
 
         let probe =
             match nativeProbingRoots with
-            | null -> None
-            | _ ->
+            | None -> None
+            | Some nativeProbingRoots ->  
                 nativeProbingRoots.Invoke()
                 |> Seq.tryPick(fun root ->
                     probingFileNames name |> Seq.tryPick(fun name ->
@@ -104,7 +104,7 @@ type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe)
         member _x.Dispose() = eventInfo.RemoveEventHandler(defaultAssemblyLoadContext, handler)
 
 
-type NativeDllResolveHandler (nativeProbingRoots: NativeResolutionProbe) =
+type NativeDllResolveHandler (nativeProbingRoots: NativeResolutionProbe option) =
     let handler: IDisposable option =
         if isRunningOnCoreClr then
             Some (new NativeDllResolveHandlerCoreClr(nativeProbingRoots) :> IDisposable)
@@ -143,6 +143,6 @@ type NativeDllResolveHandler (nativeProbingRoots: NativeResolutionProbe) =
             | None -> ()
             | Some handler -> handler.Dispose()
 
-            let mutable probe:string = null
+            let mutable probe:string = Unchecked.defaultof
             while (addedPaths.TryTake(&probe)) do
                 removeProbeFromProcessPath probe
diff --git a/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi b/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi
index d0845bb94f3..1797b192dd4 100644
--- a/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi
+++ b/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi
@@ -12,8 +12,8 @@ type NativeResolutionProbe = delegate of Unit -> seq
 type NativeDllResolveHandler =
 
     /// Construct a new NativeDllResolveHandler
-    new: nativeProbingRoots: NativeResolutionProbe -> NativeDllResolveHandler
+    new: nativeProbingRoots: NativeResolutionProbe option -> NativeDllResolveHandler
 
-    member internal RefreshPathsInEnvironment: string seq -> unit
+    member internal RefreshPathsInEnvironment: seq -> unit
 
     interface IDisposable
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index 24b7c98b424..15807c9f90d 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -318,14 +318,14 @@ type internal CompileThreadStatic =
         with get() = 
             match box CompileThreadStatic.buildPhase with
             // FUTURE: reenable these asserts, which have historically fired in some compiler service scenarios
-            | null -> (* assert false; *) BuildPhase.DefaultPhase
+            | Null -> (* assert false; *) BuildPhase.DefaultPhase
             | _ -> CompileThreadStatic.buildPhase
         and set v = CompileThreadStatic.buildPhase <- v
             
     static member ErrorLogger
         with get() = 
             match box CompileThreadStatic.errorLogger with
-            | null -> AssertFalseErrorLogger
+            | Null -> AssertFalseErrorLogger
             | _ -> CompileThreadStatic.errorLogger
         and set v = CompileThreadStatic.errorLogger <- v
 
@@ -655,8 +655,8 @@ let NewlineifyErrorString (message:string) = message.Replace(stringThatIsAProxyF
 /// fixes given string by replacing all control chars with spaces.
 /// NOTE: newlines are recognized and replaced with stringThatIsAProxyForANewlineInFlatErrors (ASCII 29, the 'group separator'), 
 /// which is decoded by the IDE with 'NewlineifyErrorString' back into newlines, so that multi-line errors can be displayed in QuickInfo
-let NormalizeErrorString (text : string) =
-    if isNull text then nullArg "text"
+let NormalizeErrorString (text : string MaybeNull) =
+    let text = nullArgCheck "text" text
     let text = text.Trim()
 
     let buf = System.Text.StringBuilder()
diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index ac8cae4f8b7..27bc4a8bf9a 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -63,8 +63,11 @@ module internal ExtensionTyping =
                 let filtered = 
                     [ for t in exportedTypes do 
                           let ca = t.GetCustomAttributes(typeof, true)
-                          if ca <> null && ca.Length > 0 then 
-                              yield t ]
+                          match ca with 
+                          | Null -> ()
+                          | NonNull ca -> 
+                              if ca.Length > 0 then 
+                                  yield t ]
                 filtered
             with e ->
                 let folder = Path.GetDirectoryName loadedDesignTimeAssembly.Location
@@ -82,9 +85,9 @@ module internal ExtensionTyping =
 
     let StripException (e: exn) =
         match e with
-        |   :? TargetInvocationException as e -> e.InnerException
-        |   :? TypeInitializationException as e -> e.InnerException
-        |   _ -> e
+        | :? TargetInvocationException as e -> e.InnerException
+        | :? TypeInitializationException as e -> e.InnerException
+        | _ -> e
 
     /// Create an instance of a type provider from the implementation type for the type provider in the
     /// design-time assembly by using reflection-invoke on a constructor for the type provider.
@@ -165,10 +168,10 @@ module internal ExtensionTyping =
                                 CreateTypeProvider (t, runtimeAssemblyFilename, resolutionEnvironment, isInvalidationSupported,
                                     isInteractive, systemRuntimeContainsType, systemRuntimeAssemblyVersion, m)
                             match box resolver with 
-                            | null -> ()
+                            | Null -> ()
                             | _ -> yield (resolver, ilScopeRefOfRuntimeAssembly)
 
-                      |   None, _ -> 
+                      | None, _ -> 
                           () ]
 
                 with :? TypeProviderError as tpe ->
@@ -182,7 +185,7 @@ module internal ExtensionTyping =
     let unmarshal (t: Tainted<_>) = t.PUntaintNoFailure id
 
     /// Try to access a member on a provided type, catching and reporting errors
-    let TryTypeMember(st: Tainted<_>, fullName, memberName, m, recover, f) =
+    let TryTypeMember<'T,'U>(st: Tainted<'T>, fullName, memberName, m, recover, f: 'T -> 'U) : Tainted<'U> =
         try
             st.PApply (f, m)
         with :? TypeProviderError as tpe -> 
@@ -191,24 +194,19 @@ module internal ExtensionTyping =
 
     /// Try to access a member on a provided type, where the result is an array of values, catching and reporting errors
     let TryTypeMemberArray (st: Tainted<_>, fullName, memberName, m, f) =
-        let result =
-            try
-                st.PApplyArray(f, memberName, m)
-            with :? TypeProviderError as tpe ->
-                tpe.Iter (fun e -> error(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m)))
-                [||]
-
-        match result with 
-        | null -> error(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m)); [||]
-        | r -> r
+        try
+            st.PApplyArray(f, memberName, m)
+        with :? TypeProviderError as tpe ->
+            tpe.Iter (fun e -> error(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m)))
+            [||]
 
     /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
-    let TryTypeMemberNonNull (st: Tainted<_>, fullName, memberName, m, recover, f) =
+    let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
         match TryTypeMember(st, fullName, memberName, m, recover, f) with 
         | Tainted.Null -> 
             errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m)); 
             st.PApplyNoFailure(fun _ -> recover)
-        | r -> r
+        | Tainted.NonNull r -> r
 
     /// Try to access a property or method on a provided member, catching and reporting errors
     let TryMemberMember (mi: Tainted<_>, typeName, memberName, memberMemberName, m, recover, f) = 
@@ -224,7 +222,9 @@ module internal ExtensionTyping =
 
     /// Validate a provided namespace name
     let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string) =
-        if nsp<>null then // Null namespace designates the global namespace.
+        match nsp with 
+        | Null -> ()
+        | NonNull nsp -> 
             if String.IsNullOrWhiteSpace nsp then
                 // Empty namespace is not allowed
                 errorR(Error(FSComp.SR.etEmptyNamespaceOfTypeNotAllowed(name, typeProvider.PUntaint((fun tp -> tp.GetType().Name), m)), m))
@@ -255,7 +255,10 @@ module internal ExtensionTyping =
     // to preserve object identity when presenting the types to the F# compiler.
 
     type ProvidedTypeComparer() = 
-        let key (ty: ProvidedType) = (ty.Assembly.FullName, ty.FullName)
+        let key (ty: ProvidedType) =
+            match ty.Assembly with
+            | Null -> ("", ty.FullName)
+            | NonNull a -> (a.FullName, ty.FullName)
         static member val Instance = ProvidedTypeComparer()
         interface IEqualityComparer with
             member _.GetHashCode(ty: ProvidedType) = hash (key ty)
@@ -784,15 +787,17 @@ module internal ExtensionTyping =
             raise (TypeProviderError(FSComp.SR.etProvidedTypeHasUnexpectedName(expectedName, name), st.TypeProviderDesignation, m))
 
         let namespaceName = TryTypeMember(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal
+
         let rec declaringTypes (st: Tainted) accu =
             match TryTypeMember(st, name, "DeclaringType", m, null, fun st -> st.DeclaringType) with
-            |   Tainted.Null -> accu
-            |   dt -> declaringTypes dt (CheckAndComputeProvidedNameProperty(m, dt, (fun dt -> dt.Name), "Name") :: accu)
+            | Tainted.Null -> accu
+            | dt -> declaringTypes dt (CheckAndComputeProvidedNameProperty(m, dt, (fun dt -> dt.Name), "Name") :: accu)
+
         let path = 
-            [|  match namespaceName with 
-                | null -> ()
-                | _ -> yield! namespaceName.Split([|'.'|])
-                yield! declaringTypes st [] |]
+            [| match namespaceName with 
+               | null -> ()
+               | _ -> yield! namespaceName.Split([|'.'|])
+               yield! declaringTypes st [] |]
         
         if path <> expectedPath then
             let expectedPath = String.Join(".", expectedPath)
@@ -856,22 +861,22 @@ module internal ExtensionTyping =
                         let isGenericMethod = TryMemberMember(mi, fullName, memberName, "IsGenericMethod", m, true, fun mi->mi.IsGenericMethod) |> unmarshal
                         if not isPublic || isGenericMethod then
                             errorR(Error(FSComp.SR.etMethodHasRequirements(fullName, memberName), m))   
-                    |   None ->
+                    | None ->
                     match mi.OfType() with
-                    |   Some subType -> ValidateAttributesOfProvidedType(m, subType)
-                    |   None ->
+                    | Some subType -> ValidateAttributesOfProvidedType(m, subType)
+                    | None ->
                     match mi.OfType() with
                     | Some pi ->
                         // Property must have a getter or setter
                         // TODO: Property must be public etc.
                         let expectRead =
                              match TryMemberMember(pi, fullName, memberName, "GetGetMethod", m, null, fun pi -> pi.GetGetMethod()) with 
-                             |  Tainted.Null -> false 
+                             | Tainted.Null -> false 
                              | _ -> true
                         let expectWrite = 
                             match TryMemberMember(pi, fullName, memberName, "GetSetMethod", m, null, fun pi-> pi.GetSetMethod()) with 
-                            |   Tainted.Null -> false 
-                            |   _ -> true
+                            | Tainted.Null -> false 
+                            | _ -> true
                         let canRead = TryMemberMember(pi, fullName, memberName, "CanRead", m, expectRead, fun pi-> pi.CanRead) |> unmarshal
                         let canWrite = TryMemberMember(pi, fullName, memberName, "CanWrite", m, expectWrite, fun pi-> pi.CanWrite) |> unmarshal
                         match expectRead, canRead with
@@ -941,8 +946,8 @@ module internal ExtensionTyping =
             if displayName = providedNamespaceName then
                 let resolvedType = providedNamespace.PApply((fun providedNamespace -> ProvidedType.CreateNoContext(providedNamespace.ResolveTypeName typeName)), range=m) 
                 match resolvedType with
-                |   Tainted.Null -> None
-                |   result -> 
+                | Tainted.Null -> None
+                | Tainted.NonNull result -> 
                     ValidateProvidedTypeDefinition(m, result, moduleOrNamespace, typeName)
                     Some result
             else
@@ -964,7 +969,7 @@ module internal ExtensionTyping =
         try 
             match ResolveProvidedType(resolver, m, moduleOrNamespace, typeName) with
             | Tainted.Null -> None
-            | ty -> Some ty
+            | Tainted.NonNull ty -> Some ty
         with e -> 
             errorRecovery e m
             None
@@ -975,8 +980,8 @@ module internal ExtensionTyping =
             match st.PApply((fun st -> st.DeclaringType), m) with 
             | Tainted.Null -> 
                match st.PUntaint((fun st -> st.Namespace), m) with 
-               | null -> typeName
-               | ns -> ns + "." + typeName
+               | Null  -> typeName
+               | NonNull ns -> ns + "." + typeName
             | _ -> typeName
 
         let rec encContrib (st: Tainted) = 
@@ -1006,7 +1011,7 @@ module internal ExtensionTyping =
  
             match methBeforeArgs.PApplyWithProvider((fun (mb, provider) -> mb.ApplyStaticArgumentsForMethod(provider, mangledName, staticArgs)), range=m) with 
             | Tainted.Null -> None
-            | methWithArguments -> 
+            | Tainted.NonNull methWithArguments -> 
                 let actualName = methWithArguments.PUntaint((fun x -> x.Name), m)
                 if actualName <> mangledName then 
                     error(Error(FSComp.SR.etProvidedAppliedMethodHadWrongName(methWithArguments.TypeProviderDesignation, mangledName, actualName), m))
@@ -1033,7 +1038,7 @@ module internal ExtensionTyping =
  
             match typeBeforeArguments.PApplyWithProvider((fun (typeBeforeArguments, provider) -> typeBeforeArguments.ApplyStaticArguments(provider, Array.ofList fullTypePathAfterArguments, staticArgs)), range=m) with 
             | Tainted.Null -> None
-            | typeWithArguments -> 
+            | Tainted.NonNull typeWithArguments -> 
                 let actualName = typeWithArguments.PUntaint((fun x -> x.Name), m)
                 let checkTypeName() = 
                     let expectedTypeNameAfterArguments = fullTypePathAfterArguments.[fullTypePathAfterArguments.Length-1]
@@ -1099,8 +1104,8 @@ module internal ExtensionTyping =
                       | _ ->
                           if sp.PUntaint ((fun sp -> sp.IsOptional), range) then 
                               match sp.PUntaint((fun sp -> sp.RawDefaultValue), range) with
-                              | null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
-                              | v -> v
+                              | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
+                              | NonNull v -> v
                           else
                               error(Error(FSComp.SR.etProvidedTypeReferenceMissingArgument spName, range0)))
                     
@@ -1113,16 +1118,20 @@ module internal ExtensionTyping =
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
     let GetPartsOfNamespaceRecover(namespaceName: string) = 
-        if namespaceName=null then []
-        elif  namespaceName.Length = 0 then [""]
-        else splitNamespace namespaceName
+        match namespaceName with 
+        | Null -> [] 
+        | NonNull namespaceName -> 
+            if namespaceName.Length = 0 then [""]
+            else splitNamespace (nonNull namespaceName)
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
     let GetProvidedNamespaceAsPath (m, resolver: Tainted, namespaceName: string) = 
-        if namespaceName<>null && namespaceName.Length = 0 then
-            errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m))  
-
-        GetPartsOfNamespaceRecover namespaceName
+        match namespaceName with 
+        | Null -> [] 
+        | NonNull namespaceName -> 
+            if namespaceName.Length = 0 then
+                errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m))  
+            GetPartsOfNamespaceRecover namespaceName
 
     /// Get the parts of the name that encloses the .NET type including nested types. 
     let GetFSharpPathToProvidedType (st: Tainted, range) = 
@@ -1132,7 +1141,7 @@ module internal ExtensionTyping =
         let rec walkUpNestedClasses(st: Tainted, soFar) =
             match st with
             | Tainted.Null -> soFar
-            | st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), soFar) @ [st.PUntaint((fun st -> st.Name), range)]
+            | Tainted.NonNull st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), soFar) @ [st.PUntaint((fun st -> st.Name), range)]
 
         walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), namespaceParts)
 
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index 97e93e8659f..26980095704 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -34,9 +34,17 @@ module internal PervasiveAutoOpens =
         | [_] -> true
         | _ -> false
 
-    let inline isNonNull x = not (isNull x)
+    let inline isNotNull x = not (isNull x)
 
-    let inline nonNull msg x = if isNull x then failwith ("null: " + msg) else x
+    type MaybeNull<'T when 'T : null> = 'T
+
+    let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
+
+    let inline nonNull<'T when 'T : null> (x: 'T) = match x with null -> raise (NullReferenceException()) | v -> v
+
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+
+    let inline nullArgCheck paramName (x: MaybeNull<'T>) = match x with null -> raise (ArgumentNullException(paramName)) | v -> v
 
     let inline (===) x y = LanguagePrimitives.PhysicalEquality x y
 
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index f6300d3f573..16926112c53 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -23,9 +23,24 @@ module internal PervasiveAutoOpens =
     /// Returns true if the list contains exactly 1 element. Otherwise false.
     val inline isSingleton: l:'a list -> bool
 
-    val inline isNonNull: x:'a -> bool when 'a: null
+    /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
+    /// replacement for 'string?' for example for future FS-1060.
+    type MaybeNull<'T when 'T : null> = 'T
+ 
+    /// Returns true if the argument is non-null.
+    val inline isNotNull: x:MaybeNull<'T> -> bool
 
-    val inline nonNull: msg:string -> x:'a -> 'a when 'a: null
+    /// Asserts the argument is non-null and raises an exception if it is
+    val inline (|NonNullQuick|): MaybeNull<'T> -> 'T
+
+    /// Match on the nullness of an argument.
+    val inline (|Null|NonNull|): MaybeNull<'T> -> Choice when 'T : null
+
+    /// Asserts the argument is non-null and raises an exception if it is
+    val inline nonNull: x:MaybeNull<'T> -> 'T when 'T : null
+
+    /// Checks the argument is non-null
+    val inline nullArgCheck: paramName: string -> x: MaybeNull<'T> -> 'T
 
     val inline ( === ): x:'a -> y:'a -> bool when 'a: not struct
 
@@ -242,9 +257,6 @@ module internal String =
 
     val extractTrailingIndex: str:string -> string * int option
 
-    /// Remove all trailing and leading whitespace from the string, return null if the string is null
-    val trim: value:string -> string
-
     /// Splits a string into substrings based on the strings in the array separators
     val split : options:StringSplitOptions -> separator:string [] -> value:string -> string []
 
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 3ee20370907..7ad20163a1a 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -768,7 +768,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) =
                                 (null: ParameterModifier[]))
             // This can fail if there is an ambiguity w.r.t. return type
             with _ -> null
-        if (isNonNull methInfo && equalTypes resT methInfo.ReturnType) then
+        if (isNotNull methInfo && equalTypes resT methInfo.ReturnType) then
              methInfo
         else
              queryableTypeGetMethodBySearch cenv emEnv parentT mref
diff --git a/src/fsharp/service/ServiceParamInfoLocations.fs b/src/fsharp/service/ServiceParamInfoLocations.fs
index 39182d983be..bec75f547cd 100755
--- a/src/fsharp/service/ServiceParamInfoLocations.fs
+++ b/src/fsharp/service/ServiceParamInfoLocations.fs
@@ -36,7 +36,9 @@ module internal ParameterLocationsImpl =
 
     let isStaticArg (StripParenTypes synType) =
         match synType with
-        | SynType.StaticConstant _ | SynType.StaticConstantExpr _ | SynType.StaticConstantNamed _ -> true
+        | SynType.StaticConstant _
+        | SynType.StaticConstantExpr _
+        | SynType.StaticConstantNamed _ -> true
         | SynType.LongIdent _ -> true // NOTE: this is not a static constant, but it is a prefix of incomplete code, e.g. "TP<42, Arg3" is a prefix of "TP<42, Arg3=6>" and Arg3 shows up as a LongId
         | _ -> false
 
diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs
index 53c9d4bf7bc..b0a6bda8847 100644
--- a/src/fsharp/symbols/Symbols.fs
+++ b/src/fsharp/symbols/Symbols.fs
@@ -585,16 +585,18 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
 
     member x.DeclaredInterfaces = 
         if isUnresolved() then makeReadOnlyCollection [] else
+        let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration [] (fun () -> 
-            [ for ty in GetImmediateInterfacesOfType SkipUnrefInterfaces.Yes cenv.g cenv.amap range0 (generalizedTyconRef cenv.g entity) do 
-                 yield FSharpType(cenv, ty) ])
+            [ for ity in GetImmediateInterfacesOfType SkipUnrefInterfaces.Yes cenv.g cenv.amap range0 ty do 
+                 yield FSharpType(cenv, ity) ])
         |> makeReadOnlyCollection
 
     member x.AllInterfaces = 
         if isUnresolved() then makeReadOnlyCollection [] else
+        let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration [] (fun () -> 
-            [ for ty in AllInterfacesOfType  cenv.g cenv.amap range0 AllowMultiIntfInstantiations.Yes (generalizedTyconRef cenv.g entity) do 
-                 yield FSharpType(cenv, ty) ])
+            [ for ity in AllInterfacesOfType  cenv.g cenv.amap range0 AllowMultiIntfInstantiations.Yes ty do 
+                 yield FSharpType(cenv, ity) ])
         |> makeReadOnlyCollection
     
     member x.IsAttributeType =
@@ -611,7 +613,8 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
 
     member x.BaseType = 
         checkIsResolved()        
-        GetSuperTypeOfType cenv.g cenv.amap range0 (generalizedTyconRef cenv.g entity) 
+        let ty = generalizedTyconRef cenv.g entity
+        GetSuperTypeOfType cenv.g cenv.amap range0 ty
         |> Option.map (fun ty -> FSharpType(cenv, ty)) 
         
     member _.UsesPrefixDisplay = 
diff --git a/src/fsharp/tainted.fs b/src/fsharp/tainted.fs
index 57bb550d972..401efb2a030 100644
--- a/src/fsharp/tainted.fs
+++ b/src/fsharp/tainted.fs
@@ -94,56 +94,56 @@ type internal Tainted<'T> (context: TaintedContext, value: 'T) =
     member _.TypeProviderAssemblyRef = 
         context.TypeProviderAssemblyRef
 
-    member this.Protect f  (range:range) =
+    member this.Protect f  (range: range) =
         try 
             context.Lock.AcquireLock(fun _ -> f value)
         with
-            |   :? TypeProviderError -> reraise()
-            |   :? AggregateException as ae ->
+            | :? TypeProviderError -> reraise()
+            | :? AggregateException as ae ->
                     let errNum,_ = FSComp.SR.etProviderError("", "")
                     let messages = [for e in ae.InnerExceptions -> e.Message]
                     raise <| TypeProviderError(errNum, this.TypeProviderDesignation, range, messages)
-            |   e -> 
+            | e -> 
                     let errNum,_ = FSComp.SR.etProviderError("", "")
                     raise <| TypeProviderError((errNum, e.Message), this.TypeProviderDesignation, range)
 
     member this.TypeProvider = Tainted<_>(context, context.TypeProvider)
 
-    member this.PApply(f,range:range) = 
+    member this.PApply(f,range: range) = 
         let u = this.Protect f range
         Tainted(context, u)
 
-    member this.PApply2(f,range:range) = 
+    member this.PApply2(f,range: range) = 
         let u1,u2 = this.Protect f range
         Tainted(context, u1), Tainted(context, u2)
 
-    member this.PApply3(f,range:range) = 
+    member this.PApply3(f,range: range) = 
         let u1,u2,u3 = this.Protect f range
         Tainted(context, u1), Tainted(context, u2), Tainted(context, u3)
 
-    member this.PApply4(f,range:range) = 
+    member this.PApply4(f,range: range) = 
         let u1,u2,u3,u4 = this.Protect f range
         Tainted(context, u1), Tainted(context, u2), Tainted(context, u3), Tainted(context, u4)
 
     member this.PApplyNoFailure f = this.PApply (f, range0)
 
-    member this.PApplyWithProvider(f,range:range) = 
-        let u = this.Protect (fun x -> f (x,context.TypeProvider)) range
+    member this.PApplyWithProvider(f, range: range) = 
+        let u = this.Protect (fun x -> f (x, context.TypeProvider)) range
         Tainted(context, u)
 
-    member this.PApplyArray(f,methodName,range:range) =        
-        let a = this.Protect f range
+    member this.PApplyArray(f, methodName, range: range) =        
+        let a : 'U[] = this.Protect f range
         match a with 
-        |   null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range)
-        |   _ -> a |> Array.map (fun u -> Tainted(context,u))
+        | Null -> raise <| TypeProviderError(FSComp.SR.etProviderReturnedNull(methodName), this.TypeProviderDesignation, range)
+        | NonNull a -> a |> Array.map (fun u -> Tainted(context,u))
 
-    member this.PApplyOption(f,range:range) =        
+    member this.PApplyOption(f, range: range) =        
         let a = this.Protect f range
         match a with 
         | None ->  None
-        | Some x -> Some (Tainted(context,x))
+        | Some x -> Some (Tainted(context, x))
 
-    member this.PUntaint(f,range:range) = this.Protect f range
+    member this.PUntaint(f,range: range) = this.Protect f range
 
     member this.PUntaintNoFailure f = this.PUntaint(f, range0)
 
@@ -156,15 +156,15 @@ type internal Tainted<'T> (context: TaintedContext, value: 'T) =
 
     member this.OfType<'U> () =
         match box value with
-        |   :? 'U as u -> Some (Tainted(context,u))
-        |   _ -> None
+        | :? 'U as u -> Some (Tainted(context,u))
+        | _ -> None
 
-    member this.Coerce<'U> (range:range) =
+    member this.Coerce<'U> (range: range) =
         Tainted(context, this.Protect(fun value -> box value :?> 'U) range)
 
 module internal Tainted =
-    let (|Null|_|) (p:Tainted<'T>) =
-        if p.PUntaintNoFailure(fun p -> match p with null -> true | _ -> false) then Some() else None
+    let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct =
+        if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure id)
 
     let Eq (p:Tainted<'T>) (v:'T) = p.PUntaintNoFailure (fun pv -> pv = v)
 
diff --git a/src/fsharp/tainted.fsi b/src/fsharp/tainted.fsi
index 06127f5a622..409c66fd5b5 100644
--- a/src/fsharp/tainted.fsi
+++ b/src/fsharp/tainted.fsi
@@ -78,7 +78,7 @@ type internal Tainted<'T> =
     member PApplyWithProvider : ('T * ITypeProvider -> 'U) * range:range -> Tainted<'U>
 
     /// Apply an operation that returns an array. Unwrap array. Any exception will be attributed to the type provider with an error located at the given range.  String is method name of thing-returning-array, to diagnostically attribute if it is null
-    member PApplyArray : ('T -> 'U[]) * string * range:range -> Tainted<'U>[]
+    member PApplyArray : ('T -> 'U[] MaybeNull) * string * range:range -> Tainted<'U>[]
 
     /// Apply an operation that returns an option. Unwrap option. Any exception will be attributed to the type provider with an error located at the given range
     member PApplyOption : ('T -> 'U option) * range:range -> Tainted<'U> option
@@ -101,7 +101,7 @@ type internal Tainted<'T> =
 module internal Tainted =
 
     /// Test whether the tainted value is null
-    val (|Null|_|) : Tainted<'T> -> unit option when 'T : null
+    val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice> when 'T : null and 'T : not struct
 
     /// Test whether the tainted value equals given value. 
     /// Failure in call to equality operation will be blamed on type provider of first operand
diff --git a/src/fsharp/utils/FileSystem.fs b/src/fsharp/utils/FileSystem.fs
index c03feae28b9..517bb5390ed 100644
--- a/src/fsharp/utils/FileSystem.fs
+++ b/src/fsharp/utils/FileSystem.fs
@@ -16,18 +16,25 @@ exception IllegalFileNameChar of string * char
 
 #nowarn "9"
 module internal Bytes =
+
     let b0 n =  (n &&& 0xFF)
+
     let b1 n =  ((n >>> 8) &&& 0xFF)
+
     let b2 n =  ((n >>> 16) &&& 0xFF)
+
     let b3 n =  ((n >>> 24) &&& 0xFF)
 
     let dWw1 n = int32 ((n >>> 32) &&& 0xFFFFFFFFL)
-    let dWw0 n = int32 (n          &&& 0xFFFFFFFFL)
+
+    let dWw0 n = int32 (n &&& 0xFFFFFFFFL)
 
     let get (b:byte[]) n = int32 (Array.get b n)
+
     let zeroCreate n : byte[] = Array.zeroCreate n
 
     let sub ( b:byte[]) s l = Array.sub b s l
+
     let blit (a:byte[]) b c d e = Array.blit a b c d e
 
     let ofInt32Array (arr:int[]) = Array.init arr.Length (fun i -> byte arr.[i])
@@ -303,18 +310,31 @@ type RawByteMemory(addr: nativeptr, length: int, holder: obj) =
 
 []
 type ReadOnlyByteMemory(bytes: ByteMemory) =
+
     member _.Item with get i = bytes.[i]
+
     member _.Length with get () = bytes.Length
+
     member _.ReadAllBytes() = bytes.ReadAllBytes()
+
     member _.ReadBytes(pos, count) = bytes.ReadBytes(pos, count)
+
     member _.ReadInt32 pos = bytes.ReadInt32 pos
+
     member _.ReadUInt16 pos = bytes.ReadUInt16 pos
+
     member _.ReadUtf8String(pos, count) = bytes.ReadUtf8String(pos, count)
+
     member _.Slice(pos, count) = bytes.Slice(pos, count) |> ReadOnlyByteMemory
+
     member _.CopyTo stream = bytes.CopyTo stream
+
     member _.Copy(srcOffset, dest, destOffset, count) = bytes.Copy(srcOffset, dest, destOffset, count)
+
     member _.ToArray() = bytes.ToArray()
+
     member _.AsStream() = bytes.AsReadOnlyStream()
+
     member _.Underlying = bytes
 
 []
@@ -403,39 +423,66 @@ module internal FileSystemUtils =
 
 []
 type IAssemblyLoader =
+
     abstract AssemblyLoadFrom: fileName: string -> Assembly
+
     abstract AssemblyLoad: assemblyName: AssemblyName -> Assembly
 
 []
 type DefaultAssemblyLoader() =
+
     interface IAssemblyLoader with
+
         member _.AssemblyLoadFrom(fileName: string) = Assembly.UnsafeLoadFrom fileName
+
         member _.AssemblyLoad(assemblyName: AssemblyName) = Assembly.Load assemblyName
 
 []
 type IFileSystem =
     // note: do not add members if you can put generic implementation under StreamExtensions below.
+
     abstract AssemblyLoader: IAssemblyLoader
+
     abstract OpenFileForReadShim: filePath: string * ?useMemoryMappedFile: bool * ?shouldShadowCopy: bool -> Stream
+
     abstract OpenFileForWriteShim: filePath: string * ?fileMode: FileMode * ?fileAccess: FileAccess * ?fileShare: FileShare -> Stream
+
     abstract GetFullPathShim: fileName: string -> string
+
     abstract GetFullFilePathInDirectoryShim: dir: string -> fileName: string -> string
+
     abstract IsPathRootedShim: path: string -> bool
+
     abstract NormalizePathShim: path: string -> string
+
     abstract IsInvalidPathShim: path: string -> bool
+
     abstract GetTempPathShim: unit -> string
+
     abstract GetDirectoryNameShim: path: string -> string
+
     abstract GetLastWriteTimeShim: fileName: string -> DateTime
+
     abstract GetCreationTimeShim: path: string -> DateTime
+
     abstract CopyShim: src: string * dest: string * overwrite: bool -> unit
+
     abstract FileExistsShim: fileName: string -> bool
+
     abstract FileDeleteShim: fileName: string -> unit
+
     abstract DirectoryCreateShim: path: string -> string
+
     abstract DirectoryExistsShim: path: string -> bool
+
     abstract DirectoryDeleteShim: path: string -> unit
+
     abstract EnumerateFilesShim: path: string * pattern: string -> string seq
+
     abstract EnumerateDirectoriesShim: path: string -> string seq
+
     abstract IsStableFileHeuristic: fileName: string -> bool
+
     // note: do not add members if you can put generic implementation under StreamExtensions below.
 
 []
@@ -526,14 +573,20 @@ type DefaultFileSystem() as this =
 
     abstract IsInvalidPathShim: path: string -> bool
     default _.IsInvalidPathShim(path: string) =
-        let isInvalidPath(p: string) =
-            String.IsNullOrEmpty p || p.IndexOfAny(Path.GetInvalidPathChars()) <> -1
+        let isInvalidPath(p: string MaybeNull) =
+            match p with
+            | Null | "" -> true
+            | NonNull p -> p.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 
-        let isInvalidFilename(p: string) =
-            String.IsNullOrEmpty p || p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1
+        let isInvalidFilename(p: string MaybeNull) =
+            match p with
+            | Null | "" -> true
+            | NonNull p -> p.IndexOfAny(Path.GetInvalidFileNameChars()) <> -1
 
-        let isInvalidDirectory(d: string) =
-            d=null || d.IndexOfAny(Path.GetInvalidPathChars()) <> -1
+        let isInvalidDirectory(d: string MaybeNull) =
+            match d with
+            | Null -> true
+            | NonNull d -> d.IndexOfAny(Path.GetInvalidPathChars()) <> -1
 
         isInvalidPath path ||
         let directory = Path.GetDirectoryName path
@@ -751,6 +804,7 @@ type internal ByteStream =
     { bytes: ReadOnlyByteMemory
       mutable pos: int
       max: int }
+
     member b.ReadByte() =
         if b.pos >= b.max then failwith "end of stream"
         let res = b.bytes.[b.pos]
@@ -915,7 +969,7 @@ type ByteStorage(getByteMemory: unit -> ReadOnlyByteMemory) =
         byteMemory
 
     member _.GetByteMemory() =
-        match cached with
+        match box cached with
         | null -> getAndCache ()
         | _ ->
             match cached.TryGetTarget() with
diff --git a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
index 56685626162..29fa46609df 100644
--- a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
+++ b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
@@ -390,7 +390,7 @@ printfn ""%A"" result
         resolverPackageRoots <- result.Roots
         resolverReferences <- result.Resolutions
 
-        use _nativeDepencyResolver = new NativeDllResolveHandler(NativeResolutionProbe(nativeProbingRoots))
+        use _nativeDepencyResolver = new NativeDllResolveHandler(Some(NativeResolutionProbe(nativeProbingRoots)))
 
         // Build and execute script
         let referenceText =
@@ -471,7 +471,7 @@ printfn ""%A"" result
         resolverPackageRoots <- result.Roots
         resolverReferences <- result.Resolutions
 
-        use _assemblyResolver = new AssemblyResolveHandler(AssemblyResolutionProbe(assemblyProbingPaths))
+        use _assemblyResolver = new AssemblyResolveHandler(Some(AssemblyResolutionProbe(assemblyProbingPaths)))
 
         // Build and execute script
         let referenceText =
@@ -644,7 +644,7 @@ x |> Seq.iter(fun r ->
 
         // Set up AssemblyResolver to resolve dll's
         do
-            use dp = new AssemblyResolveHandler(AssemblyResolutionProbe(assemblyProbingPaths))
+            use dp = new AssemblyResolveHandler(Some(AssemblyResolutionProbe(assemblyProbingPaths)))
 
             // Invoking a non-existent assembly causes a probe. which should invoke the call back
             try Assembly.Load("NoneSuchAssembly") |> ignore with _ -> ()

From ec91048415c91bf1574faaa91dac7ba2daf522a5 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 15:33:31 +0000
Subject: [PATCH 067/112] fix build

---
 src/fsharp/DependencyManager/AssemblyResolveHandler.fs      | 4 +++-
 src/fsharp/DependencyManager/AssemblyResolveHandler.fsi     | 5 ++++-
 src/fsharp/DependencyManager/NativeDllResolveHandler.fs     | 3 +++
 src/fsharp/DependencyManager/NativeDllResolveHandler.fsi    | 5 ++++-
 .../DependencyManagerInteractiveTests.fs                    | 6 +++---
 5 files changed, 17 insertions(+), 6 deletions(-)

diff --git a/src/fsharp/DependencyManager/AssemblyResolveHandler.fs b/src/fsharp/DependencyManager/AssemblyResolveHandler.fs
index 40d973c8d03..5f17c53a41a 100644
--- a/src/fsharp/DependencyManager/AssemblyResolveHandler.fs
+++ b/src/fsharp/DependencyManager/AssemblyResolveHandler.fs
@@ -85,7 +85,7 @@ type AssemblyResolveHandlerDeskTop (assemblyProbingPaths: AssemblyResolutionProb
         member _x.Dispose() =
             AppDomain.CurrentDomain.remove_AssemblyResolve(handler)
 
-type AssemblyResolveHandler (assemblyProbingPaths: AssemblyResolutionProbe option) =
+type AssemblyResolveHandler internal (assemblyProbingPaths: AssemblyResolutionProbe option) =
 
     let handler =
         if isRunningOnCoreClr then
@@ -93,5 +93,7 @@ type AssemblyResolveHandler (assemblyProbingPaths: AssemblyResolutionProbe optio
         else
             new AssemblyResolveHandlerDeskTop(assemblyProbingPaths) :> IDisposable
 
+    new (assemblyProbingPaths: AssemblyResolutionProbe) = new AssemblyResolveHandler(Option.ofObj assemblyProbingPaths)
+
     interface IDisposable with
         member _.Dispose() = handler.Dispose()
diff --git a/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi b/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi
index ee4edc144ca..8aaf62c4618 100644
--- a/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi
+++ b/src/fsharp/DependencyManager/AssemblyResolveHandler.fsi
@@ -12,6 +12,9 @@ type AssemblyResolutionProbe = delegate of Unit -> seq
 type AssemblyResolveHandler =
 
     /// Construct a new DependencyProvider
-    new: assemblyProbingPaths: AssemblyResolutionProbe option -> AssemblyResolveHandler
+    new: assemblyProbingPaths: AssemblyResolutionProbe -> AssemblyResolveHandler
+
+    /// Construct a new DependencyProvider
+    internal new: assemblyProbingPaths: AssemblyResolutionProbe option -> AssemblyResolveHandler
 
     interface IDisposable
diff --git a/src/fsharp/DependencyManager/NativeDllResolveHandler.fs b/src/fsharp/DependencyManager/NativeDllResolveHandler.fs
index c39cbb7659d..64d90cd1bc7 100644
--- a/src/fsharp/DependencyManager/NativeDllResolveHandler.fs
+++ b/src/fsharp/DependencyManager/NativeDllResolveHandler.fs
@@ -105,6 +105,7 @@ type NativeDllResolveHandlerCoreClr (nativeProbingRoots: NativeResolutionProbe o
 
 
 type NativeDllResolveHandler (nativeProbingRoots: NativeResolutionProbe option) =
+
     let handler: IDisposable option =
         if isRunningOnCoreClr then
             Some (new NativeDllResolveHandlerCoreClr(nativeProbingRoots) :> IDisposable)
@@ -133,6 +134,8 @@ type NativeDllResolveHandler (nativeProbingRoots: NativeResolutionProbe option)
             let path = appendPathSeparator (Environment.GetEnvironmentVariable("PATH"))
             if path.Contains(probe) then Environment.SetEnvironmentVariable("PATH", path.Replace(probe, ""))
 
+    new (nativeProbingRoots: NativeResolutionProbe) = new NativeDllResolveHandler(Option.ofObj nativeProbingRoots)
+
     member internal _.RefreshPathsInEnvironment(roots: string seq) =
         for probePath in roots do
             addProbeToProcessPath probePath
diff --git a/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi b/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi
index 1797b192dd4..0793e2d1681 100644
--- a/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi
+++ b/src/fsharp/DependencyManager/NativeDllResolveHandler.fsi
@@ -12,7 +12,10 @@ type NativeResolutionProbe = delegate of Unit -> seq
 type NativeDllResolveHandler =
 
     /// Construct a new NativeDllResolveHandler
-    new: nativeProbingRoots: NativeResolutionProbe option -> NativeDllResolveHandler
+    new: nativeProbingRoots: NativeResolutionProbe -> NativeDllResolveHandler
+    
+    /// Construct a new NativeDllResolveHandler
+    internal new: nativeProbingRoots: NativeResolutionProbe option -> NativeDllResolveHandler
 
     member internal RefreshPathsInEnvironment: seq -> unit
 
diff --git a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
index 29fa46609df..56685626162 100644
--- a/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
+++ b/tests/FSharp.Compiler.Private.Scripting.UnitTests/DependencyManagerInteractiveTests.fs
@@ -390,7 +390,7 @@ printfn ""%A"" result
         resolverPackageRoots <- result.Roots
         resolverReferences <- result.Resolutions
 
-        use _nativeDepencyResolver = new NativeDllResolveHandler(Some(NativeResolutionProbe(nativeProbingRoots)))
+        use _nativeDepencyResolver = new NativeDllResolveHandler(NativeResolutionProbe(nativeProbingRoots))
 
         // Build and execute script
         let referenceText =
@@ -471,7 +471,7 @@ printfn ""%A"" result
         resolverPackageRoots <- result.Roots
         resolverReferences <- result.Resolutions
 
-        use _assemblyResolver = new AssemblyResolveHandler(Some(AssemblyResolutionProbe(assemblyProbingPaths)))
+        use _assemblyResolver = new AssemblyResolveHandler(AssemblyResolutionProbe(assemblyProbingPaths))
 
         // Build and execute script
         let referenceText =
@@ -644,7 +644,7 @@ x |> Seq.iter(fun r ->
 
         // Set up AssemblyResolver to resolve dll's
         do
-            use dp = new AssemblyResolveHandler(Some(AssemblyResolutionProbe(assemblyProbingPaths)))
+            use dp = new AssemblyResolveHandler(AssemblyResolutionProbe(assemblyProbingPaths))
 
             // Invoking a non-existent assembly causes a probe. which should invoke the call back
             try Assembly.Load("NoneSuchAssembly") |> ignore with _ -> ()

From 95bf88766a41d96fe5eb4eac41ff6f122b8d2b3d Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 17:08:57 +0000
Subject: [PATCH 068/112] fix build and apply null checking to VFSI

---
 FSharp.Profiles.props                         |  11 +-
 .../DependencyManager/DependencyProvider.fs   |   1 +
 .../DependencyManager/DependencyProvider.fsi  |   1 +
 src/fsharp/ExtensionTyping.fsi                |   1 +
 src/fsharp/FSharp.Core/array.fs               |   4 +-
 src/fsharp/FSharp.Core/local.fs               |   2 +-
 src/fsharp/FSharp.Core/option.fs              |   4 +-
 src/fsharp/FSharp.Core/option.fsi             |   8 +-
 src/fsharp/FSharp.Core/prim-types.fs          |   6 +-
 src/fsharp/FSharp.Core/prim-types.fsi         |  10 +-
 src/fsharp/TypedTreeOps.fsi                   |   1 +
 src/fsharp/absil/illib.fsi                    |  11 +-
 src/fsharp/absil/ilnativeres.fs               |   1 +
 src/fsharp/fsi/console.fs                     |   4 +
 src/fsharp/infos.fs                           |   2 +-
 src/fsharp/lib.fs                             |  21 +-
 src/fsharp/service/QuickParse.fsi             |   1 +
 .../BraceCompletionSessionProvider.fs         |  35 +--
 .../ClassificationDefinitions.fs              |  12 +-
 .../CodeLens/CodeLensProvider.fs              |   4 +-
 .../CodeLens/FSharpCodeLensService.fs         |   2 +-
 .../Commands/FsiCommandService.fs             |   8 +-
 .../src/FSharp.Editor/Common/Extensions.fs    |   5 +-
 .../src/FSharp.Editor/Common/Logging.fs       |   2 +-
 vsintegration/src/FSharp.Editor/Common/Vs.fs  |   6 +-
 .../LanguageService/LanguageService.fs        |   2 +-
 .../Navigation/GoToDefinition.fs              |   2 +-
 .../Navigation/NavigableSymbolsService.fs     |   4 +-
 .../Navigation/NavigationBarItemService.fs    |   2 +-
 .../QuickInfo/QuickInfoProvider.fs            |   6 +-
 .../FSharp.LanguageService.Base/ViewFilter.cs |   6 +-
 .../src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj    |   1 +
 vsintegration/src/FSharp.VS.FSI/fsiBasis.fs   |  10 +
 .../src/FSharp.VS.FSI/fsiLanguageService.fs   |  19 +-
 .../src/FSharp.VS.FSI/fsiPackageHooks.fs      |  12 +-
 .../src/FSharp.VS.FSI/fsiSessionToolWindow.fs | 220 ++++++++++--------
 .../src/FSharp.VS.FSI/fsiTextBufferStream.fs  |   5 +-
 vsintegration/src/FSharp.VS.FSI/sessions.fs   |   4 +-
 38 files changed, 254 insertions(+), 202 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index 5f6accdbdda..cb1b072af04 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -2,13 +2,20 @@
 
 
   
-    false
+    true
+    
+    
   
+
   
     BUILDING_WITH_LKG;NO_CHECKNULLS;$(DefineConstants)
   
 
-  
+	
+		NO_NULLCHECKING_FEATURE;$(DefineConstants)
+	
+
+	
   	$(OtherFlags) /langversion:preview
 	  $(OtherFlags) /checknulls
   
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fs b/src/fsharp/DependencyManager/DependencyProvider.fs
index 30ac37e51a2..bd69593e265 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/DependencyManager/DependencyProvider.fs
@@ -7,6 +7,7 @@ open System.IO
 open System.Reflection
 open System.Runtime.InteropServices
 open Internal.Utilities
+open Internal.Utilities.Library
 open Internal.Utilities.FSharpEnvironment
 open FSharp.Reflection
 open System.Collections.Concurrent
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fsi b/src/fsharp/DependencyManager/DependencyProvider.fsi
index 5cac6828984..fae938f9b2b 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fsi
+++ b/src/fsharp/DependencyManager/DependencyProvider.fsi
@@ -4,6 +4,7 @@
 namespace FSharp.Compiler.DependencyManager
 
 open System.Runtime.InteropServices
+open Internal.Utilities.Library
 
 /// The results of ResolveDependencies
 type IResolveDependenciesResult =
diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi
index 19cd689a04a..bc7498cbe27 100755
--- a/src/fsharp/ExtensionTyping.fsi
+++ b/src/fsharp/ExtensionTyping.fsi
@@ -9,6 +9,7 @@ namespace FSharp.Compiler
 open System
 open System.Collections.Concurrent
 open System.Collections.Generic
+open Internal.Utilities.Library
 open FSharp.Core.CompilerServices
 open FSharp.Compiler.AbstractIL.IL
 open FSharp.Compiler.Text
diff --git a/src/fsharp/FSharp.Core/array.fs b/src/fsharp/FSharp.Core/array.fs
index 0fc4707497e..66671b4d2ec 100644
--- a/src/fsharp/FSharp.Core/array.fs
+++ b/src/fsharp/FSharp.Core/array.fs
@@ -562,7 +562,7 @@ namespace Microsoft.FSharp.Collections
                     maskArray.[maskIdx] <- mask
                 count 
 
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
             let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref>) (leftoverMaskOut: byref) =
 #else
             let private createMask<'a> (f: 'a->bool) (src: array<'a>) (maskArrayOut: byref?>) (leftoverMaskOut: byref) =
@@ -652,7 +652,7 @@ namespace Microsoft.FSharp.Collections
 
                 dstIdx
 
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
             let private filterViaMask (maskArray: array) (leftoverMask: uint32) (count: int) (src: array<_>) =
 #else
             let private filterViaMask (maskArray: array?) (leftoverMask: uint32) (count: int) (src: array<_>) =
diff --git a/src/fsharp/FSharp.Core/local.fs b/src/fsharp/FSharp.Core/local.fs
index c9e0589850a..0d3580fd899 100644
--- a/src/fsharp/FSharp.Core/local.fs
+++ b/src/fsharp/FSharp.Core/local.fs
@@ -1087,7 +1087,7 @@ module internal Array =
         if array.Length > 1 then 
             Array.Sort<_>(array, fastComparerForArraySort())
 
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
 #else
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>?) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
diff --git a/src/fsharp/FSharp.Core/option.fs b/src/fsharp/FSharp.Core/option.fs
index 2e207bffd68..3d049e7c161 100644
--- a/src/fsharp/FSharp.Core/option.fs
+++ b/src/fsharp/FSharp.Core/option.fs
@@ -85,7 +85,7 @@ module Option =
     []
     let ofNullable (value:System.Nullable<'T>) = if value.HasValue then Some value.Value else None
 
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     []
     let ofObj value = match value with null -> None | _ -> Some value
 
@@ -181,7 +181,7 @@ module ValueOption =
     []
     let ofNullable (value:System.Nullable<'T>) = if value.HasValue then ValueSome value.Value else ValueNone
 
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     []
     let ofObj value = match value with null -> ValueNone | _ -> ValueSome value
 
diff --git a/src/fsharp/FSharp.Core/option.fsi b/src/fsharp/FSharp.Core/option.fsi
index 952407d10f4..97ed3f3ba3d 100644
--- a/src/fsharp/FSharp.Core/option.fsi
+++ b/src/fsharp/FSharp.Core/option.fsi
@@ -436,7 +436,7 @@ module Option =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     val ofObj: value: 'T -> 'T option  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -456,7 +456,7 @@ module Option =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     val toObj: value: 'T option -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -889,7 +889,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     val ofObj: value: 'T -> 'T voption  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -909,7 +909,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     val toObj: value: 'T voption -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 46db7ca6511..b8d826ef5dd 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -3843,7 +3843,7 @@ namespace Microsoft.FSharp.Core
             | null -> false 
             | _ -> true
 
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
 
         []
         let inline isNullV (value : Nullable<'T>) = not value.HasValue
@@ -3930,7 +3930,7 @@ namespace Microsoft.FSharp.Core
         let inline nullArg (argumentName:string) = 
             raise (new System.ArgumentNullException(argumentName))        
 
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         []
         let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : not null) = 
             match value with 
@@ -3999,7 +3999,7 @@ namespace Microsoft.FSharp.Core
         let inline defaultIfNone defaultValue arg = 
             match arg with None -> defaultValue | Some v -> v
         
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         []
         let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : not null) = 
             match arg with null -> defaultValue | _ -> (# "" arg : 'T #)
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 8ea844cd56b..6f0aad6f174 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -1299,7 +1299,7 @@ namespace Microsoft.FSharp.Core
         val inline FastGenericComparer<'T> : System.Collections.Generic.IComparer<'T> when 'T: comparison 
 
         /// 
Make an F# comparer object for the given type, where it can be null if System.Collections.Generic.Comparer<'T>.Default
-#if BUILDING_WITH_LKG
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T> when 'T : comparison 
 #else
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T>? when 'T : comparison 
@@ -3067,7 +3067,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline defaultIfNone : defaultValue:'T -> arg:'T option -> 'T 
 
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         /// Used to specify a default value for a nullable reference argument in the implementation of a function
         /// The default value of the argument.
         /// A nullable value representing the argument.
@@ -3382,7 +3382,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline isNull: value: 'T -> bool when 'T: null
         
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         /// Determines whether the given value is null.
         /// The value to check.
         /// A choice indicating whether the value is null or not-null.
@@ -3430,7 +3430,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline internal isNotNull : value:'T -> bool when 'T : null
 
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         /// Get the null value for a value type.
         /// In a future revision of nullness support this may be unified with 'null'.
         /// The null value for a value type.
@@ -3533,7 +3533,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline nullArg: argumentName: string -> 'T 
 
-#if !BUILDING_WITH_LKG
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         /// Throw a System.ArgumentNullException if the given value is null exception
         /// 
         /// The argument name.
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index d4287c005a0..11b1ed70a9d 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -6,6 +6,7 @@ module internal FSharp.Compiler.TypedTreeOps
 open System.Collections.Generic
 open System.Collections.Immutable
 open Internal.Utilities.Collections
+open Internal.Utilities.Library
 open Internal.Utilities.Rational
 open FSharp.Compiler.AbstractIL.IL 
 open FSharp.Compiler.ErrorLogger
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index d5675426725..f0190418d0f 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -25,20 +25,17 @@ module internal PervasiveAutoOpens =
 
     val inline isNotNull: x:'a -> bool when 'a: null
 
-    /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
-    /// replacement for 'string?' for example for future FS-1060.
 #if NO_CHECKNULLS
+    /// Indicates that a type may be null. 'MaybeNull' is used internally in the F# compiler as 
+    /// replacement for 'string?' to align with FS-1060.
     type MaybeNull<'T when 'T : null> = 'T
-#else
-    type MaybeNull<'T when 'T : not null> = 'T?
-#endif
 
-#if NO_CHECKNULLS
-    val inline (|NonNullQuick|): 'T -> 'T when 'T : null
     val inline (|NonNullQuick|): 'T -> 'T when 'T : null
     val inline (|Null|NonNull|): 'T -> Choice when 'T : null
     val inline nonNull: x:'T -> 'T when 'T : null
     val inline nullArgCheck: paramName: string -> x: MaybeNull<'T> -> 'T    
+#else
+    type MaybeNull<'T when 'T : not null> = 'T?
 #endif
 
     val inline ( === ): x:'a -> y:'a -> bool when 'a: not struct
diff --git a/src/fsharp/absil/ilnativeres.fs b/src/fsharp/absil/ilnativeres.fs
index 9875e1262e1..83ad4de0561 100644
--- a/src/fsharp/absil/ilnativeres.fs
+++ b/src/fsharp/absil/ilnativeres.fs
@@ -16,6 +16,7 @@ open System.Reflection.Metadata
 open System.Reflection.PortableExecutable
 open System.Runtime.CompilerServices
 open System.Text
+open Internal.Utilities.Library
 
 open Checked
 
diff --git a/src/fsharp/fsi/console.fs b/src/fsharp/fsi/console.fs
index a0e651f67ea..fe32f1ed012 100644
--- a/src/fsharp/fsi/console.fs
+++ b/src/fsharp/fsi/console.fs
@@ -14,8 +14,12 @@ open System.Collections.Generic
 module internal ConsoleOptions =
 
 #if NO_CHECKNULLS
+  type MaybeNull<'T when 'T : null> = 'T
+
   // Shim to match nullness checking library support in preview
   let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+#else
+  type MaybeNull<'T when 'T : not null> = 'T?
 #endif
 
   let readKeyFixup (c:char) =
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index 83f7ec76073..28befccc3b4 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -696,7 +696,7 @@ let OptionalArgInfoOfProvidedParameter (amap: Import.ImportMap) m (provParam : T
 
 /// Compute the ILFieldInit for the given provided constant value for a provided enum type.
 let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo MaybeNull) err = 
-    match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase)),m) with 
+    match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase MaybeNull)),m) with 
 #if NO_CHECKNULLS
     | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name),m),mi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m))   
 #else
diff --git a/src/fsharp/lib.fs b/src/fsharp/lib.fs
index 7513d37e6cb..6192db1187e 100755
--- a/src/fsharp/lib.fs
+++ b/src/fsharp/lib.fs
@@ -25,12 +25,10 @@ let condition s =
 
 let GetEnvInteger e dflt = match Environment.GetEnvironmentVariable(e) with null -> dflt | t -> try int t with _ -> dflt
 
-#if NO_CHECKNULLS
-let dispose (x: IDisposable) =
-#else
-let dispose (x: IDisposable?) = 
-#endif
-    match x with null -> () | NonNullQuick x -> x.Dispose()
+let dispose (x: IDisposable MaybeNull) = 
+    match x with
+    | Null -> ()
+    | NonNull x -> x.Dispose()
 
 //-------------------------------------------------------------------------
 // Library: bits
@@ -364,17 +362,10 @@ type Graph<'Data, 'Id when 'Id : comparison and 'Id : equality>
 // with care.
 //----------------------------------------------------------------------------
 
-//#if BUILDING_WITH_LKG
 type NonNullSlot<'T when 'T : not struct> = 'T
-// The following DEBUG code does not currently compile.
-//#if DEBUG
-//type 'T NonNullSlot = 'T option
-//let nullableSlotEmpty() = None
-//let nullableSlotFull(x) = Some x
-//#else
-//type NonNullSlot<'T when (* 'T : not null and *)  'T : not struct> = 'T?
-//#endif
+
 let nullableSlotEmpty() : NonNullSlot<'T> = Unchecked.defaultof<_>
+
 let nullableSlotFull (x: 'T) : NonNullSlot<'T> = x
 
 //---------------------------------------------------------------------------
diff --git a/src/fsharp/service/QuickParse.fsi b/src/fsharp/service/QuickParse.fsi
index a8ff219130f..0598444e5a2 100644
--- a/src/fsharp/service/QuickParse.fsi
+++ b/src/fsharp/service/QuickParse.fsi
@@ -3,6 +3,7 @@
 namespace FSharp.Compiler.EditorServices
 
 open FSharp.Compiler.Tokenization
+open Internal.Utilities.Library
 
 /// Qualified long name.
 type public PartialLongName =
diff --git a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
index edde3faff69..cccbc2b85fc 100644
--- a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
@@ -42,6 +42,9 @@ module BraceCompletionSessionProviderHelpers =
     [] 
     let BraceCompletion = "Brace_Completion"
 
+#if NO_CHECKNULLS
+[]
+#endif
 type IEditorBraceCompletionSession =
     inherit ILanguageService
 
@@ -53,11 +56,13 @@ type IEditorBraceCompletionSession =
 
     abstract AfterReturn : IBraceCompletionSession * CancellationToken -> unit
 
+#if NO_CHECKNULLS
 []
+#endif
 type IEditorBraceCompletionSessionFactory =
     inherit ILanguageService
 
-    abstract TryCreateSession : Document * openingPosition: int * openingBrace: char * CancellationToken -> IEditorBraceCompletionSession?
+    abstract TryCreateSession : Document * openingPosition: int * openingBrace: char * CancellationToken -> IEditorBraceCompletionSession option
 
 type BraceCompletionSession 
     (
@@ -72,7 +77,7 @@ type BraceCompletionSession
     ) =
 
     let mutable closingPoint = subjectBuffer.CurrentSnapshot.CreateTrackingPoint(openingPoint.Position, PointTrackingMode.Positive)
-    let mutable openingPoint : ITrackingPoint? = null
+    let mutable openingPoint : ITrackingPoint MaybeNull = null
     let editorOperations = editorOperationsFactoryService.GetEditorOperations(textView)
 
     member _.EndSession() =
@@ -506,24 +511,24 @@ type EditorBraceCompletionSessionFactory() =
             //    classifiedSpan.TextSpan.IntersectsWith position &&
             //    not (spanIsString classifiedSpan)))))
 
-    member _.CreateEditorSession(_document, _openingPosition, openingBrace, _cancellationToken) : IEditorBraceCompletionSession? =
+    member _.CreateEditorSession(_document, _openingPosition, openingBrace, _cancellationToken) : IEditorBraceCompletionSession option =
         match openingBrace with
-        | Parenthesis.OpenCharacter -> ParenthesisCompletionSession() :> _
-        | CurlyBrackets.OpenCharacter -> ParenthesisCompletionSession() :> _
-        | SquareBrackets.OpenCharacter -> ParenthesisCompletionSession() :> _
-        | VerticalBar.OpenCharacter -> VerticalBarCompletionSession() :> _
-        | AngleBrackets.OpenCharacter -> AngleBracketCompletionSession() :> _
-        | DoubleQuote.OpenCharacter -> DoubleQuoteCompletionSession() :> _
-        | Asterisk.OpenCharacter -> AsteriskCompletionSession() :> _
-        | _ -> null
+        | Parenthesis.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | CurlyBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | SquareBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | VerticalBar.OpenCharacter -> VerticalBarCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | AngleBrackets.OpenCharacter -> AngleBracketCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | DoubleQuote.OpenCharacter -> DoubleQuoteCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | Asterisk.OpenCharacter -> AsteriskCompletionSession() :> IEditorBraceCompletionSession |> Some
+        | _ -> None
 
     interface IEditorBraceCompletionSessionFactory with
 
-        member this.TryCreateSession(document, openingPosition, openingBrace, cancellationToken) : IEditorBraceCompletionSession? = 
+        member this.TryCreateSession(document, openingPosition, openingBrace, cancellationToken) : IEditorBraceCompletionSession option = 
             if this.IsSupportedOpeningBrace(openingBrace) && this.CheckCodeContext(document, openingPosition, openingBrace, cancellationToken) then
                 this.CreateEditorSession(document, openingPosition, openingBrace, cancellationToken)
             else
-                null
+                None
 
 [)>]
 []
@@ -548,9 +553,7 @@ type BraceCompletionSessionProvider
                 maybe {
                     let! document =       openingPoint.Snapshot.GetOpenDocumentInCurrentContextWithChanges() |> Option.ofObj
                     let! sessionFactory = document.TryGetLanguageService()
-                    let! session =
-                        sessionFactory.TryCreateSession(document, openingPoint.Position, openingBrace, CancellationToken.None)
-                        |> Option.ofObj
+                    let! session = sessionFactory.TryCreateSession(document, openingPoint.Position, openingBrace, CancellationToken.None)
 
                     let undoHistory = undoManager.GetTextBufferUndoManager(textView.TextBuffer).TextBufferUndoHistory
                     return BraceCompletionSession(
diff --git a/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs b/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
index f7a282d9ad3..f25a9108eca 100644
--- a/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
+++ b/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
@@ -157,22 +157,22 @@ module internal ClassificationDefinitions =
             member _.Dispose() = VSColorTheme.remove_ThemeChanged handler
 
     []
-    let FSharpMutableVarClassificationType : ClassificationTypeDefinition? = null
+    let FSharpMutableVarClassificationType : ClassificationTypeDefinition MaybeNull = null
 
     []
-    let FSharpDisposableClassificationType : ClassificationTypeDefinition? = null
+    let FSharpDisposableClassificationType : ClassificationTypeDefinition MaybeNull = null
     
     []
-    let FSharpDisposableLocalValueClassificationType : ClassificationTypeDefinition? = null
+    let FSharpDisposableLocalValueClassificationType : ClassificationTypeDefinition MaybeNull = null
 
     []
-    let FSharpDisposableTopLevelValueClassificationType : ClassificationTypeDefinition? = null
+    let FSharpDisposableTopLevelValueClassificationType : ClassificationTypeDefinition MaybeNull = null
 
     []
-    let FSharpFunctionClassificationType : ClassificationTypeDefinition? = null
+    let FSharpFunctionClassificationType : ClassificationTypeDefinition MaybeNull = null
 
     []
-    let FSharpPrintfClassificationType : ClassificationTypeDefinition? = null
+    let FSharpPrintfClassificationType : ClassificationTypeDefinition MaybeNull = null
 
     [)>]
     []
diff --git a/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs b/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs
index 0735ec8f27d..78ec52488bf 100644
--- a/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs
+++ b/vsintegration/src/FSharp.Editor/CodeLens/CodeLensProvider.fs
@@ -77,12 +77,12 @@ type internal CodeLensProvider
     [); Name("CodeLens");
       Order(Before = PredefinedAdornmentLayers.Text);
       TextViewRole(PredefinedTextViewRoles.Document)>]
-    member val CodeLensAdornmentLayerDefinition : AdornmentLayerDefinition? = null with get, set
+    member val CodeLensAdornmentLayerDefinition : AdornmentLayerDefinition MaybeNull = null with get, set
     
     [); Name("LineLens");
       Order(Before = PredefinedAdornmentLayers.Text);
       TextViewRole(PredefinedTextViewRoles.Document)>]
-    member val LineLensAdornmentLayerDefinition : AdornmentLayerDefinition? = null with get, set
+    member val LineLensAdornmentLayerDefinition : AdornmentLayerDefinition MaybeNull = null with get, set
 
     interface IViewTaggerProvider with
         override _.CreateTagger(view, buffer) =
diff --git a/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs b/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
index 9ece8ebf796..89facc768d9 100644
--- a/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
+++ b/vsintegration/src/FSharp.Editor/CodeLens/FSharpCodeLensService.fs
@@ -36,7 +36,7 @@ type internal CodeLens(taggedText, computed, fullTypeSignature, uiElement) =
     member val TaggedText: Async<(ResizeArray * FSharpNavigation) option> = taggedText
     member val Computed: bool = computed with get, set
     member val FullTypeSignature: string = fullTypeSignature 
-    member val UiElement: UIElement? = uiElement with get, set
+    member val UiElement: UIElement MaybeNull = uiElement with get, set
 
 type internal FSharpCodeLensService
     (
diff --git a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
index 81b0944e92a..17f9397d26d 100644
--- a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
+++ b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
@@ -17,7 +17,7 @@ open Microsoft.VisualStudio.FSharp.Interactive
 
 type internal FsiCommandFilter(serviceProvider: System.IServiceProvider) =
 
-    let loadPackage (guidString: string) : Lazy =
+    let loadPackage (guidString: string) : Lazy =
       lazy(
         let shell = serviceProvider.GetService(typeof) :?> IVsShell
         let packageToBeLoadedGuid = ref (Guid(guidString))       
@@ -39,13 +39,13 @@ type internal FsiCommandFilter(serviceProvider: System.IServiceProvider) =
     interface IOleCommandTarget with
         member x.Exec (pguidCmdGroup, nCmdId, nCmdexecopt, pvaIn, pvaOut) =
             if pguidCmdGroup = VSConstants.VsStd11 && nCmdId = uint32 VSConstants.VSStd11CmdID.ExecuteSelectionInInteractive then
-                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteSelection null null
+                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteSelection
                 VSConstants.S_OK
             elif pguidCmdGroup = VSConstants.VsStd11 && nCmdId = uint32 VSConstants.VSStd11CmdID.ExecuteLineInInteractive then
-                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteLine null null
+                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteLine
                 VSConstants.S_OK
             elif pguidCmdGroup = Guids.guidInteractive && nCmdId = uint32 Guids.cmdIDDebugSelection then
-                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.DebugSelection null null
+                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.DebugSelection
                 VSConstants.S_OK
             elif not (isNull nextTarget) then
                 nextTarget.Exec(&pguidCmdGroup, nCmdId, nCmdexecopt, pvaIn, pvaOut)
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index 9d66bfc8117..7a173f7247b 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -20,6 +20,7 @@ open FSharp.Compiler.Text
 open Microsoft.VisualStudio.FSharp.Editor
 
 #if NO_CHECKNULLS
+type MaybeNull<'T when 'T : null> = 'T
 // Shim to match nullness checking library support in preview
 let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
 let inline nonNull<'T when 'T : null> (x: 'T) = x
@@ -29,6 +30,8 @@ let inline nullArgCheck (argumentName:string) (value: 'T when 'T : not struct) =
     | null -> raise (new System.ArgumentNullException(argumentName))        
     | _ ->  value
 let inline withNull<'T when 'T: not struct> (value : 'T) = value
+#else
+type MaybeNull<'T when 'T : not null> = 'T?
 #endif
 
 type private FSharpGlyph = FSharp.Compiler.EditorServices.FSharpGlyph
@@ -290,7 +293,7 @@ module Exception =
     /// messages recursively.
     let flattenMessage (root: System.Exception) =
 
-        let rec flattenInner (exc: System.Exception?) =
+        let rec flattenInner (exc: System.Exception MaybeNull) =
             match exc with
             | Null -> []
             | NonNull exc -> [exc.Message] @ (flattenInner exc.InnerException)
diff --git a/vsintegration/src/FSharp.Editor/Common/Logging.fs b/vsintegration/src/FSharp.Editor/Common/Logging.fs
index 1ee3297a82a..379901ea8a3 100644
--- a/vsintegration/src/FSharp.Editor/Common/Logging.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Logging.fs
@@ -29,7 +29,7 @@ open Config
 type [] Logger []
     ([)>] serviceProvider: IServiceProvider) =
     let outputWindow =
-        serviceProvider.GetService()
+        serviceProvider.GetService()
         |> Option.ofObj
 
     let createPane () =
diff --git a/vsintegration/src/FSharp.Editor/Common/Vs.fs b/vsintegration/src/FSharp.Editor/Common/Vs.fs
index a7333d264f5..33a0b14299a 100644
--- a/vsintegration/src/FSharp.Editor/Common/Vs.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Vs.fs
@@ -65,14 +65,14 @@ module internal VsTextLines =
         dataBuffer.CurrentSnapshot.GetText()
 
 module internal VsRunningDocumentTable = 
-    let FindDocumentWithoutLocking(rdt:IVsRunningDocumentTable, url:string) : (IVsHierarchy? * IVsTextLines?) option =
-        let (hr:int, hier:IVsHierarchy?, _itemid:uint32, unkData:IntPtr, _cookie:uint32) = rdt.FindAndLockDocument(uint32 _VSRDTFLAGS.RDT_NoLock, url)
+    let FindDocumentWithoutLocking(rdt:IVsRunningDocumentTable, url:string) : (IVsHierarchy MaybeNull * IVsTextLines MaybeNull) option =
+        let (hr:int, hier:IVsHierarchy MaybeNull, _itemid:uint32, unkData:IntPtr, _cookie:uint32) = rdt.FindAndLockDocument(uint32 _VSRDTFLAGS.RDT_NoLock, url)
         try
             if Com.Succeeded(hr) then 
                 let bufferObject = 
                     if unkData=IntPtr.Zero then null
                     else Marshal.GetObjectForIUnknown(unkData)
-                let buffer : IVsTextLines? = 
+                let buffer : IVsTextLines MaybeNull = 
                     match bufferObject with 
                     | :? IVsTextLines as tl -> tl
                     | _ -> null
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
index aacd40b93fe..debefdf12c8 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
@@ -33,7 +33,7 @@ open Microsoft.CodeAnalysis.Host.Mef
 type internal RoamingProfileStorageLocation(keyName: string) =
     inherit OptionStorageLocation()
     
-    member _.GetKeyNameForLanguage(languageName: string?) =
+    member _.GetKeyNameForLanguage(languageName: string MaybeNull) =
         let unsubstitutedKeyName = keyName
         match languageName with
         | Null -> unsubstitutedKeyName
diff --git a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
index f15370f6784..d9340b4c1a1 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
@@ -29,7 +29,7 @@ open FSharp.Compiler.Tokenization
 
 module private Symbol =
     let fullName (root: ISymbol) : string =
-        let rec inner parts (sym: ISymbol?) =
+        let rec inner parts (sym: ISymbol MaybeNull) =
             match sym with
             | Null ->
                 parts
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
index b746777dbd2..b24da0e55e3 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
@@ -34,7 +34,7 @@ type internal FSharpNavigableSymbolSource(metadataAsSource, serviceProvider: ISe
     let statusBar = StatusBar(serviceProvider.GetService())
 
     interface INavigableSymbolSource with
-        member _.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) : Task ? =
+        member _.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) : Task MaybeNull =
             // Yes, this is a code smell. But this is how the editor API accepts what we would treat as None.
             if disposed then null
             else
@@ -65,7 +65,7 @@ type internal FSharpNavigableSymbolSource(metadataAsSource, serviceProvider: ISe
 
                             match result with
                             | FSharpGoToDefinitionResult.NavigableItem(navItem) ->
-                                return FSharpNavigableSymbol(navItem, symbolSpan, gtd, statusBar) :> INavigableSymbol?
+                                return FSharpNavigableSymbol(navItem, symbolSpan, gtd, statusBar) :> INavigableSymbol MaybeNull
 
                             | FSharpGoToDefinitionResult.ExternalAssembly(targetSymbolUse, metadataReferences) ->
                                 let nav =
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
index a6458274ee0..a7ba5d9286a 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
@@ -10,7 +10,7 @@ open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Editor
 
 open FSharp.Compiler.EditorServices
 
-type internal NavigationBarSymbolItem(text, glyph, spans, childItems: FSharpNavigationBarItem[]?) =
+type internal NavigationBarSymbolItem(text, glyph, spans, childItems: FSharpNavigationBarItem[] MaybeNull) =
     inherit FSharpNavigationBarItem(text, glyph, spans, childItems)
 
 [)>]
diff --git a/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs b/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
index 8b02c34a912..6f98e479a80 100644
--- a/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
+++ b/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
@@ -67,10 +67,10 @@ type internal FSharpAsyncQuickInfoSource
 
         // This method can be called from the background thread.
         // Do not call IServiceProvider.GetService here.
-        override _.GetQuickInfoItemAsync(session:IAsyncQuickInfoSession, cancellationToken:CancellationToken) : Task =
+        override _.GetQuickInfoItemAsync(session:IAsyncQuickInfoSession, cancellationToken:CancellationToken) : Task =
             let triggerPoint = session.GetTriggerPoint(textBuffer.CurrentSnapshot)
             match triggerPoint.HasValue with
-            | false -> Task.FromResult(null)
+            | false -> Task.FromResult(null)
             | true ->
                 let triggerPoint = triggerPoint.GetValueOrDefault()
                 asyncMaybe {
@@ -89,7 +89,7 @@ type internal FSharpAsyncQuickInfoSource
                         let navigation = FSharpNavigation(statusBar, metadataAsSource, document, symbolUseRange)
                         let content = QuickInfoViewProvider.provideContent(imageId, mainDescription, docs, navigation)
                         let span = getTrackingSpan quickInfo.Span
-                        return (QuickInfoItem(span, content) : QuickInfoItem?)
+                        return (QuickInfoItem(span, content) : QuickInfoItem MaybeNull)
 
                     | Some sigQuickInfo, Some targetQuickInfo ->
                         let mainDescription, targetDocumentation, sigDocumentation, typeParameterMap, exceptions, usage = ResizeArray(), ResizeArray(), ResizeArray(), ResizeArray(), ResizeArray(), ResizeArray()
diff --git a/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs b/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs
index 5026bc3d022..e1b22de4d3c 100644
--- a/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs
+++ b/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs
@@ -543,12 +543,12 @@ public virtual bool HandlePreExec(ref Guid guidCmdGroup, uint nCmdId, uint nCmde
             {
                 if (nCmdId == (uint) Microsoft.VisualStudio.VSConstants.VSStd11CmdID.ExecuteSelectionInInteractive)
                 {
-                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteSelection, null, null);
+                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteSelection);
                     return true;
                 }
                 else if (nCmdId == (uint) Microsoft.VisualStudio.VSConstants.VSStd11CmdID.ExecuteLineInInteractive)
                 {
-                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteLine, null, null);
+                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteLine);
                     return true;
                 }
             }
@@ -556,7 +556,7 @@ public virtual bool HandlePreExec(ref Guid guidCmdGroup, uint nCmdId, uint nCmde
             {
                 if (nCmdId == cmdIDDebugSelection)
                 {
-                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.DebugSelection, null, null);
+                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.DebugSelection);
                     return true;
                 }
             }
diff --git a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
index 3ef912d65fd..1c60e80ba27 100644
--- a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
+++ b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
@@ -9,6 +9,7 @@
     $(OtherFlags) --subsystemversion:6.00
     $(OtherFlags) --langversion:preview 
     false
+    true
   
 
   
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
index 8e4d3974761..7d44d3f3abe 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
@@ -57,6 +57,16 @@ module internal Guids =
     let fsiContentTypeName              = "FSharpInteractive"
 
 module internal Util =
+
+#if NO_CHECKNULLS
+    type MaybeNull<'T when 'T : null> = 'T
+
+    // Shim to match nullness checking library support in preview
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+#else
+    type MaybeNull<'T when 'T : not null> = 'T?
+#endif
+
     /// Utility function to create an instance of a class from the local registry. [From Iron Python].
     let CreateObject (globalProvider:System.IServiceProvider) (classType:Type,interfaceType:Type) =
         // Follows IronPython sample. See ConsoleWindow.CreateObject
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs b/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
index 160b7a204fa..42b13cc969f 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
@@ -85,7 +85,7 @@ type internal FsiMethods() =
     override this.GetParameterCount(i:int) = 0
     override this.GetParameterInfo(i,param_i,name:byref,display:byref,description:byref) =
         name <- items.[i]; display <- ""; description <- ""
-    override this.GetType(i:int) = null:string
+    override this.GetType(i:int) : string MaybeNull = null
 
 // FsiSource
 type internal FsiSource(service:LanguageService, textLines:IVsTextLines, colorizer:Colorizer) =
@@ -128,7 +128,7 @@ type internal FsiAuthoringScope(sessions:FsiSessions option,readOnlySpanGetter:u
                        col      : int,
                        span     : byref) =
         span <- new TextSpan()
-        null : string
+        null
 
 type internal FsiViewFilter(mgr:CodeWindowManager,view:IVsTextView) =
     inherit ViewFilter(mgr,view)
@@ -179,9 +179,9 @@ module internal Helpers =
 type internal FsiLanguageService() = 
     inherit LanguageService()
 
-    let mutable preferences        = null : LanguagePreferences     
-    let mutable scanner            = null : IScanner
-    let mutable sessions           = None : Session.FsiSessions option
+    let mutable preferences : LanguagePreferences MaybeNull = null
+    let mutable scanner : IScanner option = None
+    let mutable sessions : Session.FsiSessions option = None
     let mutable readOnlySpanGetter = (fun () -> new TextSpan())
 
     let readOnlySpan() = readOnlySpanGetter() // do not eta-contract, readOnlySpanGetter is mutable.
@@ -198,9 +198,12 @@ type internal FsiLanguageService() =
         preferences
         
     override this.GetScanner(buffer:IVsTextLines) =
-        if isNull scanner then
-            scanner <- (new FsiScanner(buffer) :> IScanner)
-        scanner
+        match scanner with
+        | None ->
+            let res = new FsiScanner(buffer) :> IScanner
+            scanner <- Some res
+            res
+        | Some scanner -> scanner
         
     override this.ParseSource(req:ParseRequest) =
         (new FsiAuthoringScope(sessions,readOnlySpan) :> AuthoringScope)
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs b/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
index 72e4efd356a..9c4994c1e32 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
@@ -60,12 +60,12 @@ module internal Hooks =
     let private withFSIToolWindow (this:Package) f =
         queryFSIToolWindow true this f ()
 
-    let OnMLSend (this:Package) (action : FsiEditorSendAction) (sender:obj) (e:EventArgs?) =
+    let OnMLSend (this:Package) (action : FsiEditorSendAction) =
         withFSIToolWindow this (fun window ->
             match action with
-            | ExecuteSelection -> window.MLSendSelection(sender, e)
-            | ExecuteLine -> window.MLSendLine(sender, e)
-            | DebugSelection -> window.MLDebugSelection(sender, e)
+            | ExecuteSelection -> window.MLSendSelection()
+            | ExecuteLine -> window.MLSendLine()
+            | DebugSelection -> window.MLDebugSelection()
         )
 
     let AddReferencesToFSI (this:Package) references =
@@ -77,7 +77,7 @@ module internal Hooks =
     // FxCop request this function not be public
     let private supportWhenFSharpDocument (sender:obj) (e:EventArgs) =    
         let command = sender :?> OleMenuCommand       
-        if command <> null then                        
+        if box command <> null then                        
             let looksLikeFSharp,haveSelection = 
                 try // catch all exceptions from this block
                     let providerGlobal   = Package.GetGlobalService(typeof) :?> IOleServiceProvider
@@ -117,7 +117,7 @@ module internal Hooks =
     let fsiConsoleWindowPackageInitalizeSited (this:Package) (commandService : OleMenuCommandService) =
         if not hasBeenInitialized then
             hasBeenInitialized <- true
-            if null <> commandService then
+            if null <> box commandService then
 
                 // Create the command for the tool window
                 let id  = new CommandID(Guids.guidFsiPackageCmdSet,int32 Guids.cmdIDLaunchFsiToolWindow)
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs b/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
index 927690ce79f..729dd394bb9 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
@@ -13,6 +13,7 @@ open Microsoft.VisualStudio.Shell
 open Microsoft.VisualStudio.TextManager.Interop
 open Microsoft.VisualStudio.Package
 open EnvDTE
+open Util
 
 open Microsoft.VisualStudio.ComponentModelHost
 open Microsoft.VisualStudio.Editor
@@ -122,9 +123,9 @@ type internal FsiToolWindow() as this =
     let textStream = new TextBufferStream(textViewAdapter.GetDataBuffer(textLines), contentTypeRegistry)
     let synchronizationContext = System.Threading.SynchronizationContext.Current
     let win32win = { new System.Windows.Forms.IWin32Window with member _.Handle = textView.GetWindowHandle()}
-    let mutable textView       = textView
-    let mutable textLines      = textLines
-    let mutable commandService = null
+    let mutable textView : IVsTextView MaybeNull = textView
+    let mutable textLines : IVsTextLines MaybeNull = textLines
+    let mutable commandService : OleMenuCommandService MaybeNull = null
     let mutable commandList : OleMenuCommand list = []
 
     // Set a function that gets the current ReadOnly span for the text of this instance.
@@ -196,8 +197,10 @@ type internal FsiToolWindow() as this =
     do  fsiLangService.Sessions <- sessions    
 
     let writeText scroll (str:string) =
-        if str <> null && textLines <> null then
-            lock textLines (fun () ->
+        match textLines with
+        | Null -> ()
+        | NonNull lines -> 
+            lock lines (fun () ->
                 textStream.DirectWrite(fixServerPrompt str)
                 if scroll then 
                     setScrollToEndOfBuffer()
@@ -243,32 +246,34 @@ type internal FsiToolWindow() as this =
     // or else by pressing Enter in the REPL window.
     do  showInitialMessageNetCore false
         if not Session.SessionsProperties.fsiUseNetCore then 
-            sessions.Restart(null)
+            sessions.Restart(None)
 
     let clearUndoStack (textLines:IVsTextLines) = // Clear the UNDO stack.
         let undoManager = textLines.GetUndoManager() |> throwOnFailure1
         undoManager.DiscardFrom(null)
             
     let setCursorAtEndOfBuffer() =
-        if null <> textView && null <> textLines then            
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
             let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
             textView.SetCaretPos(lastLine, lastIndex)             |> throwOnFailure0                
             setScrollToEndOfBuffer()
             setScrollToStartOfLine()
+        | _ -> ()
         
     /// Returns true if the current position is inside the writable section of the buffer.
     let isCurrentPositionInInputArea() =
-        if (null = textView) (*|| (null = textStream.ReadOnlyMarker)*) then
-            false
-        else
+        match textView with
+        | Null -> false
+        | NonNull textView ->
             let span = textStream.ReadOnlyMarkerSpan
             let line,column = textView.GetCaretPos() |> throwOnFailure2
             (line > span.iEndLine) || ((line = span.iEndLine) && (column >= span.iEndIndex))
             
     let isSelectionIntersectsWithReadonly() =
-        if null = textView then
-            false
-        else
+        match textView with
+        | Null -> false
+        | NonNull textView ->
             let span = textStream.ReadOnlyMarkerSpan
             let isInInputArea (line,column) = (line > span.iEndLine) || ((line = span.iEndLine) && (column >= span.iEndIndex))
             let (anchorLine,anchorCol,endLine,endCol) = textView.GetSelection() |> throwOnFailure4
@@ -276,31 +281,37 @@ type internal FsiToolWindow() as this =
 
     /// Returns true if the current position is at the start of the writable section of the buffer.
     let isCurrentPositionAtStartOfInputArea() =
-        if (null = textView) (*|| (null = textStream.ReadOnlyMarker)*) then
-            false
-        else
+        match textView with
+        | Null -> false
+        | NonNull textView ->
             let line,column = textView.GetCaretPos() |> throwOnFailure2
             let span = textStream.ReadOnlyMarkerSpan
             (line = span.iEndLine && column <= span.iEndIndex)
             
     let getInputAreaText() = 
-        let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
-        let span = textStream.ReadOnlyMarkerSpan
-        let text = textLines.GetLineText(span.iEndLine,span.iEndIndex,lastLine,lastIndex) |> throwOnFailure1
-        text
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+            let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
+            let span = textStream.ReadOnlyMarkerSpan
+            let text = textLines.GetLineText(span.iEndLine,span.iEndIndex,lastLine,lastIndex) |> throwOnFailure1
+            text
+        | _ -> ""
 
     let setInputAreaText (str:string) =        
-        lock textLines (fun () ->
-            let  span = textStream.ReadOnlyMarkerSpan
-            let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
-            let strHandle = GCHandle.Alloc(str, GCHandleType.Pinned)
-            try 
-                textLines.ReplaceLines(span.iEndLine, span.iEndIndex, lastLine, lastIndex, strHandle.AddrOfPinnedObject(), str.Length, null) |> throwOnFailure0
-            finally
-                strHandle.Free()
-        )
-
-    let executeTextNoHistory sourceFile (text:string) =
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+            lock textLines (fun () ->
+                let  span = textStream.ReadOnlyMarkerSpan
+                let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
+                let strHandle = GCHandle.Alloc(str, GCHandleType.Pinned)
+                try 
+                    textLines.ReplaceLines(span.iEndLine, span.iEndIndex, lastLine, lastIndex, strHandle.AddrOfPinnedObject(), str.Length, null) |> throwOnFailure0
+                finally
+                    strHandle.Free()
+            )
+        | _ -> ()
+
+    let executeTextNoHistory (sourceFile: string option) (text:string) =
         sessions.Ensure(sourceFile)
         textStream.DirectWriteLine()
         sessions.SendInput(text)
@@ -308,7 +319,7 @@ type internal FsiToolWindow() as this =
         
     let executeUserInput() = 
         if isCurrentPositionInInputArea() then
-            sessions.Ensure(null)
+            sessions.Ensure(None)
             let text = getInputAreaText()
             textStream.ExtendReadOnlyMarker()
             textStream.DirectWriteLine()
@@ -321,15 +332,13 @@ type internal FsiToolWindow() as this =
     /// Supported command when input is permitted.
     let supportWhenInInputArea (sender:obj) (args:EventArgs) =    
         let command = sender :?> MenuCommand
-        if null <> command then // are these null checks needed?
-            let enabled = not source.IsCompletorActive && isCurrentPositionInInputArea()
-            command.Supported <- enabled
+        let enabled = not source.IsCompletorActive && isCurrentPositionInInputArea()
+        command.Supported <- enabled
 
     /// Support command except when completion is active.    
     let supportUnlessCompleting (sender:obj) (args:EventArgs) =    
         let command = sender :?> MenuCommand
-        if null <> command then
-            command.Supported <- not source.IsCompletorActive
+        command.Supported <- not source.IsCompletorActive
 
     let haveTextViewSelection() =        
         let res,text = textView.GetSelectedText()
@@ -337,50 +346,54 @@ type internal FsiToolWindow() as this =
 
     /// Support when at the start of the input area (e.g. to enable NoAction on LEFT).
     let supportWhenAtStartOfInputArea (sender:obj) (e:EventArgs) =
-        let command = sender :?> MenuCommand       
-        if command <> null then
-            command.Supported <- not source.IsCompletorActive && isCurrentPositionAtStartOfInputArea()
+        let command = sender :?> MenuCommand
+        command.Supported <- not source.IsCompletorActive && isCurrentPositionAtStartOfInputArea()
 
     /// Support when at the start of the input area AND no-selection (e.g. to enable NoAction on BACKSPACE).
     let supportWhenAtStartOfInputAreaAndNoSelection (sender:obj) (e:EventArgs) =
         let command = sender :?> MenuCommand
-        if command <> null then
-            command.Supported  <- isCurrentPositionAtStartOfInputArea()
+        command.Supported  <- isCurrentPositionAtStartOfInputArea()
             
     let supportWhenSelectionIntersectsWithReadonlyOrNoSelection (sender:obj) (_:EventArgs) =
         let command = sender :?> MenuCommand
-        if command <> null then
-            command.Supported  <- isSelectionIntersectsWithReadonly() || not (haveTextViewSelection())
+        command.Supported  <- isSelectionIntersectsWithReadonly() || not (haveTextViewSelection())
 
     // NOTE: On* are command handlers.
 
     /// Handles HOME command, move to either start of line (or end of read only region is applicable).    
     let onHome (sender:obj) (e:EventArgs) =
-        let currentLine,currentColumn = textView.GetCaretPos() |> throwOnFailure2
-        let span = textStream.ReadOnlyMarkerSpan
-        if currentLine = span.iEndLine then
-            textView.SetCaretPos(currentLine,span.iEndIndex) |> throwOnFailure0
-        else
-            textView.SetCaretPos(currentLine,0) |> throwOnFailure0            
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+            let currentLine,currentColumn = textView.GetCaretPos() |> throwOnFailure2
+            let span = textStream.ReadOnlyMarkerSpan
+            if currentLine = span.iEndLine then
+                textView.SetCaretPos(currentLine,span.iEndIndex) |> throwOnFailure0
+            else
+                textView.SetCaretPos(currentLine,0) |> throwOnFailure0
+        | _ -> ()
 
     /// Handle 'Shift' + 'HOME', move to start of line (or end or readonly area if applicable).    
     let onShiftHome (sender:obj) (args:EventArgs) =        
-        let line,endColumn = textView.GetCaretPos() |> throwOnFailure2
-        let span = textStream.ReadOnlyMarkerSpan
-        let startColumn = 
-            if line = span.iEndLine (* && endColumn >= span.iEndIndex *) then
-                span.iEndIndex
-            else
-                0
-        textView.SetSelection(line, endColumn, line, startColumn) |> throwOnFailure0
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+            let line,endColumn = textView.GetCaretPos() |> throwOnFailure2
+            let span = textStream.ReadOnlyMarkerSpan
+            let startColumn = 
+                if line = span.iEndLine then
+                    span.iEndIndex
+                else
+                    0
+            textView.SetSelection(line, endColumn, line, startColumn) |> throwOnFailure0
+        | _ -> ()
 
     /// Hanlde no-op, used to overwrite some standard command with an empty action.
     let onNoAction (sender:obj) (e:EventArgs) = ()
     
-    
     /// Handle "Clear Pane". Clear input and all but the last ReadOnly line (probably the prompt).    
     let onClearPane (sender:obj) (args:EventArgs) =
-        lock textLines (fun () ->        
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+          lock textLines (fun () ->        
             // ReadOnly off, then upto the last line and then the input area, then ReadOnly on.
             let span = textStream.ReadOnlyMarkerSpan
             textStream.ResetReadOnlyMarker()
@@ -396,11 +409,14 @@ type internal FsiToolWindow() as this =
             textView.SetCaretPos(0,span.iEndIndex) |> throwOnFailure0
 
             clearUndoStack textLines // ClearPane should not be an undo-able operation
-        )
+          )
+        | _ -> ()
 
     let showContextMenu (sender:obj) (args:EventArgs) =
         let uiShell = provider.GetService(typeof) :?> IVsUIShell
-        if null <> uiShell then
+        match box uiShell with
+        | null -> ()
+        | _ ->
             let pt   = System.Windows.Forms.Cursor.Position
             let pnts = [| new POINTS(x=int16 pt.X,y=int16 pt.Y) |]
             let mutable menuGuid = Guids.guidFsiConsoleCmdSet
@@ -410,30 +426,36 @@ type internal FsiToolWindow() as this =
         sessions.Interrupt() |> ignore
   
     let onRestart (sender:obj) (args:EventArgs) =
-        sessions.Kill() // When Kill() returns there should be no more output/events from that session
-        flushResponseBuffer()  // flush output and errors from the killed session that have been buffered, but have not yet come through.
-        lock textLines (fun () ->        
-            // Clear all prior to restart
-            textStream.ResetReadOnlyMarker()            
-            textView.SetCaretPos(0,0) |> throwOnFailure0
-            let lastLine,lastColumn = textLines.GetLastLineIndex() |> throwOnFailure2
-            textLines.ReplaceLines(0, 0, lastLine, lastColumn, IntPtr.Zero, 0, null) |> throwOnFailure0
-        )
-        clearUndoStack textLines // The reset clear should not be undoable.
-        showInitialMessageNetCore true
-        if not Session.SessionsProperties.fsiUseNetCore then 
-            sessions.Restart(null)
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+            sessions.Kill() // When Kill() returns there should be no more output/events from that session
+            flushResponseBuffer()  // flush output and errors from the killed session that have been buffered, but have not yet come through.
+            lock textLines (fun () ->        
+                // Clear all prior to restart
+                textStream.ResetReadOnlyMarker()            
+                textView.SetCaretPos(0,0) |> throwOnFailure0
+                let lastLine,lastColumn = textLines.GetLastLineIndex() |> throwOnFailure2
+                textLines.ReplaceLines(0, 0, lastLine, lastColumn, IntPtr.Zero, 0, null) |> throwOnFailure0
+            )
+            clearUndoStack textLines // The reset clear should not be undoable.
+            showInitialMessageNetCore true
+            if not Session.SessionsProperties.fsiUseNetCore then 
+                sessions.Restart(None)
+        | _ -> ()
 
     /// Handle RETURN, unless Intelisense completion is in progress.
     let onReturn (sender:obj) (e:EventArgs) =    
-        lock textLines (fun () ->
-            if not sessions.Alive then
-                sessions.Restart(null)
-            else
-                if isCurrentPositionInInputArea() then                                            
-                    executeUserInput()
-                    setCursorAtEndOfBuffer()
-        )
+        match textView, textLines with
+        | NonNull textView, NonNull textLines ->
+            lock textLines (fun () ->
+                if not sessions.Alive then
+                    sessions.Restart(None)
+                else
+                    if isCurrentPositionInInputArea() then                                            
+                        executeUserInput()
+                        setCursorAtEndOfBuffer()
+            )
+        | _ -> ()
 
     let showNoActivate() = 
         let frame = this.Frame :?> IVsWindowFrame
@@ -492,7 +514,7 @@ type internal FsiToolWindow() as this =
     // if not, pops a dialog warning the user
     let checkDebuggability () =       
         if not sessions.Alive then
-            sessions.Restart(null)
+            sessions.Restart(None)
 
         // debug experience is good when optimizations are off and debug info is produced
         if ArgParsing.debugInfoEnabled sessions.ProcessArgs && not (ArgParsing.optimizationsEnabled sessions.ProcessArgs) then
@@ -531,7 +553,7 @@ type internal FsiToolWindow() as this =
             showNoActivate()
             let directiveC  = sprintf "# 1 \"stdin\""    (* stdin line number reset code *)                
             let text = "\n" + text + "\n" + directiveC + "\n;;\n"
-            executeTextNoHistory null text
+            executeTextNoHistory None text
         with _ -> ()
 
     let executeInteraction dbgBreak dir (filename: string) topLine text =
@@ -545,7 +567,7 @@ type internal FsiToolWindow() as this =
           + "# 1 \"stdin\"" + "\n" (* stdin line number reset code *)
           + ";;" + "\n"
 
-        executeTextNoHistory filename interaction
+        executeTextNoHistory (Some(filename)) interaction
 
     let sendSelectionToFSI action =
         let dbgBreak,selectLine = 
@@ -575,13 +597,13 @@ type internal FsiToolWindow() as this =
                  // REVIEW: log error into Trace.
                  // Example errors include no active document.
 
-    let onMLSendSelection (sender:obj) (e:EventArgs) =       
+    let onMLSendSelection () =       
         sendSelectionToFSI ExecuteSelection
 
-    let onMLSendLine (sender:obj) (e:EventArgs) =       
+    let onMLSendLine () =       
         sendSelectionToFSI ExecuteLine
 
-    let onMLDebugSelection (sender:obj) (e:EventArgs) = 
+    let onMLDebugSelection () = 
         if checkDebuggability () then
             attachDebugger ()
         sendSelectionToFSI DebugSelection
@@ -589,7 +611,7 @@ type internal FsiToolWindow() as this =
     /// Handle UP and DOWN. Cycle history.    
     let onHistory (sender:obj) (e:EventArgs) =
         let command = sender :?> OleMenuCommand
-        if null <> command && command.CommandID.Guid = typeof.GUID then
+        if null <> box command && command.CommandID.Guid = typeof.GUID then
             // sanity check command and it's group
             let current = getInputAreaText()
             let nextO =
@@ -622,9 +644,9 @@ type internal FsiToolWindow() as this =
     do  this.BitmapIndex      <- 0  
     do  this.Caption          <- VFSIstrings.SR.fsharpInteractive()
    
-    member _.MLSendSelection(obj,e) = onMLSendSelection obj e
-    member _.MLSendLine(obj,e) = onMLSendLine obj e
-    member _.MLDebugSelection(obj,e) = onMLDebugSelection obj e
+    member _.MLSendSelection() = onMLSendSelection ()
+    member _.MLSendLine() = onMLSendLine ()
+    member _.MLDebugSelection() = onMLDebugSelection ()
 
     member _.GetDebuggerState() =
         let (state, _) = getDebuggerState ()
@@ -701,10 +723,10 @@ type internal FsiToolWindow() as this =
             addCommand Guids.guidFsiConsoleCmdSet Guids.cmdIDAttachDebugger      onAttachDebugger  None
             addCommand Guids.guidFsiConsoleCmdSet Guids.cmdIDDetachDebugger      onDetachDebugger  None
             
-            addCommand Guids.guidInteractiveShell Guids.cmdIDSendSelection       onMLSendSelection   None
-            addCommand Guids.guidInteractiveShell Guids.cmdIDSendLine            onMLSendLine        None
+            addCommand Guids.guidInteractiveShell Guids.cmdIDSendSelection       (fun _ _ -> onMLSendSelection())   None
+            addCommand Guids.guidInteractiveShell Guids.cmdIDSendLine            (fun _ _ -> onMLSendLine())        None
 
-            addCommand Guids.guidInteractive Guids.cmdIDDebugSelection           onMLDebugSelection  None
+            addCommand Guids.guidInteractive Guids.cmdIDDebugSelection           (fun _ _ -> onMLDebugSelection())  None
             
             addCommand guidVSStd2KCmdID (int32 VSConstants.VSStd2KCmdID.UP)      onHistory      (Some supportWhenInInputArea)
             addCommand guidVSStd2KCmdID (int32 VSConstants.VSStd2KCmdID.DOWN)    onHistory      (Some supportWhenInInputArea)            
@@ -744,6 +766,8 @@ type internal FsiToolWindow() as this =
 
         /// Returns the n most recent lines in the view.  After SendTextInteraction, can poll for a prompt to know when interaction finished.
         member _.GetMostRecentLines(n:int) : string[] =
+          match textView, textLines with
+          | NonNull textView, NonNull textLines ->
             lock textLines (fun () ->
                 try
                     let mutable lineCount = 0
@@ -766,7 +790,9 @@ type internal FsiToolWindow() as this =
                 | ex -> 
                     let returnVal = [| "Unhandled Exception"; ex.Message |]
                     returnVal
-            )
+              )
+          | _ ->
+            [| "Null textView" |]
             
     interface IOleCommandTarget with
         member _.QueryStatus (guid, cCmds, prgCmds, pCmdText)=
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs b/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
index a5e3128e872..adbc6dad841 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
@@ -6,19 +6,20 @@ open System
 open Microsoft.VisualStudio.TextManager.Interop
 open Microsoft.VisualStudio.Text
 open Microsoft.VisualStudio.Utilities
+open Util
 
 // This type wraps the IVsTextLines which contains the FSI session (output and input).
 // It provides the API for writing directly to the read-only part of the buffer.
 // It extends the read-only marker on the buffer (making the written text read-only).
 //
-type internal TextBufferStream(textLines:ITextBuffer, contentTypeRegistry: IContentTypeRegistryService) = 
+type internal TextBufferStream(textLines:ITextBuffer MaybeNull, contentTypeRegistry: IContentTypeRegistryService) = 
     do if null = textLines then raise (new ArgumentNullException("textLines"))
     // The following line causes unhandled excepiton on a background thread, see https://github.com/Microsoft/visualfsharp/issues/2318#issuecomment-279340343
     // It seems we should provide a Quick Info Provider at the same time as uncommenting it.
     
     //do textLines.ChangeContentType(contentTypeRegistry.GetContentType Guids.fsiContentTypeName, Guid Guids.guidFsiLanguageService)
     
-    let mutable readonlyRegion  = null : IReadOnlyRegion
+    let mutable readonlyRegion  = null : IReadOnlyRegion MaybeNull
 
     let extendReadOnlyRegion position =
             use readonlyEdit = textLines.CreateReadOnlyRegionEdit()
diff --git a/vsintegration/src/FSharp.VS.FSI/sessions.fs b/vsintegration/src/FSharp.VS.FSI/sessions.fs
index 6ce14eb0b51..ec0924ef827 100644
--- a/vsintegration/src/FSharp.VS.FSI/sessions.fs
+++ b/vsintegration/src/FSharp.VS.FSI/sessions.fs
@@ -254,7 +254,7 @@ let fsiStartInfo channelName sourceFile =
     
     let initialPath = 
         match sourceFile with 
-        | path when path <> null && Directory.Exists(Path.GetDirectoryName(path)) -> Path.GetDirectoryName(path)
+        | Some path when Directory.Exists(Path.GetDirectoryName(path)) -> Path.GetDirectoryName(path)
         | _ -> Path.GetTempPath()
 
     if Directory.Exists(initialPath) then
@@ -264,7 +264,7 @@ let fsiStartInfo channelName sourceFile =
 
 
 /// Represents an active F# Interactive process to which Visual Studio is connected via stdin/stdout/stderr and a remoting channel
-type FsiSession(sourceFile: string) = 
+type FsiSession(sourceFile: string option) = 
     let randomSalt = System.Random()
     let channelName = 
         let pid  = System.Diagnostics.Process.GetCurrentProcess().Id

From ff09edc8de7d041bc4e249c42aa803a7b7ef6bc7 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 20:06:53 +0000
Subject: [PATCH 069/112] minimize diff

---
 src/fsharp/CheckExpressions.fs                | 28 +++++++++----------
 src/fsharp/CompilerImports.fs                 |  2 +-
 src/fsharp/ConstraintSolver.fs                |  8 +++---
 src/fsharp/ConstraintSolver.fsi               |  1 -
 .../DependencyManager/DependencyProvider.fs   |  5 ----
 src/fsharp/DetupleArgs.fs                     |  2 +-
 6 files changed, 20 insertions(+), 26 deletions(-)

diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index 3e02cc8eeac..387a4bf5dd8 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -2925,8 +2925,8 @@ let MakeApplicableExprWithFlex cenv (env: TcEnv) expr =
 ///  Checks, warnings and constraint assertions for downcasts 
 let TcRuntimeTypeTest isCast isOperator cenv denv m tgtTy srcTy =
     let g = cenv.g
-    if TypeDefinitelySubsumesTypeNoCoercion 0 g cenv.amap m tgtTy srcTy then 
-      warning (TypeTestUnnecessary m)
+    if TypeDefinitelySubsumesTypeNoCoercion 0 g cenv.amap m tgtTy srcTy then
+      warning(TypeTestUnnecessary m)
 
     if isTyparTy g srcTy && not (destTyparTy g srcTy).IsCompatFlex then
         error(IndeterminateRuntimeCoercion(denv, srcTy, tgtTy, m))
@@ -3995,10 +3995,10 @@ let rec TcTyparConstraint ridx cenv newOk checkCxs occ (env: TcEnv) tpenv c =
         tpenv
 
     | SynTypeConstraint.WhereTyparSupportsNull(tp, m) ->
-        TcSimpleTyparConstraint cenv env newOk tpenv  tp m AddCxTypeDefnSupportsNull
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeDefnSupportsNull
 
     | SynTypeConstraint.WhereTyparNotSupportsNull(tp, m) ->
-        TcSimpleTyparConstraint cenv env newOk tpenv  tp m AddCxTypeDefnNotSupportsNull
+        TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeDefnNotSupportsNull
 
     | SynTypeConstraint.WhereTyparIsComparable(tp, m) ->
         TcSimpleTyparConstraint cenv env newOk tpenv tp m AddCxTypeMustSupportComparison
@@ -4606,14 +4606,14 @@ and TcStaticConstantParameter cenv (env: TcEnv) tpenv kind (StripParenTypes v) i
             | SynConst.Int32 n when typeEquiv g g.int32_ty kind -> record(g.int32_ty); box (n: int)
             | SynConst.Int64 n when typeEquiv g g.int64_ty kind -> record(g.int64_ty); box (n: int64)
             | SynConst.SByte n when typeEquiv g g.sbyte_ty kind -> record(g.sbyte_ty); box (n: sbyte)
-            | SynConst.UInt16 n when typeEquiv g g.uint16_ty kind  -> record(g.uint16_ty); box (n: uint16)
-            | SynConst.UInt32 n when typeEquiv g g.uint32_ty kind  -> record(g.uint32_ty); box (n: uint32)
-            | SynConst.UInt64 n when typeEquiv g g.uint64_ty kind  -> record(g.uint64_ty); box (n: uint64)
+            | SynConst.UInt16 n when typeEquiv g g.uint16_ty kind -> record(g.uint16_ty); box (n: uint16)
+            | SynConst.UInt32 n when typeEquiv g g.uint32_ty kind -> record(g.uint32_ty); box (n: uint32)
+            | SynConst.UInt64 n when typeEquiv g g.uint64_ty kind -> record(g.uint64_ty); box (n: uint64)
             | SynConst.Decimal n when typeEquiv g g.decimal_ty kind -> record(g.decimal_ty); box (n: decimal)
             | SynConst.Single n when typeEquiv g g.float32_ty kind -> record(g.float32_ty); box (n: single)
             | SynConst.Double n when typeEquiv g g.float_ty kind -> record(g.float_ty); box (n: double)
             | SynConst.Char n when typeEquiv g g.char_ty kind -> record(g.char_ty); box (n: char)
-            | SynConst.String (s, _, _) 
+            | SynConst.String (s, _, _)
             | SynConst.SourceIdentifier (_, s, _) when typeEquiv g g.string_ty kind -> record(g.string_ty); box (s: string)
             | SynConst.Bool b when typeEquiv g g.bool_ty kind -> record(g.bool_ty); box (b: bool)
             | _ -> fail()
@@ -4645,7 +4645,7 @@ and TcStaticConstantParameter cenv (env: TcEnv) tpenv kind (StripParenTypes v) i
                 | Const.Char n -> record(g.char_ty); box (n: char)
                 | Const.String s -> record(g.string_ty); box (s: string)
                 | Const.Bool b -> record(g.bool_ty); box (b: bool)
-                | _ ->  fail()
+                | _ -> fail()
             | _ -> error(Error(FSComp.SR.tcInvalidConstantExpression(), v.Range))
         v, tpenv'
 
@@ -4840,7 +4840,7 @@ and TcNestedTypeApplication cenv newOk checkCxs occ env tpenv mWholeTypeApp ty p
         error(Error(FSComp.SR.tcTypeHasNoNestedTypes(), mWholeTypeApp))
 
     match ty with
-    | TType_app(tcref, _, _nullness) -> 
+    | TType_app(tcref, _, _nullness) ->
         TcTypeApp cenv newOk checkCxs occ env tpenv mWholeTypeApp tcref pathTypeArgs tyargs
     | _ -> error(InternalError("TcNestedTypeApplication: expected type application", mWholeTypeApp))
 
@@ -7299,7 +7299,7 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
 // TcConstStringExpr
 //-------------------------------------------------------------------------
 
-/// Check a constant string expression. It might be a 'printf' format string 
+/// Check a constant string expression. It might be a 'printf' format string
 and TcConstStringExpr cenv (overallTy: OverallTy) env m tpenv (s: string) =
 
     let g = cenv.g
@@ -10242,9 +10242,9 @@ and TcAndBuildFixedExpr cenv env (overallPatTy, fixedExpr, overallExprTy, mBindi
         let elemPtrTy = mkNativePtrTy g elemTy
         UnifyTypes cenv env mBinding elemPtrTy overallPatTy
 
-        // let ptr : nativeptr = 
-        //   let tmpArray : elem[] = arr
-        //   if notNull tmpArray then
+        // let ptr: nativeptr =
+        //   let tmpArray: elem[] = arr
+        //   if nonNull tmpArray then
         //      if tmpArray.Length <> 0 then
         //         let pinned tmpArrayByref: byref = &arr.[0]
         //         (nativeint) tmpArrayByref
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 002c4fd7405..79e1192f858 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1406,7 +1406,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
 
     member tcImportsStrong.ImportTypeProviderExtensions
                (ctok, tcConfig: TcConfig,
-                fileNameOfRuntimeAssembly: string,
+                fileNameOfRuntimeAssembly,
                 ilScopeRefOfRuntimeAssembly,
                 runtimeAssemblyAttributes: ILAttribute list,
                 entityToInjectInto, invalidateCcu: Event<_>, m) =
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 7a46fabd711..c02252186c6 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -91,13 +91,13 @@ let NewAnonTypar (kind, m, rigid, var, dyn) =
 let NewNamedInferenceMeasureVar (_m, rigid, var, id) = 
     Construct.NewTypar(TyparKind.Measure, rigid, SynTypar(id, var, false), false, TyparDynamicReq.No, [], false, false) 
 
-let NewInferenceMeasurePar () = 
+let NewInferenceMeasurePar () =
     NewCompGenTypar (TyparKind.Measure, TyparRigidity.Flexible, TyparStaticReq.None, TyparDynamicReq.No, false)
 
-let NewErrorTypar () = 
+let NewErrorTypar () =
     NewCompGenTypar (TyparKind.Type, TyparRigidity.Flexible, TyparStaticReq.None, TyparDynamicReq.No, true)
 
-let NewErrorMeasureVar () = 
+let NewErrorMeasureVar () =
     NewCompGenTypar (TyparKind.Measure, TyparRigidity.Flexible, TyparStaticReq.None, TyparDynamicReq.No, true)
 
 let NewInferenceType (g: TcGlobals) = 
@@ -2614,7 +2614,7 @@ and SolveTypeRequiresDefaultConstructor (csenv: ConstraintSolverEnv) ndeep m2 tr
             elif TypeHasDefaultValueOld g m ty then
                 CompleteD
             else
-                failwith "unreachable" // ErrorD (ConstraintSolverError(FSComp.SR.csGenericConstructRequiresPublicDefaultConstructor(NicePrint.minimalStringOfType denv origTy), m, m2))
+                ErrorD (ConstraintSolverError(FSComp.SR.csGenericConstructRequiresPublicDefaultConstructor(NicePrint.minimalStringOfType denv origTy), m, m2))
         else
             if GetIntrinsicConstructorInfosOfType csenv.InfoReader m ty 
                |> List.exists (fun x -> x.IsNullary && IsMethInfoAccessible amap m AccessibleFromEverywhere x)
diff --git a/src/fsharp/ConstraintSolver.fsi b/src/fsharp/ConstraintSolver.fsi
index 8735da41ec8..366b5d0fb46 100644
--- a/src/fsharp/ConstraintSolver.fsi
+++ b/src/fsharp/ConstraintSolver.fsi
@@ -1,4 +1,3 @@
-
 // Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
 
 /// Solves constraints using a mutable constraint-solver state
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fs b/src/fsharp/DependencyManager/DependencyProvider.fs
index bd69593e265..c4072f90249 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/DependencyManager/DependencyProvider.fs
@@ -77,11 +77,6 @@ module ReflectionHelper =
             e.InnerException
         | _ -> e
 
-#if NO_CHECKNULLS
-    // Shim to match nullness checking library support in preview
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-#endif
-
 /// Indicate the type of error to report
 []
 type ErrorReportType =
diff --git a/src/fsharp/DetupleArgs.fs b/src/fsharp/DetupleArgs.fs
index 02492562b38..70585fa6e7d 100644
--- a/src/fsharp/DetupleArgs.fs
+++ b/src/fsharp/DetupleArgs.fs
@@ -808,7 +808,7 @@ let passBind penv (TBind(fOrig, repr, letSeqPtOpt) as bind) =
          let rebinds = List.concat (List.map2 transRebind transformedFormals x1ps)
          // fCBody - rebuild 
          // fCBody = TLambda tps. Lam formals. let rebinds in body 
-         let rbody, rt = mkLetsBind m rebinds body, rty   
+         let rbody, rt = mkLetsBind m rebinds body, rty
          let bind = mkMultiLambdaBind g transformedVal letSeqPtOpt m tps formals (rbody, rt)
          // result 
          bind

From 2fb2da82e08e6bab8095879738de004324b72b6c Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 20:07:10 +0000
Subject: [PATCH 070/112] minimize diff

---
 src/fsharp/AccessibilityLogic.fs          | 11 +++++----
 src/fsharp/BuildGraph.fs                  |  7 +++---
 src/fsharp/CheckComputationExpressions.fs |  4 ++--
 src/fsharp/CheckDeclarations.fs           |  1 +
 src/fsharp/CheckExpressions.fs            | 27 +++++++++-------------
 src/fsharp/CompilerConfig.fs              | 15 +++++++-----
 src/fsharp/CompilerImports.fs             | 28 +++++++++++++----------
 src/fsharp/ConstraintSolver.fs            |  3 ++-
 src/fsharp/DetupleArgs.fs                 |  2 +-
 src/fsharp/ErrorLogger.fs                 |  1 -
 10 files changed, 53 insertions(+), 46 deletions(-)

diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index bdecce9da9d..e65eb7be1a2 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -3,8 +3,9 @@
 /// The basic logic of private/internal/protected/InternalsVisibleTo/public accessibility
 module internal FSharp.Compiler.AccessibilityLogic
 
-open FSharp.Compiler.AbstractIL.IL 
+open Internal.Utilities.Library
 open FSharp.Compiler 
+open FSharp.Compiler.AbstractIL.IL 
 open FSharp.Compiler.ErrorLogger
 open FSharp.Compiler.Infos
 open FSharp.Compiler.TcGlobals
@@ -371,10 +372,12 @@ let IsPropInfoAccessible g amap m ad = function
     | ProvidedProp (amap, tppi, m) as pp-> 
         let access = 
             let a = tppi.PUntaint((fun ppi -> 
-                let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodBase) = 
+                let tryGetILAccessForProvidedMethodBase (mi : ProvidedMethodInfo MaybeNull) =
                     match mi with
-                    | null -> None
-                    | mi -> Some(ComputeILAccess mi.IsPublic mi.IsFamily mi.IsFamilyOrAssembly mi.IsFamilyAndAssembly)
+                    | Null -> None
+                    | NonNull mi -> 
+                        Some(ComputeILAccess mi.IsPublic mi.IsFamily mi.IsFamilyOrAssembly mi.IsFamilyAndAssembly)
+
                 match tryGetILAccessForProvidedMethodBase(ppi.GetGetMethod()) with
                 | None -> tryGetILAccessForProvidedMethodBase(ppi.GetSetMethod())
                 | x -> x), m)
diff --git a/src/fsharp/BuildGraph.fs b/src/fsharp/BuildGraph.fs
index 36fe5e77ba6..03696574f23 100644
--- a/src/fsharp/BuildGraph.fs
+++ b/src/fsharp/BuildGraph.fs
@@ -190,6 +190,7 @@ type GraphNode<'T> (retryCompute: bool, computation: NodeCode<'T>) =
     let gate = obj ()
     let mutable computation = computation
     let mutable requestCount = 0
+
     let mutable cachedResult: Task<'T> = Unchecked.defaultof<_>
     let mutable cachedResultNode: NodeCode<'T> = Unchecked.defaultof<_>
 
@@ -197,7 +198,7 @@ type GraphNode<'T> (retryCompute: bool, computation: NodeCode<'T>) =
         not (obj.ReferenceEquals(cachedResultNode, null))
 
     let isCachedResultNotNull() =
-        cachedResult <> null
+        not (obj.ReferenceEquals(cachedResult, null))
 
     // retryCompute indicates that we abandon computations when the originator is
     // cancelled. 
@@ -365,11 +366,11 @@ type GraphNode<'T> (retryCompute: bool, computation: NodeCode<'T>) =
             }
 
         member _.TryPeekValue() = 
-            match cachedResult with
+            match box cachedResult with
             | null -> ValueNone
             | _ -> ValueSome cachedResult.Result
 
-        member _.HasValue = cachedResult <> null
+        member _.HasValue = isCachedResultNotNull()
 
         member _.IsComputing = requestCount > 0
 
diff --git a/src/fsharp/CheckComputationExpressions.fs b/src/fsharp/CheckComputationExpressions.fs
index 8aafdf9c0de..d2c07f69b62 100644
--- a/src/fsharp/CheckComputationExpressions.fs
+++ b/src/fsharp/CheckComputationExpressions.fs
@@ -1829,7 +1829,7 @@ let mkSeqAppend (cenv: cenv) env m genTy e1 e2 =
     let e2 = mkCoerceIfNeeded cenv.g (mkSeqTy cenv.g genResultTy) (tyOfExpr cenv.g e2) e2
     mkCallSeqAppend cenv.g m genResultTy e1 e2 
 
-let mkSeqGenerated (cenv: cenv) env m genTy e1 e2 =
+let mkSeqFromFunctions (cenv: cenv) env m genTy e1 e2 =
     let g = cenv.g
     let genResultTy = NewInferenceType g
     UnifyTypes cenv env m genTy (mkSeqTy cenv.g genResultTy)
@@ -1947,7 +1947,7 @@ let TcSequenceExpression (cenv: cenv) env tpenv comp (overallTy: OverallTy) m =
                 | _ -> guardExprMark
 
             let innerDelayedExpr = mkSeqDelayedExpr mWhile innerExpr
-            Some(mkSeqGenerated cenv env guardExprMark genOuterTy guardLambdaExpr innerDelayedExpr, tpenv)
+            Some(mkSeqFromFunctions cenv env guardExprMark genOuterTy guardLambdaExpr innerDelayedExpr, tpenv)
 
         | SynExpr.TryFinally (innerComp, unwindExpr, mTryToLast, spTry, spFinally, trivia) ->
             let env = { env with eIsControlFlow = true }
diff --git a/src/fsharp/CheckDeclarations.fs b/src/fsharp/CheckDeclarations.fs
index 1ca00d6e18a..3813a41d660 100644
--- a/src/fsharp/CheckDeclarations.fs
+++ b/src/fsharp/CheckDeclarations.fs
@@ -772,6 +772,7 @@ module IncrClassChecking =
         // just a type variable. The type and typars get fixed-up after inference 
         let ctorValScheme, ctorVal = 
             let argty = mkRefTupledTy g (typesOfVals ctorArgs)
+
             // Initial type has known information 
             let ctorTy = mkFunTy g argty objTy    
 
diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index 8ebc9ab8d3a..f18059cbab1 100644
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -806,7 +806,6 @@ let ForNewConstructors tcSink (env: TcEnv) mObjTy methodName meths =
     | _ ->
         AfterResolution.RecordResolution (None, (fun tpinst -> callSink (origItem, tpinst)), (fun (minfo, _, minst) -> sendToSink minst [minfo]), (fun () -> callSink (origItem, emptyTyparInst)))
 
-
 /// Typecheck rational constant terms in units-of-measure exponents
 let rec TcSynRationalConst c =
   match c with
@@ -2913,18 +2912,17 @@ let MakeApplicableExprWithFlex cenv (env: TcEnv) expr =
     else
         let curriedFlexibleTypes =
             curriedActualTypes |> List.mapSquared (fun actualType ->
-                if isNonFlexibleType actualType
-                then actualType
+                if isNonFlexibleType actualType then
+                    actualType
                 else
-                   let flexibleType = NewInferenceType g
-                   AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace actualType flexibleType
-                   flexibleType)
+                    let flexibleType = NewInferenceType g
+                    AddCxTypeMustSubsumeType ContextInfo.NoContext env.DisplayEnv cenv.css m NoTrace actualType flexibleType
+                    flexibleType)
 
         // Create a coercion to represent the expansion of the application
         let expr = mkCoerceExpr (expr, mkIteratedFunTy g (List.map (mkRefTupledTy g) curriedFlexibleTypes) retTy, m, exprTy)
         ApplicableExpr (cenv, expr, true)
 
-
 ///  Checks, warnings and constraint assertions for downcasts
 let TcRuntimeTypeTest isCast isOperator cenv denv m tgtTy srcTy =
     let g = cenv.g
@@ -4449,7 +4447,6 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: UnscopedTyparEnv
             NewErrorType (), tpenv
 
     | SynType.StaticConstantNamed (_, _, m)
-
     | SynType.StaticConstantExpr (_, m) ->
         errorR(Error(FSComp.SR.parsInvalidLiteralInType(), m))
         NewErrorType (), tpenv
@@ -4665,8 +4662,8 @@ and CrackStaticConstantArgs cenv env tpenv (staticParameters: Tainted
                     if sp.PUntaint((fun sp -> sp.IsOptional), m) then
                          match sp.PUntaint((fun sp -> sp.RawDefaultValue), m) with
-                         | null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, containerName, containerName, spName), m))
-                         | v -> v
+                         | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, containerName, containerName, spName), m))
+                         | NonNull v -> v
                     else
                       error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, containerName, containerName, spName), m))
                  | ps ->
@@ -4810,7 +4807,6 @@ and TcNestedTypeApplication cenv newOk checkCxs occ env tpenv mWholeTypeApp ty p
         TcTypeApp cenv newOk checkCxs occ env tpenv mWholeTypeApp tcref pathTypeArgs tyargs
     | _ -> error(InternalError("TcNestedTypeApplication: expected type application", mWholeTypeApp))
 
-
 and TryAdjustHiddenVarNameToCompGenName cenv env (id: Ident) altNameRefCellOpt =
     match altNameRefCellOpt with
     | Some ({contents = SynSimplePatAlternativeIdInfo.Undecided altId } as altNameRefCell) ->
@@ -5240,8 +5236,8 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
                             CallNameResolutionSink cenv.tcSink (id.idRange, env.NameEnv, argItem, emptyTyparInst, ItemOccurence.Pattern, ad)
 
                             match box result.[idx] with
-                            | null -> result.[idx] <- pat
-                            | _ ->
+                            | Null -> result.[idx] <- pat
+                            | NonNull _ ->
                                 extraPatterns.Add pat
                                 errorR (Error (FSComp.SR.tcUnionCaseFieldCannotBeUsedMoreThanOnce id.idText, id.idRange))
 
@@ -5249,8 +5245,7 @@ and TcPat warnOnUpper cenv env topValInfo vFlags (tpenv, names, takenNames) ty p
                         if isNull (box result.[i]) then
                             result.[i] <- SynPat.Wild (m.MakeSynthetic())
 
-                    let extraPatterns =
-                        if isNull extraPatterns then [] else List.ofSeq extraPatterns
+                    let extraPatterns = List.ofSeq extraPatterns
 
                     let args = List.ofArray result
                     if result.Length = 1 then args, extraPatterns
@@ -7268,7 +7263,7 @@ and TcObjectExpr cenv env tpenv (objTy, realObjTy, argopt, binds, extraImpls, mO
 //-------------------------------------------------------------------------
 
 /// Check a constant string expression. It might be a 'printf' format string
-and TcConstStringExpr cenv (overallTy: OverallTy) env m tpenv s =
+and TcConstStringExpr cenv (overallTy: OverallTy) env m tpenv (s: string) =
 
     let g = cenv.g
 
diff --git a/src/fsharp/CompilerConfig.fs b/src/fsharp/CompilerConfig.fs
index bb4137d8aaa..892a2459331 100644
--- a/src/fsharp/CompilerConfig.fs
+++ b/src/fsharp/CompilerConfig.fs
@@ -822,21 +822,24 @@ type TcConfigBuilder =
                 | ErrorReportType.Warning -> warning(Error(error, m))
                 | ErrorReportType.Error -> errorR(Error(error, m)))
 
-        let dm = dependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, output , reportError, path)
+        let dm = dependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, output, reportError, path)
 
         match dm with
-        | _, dependencyManager when not(isNull dependencyManager) ->
+        // #r "Assembly"
+        | NonNull path, Null ->
+            tcConfigB.AddReferencedAssemblyByPath (m, path)
+
+        | _, NonNull dependencyManager ->
             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                 tcConfigB.AddDependencyManagerText (dependencyManager, directive, m, path)
             else
                 errorR(Error(FSComp.SR.packageManagementRequiresVFive(), m))
 
-        | _, _ when directive = Directive.Include ->
+        | Null, Null when directive = Directive.Include ->
             errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
 
-        // #r "Assembly"
-        | path, _ ->
-            tcConfigB.AddReferencedAssemblyByPath (m, path)
+        | Null, Null ->
+           errorR(Error(FSComp.SR.buildInvalidHashrDirective(), m))
 
     member tcConfigB.RemoveReferencedAssemblyByPath (m, path) =
         tcConfigB.referencedDLLs <- tcConfigB.referencedDLLs |> List.filter (fun ar -> not (equals ar.Range m) || ar.Text <> path)
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 5b9a6d8c97b..8628e611d12 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1055,12 +1055,13 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         | _ -> None
 
 #if !NO_EXTENSIONTYPING
-    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
-        let anameOpt = assembly.PUntaint((fun assembly -> match assembly with null -> None | a -> Some (a.GetName())), m)
-        match anameOpt with
-        | None -> false, None
-        | Some aname ->
+    member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
+        match assembly with
+        | Tainted.Null -> false,None
+        | Tainted.NonNull assembly ->
+        let aname = assembly.PUntaint((fun a -> a.GetName()), m)
         let ilShortAssemName = aname.Name
+
         match tcImports.FindCcu (ctok, m, ilShortAssemName, lookupOnly=true) with
         | ResolvedCcu ccu ->
             if ccu.IsProviderGenerated then
@@ -1218,27 +1219,30 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
             | ILScopeRef.Assembly a -> a.Name = nm
             | _ -> false)
 
-    member tcImports.DependencyProvider =
+    member _.DependencyProvider =
         CheckDisposed()
         match dependencyProviderOpt with
         | None ->
             Debug.Assert(false, "this should never be called on FrameworkTcImports")
-            new DependencyProvider(null, null)
+            new DependencyProvider()
         | Some dependencyProvider -> dependencyProvider
 
     member tcImports.GetImportMap() =
         CheckDisposed()
         let loaderInterface =
             { new AssemblyLoader with
-                 member x.FindCcuFromAssemblyRef (ctok, m, ilAssemblyRef) =
+                 member _.FindCcuFromAssemblyRef (ctok, m, ilAssemblyRef) =
                      tcImports.FindCcuFromAssemblyRef (ctok, m, ilAssemblyRef)
 
-                 member x.TryFindXmlDocumentationInfo assemblyName =
+                 member _.TryFindXmlDocumentationInfo assemblyName =
                     tcImports.TryFindXmlDocumentationInfo(assemblyName)
 
 #if !NO_EXTENSIONTYPING
-                 member x.GetProvidedAssemblyInfo (ctok, m, assembly) = tcImports.GetProvidedAssemblyInfo (ctok, m, assembly)
-                 member x.RecordGeneratedTypeRoot root = tcImports.RecordGeneratedTypeRoot root
+                 member _.GetProvidedAssemblyInfo (ctok, m, assembly) =
+                     tcImports.GetProvidedAssemblyInfo (ctok, m, assembly)
+
+                 member _.RecordGeneratedTypeRoot root =
+                     tcImports.RecordGeneratedTypeRoot root
 #endif
              }
         ImportMap(tcImports.GetTcGlobals(), loaderInterface)
@@ -1329,7 +1333,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
             runtimeAssemblyAttributes
             |> List.choose TryDecodeTypeProviderAssemblyAttr
             // If no design-time assembly is specified, use the runtime assembly
-            |> List.map (function null -> fileNameOfRuntimeAssembly | s -> s)
+            |> List.map (function Null -> fileNameOfRuntimeAssembly | NonNull s -> s)
             // For each simple name of a design-time assembly, we take the first matching one in the order they are
             // specified in the attributes
             |> List.distinctBy (fun s -> try Path.GetFileNameWithoutExtension s with _ -> s)
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 751fa3f2e28..04dfda8688d 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -103,7 +103,8 @@ let NewInferenceType (g: TcGlobals) =
 let NewErrorType () =
     mkTyparTy (NewErrorTypar ())
 
-let NewErrorMeasure () = Measure.Var (NewErrorMeasureVar ())
+let NewErrorMeasure () =
+    Measure.Var (NewErrorMeasureVar ())
 
 let NewByRefKindInferenceType (g: TcGlobals) m = 
     let tp = Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, SynTypar(compgenId, TyparStaticReq.HeadType, true), false, TyparDynamicReq.No, [], false, false)
diff --git a/src/fsharp/DetupleArgs.fs b/src/fsharp/DetupleArgs.fs
index b5bfd2d11a2..70585fa6e7d 100644
--- a/src/fsharp/DetupleArgs.fs
+++ b/src/fsharp/DetupleArgs.fs
@@ -808,7 +808,7 @@ let passBind penv (TBind(fOrig, repr, letSeqPtOpt) as bind) =
          let rebinds = List.concat (List.map2 transRebind transformedFormals x1ps)
          // fCBody - rebuild 
          // fCBody = TLambda tps. Lam formals. let rebinds in body 
-         let rbody, rt = mkLetsBind            m rebinds body, rty   
+         let rbody, rt = mkLetsBind m rebinds body, rty
          let bind = mkMultiLambdaBind g transformedVal letSeqPtOpt m tps formals (rbody, rt)
          // result 
          bind
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index 15807c9f90d..676320ed846 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -231,7 +231,6 @@ type PhasedDiagnostic =
         | BuildPhaseSubcategory.Parameter 
         | BuildPhaseSubcategory.Parse 
         | BuildPhaseSubcategory.TypeCheck -> true
-        | null 
         | BuildPhaseSubcategory.DefaultPhase 
         | BuildPhaseSubcategory.CodeGen 
         | BuildPhaseSubcategory.Optimize 

From 59f21ea06bcec00946959073980e57969abc373a Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 21:16:25 +0000
Subject: [PATCH 071/112] merge main

---
 src/fsharp/CheckExpressions.fs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index c3aada6fda7..d1519d6112c 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -2922,11 +2922,7 @@ let MakeApplicableExprWithFlex cenv (env: TcEnv) expr =
         let expr = mkCoerceExpr (expr, mkIteratedFunTy g (List.map (mkRefTupledTy g) curriedFlexibleTypes) retTy, m, exprTy)
         ApplicableExpr (cenv, expr, true)
 
-<<<<<<< HEAD
-///  Checks, warnings and constraint assertions for downcasts 
-=======
 ///  Checks, warnings and constraint assertions for downcasts
->>>>>>> 577f763e8c361d948fea5cc1d74b6cb9620c46a8
 let TcRuntimeTypeTest isCast isOperator cenv denv m tgtTy srcTy =
     let g = cenv.g
     if TypeDefinitelySubsumesTypeNoCoercion 0 g cenv.amap m tgtTy srcTy then

From a9cb7dadedf48aa2084e8dddd794556e9c580790 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 22:57:39 +0000
Subject: [PATCH 072/112] transfer more diffs

---
 .../DependencyManager/DependencyProvider.fs   |  13 +-
 .../DependencyManager/DependencyProvider.fsi  |   7 +-
 src/fsharp/ErrorLogger.fs                     |   3 +-
 src/fsharp/ExtensionTyping.fsi                | 363 ++++-----
 .../FSharp.Build/FSharpCommandLineBuilder.fs  |  27 +-
 .../FSharp.Build/FSharpEmbedResXSource.fs     |  16 +-
 .../FSharp.Build/FSharpEmbedResourceText.fs   |  23 +-
 src/fsharp/FSharp.Build/Fsc.fs                | 332 +++++----
 src/fsharp/FSharp.Build/Fsi.fs                | 177 +++--
 src/fsharp/FSharp.Build/MapSourceRoots.fs     |  10 +-
 src/fsharp/FSharp.Build/SubstituteText.fs     |  16 +-
 src/fsharp/FSharp.Build/WriteCodeFragment.fs  |  49 +-
 .../FSharp.Core/fslib-extra-pervasives.fs     |   2 +-
 .../FSharp.Core/fslib-extra-pervasives.fsi    |   2 +-
 src/fsharp/FSharp.Core/prim-types.fs          | 696 +++++++++---------
 src/fsharp/FSharp.Core/prim-types.fsi         |   4 +-
 src/fsharp/FSharp.Core/tasks.fsi              |   5 +
 src/fsharp/FxResolver.fs                      |  17 +-
 src/fsharp/IlxGen.fs                          |  21 +-
 src/fsharp/InfoReader.fs                      |   8 +-
 src/fsharp/LegacyMSBuildReferenceResolver.fs  |  14 +-
 src/fsharp/MethodCalls.fs                     |  10 +-
 src/fsharp/NicePrint.fs                       |   4 +-
 src/fsharp/PatternMatchCompilation.fs         |   2 +-
 src/fsharp/QuotationTranslator.fs             |   4 +-
 src/fsharp/ScriptClosure.fs                   |   4 +-
 src/fsharp/TcGlobals.fs                       |  47 +-
 src/fsharp/TypedTree.fs                       |  11 +-
 src/fsharp/TypedTreeOps.fs                    |  51 +-
 src/fsharp/TypedTreeOps.fsi                   |   2 -
 src/fsharp/TypedTreePickle.fs                 |  33 +-
 src/fsharp/absil/bytes.fs                     |   8 -
 src/fsharp/absil/bytes.fsi                    | 162 ----
 src/fsharp/absil/illib.fs                     |  42 +-
 src/fsharp/absil/illib.fsi                    |  12 +-
 src/fsharp/absil/ilnativeres.fs               |   3 +-
 src/fsharp/absil/ilreflect.fs                 |  42 +-
 src/fsharp/absil/ilwritepdb.fs                |  10 +-
 src/fsharp/fscAnyCpu/fscAnyCpu.fsproj         |   1 -
 src/fsharp/import.fsi                         |   2 +-
 src/fsharp/infos.fs                           |   2 +-
 src/fsharp/lex.fsl                            |   4 +-
 src/fsharp/service/FSharpCheckerResults.fs    |  14 +-
 src/fsharp/service/QuickParse.fs              |   8 +-
 src/fsharp/service/QuickParse.fsi             |   7 +-
 src/fsharp/symbols/SymbolHelpers.fs           |   4 +-
 46 files changed, 1091 insertions(+), 1203 deletions(-)
 delete mode 100644 src/fsharp/absil/bytes.fs
 delete mode 100644 src/fsharp/absil/bytes.fsi

diff --git a/src/fsharp/DependencyManager/DependencyProvider.fs b/src/fsharp/DependencyManager/DependencyProvider.fs
index fef925ff2be..c8105fc6db1 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fs
+++ b/src/fsharp/DependencyManager/DependencyProvider.fs
@@ -7,6 +7,7 @@ open System.IO
 open System.Reflection
 open System.Runtime.InteropServices
 open Internal.Utilities
+open Internal.Utilities.Library
 open Internal.Utilities.FSharpEnvironment
 open FSharp.Reflection
 open System.Collections.Concurrent
@@ -76,9 +77,6 @@ module ReflectionHelper =
             e.InnerException
         | _ -> e
 
-    // Shim to match nullness checking library support
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-
 /// Indicate the type of error to report
 []
 type ErrorReportType =
@@ -375,7 +373,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
         FSComp.SR.packageManagerUnknown(packageManagerKey, String.Join(", ", searchPaths, compilerTools), registeredKeys)
 
     /// Fetch a dependencymanager that supports a specific key
-    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string * IDependencyManagerProvider =
+    member this.TryFindDependencyManagerInPath (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, path: string): string MaybeNull * IDependencyManagerProvider MaybeNull =
         try
             if path.Contains ":" && not (Path.IsPathRooted path) then
                 let managers = RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
@@ -386,7 +384,8 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                     reportError.Invoke(ErrorReportType.Error, err, msg)
                     null, null
 
-                | Some kv -> path, kv.Value
+                | Some kv ->
+                    path, kv.Value
             else
                 path, null
         with 
@@ -397,7 +396,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
             null, null
 
     /// Fetch a dependencymanager that supports a specific key
-    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider =
+    member _.TryFindDependencyManagerByKey (compilerTools: string seq, outputDir: string, reportError: ResolvingErrorReport, key: string): IDependencyManagerProvider MaybeNull =
         try
             RegisteredDependencyManagers compilerTools (Option.ofString outputDir) reportError
             |> Map.tryFind key
@@ -416,7 +415,7 @@ type DependencyProvider internal (assemblyProbingPaths: AssemblyResolutionProbe
                        packageManagerTextLines: (string * string) seq,
                        reportError: ResolvingErrorReport,
                        executionTfm: string,
-                       []executionRid: string,
+                       []executionRid: string MaybeNull,
                        []implicitIncludeDir: string,
                        []mainScriptName: string,
                        []fileName: string,
diff --git a/src/fsharp/DependencyManager/DependencyProvider.fsi b/src/fsharp/DependencyManager/DependencyProvider.fsi
index 5f9710b126b..3cfc94d1edf 100644
--- a/src/fsharp/DependencyManager/DependencyProvider.fsi
+++ b/src/fsharp/DependencyManager/DependencyProvider.fsi
@@ -4,6 +4,7 @@
 namespace FSharp.Compiler.DependencyManager
 
 open System.Runtime.InteropServices
+open Internal.Utilities.Library
 
 /// The results of ResolveDependencies
 type IResolveDependenciesResult =
@@ -88,10 +89,10 @@ type DependencyProvider =
     member CreatePackageManagerUnknownError: string seq * string * string * ResolvingErrorReport -> int * string
 
     /// Resolve reference for a list of package manager lines
-    member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
+    member Resolve : packageManager: IDependencyManagerProvider * scriptExt: string * packageManagerTextLines: (string * string) seq * reportError: ResolvingErrorReport * executionTfm: string * []executionRid: string  * []implicitIncludeDir: string * []mainScriptName: string * []fileName: string * []timeout: int -> IResolveDependenciesResult
 
     /// Fetch a dependencymanager that supports a specific key
-    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider
+    member TryFindDependencyManagerByKey: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * key: string -> IDependencyManagerProvider MaybeNull
 
     /// TryFindDependencyManagerInPath - given a #r "key:sometext" go and find a DependencyManager that satisfies the key
-    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string * IDependencyManagerProvider
+    member TryFindDependencyManagerInPath: compilerTools: string seq * outputDir: string * reportError: ResolvingErrorReport * path: string -> string MaybeNull * IDependencyManagerProvider MaybeNull
diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index 676320ed846..7a2287139d1 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -316,8 +316,7 @@ type internal CompileThreadStatic =
     static member BuildPhase
         with get() = 
             match box CompileThreadStatic.buildPhase with
-            // FUTURE: reenable these asserts, which have historically fired in some compiler service scenarios
-            | Null -> (* assert false; *) BuildPhase.DefaultPhase
+            | Null -> BuildPhase.DefaultPhase
             | _ -> CompileThreadStatic.buildPhase
         and set v = CompileThreadStatic.buildPhase <- v
             
diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi
index b6d80891437..7c670db8e47 100755
--- a/src/fsharp/ExtensionTyping.fsi
+++ b/src/fsharp/ExtensionTyping.fsi
@@ -2,7 +2,7 @@
 
 // Extension typing, validation of extension types, etc.
 
-namespace FSharp.Compiler
+namespace rec FSharp.Compiler
 
 #if !NO_EXTENSIONTYPING
 
@@ -30,34 +30,36 @@ module internal ExtensionTyping =
     type ResolutionEnvironment =
       {
         /// The folder from which an extension provider is resolving from. This is typically the project folder.
-        resolutionFolder            : string
+        resolutionFolder: string
+
         /// Output file name
-        outputFile                  : string option
+        outputFile: string option
+
         /// Whether or not the --showextensionresolution flag was supplied to the compiler.
-        showResolutionMessages      : bool
+        showResolutionMessages: bool
         
         /// All referenced assemblies, including the type provider itself, and possibly other type providers.
-        referencedAssemblies        : string[]
+        referencedAssemblies: string[]
 
         /// The folder for temporary files
-        temporaryFolder             : string
+        temporaryFolder: string
       }
 
     /// Find and instantiate the set of ITypeProvider components for the given assembly reference
-    val GetTypeProvidersOfAssembly : 
+    val GetTypeProvidersOfAssembly: 
           runtimeAssemblyFilename: string  *
           ilScopeRefOfRuntimeAssembly:ILScopeRef *
           designTimeName: string *
           resolutionEnvironment: ResolutionEnvironment *
           isInvalidationSupported: bool *
           isInteractive: bool *
-          systemRuntimeContainsType : (string -> bool) *
-          systemRuntimeAssemblyVersion : Version *
-          compilerToolPaths : string list * 
+          systemRuntimeContainsType: (string -> bool) *
+          systemRuntimeAssemblyVersion: Version *
+          compilerToolPaths: string list * 
           range -> Tainted list
 
     /// Given an extension type resolver, supply a human-readable name suitable for error messages.
-    val DisplayNameOfTypeProvider : Tainted * range -> string
+    val DisplayNameOfTypeProvider: Tainted * range -> string
 
      /// The context used to interpret information in the closure of System.Type, System.MethodInfo and other 
      /// info objects coming from the type provider.
@@ -73,177 +75,177 @@ module internal ExtensionTyping =
     []
     type ProvidedTypeContext =
 
-        member TryGetILTypeRef : ProvidedType -> ILTypeRef option
+        member TryGetILTypeRef: ProvidedType -> ILTypeRef option
 
-        member TryGetTyconRef : ProvidedType -> obj option
+        member TryGetTyconRef: ProvidedType -> obj option
 
-        static member Empty : ProvidedTypeContext 
+        static member Empty: ProvidedTypeContext 
 
-        static member Create : ConcurrentDictionary * ConcurrentDictionary -> ProvidedTypeContext
+        static member Create: ConcurrentDictionary * ConcurrentDictionary -> ProvidedTypeContext
 
-        member GetDictionaries : unit -> ConcurrentDictionary * ConcurrentDictionary
+        member GetDictionaries: unit -> ConcurrentDictionary * ConcurrentDictionary
 
         /// Map the TyconRef objects, if any
-        member RemapTyconRefs : (obj -> obj) -> ProvidedTypeContext 
+        member RemapTyconRefs: (obj -> obj) -> ProvidedTypeContext 
 
-    and [] 
-        ProvidedType =
+    [] 
+    type ProvidedType =
         inherit ProvidedMemberInfo
-        member IsSuppressRelocate : bool
-        member IsErased : bool
-        member IsGenericType : bool
-        member Namespace : string
-        member FullName : string
-        member IsArray : bool
-        member GetInterfaces : unit -> ProvidedType[]
-        member Assembly : ProvidedAssembly
-        member BaseType : ProvidedType
-        member GetNestedType : string -> ProvidedType
-        member GetNestedTypes : unit -> ProvidedType[]
-        member GetAllNestedTypes : unit -> ProvidedType[]
-        member GetMethods : unit -> ProvidedMethodInfo[]
-        member GetFields : unit -> ProvidedFieldInfo[]
-        member GetField : string -> ProvidedFieldInfo
-        member GetProperties : unit -> ProvidedPropertyInfo[]
-        member GetProperty : string -> ProvidedPropertyInfo
-        member GetEvents : unit -> ProvidedEventInfo[]
-        member GetEvent : string -> ProvidedEventInfo
-        member GetConstructors : unit -> ProvidedConstructorInfo[]
-        member GetStaticParameters : ITypeProvider -> ProvidedParameterInfo[]
-        member GetGenericTypeDefinition : unit -> ProvidedType
-        member IsVoid : bool
-        member IsGenericParameter : bool
-        member IsValueType : bool
-        member IsByRef : bool
-        member IsPointer : bool
-        member IsEnum : bool
-        member IsInterface : bool
-        member IsClass : bool
+        member IsSuppressRelocate: bool
+        member IsErased: bool
+        member IsGenericType: bool
+        member Namespace: string
+        member FullName: string
+        member IsArray: bool
+        member GetInterfaces: unit -> ProvidedType[]
+        member Assembly: ProvidedAssembly
+        member BaseType: ProvidedType
+        member GetNestedType: string -> ProvidedType
+        member GetNestedTypes: unit -> ProvidedType[]
+        member GetAllNestedTypes: unit -> ProvidedType[]
+        member GetMethods: unit -> ProvidedMethodInfo[]
+        member GetFields: unit -> ProvidedFieldInfo[]
+        member GetField: string -> ProvidedFieldInfo
+        member GetProperties: unit -> ProvidedPropertyInfo[]
+        member GetProperty: string -> ProvidedPropertyInfo
+        member GetEvents: unit -> ProvidedEventInfo[]
+        member GetEvent: string -> ProvidedEventInfo
+        member GetConstructors: unit -> ProvidedConstructorInfo[]
+        member GetStaticParameters: ITypeProvider -> ProvidedParameterInfo[]
+        member GetGenericTypeDefinition: unit -> ProvidedType
+        member IsVoid: bool
+        member IsGenericParameter: bool
+        member IsValueType: bool
+        member IsByRef: bool
+        member IsPointer: bool
+        member IsEnum: bool
+        member IsInterface: bool
+        member IsClass: bool
         member IsMeasure: bool
-        member IsSealed : bool
-        member IsAbstract : bool
-        member IsPublic : bool
-        member IsNestedPublic : bool
-        member GenericParameterPosition : int
-        member GetElementType : unit -> ProvidedType
-        member GetGenericArguments : unit -> ProvidedType[]
-        member GetArrayRank : unit -> int
-        member RawSystemType : Type
-        member GetEnumUnderlyingType : unit -> ProvidedType
+        member IsSealed: bool
+        member IsAbstract: bool
+        member IsPublic: bool
+        member IsNestedPublic: bool
+        member GenericParameterPosition: int
+        member GetElementType: unit -> ProvidedType
+        member GetGenericArguments: unit -> ProvidedType[]
+        member GetArrayRank: unit -> int
+        member RawSystemType: Type
+        member GetEnumUnderlyingType: unit -> ProvidedType
         member MakePointerType: unit -> ProvidedType
         member MakeByRefType: unit -> ProvidedType
         member MakeArrayType: unit -> ProvidedType
         member MakeArrayType: rank: int -> ProvidedType
         member MakeGenericType: args: ProvidedType[] -> ProvidedType
-        member AsProvidedVar : name: string -> ProvidedVar
-        static member Void : ProvidedType
-        static member CreateNoContext : Type -> ProvidedType
-        member TryGetILTypeRef : unit -> ILTypeRef option
-        member TryGetTyconRef : unit -> obj option
-        static member ApplyContext : ProvidedType * ProvidedTypeContext -> ProvidedType
-        member Context : ProvidedTypeContext 
+        member AsProvidedVar: name: string -> ProvidedVar
+        static member Void: ProvidedType
+        static member CreateNoContext: Type -> ProvidedType
+        member TryGetILTypeRef: unit -> ILTypeRef option
+        member TryGetTyconRef: unit -> obj option
+        static member ApplyContext: ProvidedType * ProvidedTypeContext -> ProvidedType
+        member Context: ProvidedTypeContext 
         interface IProvidedCustomAttributeProvider
-        static member TaintedEquals : Tainted * Tainted -> bool 
+        static member TaintedEquals: Tainted * Tainted -> bool 
 
-    and [] 
-        IProvidedCustomAttributeProvider =
-        abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool
-        abstract GetDefinitionLocationAttribute : provider:ITypeProvider -> (string * int * int) option 
-        abstract GetXmlDocAttributes : provider:ITypeProvider -> string[]
+    [] 
+    type IProvidedCustomAttributeProvider =
+        abstract GetHasTypeProviderEditorHideMethodsAttribute: provider:ITypeProvider -> bool
+        abstract GetDefinitionLocationAttribute: provider:ITypeProvider -> (string * int * int) option 
+        abstract GetXmlDocAttributes: provider:ITypeProvider -> string[]
         abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
         
-    and [] 
-        ProvidedAssembly = 
-        member GetName : unit -> System.Reflection.AssemblyName
-        member FullName : string
-        member GetManifestModuleContents : ITypeProvider -> byte[]
-        member Handle : System.Reflection.Assembly
-
-    and [] 
-        ProvidedMemberInfo = 
+    [] 
+    type ProvidedAssembly = 
+        member GetName: unit -> System.Reflection.AssemblyName
+        member FullName: string
+        member GetManifestModuleContents: ITypeProvider -> byte[]
+        member Handle: System.Reflection.Assembly
+
+    [] 
+    type ProvidedMemberInfo = 
         member Name :string
-        member DeclaringType : ProvidedType
+        member DeclaringType: ProvidedType
         interface IProvidedCustomAttributeProvider 
 
-    and [] 
-        ProvidedMethodBase = 
+    [] 
+    type ProvidedMethodBase = 
         inherit ProvidedMemberInfo
-        member IsGenericMethod : bool
-        member IsStatic : bool
-        member IsFamily : bool
-        member IsFamilyAndAssembly : bool
-        member IsFamilyOrAssembly : bool
-        member IsVirtual : bool
-        member IsFinal : bool
-        member IsPublic : bool
-        member IsAbstract : bool
-        member IsHideBySig : bool
-        member IsConstructor : bool
-        member GetParameters : unit -> ProvidedParameterInfo[]
-        member GetGenericArguments : unit -> ProvidedType[]
-        member GetStaticParametersForMethod : ITypeProvider -> ProvidedParameterInfo[]
-        static member TaintedGetHashCode : Tainted -> int
-        static member TaintedEquals : Tainted * Tainted -> bool 
-
-    and [] 
-        ProvidedMethodInfo = 
+        member IsGenericMethod: bool
+        member IsStatic: bool
+        member IsFamily: bool
+        member IsFamilyAndAssembly: bool
+        member IsFamilyOrAssembly: bool
+        member IsVirtual: bool
+        member IsFinal: bool
+        member IsPublic: bool
+        member IsAbstract: bool
+        member IsHideBySig: bool
+        member IsConstructor: bool
+        member GetParameters: unit -> ProvidedParameterInfo[]
+        member GetGenericArguments: unit -> ProvidedType[]
+        member GetStaticParametersForMethod: ITypeProvider -> ProvidedParameterInfo[]
+        static member TaintedGetHashCode: Tainted -> int
+        static member TaintedEquals: Tainted * Tainted -> bool 
+
+    [] 
+    type ProvidedMethodInfo = 
         inherit ProvidedMethodBase
-        member ReturnType : ProvidedType
-        member MetadataToken : int
-
-    and [] 
-        ProvidedParameterInfo = 
-        member Name :string
-        member ParameterType : ProvidedType
-        member IsIn : bool
-        member IsOut : bool
-        member IsOptional : bool
-        member RawDefaultValue : obj
-        member HasDefaultValue : bool
+        member ReturnType: ProvidedType
+        member MetadataToken: int
+
+    [] 
+    type ProvidedParameterInfo = 
+        member Name: string
+        member ParameterType: ProvidedType
+        member IsIn: bool
+        member IsOut: bool
+        member IsOptional: bool
+        member RawDefaultValue: obj
+        member HasDefaultValue: bool
         interface IProvidedCustomAttributeProvider 
 
-    and [] 
-        ProvidedFieldInfo = 
+    [] 
+    type ProvidedFieldInfo = 
         inherit ProvidedMemberInfo
-        member IsInitOnly : bool
-        member IsStatic : bool
-        member IsSpecialName : bool
-        member IsLiteral : bool
-        member GetRawConstantValue : unit -> obj
-        member FieldType : ProvidedType
-        member IsPublic : bool
-        member IsFamily : bool
-        member IsFamilyAndAssembly : bool
-        member IsFamilyOrAssembly : bool
-        member IsPrivate : bool
-        static member TaintedEquals : Tainted * Tainted -> bool 
-
-    and [] 
-        ProvidedPropertyInfo = 
+        member IsInitOnly: bool
+        member IsStatic: bool
+        member IsSpecialName: bool
+        member IsLiteral: bool
+        member GetRawConstantValue: unit -> obj
+        member FieldType: ProvidedType
+        member IsPublic: bool
+        member IsFamily: bool
+        member IsFamilyAndAssembly: bool
+        member IsFamilyOrAssembly: bool
+        member IsPrivate: bool
+        static member TaintedEquals: Tainted * Tainted -> bool 
+
+    [] 
+    type ProvidedPropertyInfo = 
         inherit ProvidedMemberInfo
-        member GetGetMethod : unit -> ProvidedMethodInfo
-        member GetSetMethod : unit -> ProvidedMethodInfo
-        member GetIndexParameters : unit -> ProvidedParameterInfo[]
-        member CanRead : bool
-        member CanWrite : bool
-        member PropertyType : ProvidedType
-        static member TaintedGetHashCode : Tainted -> int
-        static member TaintedEquals : Tainted * Tainted -> bool 
-
-    and [] 
-        ProvidedEventInfo = 
+        member GetGetMethod: unit -> ProvidedMethodInfo
+        member GetSetMethod: unit -> ProvidedMethodInfo
+        member GetIndexParameters: unit -> ProvidedParameterInfo[]
+        member CanRead: bool
+        member CanWrite: bool
+        member PropertyType: ProvidedType
+        static member TaintedGetHashCode: Tainted -> int
+        static member TaintedEquals: Tainted * Tainted -> bool 
+
+    [] 
+    type ProvidedEventInfo = 
         inherit ProvidedMemberInfo
-        member GetAddMethod : unit -> ProvidedMethodInfo
-        member GetRemoveMethod : unit -> ProvidedMethodInfo
-        member EventHandlerType : ProvidedType
-        static member TaintedGetHashCode : Tainted -> int
-        static member TaintedEquals : Tainted * Tainted -> bool 
-
-    and [] 
-        ProvidedConstructorInfo = 
+        member GetAddMethod: unit -> ProvidedMethodInfo
+        member GetRemoveMethod: unit -> ProvidedMethodInfo
+        member EventHandlerType: ProvidedType
+        static member TaintedGetHashCode: Tainted -> int
+        static member TaintedEquals: Tainted * Tainted -> bool 
+
+    [] 
+    type ProvidedConstructorInfo = 
         inherit ProvidedMethodBase
       
-    and ProvidedExprType =
+    type ProvidedExprType =
         | ProvidedNewArrayExpr of ProvidedType * ProvidedExpr[]
 #if PROVIDED_ADDRESS_OF
         | ProvidedAddressOfExpr of ProvidedExpr
@@ -268,56 +270,55 @@ module internal ExtensionTyping =
         | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
         | ProvidedVarExpr of ProvidedVar
         
-    and []
-        ProvidedExpr =
-        member Type : ProvidedType
+    []
+    type ProvidedExpr =
+        member Type: ProvidedType
         /// Convert the expression to a string for diagnostics
-        member UnderlyingExpressionString : string
-        member GetExprType : unit -> ProvidedExprType option
+        member UnderlyingExpressionString: string
+        member GetExprType: unit -> ProvidedExprType option
 
-    and []
-        ProvidedVar =
-        member Type : ProvidedType
-        member Name : string
-        member IsMutable : bool
-        override Equals : obj -> bool
-        override GetHashCode : unit -> int
+    []
+    type ProvidedVar =
+        member Type: ProvidedType
+        member Name: string
+        member IsMutable: bool
+        override Equals: obj -> bool
+        override GetHashCode: unit -> int
 
     /// Get the provided expression for a particular use of a method.
-    val GetInvokerExpression : ITypeProvider * ProvidedMethodBase * ProvidedVar[] ->  ProvidedExpr
+    val GetInvokerExpression: ITypeProvider * ProvidedMethodBase * ProvidedVar[] ->  ProvidedExpr
 
     /// Validate that the given provided type meets some of the rules for F# provided types
-    val ValidateProvidedTypeAfterStaticInstantiation : range * Tainted * expectedPath : string[] * expectedName : string-> unit
+    val ValidateProvidedTypeAfterStaticInstantiation: range * Tainted * expectedPath: string[] * expectedName: string-> unit
 
     /// Try to apply a provided type to the given static arguments. If successful also return a function 
     /// to check the type name is as expected (this function is called by the caller of TryApplyProvidedType
     /// after other checks are made).
-    val TryApplyProvidedType : typeBeforeArguments:Tainted * optGeneratedTypePath: string list option * staticArgs:obj[]  * range -> (Tainted * (unit -> unit)) option
+    val TryApplyProvidedType: typeBeforeArguments:Tainted * optGeneratedTypePath: string list option * staticArgs:obj[]  * range -> (Tainted * (unit -> unit)) option
 
     /// Try to apply a provided method to the given static arguments. 
-    val TryApplyProvidedMethod : methBeforeArgs:Tainted * staticArgs:obj[]  * range -> Tainted option
+    val TryApplyProvidedMethod: methBeforeArgs:Tainted * staticArgs:obj[]  * range -> Tainted option
 
     /// Try to resolve a type in the given extension type resolver
-    val TryResolveProvidedType : Tainted * range * string[] * typeName: string -> Tainted option
+    val TryResolveProvidedType: Tainted * range * string[] * typeName: string -> Tainted option
 
     /// Try to resolve a type in the given extension type resolver
-    val TryLinkProvidedType : Tainted * string[] * typeLogicalName: string * range: range -> Tainted option
+    val TryLinkProvidedType: Tainted * string[] * typeLogicalName: string * range: range -> Tainted option
 
     /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-    val GetProvidedNamespaceAsPath : range * Tainted * string -> string list
+    val GetProvidedNamespaceAsPath: range * Tainted * string -> string list
 
     /// Decompose the enclosing name of a type (including any class nestings) into a list of parts.
     /// e.g. System.Object -> ["System"; "Object"]
-    val GetFSharpPathToProvidedType : Tainted * range:range-> string list
+    val GetFSharpPathToProvidedType: Tainted * range:range-> string list
     
     /// Get the ILTypeRef for the provided type (including for nested types). Take into account
     /// any type relocations or static linking for generated types.
-    val GetILTypeRefOfProvidedType : Tainted * range:range -> ILTypeRef
+    val GetILTypeRefOfProvidedType: Tainted * range:range -> ILTypeRef
 
     /// Get the ILTypeRef for the provided type (including for nested types). Do not take into account
     /// any type relocations or static linking for generated types.
-    val GetOriginalILTypeRefOfProvidedType : Tainted * range:range -> ILTypeRef
-
+    val GetOriginalILTypeRefOfProvidedType: Tainted * range:range -> ILTypeRef
 
     /// Represents the remapping information for a generated provided type and its nested types.
     ///
@@ -327,15 +328,17 @@ module internal ExtensionTyping =
     /// The table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly, plus what types are nested in side what types.
     type ProvidedAssemblyStaticLinkingMap = 
-        {  /// The table of remappings from type names in the provided assembly to type
-           /// names in the statically linked, embedded assembly.
-           ILTypeMap: Dictionary }
+        {
+            /// The table of remappings from type names in the provided assembly to type
+            /// names in the statically linked, embedded assembly.
+            ILTypeMap: Dictionary
+        }
         
         /// Create a new static linking map, ready to populate with data.
-        static member CreateNew : unit -> ProvidedAssemblyStaticLinkingMap
+        static member CreateNew: unit -> ProvidedAssemblyStaticLinkingMap
 
     /// Check if this is a direct reference to a non-embedded generated type. This is not permitted at any name resolution.
     /// We check by seeing if the type is absent from the remapping context.
-    val IsGeneratedTypeDirectReference         : Tainted * range -> bool
+    val IsGeneratedTypeDirectReference: Tainted * range -> bool
 
 #endif
diff --git a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
index 0ea056694c6..e127fa15e2a 100644
--- a/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
+++ b/src/fsharp/FSharp.Build/FSharpCommandLineBuilder.fs
@@ -12,6 +12,17 @@ open Internal.Utilities
 []
 do()
 
+// Shim to match nullness checking library support in preview
+[]
+module Utils = 
+
+    /// Match on the nullness of an argument.
+    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+
+    /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
+    /// replacement for 'string?' for example for future FS-1060.
+    type 'T MaybeNull when 'T : null and 'T: not struct = 'T
+
 type FSharpCommandLineBuilder () =
 
     // In addition to generating a command-line that will be handed to cmd.exe, we also generate
@@ -24,15 +35,15 @@ type FSharpCommandLineBuilder () =
     let mutable srcs = []  // in reverse order
 
     /// Return a list of the arguments (with no quoting for the cmd.exe shell)
-    member x.CapturedArguments() = List.rev args
+    member _.CapturedArguments() = List.rev args
 
     /// Return a list of the sources (with no quoting for the cmd.exe shell)
-    member x.CapturedFilenames() = List.rev srcs
+    member _.CapturedFilenames() = List.rev srcs
 
     /// Return a full command line (with quoting for the cmd.exe shell)
     override x.ToString() = builder.ToString()
 
-    member x.AppendFileNamesIfNotNull(filenames:ITaskItem array, sep:string) =
+    member _.AppendFileNamesIfNotNull(filenames: ITaskItem[], sep: string) =
         builder.AppendFileNamesIfNotNull(filenames, sep)
         // do not update "args", not used
         for item in filenames do
@@ -42,7 +53,7 @@ type FSharpCommandLineBuilder () =
             if s <> String.Empty then
                 srcs <- tmp.ToString() :: srcs
 
-    member x.AppendSwitchIfNotNull(switch:string, values:string array, sep:string) =
+    member _.AppendSwitchesIfNotNull(switch: string, values: string[], sep: string) =
         builder.AppendSwitchIfNotNull(switch, values, sep)
         let tmp = new CommandLineBuilder()
         tmp.AppendSwitchUnquotedIfNotNull(switch, values, sep)
@@ -50,7 +61,7 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- s :: args
 
-    member x.AppendSwitchIfNotNull(switch:string, value:string, ?metadataNames:string array) =
+    member _.AppendSwitchIfNotNull(switch: string, value: string MaybeNull, ?metadataNames: string[]) =
         let metadataNames = defaultArg metadataNames [||]
         builder.AppendSwitchIfNotNull(switch, value)
         let tmp = new CommandLineBuilder()
@@ -65,10 +76,10 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- s :: args
 
-    member x.AppendSwitchUnquotedIfNotNull(switch:string, value:string) =
+    member _.AppendSwitchUnquotedIfNotNull(switch: string, value: string MaybeNull) =
         assert(switch = "")  // we only call this method for "OtherFlags"
         // Unfortunately we still need to mimic what cmd.exe does, but only for "OtherFlags".
-        let ParseCommandLineArgs(commandLine:string) = // returns list in reverse order
+        let ParseCommandLineArgs(commandLine: string) = // returns list in reverse order
             let mutable args = []
             let mutable i = 0 // index into commandLine
             let len = commandLine.Length
@@ -95,7 +106,7 @@ type FSharpCommandLineBuilder () =
         if s <> String.Empty then
             args <- ParseCommandLineArgs(s) @ args
 
-    member x.AppendSwitch(switch:string) =
+    member _.AppendSwitch(switch: string) =
         builder.AppendSwitch(switch)
         args <- switch :: args
 
diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
index 80ab03249f0..b24e0fc1a77 100644
--- a/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
+++ b/src/fsharp/FSharp.Build/FSharpEmbedResXSource.fs
@@ -13,12 +13,12 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type FSharpEmbedResXSource() =
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-    let mutable _embeddedText : ITaskItem[] = [||]
-    let mutable _generatedSource : ITaskItem[] = [||]
-    let mutable _outputPath : string = ""
-    let mutable _targetFramework : string = ""
+    let mutable _buildEngine: IBuildEngine MaybeNull = null
+    let mutable _hostObject: ITaskHost MaybeNull = null
+    let mutable _embeddedText: ITaskItem[] = [||]
+    let mutable _generatedSource: ITaskItem[] = [||]
+    let mutable _outputPath: string = ""
+    let mutable _targetFramework: string = ""
 
     let boilerplate = @"// 
 
@@ -27,9 +27,9 @@ namespace {0}
 open System.Reflection
 
 module internal {1} =
-    type private C (_dummy:System.Object) = class end
+    type private C (_dummy:System.Int32) = class end
     let mutable Culture = System.Globalization.CultureInfo.CurrentUICulture
-    let ResourceManager = new System.Resources.ResourceManager(""{2}"", C(null).GetType().GetTypeInfo().Assembly)
+    let ResourceManager = new System.Resources.ResourceManager(""{2}"", C(0).GetType().GetTypeInfo().Assembly)
     let GetString(name:System.String) : System.String = ResourceManager.GetString(name, Culture)"
 
     let boilerplateGetObject = "    let GetObject(name:System.String) : System.Object = ResourceManager.GetObject(name, Culture)"
diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
index 1a8efbe5b66..856e63baf07 100644
--- a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
+++ b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
@@ -2,18 +2,17 @@
 
 namespace FSharp.Build
 
-open System.Collections
 open System.IO
 open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type FSharpEmbedResourceText() =
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-    let mutable _embeddedText : ITaskItem[] = [||]
-    let mutable _generatedSource : ITaskItem[] = [||]
-    let mutable _generatedResx : ITaskItem[] = [||]
-    let mutable _outputPath : string = ""
+    let mutable _buildEngine: IBuildEngine MaybeNull = null
+    let mutable _hostObject: ITaskHost MaybeNull = null
+    let mutable _embeddedText: ITaskItem[] = [||]
+    let mutable _generatedSource: ITaskItem[] = [||]
+    let mutable _generatedResx: ITaskItem[] = [||]
+    let mutable _outputPath: string = ""
 
     let PrintErr(filename, line, msg) =
         printfn "%s(%d): error : %s" filename line msg
@@ -183,7 +182,7 @@ type FSharpEmbedResourceText() =
         //printfn "holes.Length = %d, lineNum = %d" holes.Length //lineNum txt
         (holes, sb.ToString())
 
-    let Unquote (s : string) =
+    let Unquote (s: string) =
         if s.StartsWith "\"" && s.EndsWith "\"" then s.Substring(1, s.Length - 2)
         else failwith "error message string should be quoted"
 
@@ -279,7 +278,7 @@ open Printf
         // PERF: this technique is a bit slow (e.g. in simple cases, like 'sprintf ""%x""')
         mkFunctionValue tys (fun inp -> impl rty inp)
 
-    static let capture1 (fmt:string) i args ty (go : obj list -> System.Type -> int -> obj) : obj =
+    static let capture1 (fmt:string) i args ty (go: obj list -> System.Type -> int -> obj) : obj =
         match fmt.[i] with
         | '%' -> go args ty (i+1)
         | 'd'
@@ -289,10 +288,10 @@ open Printf
 
     // newlines and tabs get converted to strings when read from a resource file
     // this will preserve their original intention
-    static let postProcessString (s : string) =
+    static let postProcessString (s: string) =
         s.Replace(""\\n"",""\n"").Replace(""\\t"",""\t"").Replace(""\\r"",""\r"").Replace(""\\\"""", ""\"""")
 
-    static let createMessageString (messageString : string) (fmt : Printf.StringFormat<'T>) : 'T =
+    static let createMessageString (messageString: string) (fmt: Printf.StringFormat<'T>) : 'T =
         let fmt = fmt.Value // here, we use the actual error string, as opposed to the one stored as fmt
         let len = fmt.Length
 
@@ -319,7 +318,7 @@ open Printf
 
     static let mutable swallowResourceText = false
 
-    static let GetStringFunc((messageID : string),(fmt : Printf.StringFormat<'T>)) : 'T =
+    static let GetStringFunc((messageID: string),(fmt: Printf.StringFormat<'T>)) : 'T =
         if swallowResourceText then
             sprintf fmt
         else
diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs
index 42c980a9ce8..e9c61149c0a 100644
--- a/src/fsharp/FSharp.Build/Fsc.fs
+++ b/src/fsharp/FSharp.Build/Fsc.fs
@@ -21,49 +21,49 @@ type public Fsc () as this =
 
     inherit ToolTask ()
 
-    let mutable baseAddress : string = null
-    let mutable capturedArguments : string list = []  // list of individual args, to pass to HostObject Compile()
-    let mutable capturedFilenames : string list = []  // list of individual source filenames, to pass to HostObject Compile()
-    let mutable checksumAlgorithm: string = null
-    let mutable codePage : string = null
-    let mutable commandLineArgs : ITaskItem list = []
+    let mutable baseAddress: string MaybeNull = null
+    let mutable capturedArguments: string list = []  // list of individual args, to pass to HostObject Compile()
+    let mutable capturedFilenames: string list = []  // list of individual source filenames, to pass to HostObject Compile()
+    let mutable checksumAlgorithm: string MaybeNull = null
+    let mutable codePage: string MaybeNull = null
+    let mutable commandLineArgs: ITaskItem list = []
     let mutable compilerTools: ITaskItem [] = [||]
     let mutable debugSymbols = false
-    let mutable debugType : string = null
-    let mutable defineConstants : ITaskItem[] = [||]
-    let mutable delaySign : bool = false
-    let mutable deterministic : bool = false
-    let mutable disabledWarnings : string = null
-    let mutable documentationFile : string = null
-    let mutable dotnetFscCompilerPath : string = null
+    let mutable debugType: string MaybeNull = null
+    let mutable defineConstants: ITaskItem[] = [||]
+    let mutable delaySign: bool = false
+    let mutable deterministic: bool = false
+    let mutable disabledWarnings: string MaybeNull = null
+    let mutable documentationFile: string MaybeNull = null
+    let mutable dotnetFscCompilerPath: string MaybeNull = null
     let mutable embedAllSources = false
-    let mutable embeddedFiles : ITaskItem[] = [||]
-    let mutable generateInterfaceFile : string = null
-    let mutable highEntropyVA : bool = false
-    let mutable keyFile : string = null
-    let mutable langVersion : string = null
+    let mutable embeddedFiles: ITaskItem[] = [||]
+    let mutable generateInterfaceFile: string MaybeNull = null
+    let mutable highEntropyVA: bool = false
+    let mutable keyFile: string MaybeNull = null
+    let mutable langVersion: string MaybeNull = null
     let mutable noFramework = false
-    let mutable optimize  : bool = true
-    let mutable otherFlags : string = null
-    let mutable outputAssembly : string = null
-    let mutable pathMap : string = null
-    let mutable pdbFile : string = null
-    let mutable platform : string = null
-    let mutable prefer32bit : bool = false
-    let mutable preferredUILang : string = null
-    let mutable publicSign : bool = false
-    let mutable provideCommandLineArgs : bool = false
-    let mutable references : ITaskItem[] = [||]
-    let mutable referencePath : string = null
-    let mutable resources : ITaskItem[] = [||]
-    let mutable skipCompilerExecution : bool  = false
-    let mutable sources : ITaskItem[] = [||]
-    let mutable sourceLink : string = null
-    let mutable subsystemVersion : string = null
-    let mutable tailcalls : bool = true
-    let mutable targetProfile : string = null
-    let mutable targetType : string = null
-    let mutable toolExe : string = "fsc.exe"
+    let mutable optimize : bool = true
+    let mutable otherFlags: string MaybeNull = null
+    let mutable outputAssembly: string MaybeNull = null
+    let mutable pathMap: string MaybeNull = null
+    let mutable pdbFile: string MaybeNull = null
+    let mutable platform: string MaybeNull = null
+    let mutable prefer32bit: bool = false
+    let mutable preferredUILang: string MaybeNull = null
+    let mutable publicSign: bool = false
+    let mutable provideCommandLineArgs: bool = false
+    let mutable references: ITaskItem[] = [||]
+    let mutable referencePath: string MaybeNull = null
+    let mutable resources: ITaskItem[] = [||]
+    let mutable skipCompilerExecution: bool  = false
+    let mutable sources: ITaskItem[] = [||]
+    let mutable sourceLink: string MaybeNull = null
+    let mutable subsystemVersion: string MaybeNull = null
+    let mutable tailcalls: bool = true
+    let mutable targetProfile: string MaybeNull = null
+    let mutable targetType: string MaybeNull = null
+    let mutable toolExe: string = "fsc.exe"
     let defaultToolPath =
         let locationOfThisDll =
             try Some(Path.GetDirectoryName(typeof.Assembly.Location))
@@ -71,27 +71,26 @@ type public Fsc () as this =
         match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with
         | Some s -> s
         | None -> ""
-    let mutable treatWarningsAsErrors : bool = false
-    let mutable useStandardResourceNames : bool = false
-    let mutable warningsAsErrors : string = null
-    let mutable warningsNotAsErrors : string = null
-    let mutable versionFile : string = null
-    let mutable warningLevel : string = null
-    let mutable warnOn : string = null
-    let mutable win32icon: string = null
-    let mutable win32res : string = null
-    let mutable win32manifest : string = null
-    let mutable vserrors : bool = false
-    let mutable vslcid : string = null
-    let mutable utf8output : bool = false
-
+    let mutable treatWarningsAsErrors: bool = false
+    let mutable useStandardResourceNames: bool = false
+    let mutable warningsAsErrors: string MaybeNull = null
+    let mutable warningsNotAsErrors: string MaybeNull = null
+    let mutable versionFile: string MaybeNull = null
+    let mutable warningLevel: string MaybeNull = null
+    let mutable warnOn: string MaybeNull = null
+    let mutable win32icon: string MaybeNull = null
+    let mutable win32res: string MaybeNull = null
+    let mutable win32manifest: string MaybeNull = null
+    let mutable vserrors: bool = false
+    let mutable vslcid: string MaybeNull = null
+    let mutable utf8output: bool = false
 
     /// Trim whitespace ... spaces, tabs, newlines,returns, Double quotes and single quotes
     let wsCharsToTrim = [| ' '; '\t'; '\"'; '\'' |]
-    let splitAndWsTrim (s:string) =
+    let splitAndWsTrim (s: string MaybeNull) =
         match s with
-        | null -> [||]
-        | _ ->
+        | Null -> [||]
+        | NonNull s ->
             let array = s.Split([| ';'; ','; '\r'; '\n' |], StringSplitOptions.RemoveEmptyEntries)
             array |> Array.map(fun item -> item.Trim(wsCharsToTrim)) |> Array.filter(fun s -> not (String.IsNullOrEmpty s))
 
@@ -100,16 +99,22 @@ type public Fsc () as this =
 
     let generateCommandLineBuilder () =
         let builder = new FSharpCommandLineBuilder()
+
         // OutputAssembly
         builder.AppendSwitchIfNotNull("-o:", outputAssembly)
+
         // CodePage
         builder.AppendSwitchIfNotNull("--codepage:", codePage)
+
         // Debug
         if debugSymbols then
             builder.AppendSwitch("-g")
+
         // DebugType
         builder.AppendSwitchIfNotNull("--debug:",
-            if debugType = null then null else
+            match debugType with 
+            | Null -> null
+            | NonNull debugType -> 
                 match debugType.ToUpperInvariant() with
                 | "NONE"     -> null
                 | "PORTABLE" -> "portable"
@@ -117,41 +122,57 @@ type public Fsc () as this =
                 | "EMBEDDED" -> "embedded"
                 | "FULL"     -> "full"
                 | _          -> null)
-        if embedAllSources then builder.AppendSwitch("--embed+")
-        if embeddedFiles <> null then 
-            for item in embeddedFiles do
-                builder.AppendSwitchIfNotNull("--embed:", item.ItemSpec)
+
+        if embedAllSources then
+            builder.AppendSwitch("--embed+")
+
+        for item in embeddedFiles do
+            builder.AppendSwitchIfNotNull("--embed:", item.ItemSpec)
+
         builder.AppendSwitchIfNotNull("--sourcelink:", sourceLink)
+
         builder.AppendSwitchIfNotNull("--langversion:", langVersion)
+
         // NoFramework
         if noFramework then
             builder.AppendSwitch("--noframework")
+
         // BaseAddress
         builder.AppendSwitchIfNotNull("--baseaddress:", baseAddress)
+
         // DefineConstants
-        if defineConstants <> null then 
-            for item in defineConstants do
-                builder.AppendSwitchIfNotNull("--define:", item.ItemSpec)
+        for item in defineConstants do
+            builder.AppendSwitchIfNotNull("--define:", item.ItemSpec)
+
         // DocumentationFile
         builder.AppendSwitchIfNotNull("--doc:", documentationFile)
+
         // GenerateInterfaceFile
         builder.AppendSwitchIfNotNull("--sig:", generateInterfaceFile)
+
         // KeyFile
         builder.AppendSwitchIfNotNull("--keyfile:", keyFile)
         if delaySign then builder.AppendSwitch("--delaysign+")
         if publicSign then builder.AppendSwitch("--publicsign+")
+
         // Optimize
         if optimize then
             builder.AppendSwitch("--optimize+")
         else
             builder.AppendSwitch("--optimize-")
+
+        // Tailcalls
         if not tailcalls then
             builder.AppendSwitch("--tailcalls-")
+
         // PdbFile
         builder.AppendSwitchIfNotNull("--pdb:", pdbFile)
 // Platform
         builder.AppendSwitchIfNotNull("--platform:",
-            let ToUpperInvariant (s:string) = if s = null then null else s.ToUpperInvariant()
+
+            let ToUpperInvariant (s: string MaybeNull) =
+                match s with Null -> null | NonNull s -> s.ToUpperInvariant()
+
             match ToUpperInvariant(platform), prefer32bit, ToUpperInvariant(targetType) with
                 | "ANYCPU", true, "EXE"
                 | "ANYCPU", true, "WINEXE" -> "anycpu32bitpreferred"
@@ -159,6 +180,7 @@ type public Fsc () as this =
                 | "X86",  _, _  -> "x86"
                 | "X64",  _, _  -> "x64"
                 | _ -> null)
+
         // checksumAlgorithm
         builder.AppendSwitchIfNotNull("--checksumalgorithm:",
             let ToUpperInvariant (s:string) = if s = null then null else s.ToUpperInvariant()
@@ -166,33 +188,31 @@ type public Fsc () as this =
                 | "SHA1" -> "Sha1"
                 | "SHA256" -> "Sha256"
                 | _ -> null)
+
         // Resources
-        if resources <> null then 
-            for item in resources do
-                match useStandardResourceNames with
-                | true -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec, [|item.GetMetadata("LogicalName"); item.GetMetadata("Access")|])
-                | false -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec)
+        for item in resources do
+            match useStandardResourceNames with
+            | true -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec, [|item.GetMetadata("LogicalName"); item.GetMetadata("Access")|])
+            | false -> builder.AppendSwitchIfNotNull("--resource:", item.ItemSpec)
 
         // VersionFile
         builder.AppendSwitchIfNotNull("--versionfile:", versionFile)
 
         // CompilerTools
-        if compilerTools <> null then 
-            for item in compilerTools do
-                builder.AppendSwitchIfNotNull("--compilertool:", item.ItemSpec)
+        for item in compilerTools do
+            builder.AppendSwitchIfNotNull("--compilertool:", item.ItemSpec)
 
         // References
-        if references <> null then 
-            for item in references do
-                builder.AppendSwitchIfNotNull("-r:", item.ItemSpec)
+        for item in references do
+            builder.AppendSwitchIfNotNull("-r:", item.ItemSpec)
 
-        match referencePath with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--lib:", referencePath |> splitAndWsTrim, ",")
+        builder.AppendSwitchesIfNotNull("--lib:", referencePath |> splitAndWsTrim, ",")
 
         // TargetType
         builder.AppendSwitchIfNotNull("--target:", 
-            if targetType = null then null else
+            match targetType with 
+            | Null -> null
+            | NonNull targetType -> 
                 match targetType.ToUpperInvariant() with
                 | "LIBRARY" -> "library"
                 | "EXE" -> "exe"
@@ -201,30 +221,22 @@ type public Fsc () as this =
                 | _ -> null)
 
         // NoWarn
-        match disabledWarnings with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--nowarn:", disabledWarnings |> splitAndWsTrim, ",")
+        builder.AppendSwitchesIfNotNull("--nowarn:", disabledWarnings |> splitAndWsTrim, ",")
         
         // WarningLevel
         builder.AppendSwitchIfNotNull("--warn:", warningLevel)
 
-        match warnOn with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--warnon:", warnOn |> splitAndWsTrim, ",")
+        builder.AppendSwitchesIfNotNull("--warnon:", warnOn |> splitAndWsTrim, ",")
 
         // TreatWarningsAsErrors
         if treatWarningsAsErrors then
             builder.AppendSwitch("--warnaserror")
 
-        // WarnAsErrors
-        match warningsAsErrors with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--warnaserror:", warningsAsErrors |> splitAndWsTrim, ",")
+        // WarningsAsErrors
+        builder.AppendSwitchesIfNotNull("--warnaserror:", warningsAsErrors |> splitAndWsTrim, ",")
 
         // WarningsNotAsErrors
-        match warningsNotAsErrors with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--warnaserror-:", warningsNotAsErrors |> splitAndWsTrim, ",")
+        builder.AppendSwitchesIfNotNull("--warnaserror-:", warningsNotAsErrors |> splitAndWsTrim, ",")
 
         // Win32IconFile
         builder.AppendSwitchIfNotNull("--win32icon:", win32icon)
@@ -263,9 +275,7 @@ type public Fsc () as this =
 
         builder.AppendSwitch("--nocopyfsharpcore")
         
-        match pathMap with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--pathmap:", pathMap |> splitAndWsTrim, ",")
+        builder.AppendSwitchesIfNotNull("--pathmap:", pathMap |> splitAndWsTrim, ",")   
 
         if deterministic then
             builder.AppendSwitch("--deterministic+")
@@ -281,71 +291,71 @@ type public Fsc () as this =
         builder
 
     // --baseaddress
-    member fsc.BaseAddress
+    member _.BaseAddress
         with get() = baseAddress 
         and set(s) = baseAddress <- s
 
     // --checksumalgorithm
-    member fsc.ChecksumAlgorithm
+    member _.ChecksumAlgorithm
         with get() = checksumAlgorithm 
         and set(s) = checksumAlgorithm <- s
 
     // --codepage : Specify the codepage to use when opening source files
-    member fsc.CodePage
+    member _.CodePage
         with get() = codePage
         and set(s) = codePage <- s
 
     // -r : Reference an F# or .NET assembly.
-    member fsc.CompilerTools
+    member _.CompilerTools
         with get() = compilerTools
         and set(a) = compilerTools <- a
 
     // -g: Produce debug file. Disables optimizations if a -O flag is not given.
-    member fsc.DebugSymbols
+    member _.DebugSymbols
         with get() = debugSymbols
         and set(b) = debugSymbols <- b
 
     // --debug : Emit debugging information
-    member fsc.DebugType
+    member _.DebugType
         with get() = debugType
         and set(s) = debugType <- s
 
-    member fsc.Deterministic 
+    member _.Deterministic 
         with get() = deterministic
         and set(p) = deterministic <- p
 
-    member fsc.DelaySign
+    member _.DelaySign
         with get() = delaySign
         and set(s) = delaySign <- s
 
     // --nowarn : Do not report the given specific warning.
-    member fsc.DisabledWarnings
+    member _.DisabledWarnings
         with get() = disabledWarnings
         and set(a) = disabledWarnings <- a
 
     // --define : Define the given conditional compilation symbol.
-    member fsc.DefineConstants
+    member _.DefineConstants
         with get() = defineConstants
         and set(a) = defineConstants <- a
 
     // --doc : Write the xmldoc of the assembly to the given file.
-    member fsc.DocumentationFile
+    member _.DocumentationFile
         with get() = documentationFile
         and set(s) = documentationFile <- s
 
-    member fsc.DotnetFscCompilerPath  
+    member _.DotnetFscCompilerPath  
         with get() = dotnetFscCompilerPath
         and set(p) = dotnetFscCompilerPath <- p
 
-    member fsc.EmbedAllSources
+    member _.EmbedAllSources
         with get() = embedAllSources
         and  set(s) = embedAllSources <- s
 
-    member fsc.Embed
+    member _.Embed
         with get() = embeddedFiles
         and set(e) = embeddedFiles <- e
 
-    member fsc.EmbeddedFiles
+    member _.EmbeddedFiles
         with get() = embeddedFiles
         and set(e) = embeddedFiles <- e
 
@@ -353,7 +363,7 @@ type public Fsc () as this =
     //     Print the inferred interface of the
     //     assembly to a file.
 
-    member fsc.GenerateInterfaceFile
+    member _.GenerateInterfaceFile
         with get() = generateInterfaceFile
         and set(s) = generateInterfaceFile <- s
 
@@ -363,51 +373,51 @@ type public Fsc () as this =
     //     an assembly with a strong name. This is only relevant if producing
     //     an assembly to be shared amongst programs from different
     //     directories, e.g. to be installed in the Global Assembly Cache.
-    member fsc.KeyFile
+    member _.KeyFile
         with get() = keyFile
         and set(s) = keyFile <- s
 
-    member fsc.LangVersion
+    member _.LangVersion
         with get() = langVersion
         and set(s) = langVersion <- s
 
-    member fsc.LCID
+    member _.LCID
         with get() = vslcid
         and set(p) = vslcid <- p
 
     // --noframework
-    member fsc.NoFramework
+    member _.NoFramework
         with get() = noFramework 
         and set(b) = noFramework <- b
 
     // --optimize
-    member fsc.Optimize
+    member _.Optimize
         with get() = optimize
         and set(p) = optimize <- p
 
     // --tailcalls
-    member fsc.Tailcalls
+    member _.Tailcalls
         with get() = tailcalls
         and set(p) = tailcalls <- p
 
     // REVIEW: decide whether to keep this, for now is handy way to deal with as-yet-unimplemented features
-    member fsc.OtherFlags
+    member _.OtherFlags
         with get() = otherFlags
         and set(s) = otherFlags <- s
 
     // -o : Name the output file
-    member fsc.OutputAssembly
+    member _.OutputAssembly
         with get() = outputAssembly
         and set(s) = outputAssembly <- s
 
     // --pathmap : Paths to rewrite when producing deterministic builds
-    member fsc.PathMap
+    member _.PathMap
         with get() = pathMap
         and set(s) = pathMap <- s
 
     // --pdb : 
     //     Name the debug output file
-    member fsc.PdbFile
+    member _.PdbFile
         with get() = pdbFile
         and set(s) = pdbFile <- s
 
@@ -416,58 +426,58 @@ type public Fsc () as this =
     //            x64
     //            anycpu
     //            anycpu32bitpreferred
-    member fsc.Platform
+    member _.Platform
         with get() = platform 
         and set(s) = platform <- s
 
     // indicator whether anycpu32bitpreferred is applicable or not
-    member fsc.Prefer32Bit
+    member _.Prefer32Bit
         with get() = prefer32bit 
         and set(s) = prefer32bit <- s
 
-    member fsc.PreferredUILang
+    member _.PreferredUILang
         with get() = preferredUILang 
         and set(s) = preferredUILang <- s
 
-    member fsc.ProvideCommandLineArgs
+    member _.ProvideCommandLineArgs
         with get() = provideCommandLineArgs
         and set(p) = provideCommandLineArgs <- p
 
-    member fsc.PublicSign
+    member _.PublicSign
         with get() = publicSign 
         and set(s) = publicSign <- s
 
     // -r : Reference an F# or .NET assembly.
-    member fsc.References
+    member _.References
         with get() = references
         and set(a) = references <- a
 
     // --lib
-    member fsc.ReferencePath
+    member _.ReferencePath
         with get() = referencePath
         and set(s) = referencePath <- s
 
     // --resource : Embed the specified managed resources (.resource).
     //   Produce .resource files from .resx files using resgen.exe or resxc.exe.
-    member fsc.Resources
+    member _.Resources
         with get() = resources
         and set(a) = resources <- a
 
-    member fsc.SkipCompilerExecution
+    member _.SkipCompilerExecution
         with get() = skipCompilerExecution
         and set(p) = skipCompilerExecution <- p
 
     // SourceLink
-    member fsc.SourceLink  
+    member _.SourceLink  
         with get() = sourceLink 
         and set(s) = sourceLink <- s
 
     // source files 
-    member fsc.Sources
+    member _.Sources
         with get() = sources
         and set(a) = sources <- a
 
-    member fsc.TargetProfile
+    member _.TargetProfile
         with get() = targetProfile
         and set(p) = targetProfile <- p
 
@@ -476,90 +486,95 @@ type public Fsc () as this =
     //      stdin/stdout/stderr
     // --target library: Produce a DLL
     // --target module: Produce a module that can be added to another assembly
-    member fsc.TargetType
+    member _.TargetType
         with get() = targetType
         and set(s) = targetType <- s
 
-    member fsc.TreatWarningsAsErrors
+    member _.TreatWarningsAsErrors
         with get() = treatWarningsAsErrors
         and set(p) = treatWarningsAsErrors <- p
 
     // When set to true, generate resource names in the same way as C# with root namespace and folder names
-    member fsc.UseStandardResourceNames
+    member _.UseStandardResourceNames
         with get() = useStandardResourceNames
         and set(s) = useStandardResourceNames <- s
 
     // --version-file : 
-    member fsc.VersionFile
+    member _.VersionFile
         with get() = versionFile
         and set(s) = versionFile <- s
 
     // For specifying a win32 icon file (.ico)
-    member fsc.Win32IconFile
+    member _.Win32IconFile
         with get() = win32icon
         and set(s) = win32icon <- s
 
     // For specifying a win32 native resource file (.res)
-    member fsc.Win32ResourceFile
+    member _.Win32ResourceFile
         with get() = win32res
         and set(s) = win32res <- s
 
     // For specifying a win32 manifest file
-    member fsc.Win32ManifestFile
+    member _.Win32ManifestFile
         with get() = win32manifest
         and set(m) = win32manifest <- m
 
     // For specifying the warning level (0-4)
-    member fsc.WarningLevel
+    member _.WarningLevel
         with get() = warningLevel
         and set(s) = warningLevel <- s
 
-    member fsc.WarningsAsErrors 
+    member _.WarningsAsErrors 
         with get() = warningsAsErrors
         and set(s) = warningsAsErrors <- s
 
-    member fsc.WarningsNotAsErrors
+    member _.WarningsNotAsErrors
         with get() = warningsNotAsErrors
         and set(s) = warningsNotAsErrors <- s
 
-    member fsc.WarnOn 
+    member _.WarnOn 
         with get() = warnOn
         and set(s) = warnOn <- s
 
-    member fsc.VisualStudioStyleErrors
+    member _.VisualStudioStyleErrors
         with get() = vserrors
         and set(p) = vserrors <- p
 
-    member fsc.Utf8Output
+    member _.Utf8Output
         with get() = utf8output
         and set(p) = utf8output <- p
 
-    member fsc.SubsystemVersion
+    member _.SubsystemVersion
         with get() = subsystemVersion
         and set(p) = subsystemVersion <- p
 
-    member fsc.HighEntropyVA
+    member _.HighEntropyVA
         with get() = highEntropyVA
         and set(p) = highEntropyVA <- p
 
     []
-    member fsc.CommandLineArgs
+    member _.CommandLineArgs
         with get() = List.toArray commandLineArgs
         and set(p) = commandLineArgs <- (List.ofArray p)
 
     // ToolTask methods
-    override fsc.ToolName = "fsc.exe" 
-    override fsc.StandardErrorEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardErrorEncoding
-    override fsc.StandardOutputEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardOutputEncoding
+    override _.ToolName = "fsc.exe" 
+
+    override _.StandardErrorEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardErrorEncoding
+
+    override _.StandardOutputEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardOutputEncoding
+
     override fsc.GenerateFullPathToTool() =
         if defaultToolPath = "" then
             raise (new System.InvalidOperationException(FSBuild.SR.toolpathUnknown()))
         System.IO.Path.Combine(defaultToolPath, fsc.ToolExe)
+
     override fsc.LogToolCommand (message:string) =
         fsc.Log.LogMessageFromText(message, MessageImportance.Normal) |>ignore
 
     member internal fsc.InternalGenerateFullPathToTool() = fsc.GenerateFullPathToTool()             // expose for unit testing
-    member internal fsc.BaseExecuteTool(pathToTool, responseFileCommands, commandLineCommands) =    // F# does not allow protected members to be captured by lambdas, this is the standard workaround
+
+    member internal _.BaseExecuteTool(pathToTool, responseFileCommands, commandLineCommands) =    // F# does not allow protected members to be captured by lambdas, this is the standard workaround
         base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
 
     /// Intercept the call to ExecuteTool to handle the host compile case.
@@ -601,12 +616,15 @@ type public Fsc () as this =
                     Debug.Fail("HostObject received by Fsc task did not have a Compile method or the compile method threw an exception. " + (e.ToString()))
                     reraise()
 
-    override fsc.GenerateCommandLineCommands() =
+    override _.GenerateCommandLineCommands() =
         let builder = new FSharpCommandLineBuilder()
-        if not (String.IsNullOrEmpty(dotnetFscCompilerPath)) then builder.AppendSwitch(dotnetFscCompilerPath)
+        match dotnetFscCompilerPath with
+        | Null | "" -> ()
+        | NonNull dotnetFscCompilerPath ->
+            builder.AppendSwitch(dotnetFscCompilerPath)
         builder.ToString()
 
-    override fsc.GenerateResponseFileCommands() =
+    override _.GenerateResponseFileCommands() =
         let builder = generateCommandLineBuilder ()
         builder.GetCapturedArguments() |> String.concat Environment.NewLine
 
diff --git a/src/fsharp/FSharp.Build/Fsi.fs b/src/fsharp/FSharp.Build/Fsi.fs
index ffe833e0e01..c5da10a645d 100644
--- a/src/fsharp/FSharp.Build/Fsi.fs
+++ b/src/fsharp/FSharp.Build/Fsi.fs
@@ -21,44 +21,44 @@ type public Fsi () as this =
 
     inherit ToolTask ()
 
-    let mutable capturedArguments : string list = []  // list of individual args, to pass to HostObject Compile()
-    let mutable capturedFilenames : string list = []  // list of individual source filenames, to pass to HostObject Compile()
-    let mutable codePage : string = null
-    let mutable commandLineArgs : ITaskItem list = []
-    let mutable defineConstants : ITaskItem[] = [||]
-    let mutable disabledWarnings : string = null
-    let mutable dotnetFsiCompilerPath : string = null
+    let mutable capturedArguments: string list = []  // list of individual args, to pass to HostObject Compile()
+    let mutable capturedFilenames: string list = []  // list of individual source filenames, to pass to HostObject Compile()
+    let mutable codePage: string MaybeNull = null
+    let mutable commandLineArgs: ITaskItem list = []
+    let mutable defineConstants: ITaskItem[] = [||]
+    let mutable disabledWarnings: string MaybeNull = null
+    let mutable dotnetFsiCompilerPath: string MaybeNull = null
     let mutable fsiExec = false
-    let mutable langVersion : string = null
+    let mutable langVersion: string MaybeNull = null
     let mutable noFramework = false
     let mutable optimize = true
-    let mutable otherFlags : string = null
+    let mutable otherFlags: string MaybeNull = null
     let mutable preferredUILang = null
     let mutable provideCommandLineArgs = false
-    let mutable references : ITaskItem[] = [||]
-    let mutable referencePath : string = null
-    let mutable resources : ITaskItem[] = [||]
+    let mutable references: ITaskItem[] = [||]
+    let mutable referencePath: string MaybeNull = null
+    let mutable resources: ITaskItem[] = [||]
     let mutable skipCompilerExecution = false
-    let mutable sources : ITaskItem[] = [||]
-    let mutable loadSources : ITaskItem[] = [||]
-    let mutable useSources : ITaskItem[] = [||]
-    let mutable tailcalls : bool = true
-    let mutable targetProfile : string = null
-    let mutable targetType : string = null
-    let mutable toolExe : string = "fsi.exe"
-    let mutable toolPath : string =
+    let mutable sources: ITaskItem[] = [||]
+    let mutable loadSources: ITaskItem[] = [||]
+    let mutable useSources: ITaskItem[] = [||]
+    let mutable tailcalls: bool = true
+    let mutable targetProfile: string MaybeNull = null
+    let mutable targetType: string MaybeNull = null
+    let mutable toolExe: string = "fsi.exe"
+    let mutable toolPath: string =
         let locationOfThisDll =
             try Some(Path.GetDirectoryName(typeof.Assembly.Location))
             with _ -> None
         match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with
         | Some s -> s
         | None -> ""
-    let mutable treatWarningsAsErrors : bool = false
-    let mutable warningsAsErrors : string = null
-    let mutable warningsNotAsErrors : string = null
-    let mutable warningLevel : string = null
-    let mutable vslcid : string = null
-    let mutable utf8output : bool = false
+    let mutable treatWarningsAsErrors: bool = false
+    let mutable warningsAsErrors: string MaybeNull = null
+    let mutable warningsNotAsErrors: string MaybeNull = null
+    let mutable warningLevel: string MaybeNull = null
+    let mutable vslcid: string MaybeNull = null
+    let mutable utf8output: bool = false
 
     // See bug 6483; this makes parallel build faster, and is fine to set unconditionally
     do this.YieldDuringToolExecution <- true
@@ -71,9 +71,8 @@ type public Fsi () as this =
         builder.AppendSwitchIfNotNull("--langversion:", langVersion)
         if noFramework then builder.AppendSwitch("--noframework")
 
-        if defineConstants <> null then
-            for item in defineConstants do
-                builder.AppendSwitchIfNotNull("--define:", item.ItemSpec)
+        for item in defineConstants do
+            builder.AppendSwitchIfNotNull("--define:", item.ItemSpec)
 
         if optimize then builder.AppendSwitch("--optimize+")
         else builder.AppendSwitch("--optimize-")
@@ -81,19 +80,13 @@ type public Fsi () as this =
         if not tailcalls then
             builder.AppendSwitch("--tailcalls-")
 
-        if references <> null then 
-            for item in references do
-                builder.AppendSwitchIfNotNull("-r:", item.ItemSpec)
-
-        let referencePathArray = // create a array of strings
-            match referencePath with
-            | null -> null
-            | _ -> referencePath.Split([|';'; ','|], StringSplitOptions.RemoveEmptyEntries)
+        for item in references do
+            builder.AppendSwitchIfNotNull("-r:", item.ItemSpec)
 
         // NoWarn
         match disabledWarnings with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",")
+        | Null -> ()
+        | NonNull disabledWarnings -> builder.AppendSwitchesIfNotNull("--nowarn:", disabledWarnings.Split([|' '; ';'; ','; '\r'; '\n'|], StringSplitOptions.RemoveEmptyEntries), ",")
 
         builder.AppendSwitchIfNotNull("--warn:", warningLevel)
 
@@ -102,14 +95,14 @@ type public Fsi () as this =
         // Change warning 76, HashReferenceNotAllowedInNonScript/HashDirectiveNotAllowedInNonScript/HashIncludeNotAllowedInNonScript, into an error
         let warningsAsErrorsArray =
             match warningsAsErrors with
-            | null -> [| "76" |]
-            | _ -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries)
+            | Null -> [| "76" |]
+            | NonNull warningsAsErrors -> (warningsAsErrors + " 76 ").Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries)
 
-        builder.AppendSwitchIfNotNull("--warnaserror:", warningsAsErrorsArray, ",")
+        builder.AppendSwitchesIfNotNull("--warnaserror:", warningsAsErrorsArray, ",")
 
         match warningsNotAsErrors with
-        | null -> ()
-        | _ -> builder.AppendSwitchIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",")
+        | Null -> ()
+        | NonNull warningsNotAsErrors -> builder.AppendSwitchesIfNotNull("--warnaserror-:", warningsNotAsErrors.Split([|' '; ';'; ','|], StringSplitOptions.RemoveEmptyEntries), ",")
 
         builder.AppendSwitchIfNotNull("--LCID:", vslcid)
 
@@ -122,13 +115,11 @@ type public Fsi () as this =
 
         builder.AppendSwitchIfNotNull("--targetprofile:", targetProfile)
 
-        if loadSources <> null then
-            for item in loadSources do
-                builder.AppendSwitchIfNotNull("--load:", item.ItemSpec)
+        for item in loadSources do
+            builder.AppendSwitchIfNotNull("--load:", item.ItemSpec)
 
-        if useSources <> null then 
-            for item in useSources do
-                builder.AppendSwitchIfNotNull("--use:", item.ItemSpec)
+        for item in useSources do
+            builder.AppendSwitchIfNotNull("--use:", item.ItemSpec)
 
         // OtherFlags - must be second-to-last
         builder.AppendSwitchUnquotedIfNotNull("", otherFlags)
@@ -143,139 +134,144 @@ type public Fsi () as this =
         builder
 
     // --codepage : Specify the codepage to use when opening source files
-    member fsc.CodePage
+    member _.CodePage
         with get() = codePage
         and set(s) = codePage <- s
 
     // --nowarn : Do not report the given specific warning.
-    member fsi.DisabledWarnings
+    member _.DisabledWarnings
         with get() = disabledWarnings
         and set(a) = disabledWarnings <- a
 
     // --define : Define the given conditional compilation symbol.
-    member fsi.DefineConstants
+    member _.DefineConstants
         with get() = defineConstants
         and set(a) = defineConstants <- a
 
-    member fsi.DotnetFsiCompilerPath  
+    member _.DotnetFsiCompilerPath  
         with get() = dotnetFsiCompilerPath
         and set(p) = dotnetFsiCompilerPath <- p
 
-    member fsi.FsiExec
+    member _.FsiExec
         with get() = fsiExec
         and set(p) = fsiExec <- p
 
-    member fsi.LCID
+    member _.LCID
         with get() = vslcid
         and set(p) = vslcid <- p
 
-    member fsc.LangVersion
+    member _.LangVersion
         with get() = langVersion
         and set(s) = langVersion <- s
 
     // --noframework
-    member fsi.NoFramework
+    member _.NoFramework
         with get() = noFramework 
         and set(b) = noFramework <- b
 
     // --optimize
-    member fsi.Optimize
+    member _.Optimize
         with get() = optimize
         and set(p) = optimize <- p
 
     // --tailcalls
-    member fsi.Tailcalls
+    member _.Tailcalls
         with get() = tailcalls
         and set(p) = tailcalls <- p
 
-    member fsi.OtherFlags
+    member _.OtherFlags
         with get() = otherFlags
         and set(s) = otherFlags <- s
 
-    member fsi.PreferredUILang
+    member _.PreferredUILang
         with get() = preferredUILang 
         and set(s) = preferredUILang <- s
 
-    member fsi.ProvideCommandLineArgs
+    member _.ProvideCommandLineArgs
         with get() = provideCommandLineArgs
         and set(p) = provideCommandLineArgs <- p
 
     // -r : Reference an F# or .NET assembly.
-    member fsi.References
+    member _.References
         with get() = references
         and set(a) = references <- a
 
     // --lib
-    member fsi.ReferencePath
+    member _.ReferencePath
         with get() = referencePath
         and set(s) = referencePath <- s
 
     // -load:: load an F# source file
-    member fsi.LoadSources
+    member _.LoadSources
         with get() = loadSources
         and set(a) = loadSources <- a
 
-    member fsi.SkipCompilerExecution
+    member _.SkipCompilerExecution
         with get() = skipCompilerExecution
         and set(p) = skipCompilerExecution <- p
 
     // source files 
-    member fsi.Sources
+    member _.Sources
         with get() = sources
         and set(a) = sources <- a
 
-    member fsi.TargetProfile
+    member _.TargetProfile
         with get() = targetProfile
         and set(p) = targetProfile <- p
 
-    member fsi.TreatWarningsAsErrors
+    member _.TreatWarningsAsErrors
         with get() = treatWarningsAsErrors
         and set(p) = treatWarningsAsErrors <- p
         
     // For targeting other folders for "fsi.exe" (or ToolExe if different)
-    member fsi.ToolPath
+    member _.ToolPath
         with get() = toolPath
         and set(s) = toolPath <- s
 
     // --use:: execute an F# source file on startup
-    member fsi.UseSources
+    member _.UseSources
         with get() = useSources
         and set(a) = useSources <- a
 
     // For specifying the warning level (0-4)
-    member fsi.WarningLevel
+    member _.WarningLevel
         with get() = warningLevel
         and set(s) = warningLevel <- s
 
-    member fsi.WarningsAsErrors 
+    member _.WarningsAsErrors 
         with get() = warningsAsErrors
         and set(s) = warningsAsErrors <- s
 
-    member fsi.WarningsNotAsErrors
+    member _.WarningsNotAsErrors
         with get() = warningsNotAsErrors
         and set(s) = warningsNotAsErrors <- s
 
-    member fsi.Utf8Output
+    member _.Utf8Output
         with get() = utf8output
         and set(p) = utf8output <- p
 
     []
-    member fsi.CommandLineArgs
+    member _.CommandLineArgs
         with get() = List.toArray commandLineArgs
         and set(p) = commandLineArgs <- (List.ofArray p)
 
     // ToolTask methods
-    override fsi.ToolName = "fsi.exe" 
-    override fsi.StandardErrorEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardErrorEncoding
-    override fsi.StandardOutputEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardOutputEncoding
+    override _.ToolName = "fsi.exe" 
+
+    override _.StandardErrorEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardErrorEncoding
+
+    override _.StandardOutputEncoding = if utf8output then System.Text.Encoding.UTF8 else base.StandardOutputEncoding
+
     override fsi.GenerateFullPathToTool() = 
         if toolPath = "" then raise (new System.InvalidOperationException(FSBuild.SR.toolpathUnknown()))
         System.IO.Path.Combine(toolPath, fsi.ToolExe)
+
     override fsi.LogToolCommand (message:string) =
         fsi.Log.LogMessageFromText(message, MessageImportance.Normal) |>ignore
 
     member internal fsi.InternalGenerateFullPathToTool() = fsi.GenerateFullPathToTool()             // expose for unit testing
-    member internal fsi.BaseExecuteTool(pathToTool, responseFileCommands, commandLineCommands) =    // F# does not allow protected members to be captured by lambdas, this is the standard workaround
+
+    member internal _.BaseExecuteTool(pathToTool, responseFileCommands, commandLineCommands) =    // F# does not allow protected members to be captured by lambdas, this is the standard workaround
         base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
 
     /// Intercept the call to ExecuteTool to handle the host compile case.
@@ -293,7 +289,6 @@ type public Fsi () as this =
             match host with
             | null -> base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
             | _ ->
-                let sources = sources|>Array.map(fun i->i.ItemSpec)
                 let invokeCompiler baseCallDelegate =
                     try
                         let ret =
@@ -307,22 +302,24 @@ type public Fsi () as this =
                     | :? TargetInvocationException as tie when not (isNull tie.InnerException) && (tie.InnerException).GetType().FullName = "Microsoft.Build.Exceptions.BuildAbortedException" ->
                         fsi.Log.LogError(tie.InnerException.Message, [| |])
                         -1
-                    | e -> reraise()
+                    | _ -> reraise()
 
                 let baseCallDelegate = Func(fun () -> fsi.BaseExecuteTool(pathToTool, responseFileCommands, commandLineCommands) )
                 try
                     invokeCompiler baseCallDelegate
-                with
-                | e ->
-                        Debug.Assert(false, "HostObject received by Fsi task did not have a Compile method or the compile method threw an exception. "+(e.ToString()))
-                        reraise()
+                with e ->
+                    Debug.Assert(false, "HostObject received by Fsi task did not have a Compile method or the compile method threw an exception. "+(e.ToString()))
+                    reraise()
 
-    override fsi.GenerateCommandLineCommands() =
+    override _.GenerateCommandLineCommands() =
         let builder = new FSharpCommandLineBuilder()
-        if not (String.IsNullOrEmpty(dotnetFsiCompilerPath)) then builder.AppendSwitch(dotnetFsiCompilerPath)
+        match dotnetFsiCompilerPath with
+        | Null | "" -> ()
+        | NonNull dotnetFsiCompilerPath ->
+            builder.AppendSwitch(dotnetFsiCompilerPath)
         builder.ToString()
 
-    override fsi.GenerateResponseFileCommands() =
+    override _.GenerateResponseFileCommands() =
         let builder = generateCommandLineBuilder ()
         builder.GetCapturedArguments() |> String.concat Environment.NewLine
 
diff --git a/src/fsharp/FSharp.Build/MapSourceRoots.fs b/src/fsharp/FSharp.Build/MapSourceRoots.fs
index 84310352b8d..5707935d706 100644
--- a/src/fsharp/FSharp.Build/MapSourceRoots.fs
+++ b/src/fsharp/FSharp.Build/MapSourceRoots.fs
@@ -57,13 +57,11 @@ type MapSourceRoots () =
 
     static let (|NullOrEmpty|HasValue|) (s: string) = if String.IsNullOrEmpty s then NullOrEmpty else HasValue s
     static let ensureEndsWithSlash (path: string) =
-        if path.EndsWith "/"
-        then path
+        if path.EndsWith "/" then path
         else path + "/"
 
     static let endsWithDirectorySeparator (path: string) =
-        if path.Length = 0
-        then false
+        if path.Length = 0 then false
         else
             let endChar = path.[path.Length - 1]
             endChar = Path.DirectorySeparatorChar || endChar = Path.AltDirectorySeparatorChar
@@ -168,7 +166,7 @@ type MapSourceRoots () =
     /// 
     /// 
     []
-    member val SourceRoots: ITaskItem[] = null with get, set
+    member val SourceRoots: ITaskItem[] = [| |] with get, set
 
     /// 
     /// True if the mapped paths should be deterministic.
@@ -180,7 +178,7 @@ type MapSourceRoots () =
     /// Items listed in  that have the same ItemSpec will be merged into a single item in this list.
     /// 
     []
-    member val MappedSourceRoots: ITaskItem[] = null with get, set
+    member val MappedSourceRoots: ITaskItem[] = [| |] with get, set
 
     override this.Execute() =
         match MapSourceRoots.PerformMapping this.Log this.SourceRoots this.Deterministic with
diff --git a/src/fsharp/FSharp.Build/SubstituteText.fs b/src/fsharp/FSharp.Build/SubstituteText.fs
index 16b8eab5245..6b081078b64 100644
--- a/src/fsharp/FSharp.Build/SubstituteText.fs
+++ b/src/fsharp/FSharp.Build/SubstituteText.fs
@@ -10,31 +10,31 @@ open Microsoft.Build.Utilities
 
 type SubstituteText () =
 
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
+    let mutable _buildEngine: IBuildEngine MaybeNull = null
+    let mutable _hostObject: ITaskHost MaybeNull = null
 
     let mutable copiedFiles = new ResizeArray()
-    let mutable embeddedResources : ITaskItem[] = [||]
+    let mutable embeddedResources: ITaskItem[] = [||]
 
     []
-    member this.EmbeddedResources
+    member _.EmbeddedResources
         with get() = embeddedResources
          and set(value) = embeddedResources <- value
 
     []
-    member this.CopiedFiles
+    member _.CopiedFiles
         with get() = copiedFiles.ToArray()
 
     interface ITask with
-        member this.BuildEngine
+        member _.BuildEngine
             with get() = _buildEngine
              and set(value) = _buildEngine <- value
 
-        member this.HostObject
+        member _.HostObject
             with get() = _hostObject
              and set(value) = _hostObject <- value
 
-        member this.Execute() =
+        member _.Execute() =
             copiedFiles.Clear()
             if not(isNull embeddedResources) then
                 for item in embeddedResources do
diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
index b878dadaba0..d1a943b8c98 100644
--- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs
+++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
@@ -4,21 +4,18 @@ namespace FSharp.Build
 
 open System
 open System.Collections
-open System.Collections.Generic
-open System.Globalization
 open System.IO
-open System.Linq
 open System.Text
 open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type WriteCodeFragment() =
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-    let mutable _language : string = ""
-    let mutable _assemblyAttributes : ITaskItem[] = [||]
-    let mutable _outputDirectory : ITaskItem = null
-    let mutable _outputFile : ITaskItem = null
+    let mutable _buildEngine: IBuildEngine MaybeNull = null
+    let mutable _hostObject: ITaskHost MaybeNull = null
+    let mutable _outputDirectory: ITaskItem MaybeNull = null
+    let mutable _outputFile: ITaskItem MaybeNull = null
+    let mutable _language: string = ""
+    let mutable _assemblyAttributes: ITaskItem[] = [||]
 
     static let escapeString (str:string) =
         let sb = str.ToCharArray() |> Seq.fold (fun (sb:StringBuilder) (c:char) ->
@@ -80,36 +77,38 @@ type WriteCodeFragment() =
         | _ -> failwith "Language name must be one of F#, C# or VB"
 
     // adding this property to maintain API equivalence with the MSBuild task
-    member this.Language
+    member _.Language
         with get() = _language
          and set(value) = _language <- value
 
-    member this.AssemblyAttributes
+    member _.AssemblyAttributes
         with get() = _assemblyAttributes
          and set(value) = _assemblyAttributes <- value
 
-    member this.OutputDirectory
+    member _.OutputDirectory
         with get() = _outputDirectory
          and set(value) = _outputDirectory <- value
 
     []
-    member this.OutputFile
+    member _.OutputFile
         with get() = _outputFile
          and set(value) = _outputFile <- value
 
 
     interface ITask with
-        member this.BuildEngine
+        member _.BuildEngine
             with get() = _buildEngine
              and set(value) = _buildEngine <- value
 
-        member this.HostObject
+        member _.HostObject
             with get() = _hostObject
              and set(value) = _hostObject <- value
 
-        member this.Execute() =
+        member _.Execute() =
             try
-                if isNull _outputFile && isNull _outputDirectory then failwith "Output location must be specified"
+                match _outputFile with 
+                | Null -> failwith "Output location must be specified"
+                | NonNull outputFile -> 
                 let boilerplate =
                     match _language.ToLowerInvariant() with
                     | "f#" -> "// \n//     Generated by the FSharp WriteCodeFragment class.\n// \nnamespace FSharp\n\nopen System\nopen System.Reflection\n"
@@ -121,16 +120,16 @@ type WriteCodeFragment() =
                 let code = Array.fold (fun (sb:StringBuilder) (item:ITaskItem) -> sb.AppendLine(WriteCodeFragment.GenerateAttribute (item, _language.ToLowerInvariant()))) sb _assemblyAttributes
 
                 if _language.ToLowerInvariant() = "f#" then code.AppendLine("do()") |> ignore
-                let fileName = _outputFile.ItemSpec
+                let fileName = outputFile.ItemSpec
 
                 let outputFileItem =
-                    if not (isNull _outputFile) && not (isNull _outputDirectory) && not (Path.IsPathRooted(fileName)) then
-                        TaskItem(Path.Combine(_outputDirectory.ItemSpec, fileName)) :> ITaskItem
-                    elif isNull _outputFile then
-                        let tempFile = Path.Combine(Path.GetTempPath(), sprintf "tmp%s.fs" (Guid.NewGuid().ToString("N")))
-                        TaskItem(tempFile) :> ITaskItem
-                    else
-                        _outputFile
+                    match _outputDirectory with 
+                    | Null -> outputFile
+                    | NonNull outputDirectory -> 
+                        if Path.IsPathRooted(fileName) then 
+                            outputFile
+                        else
+                            TaskItem(Path.Combine(outputDirectory.ItemSpec, fileName)) :> ITaskItem
 
                 let codeText = code.ToString()
                 File.WriteAllText(fileName, codeText)
diff --git a/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs b/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs
index a8e1432983f..534ae14958c 100644
--- a/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs
+++ b/src/fsharp/FSharp.Core/fslib-extra-pervasives.fs
@@ -368,7 +368,7 @@ namespace Microsoft.FSharp.Core.CompilerServices
     type ITypeProvider =
         inherit System.IDisposable
         abstract GetNamespaces : unit -> IProvidedNamespace[] 
-        abstract GetStaticParameters : typeWithoutArguments:Type -> ParameterInfo[] 
+        abstract GetStaticParameters : typeWithoutArguments:Type -> ParameterInfo[]
         abstract ApplyStaticArguments : typeWithoutArguments:Type * typePathWithArguments:string[] * staticArguments:obj[] -> Type 
         abstract GetInvokerExpression : syntheticMethodBase:MethodBase * parameters:Microsoft.FSharp.Quotations.Expr[] -> Microsoft.FSharp.Quotations.Expr
 
diff --git a/src/fsharp/FSharp.Core/fslib-extra-pervasives.fsi b/src/fsharp/FSharp.Core/fslib-extra-pervasives.fsi
index ea3d0ac1a32..e65c8df0610 100644
--- a/src/fsharp/FSharp.Core/fslib-extra-pervasives.fsi
+++ b/src/fsharp/FSharp.Core/fslib-extra-pervasives.fsi
@@ -522,7 +522,7 @@ namespace Microsoft.FSharp.Core.CompilerServices
         /// A type returned by GetTypes or ResolveTypeName
         ///
         /// 
-        abstract GetStaticParameters : typeWithoutArguments:Type -> ParameterInfo[] 
+        abstract GetStaticParameters : typeWithoutArguments:Type -> ParameterInfo[]
 
         /// 
         /// Apply static arguments to a provided type that accepts static arguments. 
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 646a6f5025a..3b78c44e273 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -21,11 +21,13 @@ namespace Microsoft.FSharp.Core
     open System.Text
     
     type Unit() =
-        override x.GetHashCode() = 0
-        override x.Equals(obj:obj) = 
+        override _.GetHashCode() = 0
+
+        override _.Equals(obj:obj) = 
             match obj with null -> true | :? Unit -> true | _ -> false
+
         interface System.IComparable with 
-            member x.CompareTo(_obj:obj) = 0
+            member _.CompareTo(_obj:obj) = 0
         
     and unit = Unit
 
@@ -55,118 +57,118 @@ namespace Microsoft.FSharp.Core
 
     []
     type SealedAttribute(value:bool) =
-        inherit System.Attribute()
-        member x.Value = value
+        inherit Attribute()
+        member _.Value = value
         new() = new SealedAttribute(true)
       
     []
     []
     type AbstractClassAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
       
     []
     []
     type EqualityConditionalOnAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
       
     []
     []
     type ComparisonConditionalOnAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
       
     []
     []
     type AllowNullLiteralAttribute(value: bool) =
-        inherit System.Attribute()
-        member x.Value = value
+        inherit Attribute()
+        member _.Value = value
         new () = new AllowNullLiteralAttribute(true)
       
     []
     []
     type VolatileFieldAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
       
     []  
     []
     type DefaultAugmentationAttribute(value:bool) = 
-        inherit System.Attribute()
-        member x.Value = value
+        inherit Attribute()
+        member _.Value = value
 
     []  
     []
     type CLIEventAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type CLIMutableAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type AutoSerializableAttribute(value:bool) = 
-        inherit System.Attribute()
-        member x.Value = value
+        inherit Attribute()
+        member _.Value = value
 
     []  
     []
     type DefaultValueAttribute(check:bool) = 
-        inherit System.Attribute()
-        member x.Check = check
+        inherit Attribute()
+        member _.Check = check
         new() = new DefaultValueAttribute(true)
 
     []  
     []
     type EntryPointAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type ReferenceEqualityAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type StructuralComparisonAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type StructuralEqualityAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type NoEqualityAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type CustomEqualityAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type CustomComparisonAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type NoComparisonAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type ReflectedDefinitionAttribute(includeValue: bool) =
-        inherit System.Attribute()
+        inherit Attribute()
         new() = ReflectedDefinitionAttribute(false)
-        member x.IncludeValue = includeValue
+        member _.IncludeValue = includeValue
 
     []  
     []
     type CompiledNameAttribute(compiledName:string) =
-        inherit System.Attribute()
-        member x.CompiledName = compiledName
+        inherit Attribute()
+        member _.CompiledName = compiledName
 
     []  
     []
     type StructAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type MeasureAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type MeasureAnnotatedAbbreviationAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type InterfaceAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type ClassAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type LiteralAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type FSharpInterfaceDataVersionAttribute(major:int,minor:int,release:int)  =
-        inherit System.Attribute()
-        member x.Major = major
-        member x.Minor = minor
-        member x.Release = release
+        inherit Attribute()
+        member _.Major = major
+        member _.Minor = minor
+        member _.Release = release
 
     []
     []
@@ -222,29 +224,29 @@ namespace Microsoft.FSharp.Core
                                      sequenceNumber:int,
                                      resourceName:string,
                                      typeDefinitions:System.Type[])  =
-        inherit System.Attribute()
-        member x.SourceConstructFlags = sourceConstructFlags
-        member x.SequenceNumber = sequenceNumber
-        member x.VariantNumber = variantNumber
+        inherit Attribute()
+        member _.SourceConstructFlags = sourceConstructFlags
+        member _.SequenceNumber = sequenceNumber
+        member _.VariantNumber = variantNumber
         new(sourceConstructFlags) = CompilationMappingAttribute(sourceConstructFlags,0,0)
         new(sourceConstructFlags,sequenceNumber) = CompilationMappingAttribute(sourceConstructFlags,0,sequenceNumber)
         new(sourceConstructFlags,variantNumber,sequenceNumber) = CompilationMappingAttribute(sourceConstructFlags,variantNumber,sequenceNumber,null,null)
         new(resourceName, typeDefinitions) = CompilationMappingAttribute(SourceConstructFlags.None,0,0,resourceName, typeDefinitions)
-        member x.TypeDefinitions = typeDefinitions
-        member x.ResourceName = resourceName
+        member _.TypeDefinitions = typeDefinitions
+        member _.ResourceName = resourceName
 
     []
     []
     type CompilationSourceNameAttribute(sourceName:string)  =
-        inherit System.Attribute()
-        member x.SourceName = sourceName
+        inherit Attribute()
+        member _.SourceName = sourceName
 
     //-------------------------------------------------------------------------
     []
     []
     type CompilationRepresentationAttribute (flags : CompilationRepresentationFlags) =
-        inherit System.Attribute()
-        member x.Flags = flags
+        inherit Attribute()
+        member _.Flags = flags
 
 
     module internal ExperimentalAttributeMessages =
@@ -257,27 +259,27 @@ namespace Microsoft.FSharp.Core
     []
     []
     type ExperimentalAttribute(message:string) =
-        inherit System.Attribute()
+        inherit Attribute()
 
-        member x.Message = message
+        member _.Message = message
 
     []  
     []
     type InlineIfLambdaAttribute() = 
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type CompilationArgumentCountsAttribute(counts:int[]) =
-        inherit System.Attribute()
-        member x.Counts = 
+        inherit Attribute()
+        member _.Counts = 
            let unboxPrim(x:obj) = (# "unbox.any !0" type ('T) x : 'T #)
-           (unboxPrim(counts.Clone()) : System.Collections.Generic.IEnumerable)
+           (unboxPrim(counts.Clone()) : IEnumerable)
 
     []
     []
     type CustomOperationAttribute(name:string) =
-        inherit System.Attribute()
+        inherit Attribute()
         let mutable isBinary = false
         let mutable allowInto = false
         let mutable isJoin = false
@@ -285,78 +287,78 @@ namespace Microsoft.FSharp.Core
         let mutable maintainsVarSpace = false
         let mutable maintainsVarSpaceWithBind = false
         let mutable joinOnWord = ""
-        member x.Name = name
-        member x.AllowIntoPattern with get() = allowInto and set v = allowInto <- v
-        member x.IsLikeZip with get() = isBinary and set v = isBinary <- v
-        member x.IsLikeJoin with get() = isJoin and set v = isJoin <- v
-        member x.IsLikeGroupJoin with get() = isGroupJoin and set v = isGroupJoin <- v
-        member x.JoinConditionWord with get() = joinOnWord and set v = joinOnWord <- v
+        member _.Name = name
+        member _.AllowIntoPattern with get() = allowInto and set v = allowInto <- v
+        member _.IsLikeZip with get() = isBinary and set v = isBinary <- v
+        member _.IsLikeJoin with get() = isJoin and set v = isJoin <- v
+        member _.IsLikeGroupJoin with get() = isGroupJoin and set v = isGroupJoin <- v
+        member _.JoinConditionWord with get() = joinOnWord and set v = joinOnWord <- v
 
-        member x.MaintainsVariableSpace with get() = maintainsVarSpace and set v = maintainsVarSpace <- v
-        member x.MaintainsVariableSpaceUsingBind with get() = maintainsVarSpaceWithBind and set v = maintainsVarSpaceWithBind <- v
+        member _.MaintainsVariableSpace with get() = maintainsVarSpace and set v = maintainsVarSpace <- v
+        member _.MaintainsVariableSpaceUsingBind with get() = maintainsVarSpaceWithBind and set v = maintainsVarSpaceWithBind <- v
 
     []
     []
     type ProjectionParameterAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type StructuredFormatDisplayAttribute(value:string) =
-        inherit System.Attribute()
-        member x.Value = value
+        inherit Attribute()
+        member _.Value = value
 
     []
     []
     type CompilerMessageAttribute(message:string, messageNumber : int) =
-        inherit System.Attribute()
+        inherit Attribute()
         let mutable isError = false
         let mutable isHidden = false
-        member x.Message = message
-        member x.MessageNumber = messageNumber
-        member x.IsError with get() = isError and set v = isError <- v
-        member x.IsHidden with get() = isHidden and set v = isHidden <- v
+        member _.Message = message
+        member _.MessageNumber = messageNumber
+        member _.IsError with get() = isError and set v = isError <- v
+        member _.IsHidden with get() = isHidden and set v = isHidden <- v
 
     []
     []
     type UnverifiableAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type NoDynamicInvocationAttribute(isLegacy: bool) =
 
-        inherit System.Attribute()
+        inherit Attribute()
 
         new () = NoDynamicInvocationAttribute(false)
 
-        member x.IsLegacy = isLegacy
+        member _.IsLegacy = isLegacy
 
     []
     []
     type OptionalArgumentAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type GeneralizableValueAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []
     []
     type RequiresExplicitTypeArgumentsAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
       
     []
     []
     type RequireQualifiedAccessAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     []  
     []
     type AutoOpenAttribute(path:string) =
-        inherit System.Attribute()
-        member x.Path = path
+        inherit Attribute()
+        member _.Path = path
         new() =  AutoOpenAttribute("")
 
     /// This Attribute is used to make Value bindings like
@@ -365,7 +367,7 @@ namespace Microsoft.FSharp.Core
     []
     []
     type ValueAsStaticPropertyAttribute() =
-        inherit System.Attribute()
+        inherit Attribute()
 
     [] type float<[] 'Measure> = float 
     [] type float32<[] 'Measure> = float32
@@ -862,7 +864,7 @@ namespace Microsoft.FSharp.Core
             ///   - fsComparerER  = ER semantics = no throw on NaN comparison = new GenericComparer(false) = GenericComparer = GenericComparison
             ///   - fsComparerPER  = PER semantics = local throw on NaN comparison = new GenericComparer(true) = LessThan/GreaterThan etc.
             type GenericComparer(throwsOnPER:bool) = 
-                interface System.Collections.IComparer 
+                interface IComparer 
                 member  c.ThrowsOnPER = throwsOnPER
 
             /// The unique exception object that is thrown locally when NaNs are compared in PER mode (by fsComparerPER)
@@ -871,7 +873,7 @@ namespace Microsoft.FSharp.Core
                     
             /// Implements generic comparison between two objects. This corresponds to the pseudo-code in the F#
             /// specification.  The treatment of NaNs is governed by "comp".
-            let rec GenericCompare (comp:GenericComparer) (xobj:obj,yobj:obj) = 
+            let rec GenericCompare (comp:GenericComparer) (xobj:obj, yobj:obj) = 
                   match xobj,yobj with 
                    | null,null -> 0
                    | null,_ -> -1
@@ -1033,7 +1035,7 @@ namespace Microsoft.FSharp.Core
                     res
 
             type GenericComparer with
-                interface System.Collections.IComparer with
+                interface IComparer with
                     override c.Compare(x:obj,y:obj) = GenericCompare c (x,y)
 
             /// The unique object for comparing values in PER mode (where local exceptions are thrown when NaNs are compared)
@@ -1048,7 +1050,7 @@ namespace Microsoft.FSharp.Core
             //
             // NOTE: the compiler optimizer is aware of this function and devirtualizes in the 
             // cases where it is known how a particular type implements generic comparison.
-            let GenericComparisonWithComparerIntrinsic<'T> (comp:System.Collections.IComparer) (x:'T) (y:'T) : int = 
+            let GenericComparisonWithComparerIntrinsic<'T> (comp:IComparer) (x:'T) (y:'T) : int = 
                 comp.Compare(box x, box y)
 
             /// Compare two values of the same generic type, in either PER or ER mode, but include static optimizations
@@ -1056,7 +1058,7 @@ namespace Microsoft.FSharp.Core
             //
             // "comp" is assumed to be either fsComparerPER or fsComparerER (and hence 'Compare' is implemented via 'GenericCompare').
             //
-            let inline GenericComparisonWithComparerFast<'T> (comp:System.Collections.IComparer) (x:'T) (y:'T) : int = 
+            let inline GenericComparisonWithComparerFast<'T> (comp:IComparer) (x:'T) (y:'T) : int = 
                  GenericComparisonWithComparerIntrinsic comp x y
                  when 'T : bool   = if (# "clt" x y : bool #) then (-1) else (# "cgt" x y : int #)
                  when 'T : sbyte  = if (# "clt" x y : bool #) then (-1) else (# "cgt" x y : int #)
@@ -1354,7 +1356,7 @@ namespace Microsoft.FSharp.Core
             //
             // If "er" is true the "iec" is fsEqualityComparerNoHashingER
             // If "er" is false the "iec" is fsEqualityComparerNoHashingPER
-            let rec GenericEqualityObj (er:bool) (iec:System.Collections.IEqualityComparer) ((xobj:obj),(yobj:obj)) : bool = 
+            let rec GenericEqualityObj (er:bool) (iec:IEqualityComparer) ((xobj:obj),(yobj:obj)) : bool = 
                 (*if objEq xobj yobj then true else  *)
                 match xobj,yobj with 
                  | null,null -> true
@@ -1386,7 +1388,7 @@ namespace Microsoft.FSharp.Core
                  | _ -> xobj.Equals(yobj)
 
             /// specialcase: Core implementation of structural equality on arbitrary arrays.
-            and GenericEqualityArbArray er (iec:System.Collections.IEqualityComparer) (x:System.Array) (y:System.Array) : bool =
+            and GenericEqualityArbArray er (iec:IEqualityComparer) (x:System.Array) (y:System.Array) : bool =
                 if x.Rank = 1 && y.Rank = 1 then 
                     // check lengths 
                     let lenx = x.LongLength
@@ -1461,14 +1463,14 @@ namespace Microsoft.FSharp.Core
             /// One of the two unique instances of System.Collections.IEqualityComparer. Implements PER semantics
             /// where equality on NaN returns "false".
             let fsEqualityComparerNoHashingPER = 
-                { new System.Collections.IEqualityComparer with
+                { new IEqualityComparer with
                     override iec.Equals(x:obj,y:obj) = GenericEqualityObj false iec (x,y)  // PER Semantics
                     override iec.GetHashCode(x:obj) = raise (InvalidOperationException (SR.GetString(SR.notUsedForHashing))) }
                     
-            /// One of the two unique instances of System.Collections.IEqualityComparer. Implements ER semantics
+            /// One of the two unique instances of IEqualityComparer. Implements ER semantics
             /// where equality on NaN returns "true".
             let fsEqualityComparerNoHashingER = 
-                { new System.Collections.IEqualityComparer with
+                { new IEqualityComparer with
                     override iec.Equals(x:obj,y:obj) = GenericEqualityObj true iec (x,y)  // ER Semantics
                     override iec.GetHashCode(x:obj) = raise (InvalidOperationException (SR.GetString(SR.notUsedForHashing))) }
 
@@ -1493,7 +1495,7 @@ namespace Microsoft.FSharp.Core
             // The compiler optimizer is aware of this function  (see use of generic_equality_withc_inner_vref in opt.fs)
             // and devirtualizes calls to it based on "T", and under the assumption that "comp" 
             // is either fsEqualityComparerNoHashingER or fsEqualityComparerNoHashingPER.
-            let GenericEqualityWithComparerIntrinsic (comp : System.Collections.IEqualityComparer) (x : 'T) (y : 'T) : bool =
+            let GenericEqualityWithComparerIntrinsic (comp : IEqualityComparer) (x : 'T) (y : 'T) : bool =
                 comp.Equals((box x),(box y))
                 
 
@@ -1561,7 +1563,7 @@ namespace Microsoft.FSharp.Core
             // Note, although this function says "WithComparer", the static optimization conditionals for float and float32
             // mean that it has PER semantics. This is OK because calls to this function are only generated by 
             // the F# compiler, ultimately stemming from an optimization of GenericEqualityIntrinsic when used on a tuple type.
-            let inline GenericEqualityWithComparerFast (comp : System.Collections.IEqualityComparer) (x : 'T) (y : 'T) : bool = 
+            let inline GenericEqualityWithComparerFast (comp : IEqualityComparer) (x : 'T) (y : 'T) : bool = 
                   GenericEqualityWithComparerIntrinsic comp x y
                   when 'T : bool    = (# "ceq" x y : bool #)
                   when 'T : sbyte   = (# "ceq" x y : bool #)
@@ -1624,7 +1626,7 @@ namespace Microsoft.FSharp.Core
              
             let inline HashCombine nr x y = (x <<< 1) + y + 631 * nr
 
-            let GenericHashObjArray (iec : System.Collections.IEqualityComparer) (x: obj[]) : int =
+            let GenericHashObjArray (iec : IEqualityComparer) (x: obj[]) : int =
                   let len = x.Length 
                   let mutable i = len - 1 
                   if i > defaultHashNodes then i <- defaultHashNodes // limit the hash
@@ -1669,7 +1671,7 @@ namespace Microsoft.FSharp.Core
                   acc
 
             // special case - arrays do not by default have a decent structural hashing function
-            let GenericHashArbArray (iec : System.Collections.IEqualityComparer) (x: System.Array) : int =
+            let GenericHashArbArray (iec : IEqualityComparer) (x: System.Array) : int =
                   match x.Rank  with 
                   | 1 -> 
                     let b = x.GetLowerBound(0) 
@@ -1690,7 +1692,7 @@ namespace Microsoft.FSharp.Core
             // Arrays are structurally hashed through a separate technique.
             //
             // "iec" is either fsEqualityComparerUnlimitedHashingER, fsEqualityComparerUnlimitedHashingPER or a CountLimitedHasherPER.
-            let rec GenericHashParamObj (iec : System.Collections.IEqualityComparer) (x: obj) : int =
+            let rec GenericHashParamObj (iec : IEqualityComparer) (x: obj) : int =
                   match x with 
                   | null -> 0 
                   | (:? System.Array as a) -> 
@@ -1709,7 +1711,7 @@ namespace Microsoft.FSharp.Core
             /// Fill in the implementation of CountLimitedHasherPER
             type CountLimitedHasherPER with
                 
-                interface System.Collections.IEqualityComparer with
+                interface IEqualityComparer with
                     override iec.Equals(x:obj,y:obj) =
                         GenericEqualityObj false iec (x,y)
                     override iec.GetHashCode(x:obj) =
@@ -1722,13 +1724,13 @@ namespace Microsoft.FSharp.Core
             /// Fill in the implementation of UnlimitedHasherER
             type UnlimitedHasherER with
                 
-                interface System.Collections.IEqualityComparer with
+                interface IEqualityComparer with
                     override iec.Equals(x:obj,y:obj) = GenericEqualityObj true iec (x,y)
                     override iec.GetHashCode(x:obj) = GenericHashParamObj iec  x
                    
             /// Fill in the implementation of UnlimitedHasherPER
             type UnlimitedHasherPER with
-                interface System.Collections.IEqualityComparer with
+                interface IEqualityComparer with
                     override iec.Equals(x:obj,y:obj) = GenericEqualityObj false iec (x,y)
                     override iec.GetHashCode(x:obj) = GenericHashParamObj iec x
 
@@ -1748,7 +1750,7 @@ namespace Microsoft.FSharp.Core
             //
             // NOTE: The compiler optimizer is aware of this function (see uses of generic_hash_withc_inner_vref in opt.fs)
             // and devirtualizes calls to it based on type "T".
-            let GenericHashWithComparerIntrinsic<'T> (comp : System.Collections.IEqualityComparer) (input : 'T) : int =
+            let GenericHashWithComparerIntrinsic<'T> (comp : IEqualityComparer) (input : 'T) : int =
                 GenericHashParamObj comp (box input)
                 
             let inline HashString (s:string) = 
@@ -1769,7 +1771,7 @@ namespace Microsoft.FSharp.Core
             //
             // "iec" is assumed to be either fsEqualityComparerUnlimitedHashingER, fsEqualityComparerUnlimitedHashingPER or 
             // a CountLimitedHasherPER.
-            let inline GenericHashWithComparerFast (iec : System.Collections.IEqualityComparer) (x:'T) : int = 
+            let inline GenericHashWithComparerFast (iec : IEqualityComparer) (x:'T) : int = 
                 GenericHashWithComparerIntrinsic iec x 
                 when 'T : bool   = (# "" x : int #)
                 when 'T : int32  = (# "" x : int #)
@@ -1827,7 +1829,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericHashWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastHashTuple2 (comparer:System.Collections.IEqualityComparer) (x1,x2) = 
+            let inline FastHashTuple2 (comparer:IEqualityComparer) (x1,x2) = 
                 TupleUtils.combineTupleHashes
                     (GenericHashWithComparerFast comparer x1)
                     (GenericHashWithComparerFast comparer x2)
@@ -1839,7 +1841,7 @@ namespace Microsoft.FSharp.Core
             //
             // Because the function subsequently gets inlined, the calls to GenericHashWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastHashTuple3 (comparer:System.Collections.IEqualityComparer) (x1,x2,x3) =
+            let inline FastHashTuple3 (comparer:IEqualityComparer) (x1,x2,x3) =
                 TupleUtils.combineTupleHashes
                     (TupleUtils.combineTupleHashes
                         (GenericHashWithComparerFast comparer x1)
@@ -1853,7 +1855,7 @@ namespace Microsoft.FSharp.Core
             //
             // Because the function subsequently gets inlined, the calls to GenericHashWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastHashTuple4 (comparer:System.Collections.IEqualityComparer) (x1,x2,x3,x4) = 
+            let inline FastHashTuple4 (comparer:IEqualityComparer) (x1,x2,x3,x4) = 
                 TupleUtils.combineTupleHashes
                     (TupleUtils.combineTupleHashes
                         (GenericHashWithComparerFast comparer x1)
@@ -1869,7 +1871,7 @@ namespace Microsoft.FSharp.Core
             //
             // Because the function subsequently gets inlined, the calls to GenericHashWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastHashTuple5 (comparer:System.Collections.IEqualityComparer) (x1,x2,x3,x4,x5) = 
+            let inline FastHashTuple5 (comparer:IEqualityComparer) (x1,x2,x3,x4,x5) = 
                 TupleUtils.combineTupleHashes 
                     (TupleUtils.combineTupleHashes 
                         (TupleUtils.combineTupleHashes 
@@ -1887,7 +1889,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericEqualityWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastEqualsTuple2 (comparer:System.Collections.IEqualityComparer) (x1,x2) (y1,y2) = 
+            let inline FastEqualsTuple2 (comparer:IEqualityComparer) (x1,x2) (y1,y2) = 
                 GenericEqualityWithComparerFast comparer x1 y1 &&
                 GenericEqualityWithComparerFast comparer x2 y2
 
@@ -1898,7 +1900,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericEqualityWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastEqualsTuple3 (comparer:System.Collections.IEqualityComparer) (x1,x2,x3) (y1,y2,y3) = 
+            let inline FastEqualsTuple3 (comparer:IEqualityComparer) (x1,x2,x3) (y1,y2,y3) = 
                 GenericEqualityWithComparerFast comparer x1 y1 &&
                 GenericEqualityWithComparerFast comparer x2 y2 &&
                 GenericEqualityWithComparerFast comparer x3 y3
@@ -1910,7 +1912,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericEqualityWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastEqualsTuple4 (comparer:System.Collections.IEqualityComparer) (x1,x2,x3,x4) (y1,y2,y3,y4) = 
+            let inline FastEqualsTuple4 (comparer:IEqualityComparer) (x1,x2,x3,x4) (y1,y2,y3,y4) = 
                 GenericEqualityWithComparerFast comparer x1 y1 &&
                 GenericEqualityWithComparerFast comparer x2 y2 &&
                 GenericEqualityWithComparerFast comparer x3 y3 &&
@@ -1923,7 +1925,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericEqualityWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastEqualsTuple5 (comparer:System.Collections.IEqualityComparer) (x1,x2,x3,x4,x5) (y1,y2,y3,y4,y5) = 
+            let inline FastEqualsTuple5 (comparer:IEqualityComparer) (x1,x2,x3,x4,x5) (y1,y2,y3,y4,y5) = 
                 GenericEqualityWithComparerFast comparer x1 y1 &&
                 GenericEqualityWithComparerFast comparer x2 y2 &&
                 GenericEqualityWithComparerFast comparer x3 y3 &&
@@ -1937,7 +1939,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericComparisonWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastCompareTuple2 (comparer:System.Collections.IComparer)  (x1,x2) (y1,y2) =
+            let inline FastCompareTuple2 (comparer:IComparer)  (x1,x2) (y1,y2) =
                 let  n = GenericComparisonWithComparerFast comparer x1 y1
                 if n <> 0 then n else
                 GenericComparisonWithComparerFast comparer x2 y2
@@ -1949,7 +1951,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericComparisonWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastCompareTuple3 (comparer:System.Collections.IComparer) (x1,x2,x3) (y1,y2,y3) =
+            let inline FastCompareTuple3 (comparer:IComparer) (x1,x2,x3) (y1,y2,y3) =
                 let  n = GenericComparisonWithComparerFast comparer x1 y1
                 if n <> 0 then n else
                 let  n = GenericComparisonWithComparerFast comparer x2 y2
@@ -1963,7 +1965,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericComparisonWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastCompareTuple4 (comparer:System.Collections.IComparer) (x1,x2,x3,x4) (y1,y2,y3,y4) = 
+            let inline FastCompareTuple4 (comparer:IComparer) (x1,x2,x3,x4) (y1,y2,y3,y4) = 
                 let  n = GenericComparisonWithComparerFast comparer x1 y1
                 if n <> 0 then n else
                 let  n = GenericComparisonWithComparerFast comparer x2 y2
@@ -1979,7 +1981,7 @@ namespace Microsoft.FSharp.Core
             // 
             // Because the function subsequently gets inlined, the calls to GenericComparisonWithComparerFast can be 
             // often statically optimized or devirtualized based on the statically known type.
-            let inline FastCompareTuple5 (comparer:System.Collections.IComparer) (x1,x2,x3,x4,x5) (y1,y2,y3,y4,y5) =
+            let inline FastCompareTuple5 (comparer:IComparer) (x1,x2,x3,x4,x5) (y1,y2,y3,y4,y5) =
                 let  n = GenericComparisonWithComparerFast comparer x1 y1
                 if n <> 0 then n else
                 let  n = GenericComparisonWithComparerFast comparer x2 y2
@@ -2052,13 +2054,13 @@ namespace Microsoft.FSharp.Core
 
         let inline MakeGenericEqualityComparer<'T>() = 
             // type-specialize some common cases to generate more efficient functions 
-            { new System.Collections.Generic.IEqualityComparer<'T> with 
+            { new IEqualityComparer<'T> with 
                   member self.GetHashCode(x) = GenericHash x 
                   member self.Equals(x,y) = GenericEquality x y }
 
         let inline MakeGenericLimitedEqualityComparer<'T>(limit:int) = 
             // type-specialize some common cases to generate more efficient functions 
-            { new System.Collections.Generic.IEqualityComparer<'T> with 
+            { new IEqualityComparer<'T> with 
                   member self.GetHashCode(x) = GenericLimitedHash limit x 
                   member self.Equals(x,y) = GenericEquality x y }
 
@@ -2081,7 +2083,7 @@ namespace Microsoft.FSharp.Core
 
         []     
         type FastGenericEqualityComparerTable<'T>() = 
-            static let f : System.Collections.Generic.IEqualityComparer<'T> = 
+            static let f : IEqualityComparer<'T> = 
                 match typeof<'T> with 
                 | ty when ty.Equals(typeof)       -> unboxPrim (box BoolIEquality)
                 | ty when ty.Equals(typeof)       -> unboxPrim (box ByteIEquality)
@@ -2100,7 +2102,7 @@ namespace Microsoft.FSharp.Core
                 | ty when ty.Equals(typeof)    -> unboxPrim (box DecimalIEquality)
                 | ty when ty.Equals(typeof)     -> unboxPrim (box StringIEquality)
                 | _ -> MakeGenericEqualityComparer<'T>()
-            static member Function : System.Collections.Generic.IEqualityComparer<'T> = f
+            static member Function : IEqualityComparer<'T> = f
 
         let FastGenericEqualityComparerFromTable<'T> = FastGenericEqualityComparerTable<'T>.Function
 
@@ -2138,7 +2140,7 @@ namespace Microsoft.FSharp.Core
         let inline FastLimitedGenericEqualityComparer<'T>(limit) = MakeGenericLimitedEqualityComparer<'T>(limit) 
 
         let inline MakeGenericComparer<'T>()  = 
-            { new System.Collections.Generic.IComparer<'T> with 
+            { new IComparer<'T> with 
                  member _.Compare(x,y) = GenericComparison x y }
 
         let CharComparer    = MakeGenericComparer()
@@ -2165,19 +2167,19 @@ namespace Microsoft.FSharp.Core
 
             // The CLI implementation of mscorlib optimizes array sorting
             // when the comparer is either null or precisely
-            // reference-equals to System.Collections.Generic.Comparer<'T>.Default.
+            // reference-equals to Generic.Comparer<'T>.Default.
             // This is an indication that a "fast" array sorting helper can be used.
             //
             // So, for all the types listed below, we want to pass in a value of "null" for
             // the comparer object.  Note that F# generic comparison coincides precisely with 
-            // System.Collections.Generic.Comparer<'T>.Default for these types.
+            // Generic.Comparer<'T>.Default for these types.
             //
             // A "null" comparer is only valid if the values do not have identity, e.g. integers.
             // That is, an unstable sort of the array must be the semantically the 
             // same as a stable sort of the array. See Array.stableSortInPlace.
             //
             // REVIEW: in a future version we could extend this to include additional types 
-            static let fCanBeNull : System.Collections.Generic.IComparer<'T>  = 
+            static let fCanBeNull : IComparer<'T>  = 
                 match typeof<'T> with 
                 | ty when ty.Equals(typeof)  -> unboxPrim (box IntPtrComparer)
                 | ty when ty.Equals(typeof) -> unboxPrim (box UIntPtrComparer)
@@ -2197,7 +2199,7 @@ namespace Microsoft.FSharp.Core
                 | ty when ty.Equals(typeof)       -> null
                 | _ -> MakeGenericComparer<'T>()
 
-            static let f : System.Collections.Generic.IComparer<'T>  = 
+            static let f : IComparer<'T>  = 
                 match typeof<'T> with 
                 | ty when ty.Equals(typeof)       -> unboxPrim (box ByteComparer)
                 | ty when ty.Equals(typeof)       -> unboxPrim (box CharComparer)
@@ -2217,13 +2219,13 @@ namespace Microsoft.FSharp.Core
                 | ty when ty.Equals(typeof)       -> unboxPrim (box BoolComparer)
                 | _ -> 
                     // Review: There are situations where we should be able
-                    // to return System.Collections.Generic.Comparer<'T>.Default here.
+                    // to return Generic.Comparer<'T>.Default here.
                     // For example, for any value type.
                     MakeGenericComparer<'T>()
 
-            static member Value : System.Collections.Generic.IComparer<'T> = f
+            static member Value : IComparer<'T> = f
 
-            static member ValueCanBeNullIfDefaultSemantics : System.Collections.Generic.IComparer<'T> = fCanBeNull
+            static member ValueCanBeNullIfDefaultSemantics : IComparer<'T> = fCanBeNull
         
         let FastGenericComparerFromTable<'T> = 
             FastGenericComparerTable<'T>.Value
@@ -2352,9 +2354,7 @@ namespace Microsoft.FSharp.Core
             Convert.ToUInt64(s, 8)
 
         let inline removeUnderscores (s:string) =
-            match s with
-            | null -> null
-            | s -> s.Replace("_", "")
+            s.Replace("_", "")
 
         let ParseUInt32 (s:string) = 
             if System.Object.ReferenceEquals(s,null) then
@@ -2429,9 +2429,15 @@ namespace Microsoft.FSharp.Core
 
         let inline ParseUIntPtr (s:string) = (# "conv.ovf.u"  (ParseInt64 s)  : unativeint #)
 
-        let inline ParseDouble (s:string)   = Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
+        let inline ParseDouble (s:string)   =
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
+            Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
 
-        let inline ParseSingle (s:string) = Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
+        let inline ParseSingle (s:string) =
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
+            Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
             
         []
         type GenericZeroDynamicImplTable<'T>() = 
@@ -2527,7 +2533,7 @@ namespace Microsoft.FSharp.Core
              // That is, not in the generic implementation of '+'
             when ^T : ^T = (^T : (static member One : ^T) ())
 
-        type System.Type with
+        type Type with
     
             member inline this.GetSingleStaticMethodByTypes(name: string, parameterTypes: Type[]) =
                let staticBindingFlags = (# "" 0b111000 : BindingFlags #) // BindingFlags.Static ||| BindingFlags.Public ||| BindingFlags.NonPublic
@@ -3043,7 +3049,7 @@ namespace Microsoft.FSharp.Core
                 elif typeeq<'T, float> then convPrim<_,'U> (# "conv.u2" (convPrim<_,float> value) : char #) 
                 elif typeeq<'T, float32> then convPrim<_,'U> (# "conv.u2" (convPrim<_,float32> value) : char #) 
                 elif typeeq<'T, char> then convPrim<_,'U> (# "conv.u2" (convPrim<_,char> value) : char #) 
-                elif typeeq<'T, string> then convPrim<_,'U> (System.Char.Parse (convPrim<_,string> value)) 
+                elif typeeq<'T, string> then convPrim<_,'U> (Char.Parse (convPrim<_,string> value)) 
                 else UnaryOpDynamicImplTable.Invoke "op_Explicit" value
             elif typeeq<'U, decimal> then 
                 if typeeq<'T, sbyte> then convPrim<_,'U> (Convert.ToDecimal (convPrim<_,sbyte> value))
@@ -3288,7 +3294,7 @@ namespace Microsoft.FSharp.Core
                   | :? FSharpFunc<'T,'U,'V> as f -> f
 
                   | _ -> { new FSharpFunc<'T,'U,'V>() with 
-                              member x.Invoke(t,u) = (retype func : FSharpFunc<'T,FSharpFunc<'U,'V>>).Invoke(t).Invoke(u) }
+                              member _.Invoke(t,u) = (retype func : FSharpFunc<'T,FSharpFunc<'U,'V>>).Invoke(t).Invoke(u) }
 
           []
           type FSharpFunc<'T,'U,'V,'W> [] () = 
@@ -3303,10 +3309,10 @@ namespace Microsoft.FSharp.Core
                   // Does it take two arguments without side effect?
                   | :? FSharpFunc<'T,'U,FSharpFunc<'V,'W>> as f ->
                          { new FSharpFunc<'T,'U,'V,'W>() with 
-                              member x.Invoke(t,u,v) = f.Invoke(t,u).Invoke(v) }
+                              member _.Invoke(t,u,v) = f.Invoke(t,u).Invoke(v) }
 
                   | _ -> { new FSharpFunc<'T,'U,'V,'W>() with 
-                              member x.Invoke(t,u,v) = (retype func : FSharpFunc<'T,('U -> 'V -> 'W)>).Invoke(t) u v }
+                              member _.Invoke(t,u,v) = (retype func : FSharpFunc<'T,('U -> 'V -> 'W)>).Invoke(t) u v }
 
           []
           type FSharpFunc<'T,'U,'V,'W,'X> [] () = 
@@ -3320,15 +3326,15 @@ namespace Microsoft.FSharp.Core
                   // Does it take three arguments without side effect?
                   | :? FSharpFunc<'T,'U,'V,FSharpFunc<'W,'X>> as f ->
                          { new FSharpFunc<'T,'U,'V,'W,'X>() with 
-                              member x.Invoke(t,u,v,w) = f.Invoke(t,u,v).Invoke(w) }
+                              member _.Invoke(t,u,v,w) = f.Invoke(t,u,v).Invoke(w) }
 
                   // Does it take two arguments without side effect?
                   | :? FSharpFunc<'T,'U,('V -> 'W -> 'X)> as f ->
                          { new FSharpFunc<'T,'U,'V,'W,'X>() with 
-                              member x.Invoke(t,u,v,w) = f.Invoke(t,u) v w }
+                              member _.Invoke(t,u,v,w) = f.Invoke(t,u) v w }
 
                   | _ -> { new FSharpFunc<'T,'U,'V,'W,'X>() with 
-                              member x.Invoke(t,u,v,w) = ((retype func : FSharpFunc<'T,('U -> 'V -> 'W -> 'X)>).Invoke(t)) u v w   }
+                              member _.Invoke(t,u,v,w) = ((retype func : FSharpFunc<'T,('U -> 'V -> 'W -> 'X)>).Invoke(t)) u v w   }
               override f.Invoke(t) = (fun u v w -> f.Invoke(t,u,v,w))
 
           []
@@ -3392,22 +3398,22 @@ namespace Microsoft.FSharp.Core
         // Note: this is not made public in the signature, because of conflicts with the Converter overload.
         // The method remains in case someone is calling it via reflection.
         []
-        static member op_Implicit(converter : System.Func<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
+        static member op_Implicit(converter : Func<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
 
         // Note: this is not made public in the signature, because of conflicts with the Converter overload.
         // The method remains in case someone is calling it via reflection.
         []
-        static member op_Implicit(func : ('T -> 'Res) ) =  new System.Func<'T,'Res>(func)
+        static member op_Implicit(func : ('T -> 'Res) ) =  new Func<'T,'Res>(func)
 
         []
-        static member op_Implicit(f : System.Converter<_,_>) : ('T -> 'Res) =  (fun t -> f.Invoke(t))
+        static member op_Implicit(f : Converter<_,_>) : ('T -> 'Res) =  (fun t -> f.Invoke(t))
 
         []
-        static member op_Implicit (func : ('T -> 'Res) ) =  new System.Converter<'T,'Res>(func)
+        static member op_Implicit (func : ('T -> 'Res) ) =  new Converter<'T,'Res>(func)
 
-        static member FromConverter (converter: System.Converter<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
+        static member FromConverter (converter: Converter<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
 
-        static member ToConverter (func: ('T -> 'Res) ) =  new System.Converter<'T,'Res>(func)
+        static member ToConverter (func: ('T -> 'Res) ) =  new Converter<'T,'Res>(func)
 
         static member InvokeFast (func:FSharpFunc<_,_>, arg1: 'T, arg2: 'Res)                   = OptimizedClosures.invokeFast2(func, arg1, arg2) 
 
@@ -3427,31 +3433,31 @@ namespace Microsoft.FSharp.Core
 
         // Note: this is not made public in the signature, because of conflicts with the Converter overload.
         // The method remains in case someone is calling it via reflection.
-        static member  inline ToFSharpFunc (converter: System.Func<_, _>) = (fun t -> converter.Invoke(t))
+        static member  inline ToFSharpFunc (converter: Func<_, _>) = (fun t -> converter.Invoke(t))
 
-        static member  inline FromFunc (func: System.Func<_>) = (fun () -> func.Invoke())
+        static member  inline FromFunc (func: Func<_>) = (fun () -> func.Invoke())
 
-        static member  inline FromFunc (func: System.Func<_, _>) = (fun t -> func.Invoke(t))
+        static member  inline FromFunc (func: Func<_, _>) = (fun t -> func.Invoke(t))
 
-        static member  inline FromFunc (func: System.Func<_, _, _>) = (fun t1 t2 -> func.Invoke(t1,t2))
+        static member  inline FromFunc (func: Func<_, _, _>) = (fun t1 t2 -> func.Invoke(t1,t2))
 
-        static member  inline FromFunc (func: System.Func<_, _, _, _>) = (fun t1 t2 t3 -> func.Invoke(t1,t2,t3))
+        static member  inline FromFunc (func: Func<_, _, _, _>) = (fun t1 t2 t3 -> func.Invoke(t1,t2,t3))
 
-        static member  inline FromFunc (func: System.Func<_, _, _, _, _>) = (fun t1 t2 t3 t4 -> func.Invoke(t1,t2,t3,t4))
+        static member  inline FromFunc (func: Func<_, _, _, _, _>) = (fun t1 t2 t3 t4 -> func.Invoke(t1,t2,t3,t4))
 
-        static member  inline FromFunc (func: System.Func<_, _, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> func.Invoke(t1,t2,t3,t4,t5))
+        static member  inline FromFunc (func: Func<_, _, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> func.Invoke(t1,t2,t3,t4,t5))
 
-        static member  inline FromAction (action: System.Action) = (fun () -> action.Invoke())
+        static member  inline FromAction (action: Action) = (fun () -> action.Invoke())
 
-        static member  inline FromAction (action: System.Action<_>) = (fun t -> action.Invoke(t))
+        static member  inline FromAction (action: Action<_>) = (fun t -> action.Invoke(t))
 
-        static member  inline FromAction (action: System.Action<_, _>) = (fun t1 t2 -> action.Invoke(t1,t2))
+        static member  inline FromAction (action: Action<_, _>) = (fun t1 t2 -> action.Invoke(t1,t2))
 
-        static member  inline FromAction (action: System.Action<_, _, _>) = (fun t1 t2 t3 -> action.Invoke(t1,t2,t3))
+        static member  inline FromAction (action: Action<_, _, _>) = (fun t1 t2 t3 -> action.Invoke(t1,t2,t3))
 
-        static member  inline FromAction (action: System.Action<_, _, _, _>) = (fun t1 t2 t3 t4 -> action.Invoke(t1,t2,t3,t4))
+        static member  inline FromAction (action: Action<_, _, _, _>) = (fun t1 t2 t3 t4 -> action.Invoke(t1,t2,t3,t4))
 
-        static member  inline FromAction (action: System.Action<_, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> action.Invoke(t1,t2,t3,t4,t5))
+        static member  inline FromAction (action: Action<_, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> action.Invoke(t1,t2,t3,t4,t5))
 
         static member inline FuncFromTupled (func: 'T1 * 'T2 -> 'Res) = (fun a b -> func (a, b))
 
@@ -3493,7 +3499,7 @@ namespace Microsoft.FSharp.Core
         | Some : Value:'T -> 'T option 
 
         []
-        member x.Value = match x with Some x -> x | None -> raise (new System.InvalidOperationException("Option.Value"))
+        member x.Value = match x with Some x -> x | None -> raise (new InvalidOperationException("Option.Value"))
 
         []
         member x.IsNone = match x with None -> true | _ -> false
@@ -3534,7 +3540,7 @@ namespace Microsoft.FSharp.Core
         | ValueNone : 'T voption
         | ValueSome : 'T -> 'T voption
 
-        member x.Value = match x with ValueSome x -> x | ValueNone -> raise (new System.InvalidOperationException("ValueOption.Value"))
+        member x.Value = match x with ValueSome x -> x | ValueNone -> raise (new InvalidOperationException("ValueOption.Value"))
 
         []
         static member None : 'T voption = ValueNone
@@ -3568,6 +3574,8 @@ namespace Microsoft.FSharp.Collections
     //-------------------------------------------------------------------------
 
     open System
+    open System.Text
+    open System.Collections
     open System.Collections.Generic
     open System.Diagnostics
     open Microsoft.FSharp.Core
@@ -3585,10 +3593,10 @@ namespace Microsoft.FSharp.Collections
     type List<'T> = 
        | ([])  :                  'T list
        | ( :: )  : Head: 'T * Tail: 'T list -> 'T list
-       interface System.Collections.Generic.IEnumerable<'T>
-       interface System.Collections.IEnumerable
-       interface System.Collections.Generic.IReadOnlyCollection<'T>
-       interface System.Collections.Generic.IReadOnlyList<'T>
+       interface IEnumerable<'T>
+       interface IEnumerable
+       interface IReadOnlyCollection<'T>
+       interface IReadOnlyList<'T>
         
     and 'T list = List<'T>
 
@@ -3633,9 +3641,9 @@ namespace Microsoft.FSharp.Collections
 
     module PrivateListHelpers = 
 
-        let notStarted() = raise (new System.InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
-        let alreadyFinished() = raise (new System.InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
-        let outOfRange() = raise (System.IndexOutOfRangeException(SR.GetString(SR.indexOutOfBounds)))
+        let notStarted() = raise (new InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
+        let alreadyFinished() = raise (new InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
+        let outOfRange() = raise (IndexOutOfRangeException(SR.GetString(SR.indexOutOfBounds)))
 
         let nonempty x = match x with [] -> false | _ -> true
         // optimized mutation-based implementation. This code is only valid in fslib, where mutation of private
@@ -3667,7 +3675,7 @@ namespace Microsoft.FSharp.Collections
              interface IEnumerator<'T> with 
                  member x.Current = x.GetCurrent()
 
-             interface System.Collections.IEnumerator with 
+             interface IEnumerator with 
                   member x.MoveNext() = 
                       if started then 
                           match curr with 
@@ -3685,7 +3693,7 @@ namespace Microsoft.FSharp.Collections
                       started <- false; 
                       curr <- s
 
-             interface System.IDisposable with 
+             interface IDisposable with 
                   member x.Dispose() = () 
 
         let mkListEnumerator s = (new ListEnumerator<'T>(s) :> IEnumerator<'T>)
@@ -3694,9 +3702,9 @@ namespace Microsoft.FSharp.Collections
 
         let rec nth l n = 
             match l with 
-            | [] -> raise (new System.ArgumentException(SR.GetString(SR.indexOutOfBounds),"n"))
+            | [] -> raise (new ArgumentException(SR.GetString(SR.indexOutOfBounds),"n"))
             | h :: t -> 
-               if n < 0 then raise (new System.ArgumentException((SR.GetString(SR.inputMustBeNonNegative)),"n"))
+               if n < 0 then raise (new ArgumentException((SR.GetString(SR.inputMustBeNonNegative)),"n"))
                elif n = 0 then h
                else nth t (n - 1)
 
@@ -3736,11 +3744,11 @@ namespace Microsoft.FSharp.Collections
            let n = l.Length
            let txt = 
                if n > 1000 then "Length > 1000"
-               else System.String.Concat( [| "Length = "; n.ToString() |])
+               else String.Concat( [| "Length = "; n.ToString() |])
            txt
 
-        member l.Head   = match l with a :: _ -> a | [] -> raise (System.InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
-        member l.Tail   = match l with _ :: b -> b | [] -> raise (System.InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
+        member l.Head   = match l with a :: _ -> a | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
+        member l.Tail   = match l with _ :: b -> b | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
 
         []
         member l.IsEmpty  = match l with [] -> true | _ -> false
@@ -3753,10 +3761,10 @@ namespace Microsoft.FSharp.Collections
         override x.ToString() = 
            match x with 
            | [] -> "[]"
-           | [h1] -> System.Text.StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("]").ToString()
-           | [h1;h2] -> System.Text.StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("]").ToString()
-           | [h1;h2;h3] -> System.Text.StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("]").ToString()
-           | h1 :: h2 :: h3 :: _ -> System.Text.StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("; ... ]").ToString() 
+           | [h1] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("]").ToString()
+           | [h1;h2] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("]").ToString()
+           | [h1;h2;h3] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("]").ToString()
+           | h1 :: h2 :: h3 :: _ -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("; ... ]").ToString() 
 
         member l.GetSlice(startIndex: int option, endIndex: int option ) = 
             match (startIndex, endIndex) with
@@ -3774,8 +3782,8 @@ namespace Microsoft.FSharp.Collections
         interface IEnumerable<'T> with
             member l.GetEnumerator() = PrivateListHelpers.mkListEnumerator l
 
-        interface System.Collections.IEnumerable with
-            member l.GetEnumerator() = (PrivateListHelpers.mkListEnumerator l :> System.Collections.IEnumerator)
+        interface IEnumerable with
+            member l.GetEnumerator() = (PrivateListHelpers.mkListEnumerator l :> IEnumerator)
 
         interface IReadOnlyCollection<'T> with
             member l.Count = l.Length
@@ -3839,10 +3847,10 @@ namespace Microsoft.FSharp.Core
         []
         let inline raise (exn: exn) = (# "throw" exn : 'T #)
 
-        let Failure message = new System.Exception(message)
+        let Failure message = new Exception(message)
         
         []
-        let (|Failure|_|) (error: exn) = if error.GetType().Equals(typeof) then Some error.Message else None
+        let (|Failure|_|) (error: exn) = if error.GetType().Equals(typeof) then Some error.Message else None
 
         let inline (<) x y = GenericLessThan x y
         let inline (>) x y = GenericGreaterThan x y
@@ -3866,24 +3874,24 @@ namespace Microsoft.FSharp.Core
         []
         []
         let inline invalidArg (argumentName:string) (message:string) = 
-            raise (new System.ArgumentException(message,argumentName))
+            raise (new ArgumentException(message,argumentName))
 
         []
         []
         let inline nullArg (argumentName:string) = 
-            raise (new System.ArgumentNullException(argumentName))        
+            raise (new ArgumentNullException(argumentName))        
 
         []
         []
-        let inline invalidOp message = raise (System.InvalidOperationException(message))
+        let inline invalidOp message = raise (InvalidOperationException(message))
 
         []
         []
-        let inline rethrow() = unbox(# "rethrow ldnull" : System.Object #)
+        let inline rethrow() = unbox(# "rethrow ldnull" : Object #)
 
         []
         []
-        let inline reraise() = unbox(# "rethrow ldnull" : System.Object #)
+        let inline reraise() = unbox(# "rethrow ldnull" : Object #)
 
         []
         []
@@ -3920,7 +3928,7 @@ namespace Microsoft.FSharp.Core
 
         let inline (<<) func2 func1 x = func2 (func1 x)
 
-        let (^) (s1: string) (s2: string) = System.String.Concat(s1, s2)
+        let (^) (s1: string) (s2: string) = String.Concat(s1, s2)
 
         []
         let defaultArg arg defaultValue = match arg with None -> defaultValue | Some v -> v
@@ -3938,7 +3946,7 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "neg" n  : int16 #)
              when ^T : nativeint = (# "neg" n  : nativeint #)
              when ^T : sbyte     = (# "neg" n  : sbyte #)
-             when ^T : decimal   = (# "" (System.Decimal.op_UnaryNegation((# "" n : decimal #))) : ^T #)
+             when ^T : decimal   = (# "" (Decimal.op_UnaryNegation((# "" n : decimal #))) : ^T #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              // That is, not in the generic implementation of '*'
@@ -3959,8 +3967,8 @@ namespace Microsoft.FSharp.Core
              when ^T : char        and ^U : char       = (# "conv.u2" (# "add" x y : uint32 #) : char #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "add" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "add" x y : uint32 #) : byte #)
-             when ^T : string      and ^U : string     = (# "" (System.String.Concat((# "" x : string #),(# "" y : string #))) : ^T #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Addition((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : string      and ^U : string     = (# "" (String.Concat((# "" x : string #),(# "" y : string #))) : ^T #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Addition((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (+) : ^T * ^U -> ^V) (x,y))
@@ -3980,7 +3988,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "sub" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "sub" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "sub" x y : uint32 #) : byte #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (-) : ^T * ^U -> ^V) (x,y))
@@ -3999,7 +4007,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "mul" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "mul" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "mul" x y : uint32 #) : byte #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (*) : ^T * ^U -> ^V) (x,y))
@@ -4019,7 +4027,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "div.un" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "div" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "div.un" x y : uint32 #) : byte #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Division((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Division((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (/) : ^T * ^U -> ^V) (x,y))
@@ -4039,7 +4047,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "rem.un" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "rem"    x y : int32  #) : sbyte  #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "rem.un" x y : uint32 #) : byte   #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Modulus((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Modulus((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (%) : ^T * ^U -> ^V) (x,y))
@@ -4189,7 +4197,7 @@ namespace Microsoft.FSharp.Core
         let decr cell = cell.contents <- cell.contents - 1
 
         []
-        let exit (exitcode:int) = System.Environment.Exit(exitcode); failwith "System.Environment.Exit did not exit!"
+        let exit (exitcode:int) = Environment.Exit(exitcode); failwith "System.Environment.Exit did not exit!"
 
         []
         []
@@ -4336,16 +4344,16 @@ namespace Microsoft.FSharp.Core
         let (|KeyValue|) (keyValuePair : KeyValuePair<'T,'U>) = (keyValuePair.Key, keyValuePair.Value)
 
         []
-        let infinity = System.Double.PositiveInfinity
+        let infinity = Double.PositiveInfinity
 
         []
-        let nan = System.Double.NaN 
+        let nan = Double.NaN 
 
         []
-        let infinityf = System.Single.PositiveInfinity
+        let infinityf = Single.PositiveInfinity
 
         []
-        let nanf = System.Single.NaN 
+        let nanf = Single.NaN 
 
         []
         []
@@ -4441,19 +4449,19 @@ namespace Microsoft.FSharp.Core
         []
         let inline decimal (value: ^T) = 
              ExplicitDynamic<(^T), decimal> value
-             when ^T : string     = (System.Decimal.Parse(castToString value,NumberStyles.Float,CultureInfo.InvariantCulture))
-             when ^T : float      = (System.Convert.ToDecimal((# "" value : float #))) 
-             when ^T : float32    = (System.Convert.ToDecimal((# "" value : float32 #))) 
-             when ^T : int64      = (System.Convert.ToDecimal((# "" value : int64 #))) 
-             when ^T : int32      = (System.Convert.ToDecimal((# "" value : int32 #))) 
-             when ^T : int16      = (System.Convert.ToDecimal((# "" value : int16 #))) 
-             when ^T : nativeint  = (System.Convert.ToDecimal(int64 (# "" value : nativeint #))) 
-             when ^T : sbyte      = (System.Convert.ToDecimal((# "" value : sbyte #))) 
-             when ^T : uint64     = (System.Convert.ToDecimal((# "" value : uint64 #))) 
-             when ^T : uint32     = (System.Convert.ToDecimal((# "" value : uint32 #))) 
-             when ^T : uint16     = (System.Convert.ToDecimal((# "" value : uint16 #))) 
-             when ^T : unativeint = (System.Convert.ToDecimal(uint64 (# "" value : unativeint #))) 
-             when ^T : byte       = (System.Convert.ToDecimal((# "" value : byte #))) 
+             when ^T : string     = (Decimal.Parse(castToString value,NumberStyles.Float,CultureInfo.InvariantCulture))
+             when ^T : float      = (Convert.ToDecimal((# "" value : float #))) 
+             when ^T : float32    = (Convert.ToDecimal((# "" value : float32 #))) 
+             when ^T : int64      = (Convert.ToDecimal((# "" value : int64 #))) 
+             when ^T : int32      = (Convert.ToDecimal((# "" value : int32 #))) 
+             when ^T : int16      = (Convert.ToDecimal((# "" value : int16 #))) 
+             when ^T : nativeint  = (Convert.ToDecimal(int64 (# "" value : nativeint #))) 
+             when ^T : sbyte      = (Convert.ToDecimal((# "" value : sbyte #))) 
+             when ^T : uint64     = (Convert.ToDecimal((# "" value : uint64 #))) 
+             when ^T : uint32     = (Convert.ToDecimal((# "" value : uint32 #))) 
+             when ^T : uint16     = (Convert.ToDecimal((# "" value : uint16 #))) 
+             when ^T : unativeint = (Convert.ToDecimal(uint64 (# "" value : unativeint #))) 
+             when ^T : byte       = (Convert.ToDecimal((# "" value : byte #))) 
              when ^T : decimal    = (# "" value : decimal #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> decimal) (value))
 
@@ -4566,7 +4574,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline char (value: ^T) = 
              ExplicitDynamic<(^T), char> value
-             when ^T : string     = (System.Char.Parse(castToString value))
+             when ^T : string     = (Char.Parse(castToString value))
              when ^T : float      = (# "conv.u2" value  : char #)
              when ^T : float32    = (# "conv.u2" value  : char #)
              when ^T : int64      = (# "conv.u2" value  : char #)
@@ -4600,8 +4608,8 @@ namespace Microsoft.FSharp.Core
                 when ^T : float  = (# "clt" x y : bool #) 
                 when ^T : float32= (# "clt" x y : bool #) 
                 when ^T : char   = (# "clt" x y : bool #)
-                when ^T : decimal     = System.Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = (# "clt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when ^T : decimal     = Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = (# "clt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (<) : ^T * ^U -> bool) (x,y))
 
             /// Static greater-than with static optimizations for some well-known cases.
@@ -4621,8 +4629,8 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = (# "cgt" x y : bool #) 
                 when 'T : float32    = (# "cgt" x y : bool #) 
                 when 'T : char       = (# "cgt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = (# "cgt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when 'T : decimal     = Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = (# "cgt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (>) : ^T * ^U -> bool) (x,y))
 
             /// Static less-than-or-equal with static optimizations for some well-known cases.
@@ -4642,8 +4650,8 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "cgt.un" x y : bool #) 
                 when 'T : float32    = not (# "cgt.un" x y : bool #) 
                 when 'T : char       = not (# "cgt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = not (# "cgt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when 'T : decimal     = Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = not (# "cgt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (<=) : ^T * ^U -> bool) (x,y))
 
             /// Static greater-than-or-equal with static optimizations for some well-known cases.
@@ -4663,8 +4671,8 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "clt.un" x y : bool #) 
                 when 'T : float32    = not (# "clt.un" x y : bool #)
                 when 'T : char       = not (# "clt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = not (# "clt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when 'T : decimal     = Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = not (# "clt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (>=) : ^T * ^U -> bool) (x,y))
 
             /// Static greater-than-or-equal with static optimizations for some well-known cases.
@@ -4704,8 +4712,8 @@ namespace Microsoft.FSharp.Core
                 when ^T : char    = not (# "ceq" x y : bool #)
                 when ^T : nativeint  = not (# "ceq" x y : bool #)
                 when ^T : unativeint  = not (# "ceq" x y : bool #)
-                when ^T : string  = not (System.String.Equals((# "" x : string #),(# "" y : string #)))
-                when ^T : decimal     = System.Decimal.op_Inequality((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string  = not (String.Equals((# "" x : string #),(# "" y : string #)))
+                when ^T : decimal     = Decimal.op_Inequality((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : ^T = (^T : (static member (<>) : ^T * ^T -> bool) (x,y))
 
             // static comparison (ER mode) with static optimizations for some well-known cases
@@ -4735,22 +4743,22 @@ namespace Microsoft.FSharp.Core
                                      else (# "ceq" e1 e1 : int #)
                  when ^T : char   = if (# "clt.un" e1 e2 : bool #) then (-1) else (# "cgt.un" e1 e2 : int #)
                  when ^T : string = 
-                     // NOTE: we don't have to null check here because System.String.CompareOrdinal
+                     // NOTE: we don't have to null check here because String.CompareOrdinal
                      // gives reliable results on null values.
-                     System.String.CompareOrdinal((# "" e1 : string #),(# "" e2 : string #))
-                 when ^T : decimal     = System.Decimal.Compare((# "" e1:decimal #), (# "" e2:decimal #))
+                     String.CompareOrdinal((# "" e1 : string #),(# "" e2 : string #))
+                 when ^T : decimal     = Decimal.Compare((# "" e1:decimal #), (# "" e2:decimal #))
 
             []
             let inline max (e1: ^T) (e2: ^T) = 
                 (if e1 < e2 then e2 else e1)
-                when ^T : float         = (System.Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-                when ^T : float32       = (System.Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+                when ^T : float         = (Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+                when ^T : float32       = (Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
             []
             let inline min (e1: ^T) (e2: ^T) = 
                 (if e1 < e2 then e1 else e2)
-                when ^T : float         = (System.Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-                when ^T : float32       = (System.Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+                when ^T : float         = (Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+                when ^T : float32       = (Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
             []
             let inline hash (value:'T) = 
@@ -4802,7 +4810,7 @@ namespace Microsoft.FSharp.Core
 
 
         []
-        let using (resource : 'T when 'T :> System.IDisposable) action = 
+        let using (resource : 'T when 'T :> IDisposable) action = 
             try action(resource)
             finally match (box resource) with null -> () | _ -> resource.Dispose()
 
@@ -4813,7 +4821,7 @@ namespace Microsoft.FSharp.Core
         let inline nameof (_: 'T) : string = raise (Exception "may not call directly, should always be optimized away")
 
         []
-        let methodhandleof (_call: ('T -> 'TResult)) : System.RuntimeMethodHandle = raise (Exception "may not call directly, should always be optimized away")
+        let methodhandleof (_call: ('T -> 'TResult)) : RuntimeMethodHandle = raise (Exception "may not call directly, should always be optimized away")
 
         []
         let inline typedefof<'T> = BasicInlinedOperations.typedefof<'T>
@@ -4836,13 +4844,13 @@ namespace Microsoft.FSharp.Core
         // std* are TypeFunctions with the effect of reading the property on instantiation.
         // So, direct uses of stdout should capture the current System.Console.Out at that point.
         []
-        let stdin<'T>  = System.Console.In
+        let stdin<'T>  = Console.In
 
         []
-        let stdout<'T> = System.Console.Out
+        let stdout<'T> = Console.Out
 
         []
-        let stderr<'T> = System.Console.Error
+        let stderr<'T> = Console.Error
 
         module Unchecked =
 
@@ -4878,8 +4886,8 @@ namespace Microsoft.FSharp.Core
                  when ^T : char        and ^U : char       = (# "conv.ovf.u2.un" (# "add.ovf.un" x y : uint32 #) : char #)
                  when ^T : sbyte       and ^U : sbyte      = (# "conv.ovf.i1" (# "add.ovf" x y : int32 #) : sbyte #)
                  when ^T : byte        and ^U : byte       = (# "conv.ovf.u1.un" (# "add.ovf.un" x y : uint32 #) : byte #)
-                 when ^T : string      and ^U : string     = (# "" (System.String.Concat((# "" x : string #),(# "" y : string #))) : ^T #)
-                 when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Addition((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+                 when ^T : string      and ^U : string     = (# "" (String.Concat((# "" x : string #),(# "" y : string #))) : ^T #)
+                 when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Addition((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
                  // According to the somewhat subtle rules of static optimizations,
                  // this condition is used whenever ^T is resolved to a nominal type
                  // That is, not in the generic implementation of '+'
@@ -4899,7 +4907,7 @@ namespace Microsoft.FSharp.Core
                  when ^T : uint16      and ^U : uint16     = (# "conv.ovf.u2.un" (# "sub.ovf.un" x y : uint32 #) : uint16 #)
                  when ^T : sbyte       and ^U : sbyte      = (# "conv.ovf.i1" (# "sub.ovf" x y : int32 #) : sbyte #)
                  when ^T : byte        and ^U : byte       = (# "conv.ovf.u1.un" (# "sub.ovf.un" x y : uint32 #) : byte #)
-                 when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+                 when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
                  when ^T : ^T = ((^T or ^U): (static member (-) : ^T * ^U -> ^V) (x,y))
 
             []
@@ -4912,7 +4920,7 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "sub.ovf" 0s value  : int16 #)
                  when ^T : nativeint = (# "sub.ovf" 0n value  : nativeint #)
                  when ^T : sbyte     = (# "sub.ovf" 0y value  : sbyte #)
-                 when ^T : decimal   = (# "" (System.Decimal.op_UnaryNegation((# "" value : decimal #))) : ^T #)
+                 when ^T : decimal   = (# "" (Decimal.op_UnaryNegation((# "" value : decimal #))) : ^T #)
                  when ^T : ^T = (^T : (static member (~-) : ^T -> ^T) (value))
 
             let inline ( * ) (x: ^T) (y: ^U) : ^V = 
@@ -4929,7 +4937,7 @@ namespace Microsoft.FSharp.Core
                  when ^T : unativeint and ^U : unativeint = (# "mul.ovf.un" x y : unativeint #)
                  when ^T : float      and ^U : float      = (# "mul" x y : float #)
                  when ^T : float32    and ^U : float32    = (# "mul" x y : float32 #)
-                 when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+                 when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
                  // According to the somewhat subtle rules of static optimizations,
                  // this condition is used whenever ^T is resolved to a nominal type
                  // That is, not in the generic implementation of '*'
@@ -4999,7 +5007,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline char (value: ^T) = 
                  ExplicitDynamic<(^T), char> value 
-                 when ^T : string     = (System.Char.Parse(castToString value))
+                 when ^T : string     = (Char.Parse(castToString value))
                  when ^T : float      = (# "conv.ovf.u2" value  : char #)
                  when ^T : float32    = (# "conv.ovf.u2" value  : char #)
                  when ^T : int64      = (# "conv.ovf.u2" value  : char #)
@@ -5162,8 +5170,8 @@ namespace Microsoft.FSharp.Core
 
             open System.Collections
 
-            let notStarted() = raise (new System.InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
-            let alreadyFinished() = raise (new System.InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
+            let notStarted() = raise (new InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
+            let alreadyFinished() = raise (new InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
 
             // Notes on "inline" with range ienumerable generation.
             // "inline" is used to ensure that primitive ops like add,sub etc. are direct calls.
@@ -5186,7 +5194,7 @@ namespace Microsoft.FSharp.Core
                     | _          -> alreadyFinished()
                 interface IEnumerator<'T> with
                     member x.Current = getCurrent(x)
-                interface System.Collections.IEnumerator with 
+                interface IEnumerator with 
                     member x.Current = box (getCurrent(x))
                     member x.MoveNext() = 
                         match mode with
@@ -5196,7 +5204,7 @@ namespace Microsoft.FSharp.Core
                     member x.Reset() = 
                         mode <- Mode.NotStarted
                         x.DoReset()
-                interface System.IDisposable with 
+                interface IDisposable with 
                     member x.Dispose() = ()
                 abstract CanStart : bool
                 abstract CanStep : bool
@@ -5253,11 +5261,11 @@ namespace Microsoft.FSharp.Core
                     let canStart = not (if up then step < zero else step > zero) // check for interval increasing, step decreasing 
                     // generate proper increasing sequence
                     { new ProperIntegralRangeEnumerator<_,_>(n,m) with 
-                          member x.CanStart = canStart
-                          member x.Before a b = if up then (a < b) else (a > b)
-                          member x.Equal a b = (a = b)
-                          member x.Step a = add a step
-                          member x.Result a = f a } |> enumerator 
+                          member _.CanStart = canStart
+                          member _.Before a b = if up then (a < b) else (a > b)
+                          member _.Equal a b = (a = b)
+                          member _.Step a = add a step
+                          member _.Result a = f a } |> enumerator 
 
             // For RangeGeneric, one and add are functions representing the static resolution of GenericOne and (+)
             // for the particular static type. 
@@ -5270,16 +5278,16 @@ namespace Microsoft.FSharp.Core
                         let canStart = (n < m)
                         // generate proper increasing sequence
                         { new ProperIntegralRangeEnumerator<_,_>(n,m) with 
-                              member x.CanStart = canStart
-                              member x.Before a b = (a < b)
-                              member x.Equal a b = (a = b)
-                              member x.Step a = add a one
-                              member x.Result a = a } |> enumerator 
+                              member _.CanStart = canStart
+                              member _.Before a b = (a < b)
+                              member _.Equal a b = (a = b)
+                              member _.Step a = add a one
+                              member _.Result a = a } |> enumerator 
 
                 { new IEnumerable<'T> with 
-                      member x.GetEnumerator() = gen() 
+                      member _.GetEnumerator() = gen() 
                   interface IEnumerable with 
-                      member x.GetEnumerator() = (gen() :> IEnumerator) }
+                      member _.GetEnumerator() = (gen() :> IEnumerator) }
 
             []
             type VariableStepIntegralRangeState<'T> = {
@@ -5314,7 +5322,7 @@ namespace Microsoft.FSharp.Core
                     { new IEnumerator<'T> with
                         member _.Current = current ()
 
-                      interface System.IDisposable with
+                      interface IDisposable with
                         member _.Dispose () = ()
 
                       interface IEnumerator with 
@@ -5372,7 +5380,7 @@ namespace Microsoft.FSharp.Core
                         { new IEnumerator<'T> with
                             member _.Current = current ()
 
-                          interface System.IDisposable with
+                          interface IDisposable with
                             member _.Dispose () = ()
 
                           interface IEnumerator with
@@ -5400,9 +5408,9 @@ namespace Microsoft.FSharp.Core
                 if step = zero then invalidArg "step" (SR.GetString(SR.stepCannotBeZero));
                 let gen() = integralRangeStepEnumerator (zero, add, n, step, m, id)
                 { new IEnumerable<'T> with 
-                      member x.GetEnumerator() = gen() 
+                      member _.GetEnumerator() = gen() 
                   interface IEnumerable with 
-                      member x.GetEnumerator() = (gen() :> IEnumerator) }
+                      member _.GetEnumerator() = (gen() :> IEnumerator) }
 
             let inline isNaN x = x <> x // NaN is the only value that does not equal itself.
             
@@ -5448,15 +5456,15 @@ namespace Microsoft.FSharp.Core
                     let canStart = not (if up then step < GenericZero else step > GenericZero) // interval increasing, step decreasing 
                     // generate proper increasing sequence
                     { new ProperFloatingRangeStepEnumerator<_>(n, m) with 
-                          member x.CanStart = canStart
-                          member x.Before a b = if up then (a < b) else (a > b)
-                          member x.Equal a b = (a = b)
-                          member x.Step a = a + step } |> enumerator 
+                          member _.CanStart = canStart
+                          member _.Before a b = if up then (a < b) else (a > b)
+                          member _.Equal a b = (a = b)
+                          member _.Step a = a + step } |> enumerator 
 
-            // When is a System.Double an System.Int32?
+            // When is a Double an Int32?
             let minIntR = -2147483648.0
             let maxIntR =  2147483647.0
-            let isPreciseInt x = minIntR <= x && x <= maxIntR && System.Math.Floor x = x 
+            let isPreciseInt x = minIntR <= x && x <= maxIntR && Math.Floor x = x 
 
             // When a floating range looks like an exact number of steps, generate using {n+i.step} for i from an integer range.
             let inline semiPreciseFloatingRangeEnumerator ofInt n dx m =                                                 
@@ -5469,9 +5477,9 @@ namespace Microsoft.FSharp.Core
             let inline floatingRange ofInt (n,step,m) =
                 let gen() = semiPreciseFloatingRangeEnumerator ofInt n step m 
                 { new IEnumerable<'T> with 
-                      member x.GetEnumerator() = gen() 
-                  interface System.Collections.IEnumerable with 
-                      member x.GetEnumerator() = (gen() :> System.Collections.IEnumerator) }
+                      member _.GetEnumerator() = gen() 
+                  interface IEnumerable with 
+                      member _.GetEnumerator() = (gen() :> IEnumerator) }
 
             let RangeInt32   start step stop : seq        = simpleIntegralRange Int32.MinValue Int32.MaxValue start step stop
             let RangeInt64   start step stop : seq      = simpleIntegralRange Int64.MinValue Int64.MaxValue start step stop
@@ -5590,7 +5598,7 @@ namespace Microsoft.FSharp.Core
                     match nonFixedDim with
                     | 1 -> (fun i -> GetArray2D source index (start+i))
                     | 0 -> (fun i -> GetArray2D source (start+i) index)
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for j = 0 to len - 1 do 
                     SetArray dst j (getArrayElem j)
                 dst
@@ -5607,7 +5615,7 @@ namespace Microsoft.FSharp.Core
                     match nonFixedDim with
                     | 1 -> (fun j -> SetArray2D target index (bound + start + j) (GetArray source j)) 
                     | 0 -> (fun i -> SetArray2D target (bound + start + i) index (GetArray source i))
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for j = 0 to len - 1 do
                     setArrayElem j
 
@@ -5650,7 +5658,7 @@ namespace Microsoft.FSharp.Core
                     | 1, 2 -> (fun i j -> GetArray3D source index (start1 + i) (start2 + j))
                     | 0, 2 -> (fun i j -> GetArray3D source (start1 + i) index (start2 + j))
                     | 0, 1 -> (fun i j -> GetArray3D source (start1 + i) (start2 + j) index)
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
 
                 for i = 0 to len1 - 1 do
                     for j = 0 to len2 - 1 do
@@ -5674,7 +5682,7 @@ namespace Microsoft.FSharp.Core
                     | 2 -> (fun i -> GetArray3D source index1 index2 i)
                     | 1 -> (fun i -> GetArray3D source index1 (start + i) index2)
                     | 0 -> (fun i -> GetArray3D source (start+i) index1 index2)
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for j = 0 to len - 1 do 
                     SetArray dst j (getArrayElem j)
                 dst
@@ -5712,7 +5720,7 @@ namespace Microsoft.FSharp.Core
                     | 1, 2 -> (fun i j -> SetArray3D target index (bound1 + start1 + i) (bound2 + start2 + j) (GetArray2D source i j)) 
                     | 0, 2 -> (fun i j -> SetArray3D target (bound1 + start1 + i) index (bound2+ start2 + j) (GetArray2D source i j))
                     | 0, 1 -> (fun i j -> SetArray3D target (bound1 + start1 + i) (bound2+ start2 + j) index (GetArray2D source i j))
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
 
                 for i = 0 to len1 - 1 do
                     for j = 0 to len2 - 1 do
@@ -5736,7 +5744,7 @@ namespace Microsoft.FSharp.Core
                     | 2 -> (fun k -> SetArray3D target index1 index2 (bound + start + k) (GetArray source k)) 
                     | 1 -> (fun j -> SetArray3D target index1 (bound + start + j) index2 (GetArray source j)) 
                     | 0 -> (fun i -> SetArray3D target (bound + start + i) index1 index2 (GetArray source i))
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for j = 0 to len - 1 do 
                     setArrayElem j
 
@@ -5782,7 +5790,7 @@ namespace Microsoft.FSharp.Core
                     | 0, 2, 3 -> (fun i j k -> GetArray4D source i index j k)
                     | 0, 1, 3 -> (fun i j k -> GetArray4D source i j index k)
                     | 0, 1, 2 -> (fun i j k -> GetArray4D source i j k index)
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for i = 0 to len1 - 1 do
                     for j = 0 to len2 - 1 do
                         for k = 0 to len3 - 1 do
@@ -5819,7 +5827,7 @@ namespace Microsoft.FSharp.Core
                     | 0, 3 -> (fun i j -> GetArray4D source i index1 index2 j)
                     | 0, 2 -> (fun i j -> GetArray4D source i index1 j index2)
                     | 0, 1 -> (fun i j -> GetArray4D source i j index1 index2)
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for i = 0 to len1 - 1 do
                     for j = 0 to len2 - 1 do
                             SetArray2D dst i j (getArrayElem i j)
@@ -5855,7 +5863,7 @@ namespace Microsoft.FSharp.Core
                     | 1 -> (fun i -> GetArray4D source index1 i index2 index3)
                     | 2 -> (fun i -> GetArray4D source index1 index2 i index3)
                     | 3 -> (fun i -> GetArray4D source index1 index2 index3 i)
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for i = 0 to len1 - 1 do
                     SetArray dst i (getArrayElem i) 
 
@@ -5905,7 +5913,7 @@ namespace Microsoft.FSharp.Core
                     | 0, 2, 3 -> (fun i j k -> SetArray4D target (bound1 + start1 + i) index (bound2 + start2 + j) (bound3 + start3 + k) (GetArray3D source i j k))
                     | 0, 1, 3 -> (fun i j k -> SetArray4D target (bound1 + start1 + i) (bound2 + start2 + j) index (bound3 + start3 + k) (GetArray3D source i j k))
                     | 0, 1, 2 -> (fun i j k -> SetArray4D target (bound1 + start1 + i) (bound2 + start2 + j) (bound3 + start3 + k) index (GetArray3D source i j k))
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
 
                 for i = 0 to len1 - 1 do
                     for j = 0 to len2 - 1 do
@@ -5940,7 +5948,7 @@ namespace Microsoft.FSharp.Core
                     | 0, 3 -> (fun i j -> SetArray4D target (bound1 + start1 + i) index1 index2 (bound2 + start2 + j) (GetArray2D source i j))
                     | 0, 2 -> (fun i j -> SetArray4D target (bound1 + start1 + i) index1 (bound2 + start2 + j) index2 (GetArray2D source i j))
                     | 0, 1 -> (fun i j -> SetArray4D target (bound1 + start1 + i) (bound2 + start2 + j) index1 index2 (GetArray2D source i j))
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
 
                 for i = 0 to len1 - 1 do
                     for j = 0 to len2 - 1 do
@@ -5974,7 +5982,7 @@ namespace Microsoft.FSharp.Core
                     | 1 -> (fun i -> SetArray4D target index1 (bound1 + start1 + i) index2 index3 (GetArray source i))
                     | 2 -> (fun i -> SetArray4D target index1 index2 (bound1 + start1 + i) index3 (GetArray source i))
                     | 3 -> (fun i -> SetArray4D target index1 index2 index3 (bound1 + start1 + i) (GetArray source i))
-                    | _ -> raise (System.IndexOutOfRangeException())
+                    | _ -> raise (IndexOutOfRangeException())
                 for i = 0 to len1 - 1 do
                     setArrayElem i
 
@@ -5999,145 +6007,145 @@ namespace Microsoft.FSharp.Core
             []
             let inline absImpl (x: ^T) : ^T = 
                  (^T: (static member Abs : ^T -> ^T) (x))
-                 when ^T : int32       = let x : int32     = retype x in System.Math.Abs(x)
-                 when ^T : float       = let x : float     = retype x in System.Math.Abs(x)
-                 when ^T : float32     = let x : float32   = retype x in System.Math.Abs(x)
-                 when ^T : int64       = let x : int64     = retype x in System.Math.Abs(x)
+                 when ^T : int32       = let x : int32     = retype x in Math.Abs(x)
+                 when ^T : float       = let x : float     = retype x in Math.Abs(x)
+                 when ^T : float32     = let x : float32   = retype x in Math.Abs(x)
+                 when ^T : int64       = let x : int64     = retype x in Math.Abs(x)
                  when ^T : nativeint   = 
                     let x : nativeint = retype x in 
                     if x >= 0n then x else 
                     let res = -x in 
-                    if res < 0n then raise (System.OverflowException(ErrorStrings.NoNegateMinValueString))
+                    if res < 0n then raise (OverflowException(ErrorStrings.NoNegateMinValueString))
                     res
-                 when ^T : int16       = let x : int16     = retype x in System.Math.Abs(x)
-                 when ^T : sbyte       = let x : sbyte     = retype x in System.Math.Abs(x)
-                 when ^T : decimal     = System.Math.Abs(retype x : decimal) 
+                 when ^T : int16       = let x : int16     = retype x in Math.Abs(x)
+                 when ^T : sbyte       = let x : sbyte     = retype x in Math.Abs(x)
+                 when ^T : decimal     = Math.Abs(retype x : decimal) 
 
             []
             let inline  acosImpl(x: ^T) : ^T = 
                  (^T: (static member Acos : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Acos(retype x)
-                 when ^T : float32     = System.Math.Acos(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Acos(retype x)
+                 when ^T : float32     = Math.Acos(toFloat (retype x)) |> toFloat32
 
             []
             let inline  asinImpl(x: ^T) : ^T = 
                  (^T: (static member Asin : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Asin(retype x)
-                 when ^T : float32     = System.Math.Asin(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Asin(retype x)
+                 when ^T : float32     = Math.Asin(toFloat (retype x)) |> toFloat32
 
             []
             let inline  atanImpl(x: ^T) : ^T = 
                  (^T: (static member Atan : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Atan(retype x)
-                 when ^T : float32     = System.Math.Atan(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Atan(retype x)
+                 when ^T : float32     = Math.Atan(toFloat (retype x)) |> toFloat32
 
             []
             let inline  atan2Impl(x: ^T) (y: ^T) : 'U = 
                  (^T: (static member Atan2 : ^T * ^T -> 'U) (x,y))
-                 when ^T : float       = System.Math.Atan2(retype x, retype y)
-                 when ^T : float32     = System.Math.Atan2(toFloat (retype x), toFloat(retype y)) |> toFloat32
+                 when ^T : float       = Math.Atan2(retype x, retype y)
+                 when ^T : float32     = Math.Atan2(toFloat (retype x), toFloat(retype y)) |> toFloat32
 
             []
             let inline  ceilImpl(x: ^T) : ^T = 
                  (^T: (static member Ceiling : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Ceiling(retype x : float)
-                 when ^T : float32     = System.Math.Ceiling(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Ceiling(retype x : float)
+                 when ^T : float32     = Math.Ceiling(toFloat (retype x)) |> toFloat32
 
             []
             let inline  expImpl(x: ^T) : ^T = 
                  (^T: (static member Exp : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Exp(retype x)
-                 when ^T : float32     = System.Math.Exp(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Exp(retype x)
+                 when ^T : float32     = Math.Exp(toFloat (retype x)) |> toFloat32
 
             []
             let inline floorImpl (x: ^T) : ^T = 
                  (^T: (static member Floor : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Floor(retype x : float)
-                 when ^T : float32     = System.Math.Floor(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Floor(retype x : float)
+                 when ^T : float32     = Math.Floor(toFloat (retype x)) |> toFloat32
 
             []
             let inline truncateImpl (x: ^T) : ^T = 
                  (^T: (static member Truncate : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Truncate(retype x : float) 
-                 when ^T : float32     = System.Math.Truncate(toFloat (retype x))  |> toFloat32
+                 when ^T : float       = Math.Truncate(retype x : float) 
+                 when ^T : float32     = Math.Truncate(toFloat (retype x))  |> toFloat32
 
             []
             let inline roundImpl (x: ^T) : ^T = 
                  (^T: (static member Round : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Round(retype x : float)
-                 when ^T : float32     = System.Math.Round(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Round(retype x : float)
+                 when ^T : float32     = Math.Round(toFloat (retype x)) |> toFloat32
 
             []
             let inline signImpl (x: ^T) : int = 
                  (^T: (member Sign : int) (x))
-                 when ^T : int32       = System.Math.Sign(retype x : int32)
-                 when ^T : int64       = System.Math.Sign(retype x : int64)
+                 when ^T : int32       = Math.Sign(retype x : int32)
+                 when ^T : int64       = Math.Sign(retype x : int64)
                  when ^T : nativeint   = if (retype x : nativeint) < 0n then -1 else if (retype x : nativeint) > 0n then 1 else 0
-                 when ^T : int16       = System.Math.Sign(retype x : int16)
-                 when ^T : sbyte       = System.Math.Sign(retype x : sbyte)
-                 when ^T : float       = System.Math.Sign(retype x : float)
-                 when ^T : float32     = System.Math.Sign(toFloat (retype x)) 
-                 when ^T : decimal     = System.Math.Sign(retype x : decimal) 
+                 when ^T : int16       = Math.Sign(retype x : int16)
+                 when ^T : sbyte       = Math.Sign(retype x : sbyte)
+                 when ^T : float       = Math.Sign(retype x : float)
+                 when ^T : float32     = Math.Sign(toFloat (retype x)) 
+                 when ^T : decimal     = Math.Sign(retype x : decimal) 
 
             []
             let inline  logImpl(x: ^T) : ^T = 
                  (^T: (static member Log : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Log(retype x)
-                 when ^T : float32     = System.Math.Log(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Log(retype x)
+                 when ^T : float32     = Math.Log(toFloat (retype x)) |> toFloat32
             
             []
             let inline  log10Impl(x: ^T) : ^T = 
                  (^T: (static member Log10 : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Log10(retype x)
-                 when ^T : float32     = System.Math.Log10(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Log10(retype x)
+                 when ^T : float32     = Math.Log10(toFloat (retype x)) |> toFloat32
 
             []
             let inline  sqrtImpl(x: ^T) : ^U = 
                  (^T: (static member Sqrt : ^T -> ^U) (x))
-                 when ^T : float       = System.Math.Sqrt(retype x : float)
-                 when ^T : float32     = System.Math.Sqrt(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Sqrt(retype x : float)
+                 when ^T : float32     = Math.Sqrt(toFloat (retype x)) |> toFloat32
 
             []
             let inline  cosImpl(x: ^T) : ^T = 
                  (^T: (static member Cos : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Cos(retype x)
-                 when ^T : float32     = System.Math.Cos(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Cos(retype x)
+                 when ^T : float32     = Math.Cos(toFloat (retype x)) |> toFloat32
 
             []
             let inline  coshImpl(x: ^T) : ^T = 
                  (^T: (static member Cosh : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Cosh(retype x)
-                 when ^T : float32     = System.Math.Cosh(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Cosh(retype x)
+                 when ^T : float32     = Math.Cosh(toFloat (retype x)) |> toFloat32
 
             []
             let inline  sinImpl(x: ^T) : ^T = 
                  (^T: (static member Sin : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Sin(retype x)
-                 when ^T : float32     = System.Math.Sin(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Sin(retype x)
+                 when ^T : float32     = Math.Sin(toFloat (retype x)) |> toFloat32
 
             []
             let inline  sinhImpl(x: ^T) : ^T = 
                  (^T: (static member Sinh : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Sinh(retype x)
-                 when ^T : float32     = System.Math.Sinh(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Sinh(retype x)
+                 when ^T : float32     = Math.Sinh(toFloat (retype x)) |> toFloat32
 
             []
             let inline  tanImpl(x: ^T) : ^T = 
                  (^T: (static member Tan : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Tan(retype x)
-                 when ^T : float32     = System.Math.Tan(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Tan(retype x)
+                 when ^T : float32     = Math.Tan(toFloat (retype x)) |> toFloat32
 
             []
             let inline  tanhImpl(x: ^T) : ^T = 
                  (^T: (static member Tanh : ^T -> ^T) (x))
-                 when ^T : float       = System.Math.Tanh(retype x)
-                 when ^T : float32     = System.Math.Tanh(toFloat (retype x)) |> toFloat32
+                 when ^T : float       = Math.Tanh(retype x)
+                 when ^T : float32     = Math.Tanh(toFloat (retype x)) |> toFloat32
 
             []
             let inline  powImpl (x: ^T) (y: ^U) : ^T = 
                  (^T: (static member Pow : ^T * ^U -> ^T) (x,y))
-                 when ^T : float       = System.Math.Pow((retype x : float), (retype y: float))
-                 when ^T : float32     = System.Math.Pow(toFloat (retype x), toFloat(retype y)) |> toFloat32
+                 when ^T : float       = Math.Pow((retype x : float), (retype y: float))
+                 when ^T : float32     = Math.Pow(toFloat (retype x), toFloat(retype y)) |> toFloat32
 
             []
             type AbsDynamicImplTable<'T>() = 
@@ -6581,7 +6589,7 @@ namespace Microsoft.FSharp.Core
                         | 1 -> GetArray4DLength2 arr
                         | 2 -> GetArray4DLength3 arr
                         | 3 -> GetArray4DLength4 arr
-                        | _ -> raise (System.IndexOutOfRangeException())
+                        | _ -> raise (IndexOutOfRangeException())
 
                     len - offset - 1
 
@@ -6593,7 +6601,7 @@ namespace Microsoft.FSharp.Core
                         | 0 -> GetArray3DLength1 arr
                         | 1 -> GetArray3DLength2 arr
                         | 2 -> GetArray3DLength3 arr
-                        | _ -> raise (System.IndexOutOfRangeException())
+                        | _ -> raise (IndexOutOfRangeException())
 
                     len - offset - 1
 
@@ -6604,7 +6612,7 @@ namespace Microsoft.FSharp.Core
                         match dim with
                         | 0 -> GetArray2DLength1 arr
                         | 1 -> GetArray2DLength2 arr
-                        | _ -> raise (System.IndexOutOfRangeException())
+                        | _ -> raise (IndexOutOfRangeException())
 
                     len - offset - 1
 
@@ -6612,7 +6620,7 @@ namespace Microsoft.FSharp.Core
                 []
                 member arr.GetReverseIndex (_: int, offset: int) = arr.Length - offset - 1
 
-            type System.String with
+            type String with
                 []
                 member str.GetReverseIndex (_: int, offset: int) = str.Length - offset - 1
 
@@ -6660,11 +6668,11 @@ namespace Microsoft.FSharp.Control
     open System
     open Microsoft.FSharp.Core
 
-    type IDelegateEvent<'Delegate when 'Delegate :> System.Delegate > =
+    type IDelegateEvent<'Delegate when 'Delegate :> Delegate > =
         abstract AddHandler: handler:'Delegate -> unit
         abstract RemoveHandler: handler:'Delegate -> unit 
 
-    type IEvent<'Delegate,'Args when 'Delegate : delegate<'Args,unit> and 'Delegate :> System.Delegate > =
+    type IEvent<'Delegate,'Args when 'Delegate : delegate<'Args,unit> and 'Delegate :> Delegate > =
         inherit IDelegateEvent<'Delegate>
         inherit IObservable<'Args>
 
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 1a71faa31d3..46048910bbe 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -3599,8 +3599,8 @@ namespace Microsoft.FSharp.Core
         /// otherwise raise an exception. Calls .
         ///
         /// The exit code to use.
-        ///
-        /// The result value.
+        /// 
+        /// Never returns.
         /// 
         /// 
         /// 
diff --git a/src/fsharp/FSharp.Core/tasks.fsi b/src/fsharp/FSharp.Core/tasks.fsi
index 013da19b706..1daa50523a3 100644
--- a/src/fsharp/FSharp.Core/tasks.fsi
+++ b/src/fsharp/FSharp.Core/tasks.fsi
@@ -144,18 +144,23 @@ namespace Microsoft.FSharp.Control
         /// 
         /// Builds a task using computation expression syntax.
         /// 
+        /// 
+        /// 
         val task: TaskBuilder
 
         /// 
         /// Builds a task using computation expression syntax which switches to execute on a background thread if not
         /// already doing so.
         /// 
+        ///
         /// 
         /// If the task is created on a foreground thread (where  is non-null)
         /// its body is executed on a background thread using .
         /// If created on a background thread (where  is null) it is executed immeidately
         /// immediately on that thread.
         /// 
+        /// 
+        /// 
         val backgroundTask: BackgroundTaskBuilder
     
 
diff --git a/src/fsharp/FxResolver.fs b/src/fsharp/FxResolver.fs
index a24b3149c5c..79afa7e7dbe 100644
--- a/src/fsharp/FxResolver.fs
+++ b/src/fsharp/FxResolver.fs
@@ -48,12 +48,17 @@ type internal FxResolver(assumeDotNetFramework: bool, projectDir: string, useSdk
             let outputList = ResizeArray()
             let mutable errorslock = obj
             let mutable outputlock = obj
-            let outputDataReceived (message: string) =
-                if not (isNull message) then
+
+            let outputDataReceived (message: string MaybeNull) =
+                match message with
+                | Null -> ()
+                | NonNull message ->
                     lock outputlock (fun () -> outputList.Add(message))
 
-            let errorDataReceived (message: string) =
-                if not (isNull message) then
+            let errorDataReceived (message: string MaybeNull) =
+                match message with
+                | Null -> ()
+                | NonNull message ->
                     lock errorslock (fun () -> errorsList.Add(message))
 
             let psi = ProcessStartInfo()
@@ -329,8 +334,8 @@ type internal FxResolver(assumeDotNetFramework: bool, projectDir: string, useSdk
             try
                 let asm = Assembly.GetEntryAssembly()
                 match asm with
-                | null -> ""
-                | asm ->
+                | Null -> ""
+                | NonNull asm ->
                     let depsJsonPath = Path.ChangeExtension(asm.Location, "deps.json")
                     if FileSystem.FileExistsShim(depsJsonPath) then
                         use stream = FileSystem.OpenFileForReadShim(depsJsonPath)
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 6c0931c2a1a..7babdadeda3 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -546,12 +546,14 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty =
     ignore voidOK
 #endif
     match stripTyEqnsAndMeasureEqns g ty with
-    | TType_app (tcref, tinst) -> GenNamedTyAppAux amap m tyenv ptrsOK tcref tinst
+    | TType_app (tcref, tinst) ->
+        GenNamedTyAppAux amap m tyenv ptrsOK tcref tinst
 
+    | TType_tuple (tupInfo, args) ->
+        GenTypeAux amap m tyenv VoidNotOK ptrsOK (mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) args)
 
-    | TType_tuple (tupInfo, args) -> GenTypeAux amap m tyenv VoidNotOK ptrsOK (mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) args)
-
-    | TType_fun (dty, returnTy) -> EraseClosures.mkILFuncTy g.ilxPubCloEnv (GenTypeArgAux amap m tyenv dty) (GenTypeArgAux amap m tyenv returnTy)
+    | TType_fun (dty, returnTy) ->
+        EraseClosures.mkILFuncTy g.ilxPubCloEnv (GenTypeArgAux amap m tyenv dty) (GenTypeArgAux amap m tyenv returnTy)
 
     | TType_anon (anonInfo, tinst) ->
         let tref = anonInfo.ILTypeRef
@@ -7926,8 +7928,10 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
         let debugDisplayAttrs, normalAttrs = tycon.Attribs |> List.partition (IsMatchingFSharpAttribute g g.attrib_DebuggerDisplayAttribute)
         let securityAttrs, normalAttrs = normalAttrs |> List.partition (fun a -> IsSecurityAttribute g cenv.amap cenv.casApplied a m)
         let generateDebugDisplayAttribute = not g.compilingFslib && tycon.IsUnionTycon && isNil debugDisplayAttrs
-        let generateDebugProxies = (not (tyconRefEq g tcref g.unit_tcr_canon) &&
-                                    not (HasFSharpAttribute g g.attrib_DebuggerTypeProxyAttribute tycon.Attribs))
+
+        let generateDebugProxies =
+            not (tyconRefEq g tcref g.unit_tcr_canon) &&
+            not (HasFSharpAttribute g g.attrib_DebuggerTypeProxyAttribute tycon.Attribs)
 
         let permissionSets = CreatePermissionSets cenv eenv securityAttrs
         let secDecls = if List.isEmpty securityAttrs then emptyILSecurityDecls else mkILSecurityDecls permissionSets
@@ -7937,7 +7941,6 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
               if generateDebugDisplayAttribute then
                   yield g.mkDebuggerDisplayAttribute ("{" + debugDisplayMethodName + "(),nq}") ]
 
-
         let ilCustomAttrs =
           [ yield! defaultMemberAttrs
             yield! normalAttrs
@@ -8688,7 +8691,7 @@ let LookupGeneratedValue (amap: ImportMap) (ctxt: ExecutionContext) eenv (v: Val
                   // because it is the MethodBuilder and that does not support Invoke.
                   // Rather, we look for the getter MethodInfo from the built type and .Invoke on that.
                   let methInfo = staticTy.GetMethod(ilGetterMethRef.Name, BindingFlags.Static ||| BindingFlags.Public ||| BindingFlags.NonPublic)
-                  methInfo.Invoke((null: obj), (null: obj[]))
+                  methInfo.Invoke(null, null)
           Some (obj, objTyp())
 
       | StaticProperty (ilGetterMethSpec, _) ->
@@ -8698,7 +8701,7 @@ let LookupGeneratedValue (amap: ImportMap) (ctxt: ExecutionContext) eenv (v: Val
               // because it is the MethodBuilder and that does not support Invoke.
               // Rather, we look for the getter MethodInfo from the built type and .Invoke on that.
               let methInfo = staticTy.GetMethod(ilGetterMethSpec.Name, BindingFlags.Static ||| BindingFlags.Public ||| BindingFlags.NonPublic)
-              methInfo.Invoke((null: obj), (null: obj[]))
+              methInfo.Invoke(null, null)
           Some (obj, objTyp())
 
       | Null ->
diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index af1ee787497..12beab6b67c 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -149,7 +149,7 @@ let rec GetImmediateIntrinsicPropInfosOfTypeAux (optFilter, ad) g amap m origTy
                 |   Some name ->
                         match st.PApply((fun st -> st.GetProperty name), m) with
                         | Tainted.Null -> [||]
-                        | pi -> [|pi|]
+                        | Tainted.NonNull pi -> [|pi|]
                 |   None ->
                         st.PApplyArray((fun st -> st.GetProperties()), "GetProperties", m)
             matchingProps
@@ -307,7 +307,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
                 |   Some name ->
                         match st.PApply ((fun st -> st.GetField name), m) with
                         | Tainted.Null -> []
-                        | fi -> [  ProvidedField(amap, fi, m) ]
+                        | Tainted.NonNull fi -> [  ProvidedField(amap, fi, m) ]
 #endif
             | ILTypeMetadata _ -> 
                 let tinfo = ILTypeInfo.FromType g ty
@@ -331,8 +331,8 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
                         [   for ei in st.PApplyArray((fun st -> st.GetEvents()), "GetEvents", m) -> ProvidedEvent(amap, ei, m) ]
                 |   Some name ->
                         match st.PApply ((fun st -> st.GetEvent name), m) with
-                        |   Tainted.Null -> []
-                        |   ei -> [  ProvidedEvent(amap, ei, m) ]
+                        | Tainted.Null -> []
+                        | Tainted.NonNull ei -> [  ProvidedEvent(amap, ei, m) ]
 #endif
             | ILTypeMetadata _ -> 
                 let tinfo = ILTypeInfo.FromType g ty
diff --git a/src/fsharp/LegacyMSBuildReferenceResolver.fs b/src/fsharp/LegacyMSBuildReferenceResolver.fs
index 4f244ca7977..37d1eb41a99 100644
--- a/src/fsharp/LegacyMSBuildReferenceResolver.fs
+++ b/src/fsharp/LegacyMSBuildReferenceResolver.fs
@@ -22,8 +22,8 @@ module FSharp.Compiler.CodeAnalysis.LegacyMSBuildReferenceResolver
         // (the reference assemblies are always in the 32-bit location, which is PF(x86) on an x64 machine)
         let PF = 
             match Environment.GetEnvironmentVariable("ProgramFiles(x86)") with
-            | null -> Environment.GetEnvironmentVariable("ProgramFiles")  // if PFx86 is null, then we are 32-bit and just get PF
-            | s -> s 
+            | Null -> Environment.GetEnvironmentVariable("ProgramFiles")  // if PFx86 is null, then we are 32-bit and just get PF
+            | NonNull s -> s 
         PF + @"\Reference Assemblies\Microsoft\Framework\.NETFramework"
 
     /// When targeting .NET 2.0-3.5 on Windows, we expand the {WindowsFramework} and {ReferenceAssemblies} paths manually
@@ -71,7 +71,7 @@ module FSharp.Compiler.CodeAnalysis.LegacyMSBuildReferenceResolver
 
     /// Get the path to the .NET Framework implementation assemblies by using ToolLocationHelper.GetPathToDotNetFramework
     /// This is only used to specify the "last resort" path for assembly resolution.
-    let GetPathToDotNetFrameworkImlpementationAssemblies v =
+    let GetPathToDotNetFrameworkImlpementationAssemblies v : string list =
         let v =
             match v with
             | Net45 ->  Some TargetDotNetFrameworkVersion.Version45
@@ -88,8 +88,8 @@ module FSharp.Compiler.CodeAnalysis.LegacyMSBuildReferenceResolver
         match v with
         | Some v -> 
             match ToolLocationHelper.GetPathToDotNetFramework v with
-            | null -> []
-            | x -> [x]
+            | Null -> []
+            | NonNull x -> [x]
         | _ -> []
 
     let GetPathToDotNetFrameworkReferenceAssemblies version = 
@@ -99,8 +99,8 @@ module FSharp.Compiler.CodeAnalysis.LegacyMSBuildReferenceResolver
         r
 #else
         match Microsoft.Build.Utilities.ToolLocationHelper.GetPathToStandardLibraries(".NETFramework",version,"") with
-        | null | "" -> []
-        | x -> [x]
+        | Null | "" -> []
+        | NonNull x -> [x]
 #endif
 
     /// Use MSBuild to determine the version of the highest installed set of reference assemblies, failing that grab the highest installed framework version
diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs
index 43a4990b484..3140cfcd475 100644
--- a/src/fsharp/MethodCalls.fs
+++ b/src/fsharp/MethodCalls.fs
@@ -627,12 +627,12 @@ type CalledMeth<'T>
                             let pminfo = pinfo.SetterMethod
                             let pminst =
                                 match minfo with
-                                | MethInfo.FSMeth(_, TType.TType_app(_, types), _, _) -> types
+                                | MethInfo.FSMeth(_, TType_app(_, types), _, _) -> types
                                 | _ -> freshenMethInfo m pminfo
 
                             let pminst =
                                 match tyargsOpt with
-                                | Some(TType.TType_app(_, types)) -> types
+                                | Some(TType_app(_, types)) -> types
                                 | _ -> pminst
 
                             Choice1Of2(AssignedItemSetter(id, AssignedPropSetter(pinfo, pminfo, pminst), e))
@@ -1743,8 +1743,8 @@ module ProvidedMethodCalls =
                     let baseType = 
                         st.PApply((fun st -> 
                             match st.BaseType with 
-                            | null -> ProvidedType.CreateNoContext(typeof)  // it might be an interface
-                            | st -> st), m)
+                            | Null -> ProvidedType.CreateNoContext(typeof)  // it might be an interface
+                            | NonNull st -> st), m)
                     loop baseType
                 else
                     if isGeneric then 
@@ -1786,7 +1786,7 @@ module ProvidedMethodCalls =
             let fail() = error(Error(FSComp.SR.etUnsupportedProvidedExpression(ea.PUntaint((fun etree -> etree.UnderlyingExpressionString), m)), m))
             match ea with
             | Tainted.Null -> error(Error(FSComp.SR.etNullProvidedExpression(ea.TypeProviderDesignation), m))
-            |  _ ->
+            | Tainted.NonNull ea ->
             let exprType = ea.PApplyOption((fun x -> x.GetExprType()), m)
             let exprType = match exprType with | Some exprType -> exprType | None -> fail()
             match exprType.PUntaint(id, m) with
diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs
index 219a370d417..61e9aa2d8b8 100755
--- a/src/fsharp/NicePrint.fs
+++ b/src/fsharp/NicePrint.fs
@@ -1057,11 +1057,13 @@ module PrintTypes =
     /// retTy: return type
     /// genParamTy: generic parameter types
     let prettyLayoutsOfUnresolvedOverloading denv argInfos retTy genParamTys =
+
         let _niceMethodTypars, typarInst =
             let memberToParentInst = List.empty
             let typars = argInfos |> List.choose (function TType.TType_var typar,_ -> Some typar | _ -> None)
             let methTyparNames = typars |> List.mapi (fun i tp -> if (PrettyTypes.NeedsPrettyTyparName tp) then sprintf "a%d" (List.length memberToParentInst + i) else tp.Name)
             PrettyTypes.NewPrettyTypars memberToParentInst typars methTyparNames
+
         let retTy = instType typarInst retTy
         let argInfos = prettyArgInfos denv typarInst argInfos
         let argInfos,retTy,genParamTys, cxs =
@@ -2485,7 +2487,7 @@ let minimalStringsOfTwoTypes denv t1 t2=
         let denv = { denv with includeStaticParametersInTypeNames=true }
         let makeName t =
             let assemblyName = PrintTypes.layoutAssemblyName denv t |> function | null | "" -> "" | name -> sprintf " (%s)" name
-            sprintf "%s%s" (stringOfTy denv t1) assemblyName
+            sprintf "%s%s" (stringOfTy denv t) assemblyName
 
         (makeName t1, makeName t2, stringOfTyparConstraints denv tpcs)
     
diff --git a/src/fsharp/PatternMatchCompilation.fs b/src/fsharp/PatternMatchCompilation.fs
index 643f0252853..c547f84c8e6 100644
--- a/src/fsharp/PatternMatchCompilation.fs
+++ b/src/fsharp/PatternMatchCompilation.fs
@@ -840,7 +840,7 @@ let CompilePatternBasic
 
                 | ThrowIncompleteMatchException ->
                     mkThrow matchm resultTy
-                        (mkExnExpr(mk_MFCore_tcref g.fslibCcu "MatchFailureException",
+                        (mkExnExpr(g.MatchFailureException_tcr, 
                                    [ mkString g matchm matchm.FileName
                                      mkInt g matchm matchm.StartLine
                                      mkInt g matchm matchm.StartColumn], matchm))
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index ebae193960c..d87b7ca05bf 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -990,8 +990,8 @@ and FilterMeasureTyargs tys =
 and ConvType cenv env m ty =
     let g = cenv.g
     match stripTyEqnsAndMeasureEqns g ty with
-    | TType_app(tcref, [tyarg]) when isArrayTyconRef cenv.g tcref ->
-        QP.mkArrayTy(rankOfArrayTyconRef cenv.g tcref, ConvType cenv env m tyarg)
+    | TType_app(tcref, [tyarg]) when isArrayTyconRef g tcref ->
+        QP.mkArrayTy(rankOfArrayTyconRef g tcref, ConvType cenv env m tyarg)
 
     | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations
     | TType_app(tcref, tyargs) ->
diff --git a/src/fsharp/ScriptClosure.fs b/src/fsharp/ScriptClosure.fs
index 8bf4de50d9e..a258b369b87 100644
--- a/src/fsharp/ScriptClosure.fs
+++ b/src/fsharp/ScriptClosure.fs
@@ -250,10 +250,10 @@ module ScriptPreprocessClosure =
                         | _ ->
                             let outputDir =  tcConfig.outputDir |> Option.defaultValue ""
                             match dependencyProvider.TryFindDependencyManagerByKey(tcConfig.compilerToolPaths, outputDir, reportError, packageManagerKey) with
-                            | null ->
+                            | Null ->
                                 errorR(Error(dependencyProvider.CreatePackageManagerUnknownError(tcConfig.compilerToolPaths, outputDir, packageManagerKey, reportError), m))
 
-                            | dependencyManager ->
+                            | NonNull dependencyManager ->
                                 let directive d =
                                     match d with
                                     | Directive.Resolution -> "r"
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index ff27a2165c3..777b386b284 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -242,6 +242,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let v_fastFunc_tcr   = mk_MFCore_tcref fslibCcu "FSharpFunc`2"
   let v_refcell_tcr_canon = mk_MFCore_tcref fslibCcu "Ref`1"
   let v_refcell_tcr_nice  = mk_MFCore_tcref fslibCcu "ref`1"
+  let v_mfe_tcr = mk_MFCore_tcref fslibCcu "MatchFailureException"
 
   let dummyAssemblyNameCarryingUsefulErrorInformation path typeName =
       FSComp.SR.tcGlobalsSystemTypeNotFound (String.concat "." path + "." + typeName)
@@ -690,7 +691,6 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let v_hash_info                  = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "hash"                                 , None                 , Some "Hash"   , [vara],     ([[varaTy]], v_int_ty))
   let v_box_info                   = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "box"                                  , None                 , Some "Box"    , [vara],     ([[varaTy]], v_obj_ty))
   let v_isnull_info                = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "isNull"                               , None                 , Some "IsNull" , [vara],     ([[varaTy]], v_bool_ty))
-  let v_isnotnull_info             = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "isNotNull"                            , None                 , Some "IsNotNull" , [vara],  ([[varaTy]], v_bool_ty))
   let v_raise_info                 = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "raise"                                , None                 , Some "Raise"  , [vara],     ([[mkSysNonGenericTy sys "Exception"]], varaTy))
   let v_failwith_info              = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "failwith"                             , None                 , Some "FailWith" , [vara],   ([[v_string_ty]], varaTy))
   let v_invalid_arg_info           = makeIntrinsicValRef(fslib_MFOperators_nleref,                             "invalidArg"                           , None                 , Some "InvalidArg" , [vara], ([[v_string_ty]; [v_string_ty]], varaTy))
@@ -738,7 +738,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let v_cgh__resumeAt_info         = makeIntrinsicValRef(fslib_MFStateMachineHelpers_nleref,                   "__resumeAt"                           , None                 , None          , [vara],     ([[v_int_ty]; [varaTy]], varaTy))
   let v_cgh__stateMachine_info     = makeIntrinsicValRef(fslib_MFStateMachineHelpers_nleref,                   "__stateMachine"                       , None                 , None          , [vara; varb],     ([[varaTy]], varbTy)) // inaccurate type but it doesn't matter for linking
   let v_cgh__resumableEntry_info   = makeIntrinsicValRef(fslib_MFStateMachineHelpers_nleref,                   "__resumableEntry"                     , None                 , None          , [vara],     ([[v_int_ty --> varaTy]; [v_unit_ty --> varaTy]], varaTy))
-  let v_seq_to_array_info          = makeIntrinsicValRef(fslib_MFSeqModule_nleref,                             "toArray"                              , None                 , Some "ToArray", [varb],     ([[mkSeqTy varbTy]], mkArrayType 1 varbTy))  
+  let v_seq_to_array_info          = makeIntrinsicValRef(fslib_MFSeqModule_nleref,                             "toArray"                              , None                 , Some "ToArray", [varb],     ([[mkSeqTy varbTy]], mkArrayType 1 varbTy))
   let v_seq_to_list_info           = makeIntrinsicValRef(fslib_MFSeqModule_nleref,                             "toList"                               , None                 , Some "ToList" , [varb],     ([[mkSeqTy varbTy]], mkListTy varbTy))
   let v_seq_map_info               = makeIntrinsicValRef(fslib_MFSeqModule_nleref,                             "map"                                  , None                 , Some "Map"    , [vara;varb], ([[varaTy --> varbTy]; [mkSeqTy varaTy]], mkSeqTy varbTy))
   let v_seq_singleton_info         = makeIntrinsicValRef(fslib_MFSeqModule_nleref,                             "singleton"                            , None                 , Some "Singleton"              , [vara],     ([[varaTy]], mkSeqTy varaTy))
@@ -869,13 +869,13 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   let betterEntries = Array.append betterTyconEntries decompileTyconEntries
 
-  let mutable decompileTypeDict = null
-  let mutable betterTypeDict1 = null
-  let mutable betterTypeDict2 = null
+  let mutable decompileTypeDict = Unchecked.defaultof<_>
+  let mutable betterTypeDict1 = Unchecked.defaultof<_>
+  let mutable betterTypeDict2 = Unchecked.defaultof<_>
 
   /// This map is indexed by stamps and lazy to avoid dereferencing while setting up the base imports.
   let getDecompileTypeDict () =
-      match decompileTypeDict with
+      match box decompileTypeDict with
       | null ->
           let entries = decompileTyconEntries
           let t = Dictionary.newWithSize entries.Length
@@ -884,13 +884,13 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
                   t.Add(tcref.Stamp, builder)
           decompileTypeDict <- t
           t
-      | t -> t
+      | _ -> decompileTypeDict
 
   /// This map is for use when building FSharp.Core.dll. The backing Tycon's may not yet exist for
   /// the TyconRef's we have in our hands, hence we can't dereference them to find their stamps.
   /// So this dictionary is indexed by names. Make it lazy to avoid dereferencing while setting up the base imports.
   let getBetterTypeDict1 () =
-      match betterTypeDict1 with
+      match box betterTypeDict1 with
       | null ->
           let entries = betterEntries
           let t = Dictionary.newWithSize entries.Length
@@ -898,12 +898,12 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
               t.Add(nm, fun tcref2 tinst2 -> if tyconRefEq tcref tcref2 then builder tinst2 else TType_app (tcref2, tinst2))
           betterTypeDict1 <- t
           t
-      | t -> t
+      | _ -> betterTypeDict1
 
   /// This map is for use in normal times (not building FSharp.Core.dll). It is indexed by stamps
   /// and lazy to avoid dereferencing while setting up the base imports.
   let getBetterTypeDict2 () =
-      match betterTypeDict2 with
+      match box betterTypeDict2 with
       | null ->
           let entries = betterEntries
           let t = Dictionary.newWithSize entries.Length
@@ -912,7 +912,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
                   t.Add(tcref.Stamp, builder)
           betterTypeDict2 <- t
           t
-      | t -> t
+      | _ -> betterTypeDict2
 
   /// For logical purposes equate some F# types with .NET types, e.g. TType_tuple == System.Tuple/ValueTuple.
   /// Doing this normalization is a fairly performance critical piece of code as it is frequently invoked
@@ -950,16 +950,19 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
                               ] |> List.choose (Option.map (fun x -> x.TyconRef))
 
   override x.ToString() = ""
-  member _.ilg=ilg
-      // A table of all intrinsics that the compiler cares about
-  member _.knownIntrinsics                = v_knownIntrinsics
-      // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the
-      // better the job we do of mapping from provided expressions back to FSharp.Core F# functions and values.
-  member _.knownFSharpCoreModules         = v_knownFSharpCoreModules
-  member _.compilingFslib                 = compilingFslib
-  member _.mlCompatibility                = mlCompatibility
-  member _.emitDebugInfoInQuotations      = emitDebugInfoInQuotations
-  member _.directoryToResolveRelativePaths= directoryToResolveRelativePaths
+
+  member _.ilg = ilg
+
+  // A table of all intrinsics that the compiler cares about
+  member _.knownIntrinsics = v_knownIntrinsics
+
+  // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the
+  // better the job we do of mapping from provided expressions back to FSharp.Core F# functions and values.
+  member _.knownFSharpCoreModules = v_knownFSharpCoreModules
+  member _.compilingFslib = compilingFslib
+  member _.mlCompatibility = mlCompatibility
+  member _.emitDebugInfoInQuotations = emitDebugInfoInQuotations
+  member _.directoryToResolveRelativePaths = directoryToResolveRelativePaths
   member _.pathMap = pathMap
   member _.langVersion = langVersion
   member _.unionCaseRefEq x y = primUnionCaseRefEq compilingFslib fslibCcu x y
@@ -1022,6 +1025,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   member _.voidptr_tcr    = v_voidptr_tcr
   member _.ilsigptr_tcr   = v_ilsigptr_tcr
   member _.fastFunc_tcr = v_fastFunc_tcr
+  member _.MatchFailureException_tcr = v_mfe_tcr
   member _.tcref_IQueryable = v_tcref_IQueryable
   member _.tcref_IObservable      = v_tcref_IObservable
   member _.tcref_IObserver      = v_tcref_IObserver
@@ -1419,7 +1423,6 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   member _.hash_info                  = v_hash_info
   member _.box_info                   = v_box_info
   member _.isnull_info                = v_isnull_info
-  member _.isnotnull_info             = v_isnotnull_info
   member _.raise_info                 = v_raise_info
   member _.failwith_info              = v_failwith_info
   member _.invalid_arg_info           = v_invalid_arg_info
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 184b123cfa2..5ecc0cef62c 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -3147,7 +3147,7 @@ type NonLocalEntityRef =
             let rec tryResolveNestedTypeOf(parentEntity: Entity, resolutionEnvironment, st: Tainted, i) = 
                 match st.PApply((fun st -> st.GetNestedType path.[i]), m) with
                 | Tainted.Null -> ValueNone
-                | st -> 
+                | Tainted.NonNull st -> 
                     let newEntity = Construct.NewProvidedTycon(resolutionEnvironment, st, ccu.ImportProvidedType, false, m)
                     parentEntity.ModuleOrNamespaceType.AddProvidedTypeEntity newEntity
                     if i = path.Length-1 then ValueSome newEntity
@@ -3178,12 +3178,15 @@ type NonLocalEntityRef =
                 assert (j <= path.Length - 1)
                 let matched = 
                     [ for resolver in resolvers do
-                        let moduleOrNamespace = if j = 0 then null else path.[0..j-1]
+                        let moduleOrNamespace = if j = 0 then [| |] else path.[0..j-1]
                         let typename = path.[j]
                         let resolution = TryLinkProvidedType(resolver, moduleOrNamespace, typename, m)
                         match resolution with
-                        | None | Some Tainted.Null -> ()
-                        | Some st -> yield (resolver, st) ]
+                        | None -> ()
+                        | Some st ->
+                            match st with
+                            | Tainted.Null -> ()
+                            | Tainted.NonNull st -> yield (resolver, st) ]
                 match matched with
                 | [(_, st)] ->
                     // 'entity' is at position i in the dereference chain. We resolved to position 'j'.
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 881fe612bb3..3c58daca24a 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -2966,13 +2966,23 @@ let fullNameOfParentOfValRefAsLayout vref =
 
 let fullDisplayTextOfParentOfModRef r = fullNameOfParentOfEntityRef r 
 
-let fullDisplayTextOfModRef r = fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r
-let fullDisplayTextOfTyconRefAsLayout r = fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
-let fullDisplayTextOfExnRef r = fullNameOfEntityRef (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
-let fullDisplayTextOfExnRefAsLayout r = fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfModRef r =
+    fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r
 
-let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) = fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName
-let fullDisplayTextOfRecdFieldRef (rfref: RecdFieldRef) = fullDisplayTextOfTyconRef rfref.TyconRef +.+ rfref.FieldName
+let fullDisplayTextOfTyconRefAsLayout r =
+    fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+
+let fullDisplayTextOfExnRef r =
+    fullNameOfEntityRef (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+
+let fullDisplayTextOfExnRefAsLayout r =
+    fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+
+let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) =
+    fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName
+
+let fullDisplayTextOfRecdFieldRef (rfref: RecdFieldRef) =
+    fullDisplayTextOfTyconRef rfref.TyconRef +.+ rfref.FieldName
 
 let fullDisplayTextOfValRef (vref: ValRef) = 
     match fullNameOfParentOfValRef vref with 
@@ -3597,15 +3607,26 @@ module DebugPrint =
         match stripTyparEqns ty with
         | TType_forall (typars, rty) -> 
            (leftL (tagText "!") ^^ layoutTyparDecls typars --- auxTypeL env rty) |> wrap
+
         | TType_ucase (UnionCaseRef(tcref, _), tinst)
+
         | TType_app (tcref, tinst) -> 
            let prefix = tcref.IsPrefixDisplay
            let tcL = layoutTyconRef tcref
            auxTyparsL env tcL prefix tinst
-        | TType_anon (anonInfo, tys) -> braceBarL (sepListL (wordL (tagText ";")) (List.map2 (fun nm ty -> wordL (tagField nm) --- auxTypeAtomL env ty) (Array.toList anonInfo.SortedNames) tys))
-        | TType_tuple (_tupInfo, tys) -> sepListL (wordL (tagText "*")) (List.map (auxTypeAtomL env) tys) |> wrap
-        | TType_fun (f, x) -> ((auxTypeAtomL env f ^^ wordL (tagText "->")) --- auxTypeL env x) |> wrap
-        | TType_var typar -> auxTyparWrapL env isAtomic typar 
+
+        | TType_tuple (_tupInfo, tys) ->
+            sepListL (wordL (tagText "*")) (List.map (auxTypeAtomL env) tys) |> wrap
+
+        | TType_fun (f, x) ->
+            ((auxTypeAtomL env f ^^ wordL (tagText "->")) --- auxTypeL env x) |> wrap
+
+        | TType_var typar ->
+            auxTyparWrapL env isAtomic typar 
+
+        | TType_anon (anonInfo, tys) ->
+            braceBarL (sepListL (wordL (tagText ";")) (List.map2 (fun nm ty -> wordL (tagField nm) --- auxTypeAtomL env ty) (Array.toList anonInfo.SortedNames) tys))
+
         | TType_measure unt -> 
 #if DEBUG
           leftL (tagText "{") ^^
@@ -3617,7 +3638,7 @@ module DebugPrint =
              let negvs, posvs = ListMeasureVarOccsWithNonZeroExponents unt |> sortVars |> List.partition (fun (_, e) -> SignRational e < 0)
              let negcs, poscs = ListMeasureConOccsWithNonZeroExponents g false unt |> sortCons |> List.partition (fun (_, e) -> SignRational e < 0)
              let unparL (uv: Typar) = wordL (tagText ("'" + uv.DisplayName))
-             let unconL tc = layoutTyconRef tc
+             let unconL tcref = layoutTyconRef tcref
              let rationalL e = wordL (tagText(RationalToString e))
              let measureToPowerL x e = if e = OneRational then x else x -- wordL (tagText "^") -- rationalL e
              let prefix =
@@ -4021,8 +4042,8 @@ module DebugPrint =
                 wordL (tagText ecref.LogicalName) ^^ bracketL (commaListL (List.map atomL args))
             | Expr.Op (TOp.Tuple _, _, xs, _) -> 
                 tupleL (List.map exprL xs)
-            | Expr.Op (TOp.Recd (ctor, tc), _, xs, _) -> 
-                let fields = tc.TrueInstanceFieldsAsList
+            | Expr.Op (TOp.Recd (ctor, tcref), _, xs, _) -> 
+                let fields = tcref.TrueInstanceFieldsAsList
                 let lay fs x = (wordL (tagText fs.rfield_id.idText) ^^ sepL(tagText "=")) --- (exprL x)
                 let ctorL = 
                     match ctor with
@@ -7337,8 +7358,6 @@ let mkCallBox (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.box
 
 let mkCallIsNull (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.isnull_info, [[ty]], [ e1 ], m)
 
-let mkCallIsNotNull (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.isnotnull_info, [[ty]], [ e1 ], m)
-
 let mkCallRaise (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.raise_info, [[ty]], [ e1 ], m)
 
 let mkCallNewDecimal (g: TcGlobals) m (e1, e2, e3, e4, e5) = mkApps g (typedExprForIntrinsic g m g.new_decimal_info, [], [ e1;e2;e3;e4;e5 ], m)
@@ -7603,7 +7622,7 @@ let mkCompilationMappingAttrForQuotationResource (g: TcGlobals) (nm, tys: ILType
 let isTypeProviderAssemblyAttr (cattr: ILAttribute) = 
     cattr.Method.DeclaringType.BasicQualifiedName = typeof.FullName
 
-let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) = 
+let TryDecodeTypeProviderAssemblyAttr (cattr: ILAttribute) : string MaybeNull option = 
     if isTypeProviderAssemblyAttr cattr then 
         let parms, _args = decodeILAttribData cattr 
         match parms with // The first parameter to the attribute is the name of the assembly with the compiler extensions.
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index 454d64537a4..fc60ead2e89 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -1922,8 +1922,6 @@ val mkCallBox: TcGlobals -> range -> TType -> Expr -> Expr
 
 val mkCallIsNull: TcGlobals -> range -> TType -> Expr -> Expr
 
-val mkCallIsNotNull: TcGlobals -> range -> TType -> Expr -> Expr
-
 val mkCallRaise: TcGlobals -> range -> TType -> Expr -> Expr
 
 val mkCallGenericComparisonWithComparerOuter: TcGlobals -> range -> TType -> Expr -> Expr -> Expr -> Expr
diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index 4ebea8eceb3..8bfa10c1a9d 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -812,21 +812,22 @@ let pickleObjWithDanglingCcus inMem file g scope p x =
     st1.occus, sizes, st1.ostrings, st1.opubpaths, st1.onlerefs, st1.osimpletys, st1.os.AsMemory()
 
   let st2 =
-   { os = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
-     oscope=scope
-     occus= Table<_>.Create "occus (fake)"
-     oentities=NodeOutTable<_, _>.Create((fun (tc: Tycon) -> tc.Stamp), (fun tc -> tc.LogicalName), (fun tc -> tc.Range), id , "otycons")
-     otypars=NodeOutTable<_, _>.Create((fun (tp: Typar) -> tp.Stamp), (fun tp -> tp.DisplayName), (fun tp -> tp.Range), id , "otypars")
-     ovals=NodeOutTable<_, _>.Create((fun (v: Val) -> v.Stamp), (fun v -> v.LogicalName), (fun v -> v.Range), (fun osgn -> osgn), "ovals")
-     oanoninfos=NodeOutTable<_, _>.Create((fun (v: AnonRecdTypeInfo) -> v.Stamp), (fun v -> string v.Stamp), (fun _ -> range0), id, "oanoninfos")
-     ostrings=Table<_>.Create "ostrings (fake)"
-     opubpaths=Table<_>.Create "opubpaths (fake)"
-     onlerefs=Table<_>.Create "onlerefs (fake)"
-     osimpletys=Table<_>.Create "osimpletys (fake)"
-     oglobals=g
-     ofile=file
-     oInMem=inMem
-     isStructThisArgPos = false }
+     { os = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
+       oscope=scope
+       occus= Table<_>.Create "occus (fake)"
+       oentities=NodeOutTable<_, _>.Create((fun (tc: Tycon) -> tc.Stamp), (fun tc -> tc.LogicalName), (fun tc -> tc.Range), id , "otycons")
+       otypars=NodeOutTable<_, _>.Create((fun (tp: Typar) -> tp.Stamp), (fun tp -> tp.DisplayName), (fun tp -> tp.Range), id , "otypars")
+       ovals=NodeOutTable<_, _>.Create((fun (v: Val) -> v.Stamp), (fun v -> v.LogicalName), (fun v -> v.Range), (fun osgn -> osgn), "ovals")
+       oanoninfos=NodeOutTable<_, _>.Create((fun (v: AnonRecdTypeInfo) -> v.Stamp), (fun v -> string v.Stamp), (fun _ -> range0), id, "oanoninfos")
+       ostrings=Table<_>.Create "ostrings (fake)"
+       opubpaths=Table<_>.Create "opubpaths (fake)"
+       onlerefs=Table<_>.Create "onlerefs (fake)"
+       osimpletys=Table<_>.Create "osimpletys (fake)"
+       oglobals=g
+       ofile=file
+       oInMem=inMem
+       isStructThisArgPos = false }
+
   let phase2bytes =
     p_array p_encoded_ccuref ccuNameTab.AsArray st2
     // Add a 4th integer indicated by a negative 1st integer
@@ -908,11 +909,9 @@ let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option)
              ifile=file
              iILModule = ilModule }
         let res = u st1
-#if !LAZY_UNPICKLE
         check viewedScope st1.ientities
         check viewedScope st1.ivals
         check viewedScope st1.itypars
-#endif
         res
 
     {RawData=data; FixupThunks=ccuTab.itbl_rows }
diff --git a/src/fsharp/absil/bytes.fs b/src/fsharp/absil/bytes.fs
deleted file mode 100644
index ef5556513c9..00000000000
--- a/src/fsharp/absil/bytes.fs
+++ /dev/null
@@ -1,8 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-/// Byte arrays
-namespace FSharp.Compiler.IO
-
-
-
-
diff --git a/src/fsharp/absil/bytes.fsi b/src/fsharp/absil/bytes.fsi
deleted file mode 100644
index fe7d77679af..00000000000
--- a/src/fsharp/absil/bytes.fsi
+++ /dev/null
@@ -1,162 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-/// Blobs of bytes, cross-compiling
-namespace FSharp.Compiler.IO
-
-open System.IO
-open System.IO.MemoryMappedFiles
-
-module internal Bytes =
-    /// returned int will be 0 <= x <= 255
-    val get: byte[] -> int -> int
-    val zeroCreate: int -> byte[]
-    /// each int must be 0 <= x <= 255
-    val ofInt32Array: int[] ->  byte[]
-    /// each int will be 0 <= x <= 255
-
-    val blit: byte[] -> int -> byte[] -> int -> int -> unit
-
-    val stringAsUnicodeNullTerminated: string -> byte[]
-    val stringAsUtf8NullTerminated: string -> byte[]
-
-/// A view over bytes.
-/// May be backed by managed or unmanaged memory, or memory mapped file.
-[]
-type ByteMemory =
-
-    abstract Item: int -> byte with get
-
-    abstract Length: int
-
-    abstract ReadBytes: pos: int * count: int -> byte[]
-
-    abstract ReadInt32: pos: int -> int
-
-    abstract ReadUInt16: pos: int -> uint16
-
-    abstract ReadUtf8String: pos: int * count: int -> string
-
-    abstract Slice: pos: int * count: int -> ByteMemory
-
-    abstract CopyTo: Stream -> unit
-
-    abstract Copy: srcOffset: int * dest: byte[] * destOffset: int * count: int -> unit
-
-    abstract ToArray: unit -> byte[]
-
-    /// Get a stream representation of the backing memory.
-    /// Disposing this will not free up any of the backing memory.
-    abstract AsStream: unit -> Stream
-
-    /// Get a stream representation of the backing memory.
-    /// Disposing this will not free up any of the backing memory.
-    /// Stream cannot be written to.
-    abstract AsReadOnlyStream: unit -> Stream
-
-[]
-type ReadOnlyByteMemory =
-
-    new: ByteMemory -> ReadOnlyByteMemory
-
-    member Item: int -> byte with get
-
-    member Length: int
-
-    member ReadBytes: pos: int * count: int -> byte[]
-
-    member ReadInt32: pos: int -> int
-
-    member ReadUInt16: pos: int -> uint16
-
-    member ReadUtf8String: pos: int * count: int -> string
-
-    member Slice: pos: int * count: int -> ReadOnlyByteMemory
-
-    member CopyTo: Stream -> unit
-
-    member Copy: srcOffset: int * dest: byte[] * destOffset: int * count: int -> unit
-
-    member ToArray: unit -> byte[]
-
-    member AsStream: unit -> Stream
-
-[]
-module MemoryMappedFileExtensions =
-
-    type MemoryMappedFile with
-
-        /// Create a memory mapped file based on the given ByteMemory's contents.
-        /// If the given ByteMemory's length is zero or a memory mapped file is not supported, the result will be None.
-        static member TryFromByteMemory : bytes: ReadOnlyByteMemory -> MemoryMappedFile option
-
-type ByteMemory with
-
-    member AsReadOnly: unit -> ReadOnlyByteMemory
-
-    /// Empty byte memory.
-    static member Empty: ByteMemory
-
-    /// Create a ByteMemory object that has a backing memory mapped file.
-    static member FromMemoryMappedFile: MemoryMappedFile -> ByteMemory
-
-    /// Creates a ByteMemory object that has a backing memory mapped file from a file on-disk.
-    static member FromFile: path: string * FileAccess * ?canShadowCopy: bool -> ByteMemory
-
-    /// Creates a ByteMemory object that is backed by a raw pointer.
-    /// Use with care.
-    static member FromUnsafePointer: addr: nativeint * length: int * holder: obj -> ByteMemory
-
-    /// Creates a ByteMemory object that is backed by a byte array with the specified offset and length.
-    static member FromArray: bytes: byte[] * offset: int * length: int -> ByteMemory
-
-    /// Creates a ByteMemory object that is backed by a byte array.
-    static member FromArray: bytes: byte[] -> ByteMemory
-
-/// Imperative buffers and streams of byte[]
-[]
-type internal ByteBuffer =
-    member Close : unit -> byte[]
-    member EmitIntAsByte : int -> unit
-    member EmitIntsAsBytes : int[] -> unit
-    member EmitByte : byte -> unit
-    member EmitBytes : byte[] -> unit
-    member EmitByteMemory : ReadOnlyByteMemory -> unit
-    member EmitInt32 : int32 -> unit
-    member EmitInt64 : int64 -> unit
-    member FixupInt32 : pos: int -> value: int32 -> unit
-    member EmitInt32AsUInt16 : int32 -> unit
-    member EmitBoolAsByte : bool -> unit
-    member EmitUInt16 : uint16 -> unit
-    member Position : int
-    static member Create : int -> ByteBuffer
-
-
-[]
-type internal ByteStream =
-    member ReadByte : unit -> byte
-    member ReadBytes : int -> ReadOnlyByteMemory
-    member ReadUtf8String : int -> string
-    member Position : int
-    static member FromBytes : ReadOnlyByteMemory * start:int * length:int -> ByteStream
-
-#if LAZY_UNPICKLE
-    member CloneAndSeek : int -> ByteStream
-    member Skip : int -> unit
-#endif
-
-[]
-type internal ByteStorage =
-
-    member GetByteMemory : unit -> ReadOnlyByteMemory
-
-    /// Creates a ByteStorage whose backing bytes are the given ByteMemory. Does not make a copy.
-    static member FromByteMemory : ReadOnlyByteMemory -> ByteStorage
-
-    /// Creates a ByteStorage whose backing bytes are the given byte array. Does not make a copy.
-    static member FromByteArray : byte [] -> ByteStorage
-
-    /// Creates a ByteStorage that has a copy of the given ByteMemory.
-    static member FromByteMemoryAndCopy : ReadOnlyByteMemory * useBackingMemoryMappedFile: bool -> ByteStorage
-
-    /// Creates a ByteStorage that has a copy of the given byte array.
-    static member FromByteArrayAndCopy : byte [] * useBackingMemoryMappedFile: bool -> ByteStorage
\ No newline at end of file
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index 26980095704..c59f5ae9af2 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -34,17 +34,17 @@ module internal PervasiveAutoOpens =
         | [_] -> true
         | _ -> false
 
-    let inline isNotNull x = not (isNull x)
+    type 'T MaybeNull when 'T : null and 'T: not struct = 'T
 
-    type MaybeNull<'T when 'T : null> = 'T
+    let inline isNotNull (x: 'T MaybeNull) = not (isNull x)
 
-    let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
+    let inline (|NonNullQuick|) (x: 'T MaybeNull) = match x with null -> raise (NullReferenceException()) | v -> v
 
-    let inline nonNull<'T when 'T : null> (x: 'T) = match x with null -> raise (NullReferenceException()) | v -> v
+    let inline nonNull (x: 'T MaybeNull) = match x with null -> raise (NullReferenceException()) | v -> v
 
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
+    let inline (|Null|NonNull|) (x: 'T MaybeNull) : Choice = match x with null -> Null | v -> NonNull v
 
-    let inline nullArgCheck paramName (x: MaybeNull<'T>) = match x with null -> raise (ArgumentNullException(paramName)) | v -> v
+    let inline nullArgCheck paramName (x: 'T MaybeNull) = match x with null -> raise (ArgumentNullException(paramName)) | v -> v
 
     let inline (===) x y = LanguagePrimitives.PhysicalEquality x y
 
@@ -266,8 +266,7 @@ module Array =
     /// check if subArray is found in the wholeArray starting 
     /// at the provided index
     let inline isSubArray (subArray: 'T []) (wholeArray:'T []) index = 
-        if isNull subArray || isNull wholeArray then false
-        elif subArray.Length = 0 then true
+        if subArray.Length = 0 then true
         elif subArray.Length > wholeArray.Length then false
         elif subArray.Length = wholeArray.Length then areEqual subArray wholeArray else
         let rec loop subidx idx =
@@ -578,25 +577,18 @@ module String =
             String strArr
 
     let extractTrailingIndex (str: string) =
-        match str with
-        | null -> null, None
-        | _ ->
-            let charr = str.ToCharArray() 
-            Array.revInPlace charr
-            let digits = Array.takeWhile Char.IsDigit charr
-            Array.revInPlace digits
-            String digits
-            |> function
-               | "" -> str, None
-               | index -> str.Substring (0, str.Length - index.Length), Some (int index)
-
-    /// Remove all trailing and leading whitespace from the string
-    /// return null if the string is null
-    let trim (value: string) = if isNull value then null else value.Trim()
-    
+        let charr = str.ToCharArray() 
+        Array.revInPlace charr
+        let digits = Array.takeWhile Char.IsDigit charr
+        Array.revInPlace digits
+        String digits
+        |> function
+            | "" -> str, None
+            | index -> str.Substring (0, str.Length - index.Length), Some (int index)
+
     /// Splits a string into substrings based on the strings in the array separators
     let split options (separator: string []) (value: string) = 
-        if isNull value then null else value.Split(separator, options)
+        value.Split(separator, options)
 
     let (|StartsWith|_|) pattern value =
         if String.IsNullOrWhiteSpace value then
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index 16926112c53..0ea072b3c3b 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -25,22 +25,22 @@ module internal PervasiveAutoOpens =
 
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?' for example for future FS-1060.
-    type MaybeNull<'T when 'T : null> = 'T
+    type 'T MaybeNull when 'T : null and 'T: not struct = 'T
  
     /// Returns true if the argument is non-null.
-    val inline isNotNull: x:MaybeNull<'T> -> bool
+    val inline isNotNull: x: 'T MaybeNull -> bool
 
     /// Asserts the argument is non-null and raises an exception if it is
-    val inline (|NonNullQuick|): MaybeNull<'T> -> 'T
+    val inline (|NonNullQuick|): 'T MaybeNull -> 'T
 
     /// Match on the nullness of an argument.
-    val inline (|Null|NonNull|): MaybeNull<'T> -> Choice when 'T : null
+    val inline (|Null|NonNull|): 'T MaybeNull -> Choice when 'T: null and 'T: not struct
 
     /// Asserts the argument is non-null and raises an exception if it is
-    val inline nonNull: x:MaybeNull<'T> -> 'T when 'T : null
+    val inline nonNull: x: 'T MaybeNull -> 'T when 'T : null and 'T: not struct
 
     /// Checks the argument is non-null
-    val inline nullArgCheck: paramName: string -> x: MaybeNull<'T> -> 'T
+    val inline nullArgCheck: paramName: string -> x: 'T MaybeNull -> 'T
 
     val inline ( === ): x:'a -> y:'a -> bool when 'a: not struct
 
diff --git a/src/fsharp/absil/ilnativeres.fs b/src/fsharp/absil/ilnativeres.fs
index e4af77d07cc..83ad4de0561 100644
--- a/src/fsharp/absil/ilnativeres.fs
+++ b/src/fsharp/absil/ilnativeres.fs
@@ -16,6 +16,7 @@ open System.Reflection.Metadata
 open System.Reflection.PortableExecutable
 open System.Runtime.CompilerServices
 open System.Text
+open Internal.Utilities.Library
 
 open Checked
 
@@ -29,7 +30,7 @@ let inline DWORD s = uint32 s
 let inline WCHAR s = char s
 let inline BYTE s = byte s
 
-type ResourceException(name: string, ?inner: Exception) =
+type ResourceException(name: string, ?inner: Exception MaybeNull) =
     inherit Exception (name, Option.toObj inner)
 
 type RESOURCE_STRING () =
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 7ad20163a1a..8c1304f76ba 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -420,14 +420,10 @@ let envUpdateCreatedTypeRef emEnv (tref: ILTypeRef) =
         emEnv
 
 let convTypeRef cenv emEnv preferCreated (tref: ILTypeRef) =
-    let res =
-        match Zmap.tryFind tref emEnv.emTypMap with
-        | Some (_typT, _typB, _typeDef, Some createdTy) when preferCreated -> createdTy
-        | Some (typT, _typB, _typeDef, _) -> typT
-        | None -> convTypeRefAux cenv tref
-    match res with
-    | null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tref.QualifiedName, tref.Scope.QualifiedName), range0))
-    | _ -> res
+    match Zmap.tryFind tref emEnv.emTypMap with
+    | Some (_typT, _typB, _typeDef, Some createdTy) when preferCreated -> createdTy
+    | Some (typT, _typB, _typeDef, _) -> typT
+    | None -> convTypeRefAux cenv tref
 
 let envBindConsRef emEnv (mref: ILMethodRef) consB =
     {emEnv with emConsMap = Zmap.add mref consB emEnv.emConsMap}
@@ -528,8 +524,8 @@ let rec convTypeSpec cenv emEnv preferCreated (tspec: ILTypeSpec) =
         | true, false -> typT
         | _, false -> null
     match res with
-    | null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tspec.TypeRef.QualifiedName, tspec.Scope.QualifiedName), range0))
-    | _ -> res
+    | Null -> error(Error(FSComp.SR.itemNotFoundDuringDynamicCodeGen ("type", tspec.TypeRef.QualifiedName, tspec.Scope.QualifiedName), range0))
+    | NonNull res -> res
 
 and convTypeAux cenv emEnv preferCreated ty =
     match ty with
@@ -645,17 +641,16 @@ let typeIsNotQueryable (ty: Type) =
 let queryableTypeGetField _emEnv (parentT: Type) (fref: ILFieldRef) =
     let res = parentT.GetField(fref.Name, BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance ||| BindingFlags.Static )
     match res with
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fref.Name, fref.DeclaringTypeRef.FullName, fref.DeclaringTypeRef.Scope.QualifiedName), range0))
-    | _ -> res
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fref.Name, fref.DeclaringTypeRef.FullName, fref.DeclaringTypeRef.Scope.QualifiedName), range0))
+    | NonNull res -> res
 
 let nonQueryableTypeGetField (parentTI: Type) (fieldInfo: FieldInfo) : FieldInfo =
     let res =
         if parentTI.IsGenericType then TypeBuilder.GetField(parentTI, fieldInfo)
         else fieldInfo
     match res with
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fieldInfo.Name, parentTI.AssemblyQualifiedName, parentTI.Assembly.FullName), range0))
-    | _ -> res
-
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fieldInfo.Name, parentTI.AssemblyQualifiedName, parentTI.Assembly.FullName), range0))
+    | NonNull res -> res
 
 let convFieldSpec cenv emEnv fspec =
     let fref = fspec.FieldRef
@@ -798,8 +793,8 @@ let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) =
             else
                 queryableTypeGetMethod cenv emEnv parentTI mref
     match res with
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("method", mref.Name, parentTI.FullName, parentTI.Assembly.FullName), range0))
-    | _ -> res
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("method", mref.Name, parentTI.FullName, parentTI.Assembly.FullName), range0))
+    | NonNull res -> res
 
 //----------------------------------------------------------------------------
 // convMethodSpec
@@ -849,8 +844,8 @@ let convConstructorSpec cenv emEnv (mspec: ILMethodSpec) =
             else
                 queryableTypeGetConstructor cenv emEnv parentTI mref
     match res with
-    | null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", "", parentTI.FullName, parentTI.Assembly.FullName), range0))
-    | _ -> res
+    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", "", parentTI.FullName, parentTI.Assembly.FullName), range0))
+    | NonNull res -> res
 
 let emitLabelMark emEnv (ilG: ILGenerator) (label: ILCodeLabel) =
     let lab = envGetLabel emEnv label
@@ -1239,7 +1234,7 @@ let rec emitInstr cenv (modB: ModuleBuilder) emEnv (ilG: ILGenerator) instr =
                     setArrayMethInfo shape.Rank ety
                 else
 #endif
-                    modB.GetArrayMethodAndLog (aty, "Set", CallingConventions.HasThis, (null: Type), Array.append (Array.create shape.Rank typeof) (Array.ofList [ ety ]))
+                    modB.GetArrayMethodAndLog (aty, "Set", CallingConventions.HasThis, null, Array.append (Array.create shape.Rank typeof) (Array.ofList [ ety ]))
             ilG.EmitAndLog (OpCodes.Call, meth)
 
     | I_newarr (shape, ty) ->
@@ -1247,7 +1242,7 @@ let rec emitInstr cenv (modB: ModuleBuilder) emEnv (ilG: ILGenerator) instr =
         then ilG.EmitAndLog (OpCodes.Newarr, convType cenv emEnv ty)
         else
             let aty = convType cenv emEnv (ILType.Array(shape, ty))
-            let meth = modB.GetArrayMethodAndLog (aty, ".ctor", CallingConventions.HasThis, (null: Type), Array.create shape.Rank typeof)
+            let meth = modB.GetArrayMethodAndLog (aty, ".ctor", CallingConventions.HasThis, null, Array.create shape.Rank typeof)
             ilG.EmitAndLog (OpCodes.Newobj, meth)
 
     | I_ldlen -> ilG.EmitAndLog OpCodes.Ldlen
@@ -1378,10 +1373,7 @@ let emitMethodBody cenv modB emEnv ilG _name (mbody: MethodBody) =
     | MethodBody.NotAvailable -> failwith "emitMethodBody: metadata only"
 
 let convCustomAttr cenv emEnv (cattr: ILAttribute) =
-    let methInfo =
-       match convConstructorSpec cenv emEnv cattr.Method with
-       | null -> failwithf "convCustomAttr: %+A" cattr.Method
-       | res -> res
+    let methInfo = convConstructorSpec cenv emEnv cattr.Method
     let data = getCustomAttrData cattr
     (methInfo, data)
 
diff --git a/src/fsharp/absil/ilwritepdb.fs b/src/fsharp/absil/ilwritepdb.fs
index 3acc2ada217..ff2cd41696b 100644
--- a/src/fsharp/absil/ilwritepdb.fs
+++ b/src/fsharp/absil/ilwritepdb.fs
@@ -304,8 +304,8 @@ type PortablePdbGenerator (embedAllSource: bool, embedSourceList: string list, s
 
     let docs =
         match info.Documents with
-        | null -> Array.empty
-        | _ -> info.Documents
+        | Null -> Array.empty
+        | NonNull docs -> docs
 
     // The metadata to wite to the PoortablePDB (Roslyn = _debugMetadataOpt)
 
@@ -571,11 +571,11 @@ type PortablePdbGenerator (embedAllSource: bool, embedSourceList: string list, s
         let docHandle, sequencePointBlob =
             let sps =
                 match minfo.DebugPoints with
-                | null -> Array.empty
-                | _ ->
+                | Null -> Array.empty
+                | NonNull pts ->
                     match minfo.DebugRange with
                     | None -> Array.empty
-                    | Some _ -> minfo.DebugPoints
+                    | Some _ -> pts
 
             let builder = BlobBuilder()
             builder.WriteCompressedInteger(minfo.LocalSignatureToken)
diff --git a/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj b/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj
index c5d5e0025f6..035421320ac 100644
--- a/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj
+++ b/src/fsharp/fscAnyCpu/fscAnyCpu.fsproj
@@ -9,7 +9,6 @@
     .exe
     $(NoWarn);44;45;55;62;75;1204
     true
-    $(OtherFlags) --maxerrors:20 --extraoptimizationloops:1
     true
     true
   
diff --git a/src/fsharp/import.fsi b/src/fsharp/import.fsi
index 5d21ea6bfb2..81223a860f8 100644
--- a/src/fsharp/import.fsi
+++ b/src/fsharp/import.fsi
@@ -27,7 +27,7 @@ type AssemblyLoader =
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly.
-    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
+    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
 
     /// Record a root for a [] type to help guide static linking & type relocation
     abstract RecordGeneratedTypeRoot : ProviderGeneratedType -> unit
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index eb7f4dc1633..6c21a99431d 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -678,7 +678,7 @@ let OptionalArgInfoOfProvidedParameter (amap: Import.ImportMap) m (provParam : T
         NotOptional
 
 /// Compute the ILFieldInit for the given provided constant value for a provided enum type.
-let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo) err =
+let GetAndSanityCheckProviderMethod m (mi: Tainted<'T :> ProvidedMemberInfo>) (get : 'T -> ProvidedMethodInfo MaybeNull) err = 
     match mi.PApply((fun mi -> (get mi :> ProvidedMethodBase)), m) with
     | Tainted.Null -> error(Error(err(mi.PUntaint((fun mi -> mi.Name), m), mi.PUntaint((fun mi -> mi.DeclaringType.Name), m)), m))
     | meth -> meth
diff --git a/src/fsharp/lex.fsl b/src/fsharp/lex.fsl
index ee25919853d..e98d6a03417 100644
--- a/src/fsharp/lex.fsl
+++ b/src/fsharp/lex.fsl
@@ -98,9 +98,7 @@ let parseOctalUInt64 (s:string) =
     Convert.ToUInt64(s, 8)
 
 let removeUnderscores (s:string) =
-    match s with
-    | null -> null
-    | s -> s.Replace("_", "")
+    s.Replace("_", "")
 
 let parseInt32 (s:string) =
     let s = removeUnderscores s
diff --git a/src/fsharp/service/FSharpCheckerResults.fs b/src/fsharp/service/FSharpCheckerResults.fs
index b9b2e0450a0..e019d4bb63a 100644
--- a/src/fsharp/service/FSharpCheckerResults.fs
+++ b/src/fsharp/service/FSharpCheckerResults.fs
@@ -456,11 +456,11 @@ type internal TypeCheckInfo
               let ad =
                 match vref.BaseOrThisInfo, ad with
                 | ValBaseOrThisInfo.NormalVal, AccessibleFrom(paths, Some tcref) ->
-                    let tcref = generalizedTyconRef g tcref
+                    let thisTy = generalizedTyconRef g tcref
                     // check that type of value is the same or subtype of tcref
                     // yes - allow access to protected members
                     // no - strip ability to access protected members
-                    if TypeRelations.TypeFeasiblySubsumesType 0 g amap m tcref TypeRelations.CanCoerce ty then
+                    if TypeRelations.TypeFeasiblySubsumesType 0 g amap m thisTy TypeRelations.CanCoerce ty then
                         ad
                     else
                         AccessibleFrom(paths, None)
@@ -1781,9 +1781,15 @@ module internal ParseAndCheckFile =
             // If there was a loadClosure, replay the errors and warnings from resolution, excluding parsing
             loadClosure.LoadClosureRootFileDiagnostics |> List.iter diagnosticSink
 
-            let fileOfBackgroundError err = (match GetRangeOfDiagnostic (fst err) with Some m-> m.FileName | None -> null)
+            let fileOfBackgroundError err =
+               match GetRangeOfDiagnostic (fst err) with
+               | Some m -> Some m.FileName
+               | None -> None
+
             let sameFile file hashLoadInFile =
-                (0 = String.Compare(hashLoadInFile, file, StringComparison.OrdinalIgnoreCase))
+                match file with
+                | None -> false
+                | Some file -> (0 = String.Compare(hashLoadInFile, file, StringComparison.OrdinalIgnoreCase))
 
             //  walk the list of #loads and keep the ones for this file.
             let hashLoadsInFile =
diff --git a/src/fsharp/service/QuickParse.fs b/src/fsharp/service/QuickParse.fs
index d01772621c0..b3ea6f050ce 100644
--- a/src/fsharp/service/QuickParse.fs
+++ b/src/fsharp/service/QuickParse.fs
@@ -167,12 +167,12 @@ module QuickParse =
     /// a call to `DeclItemsForNamesAtPosition` for intellisense. This will
     /// allow us to use find the correct qualified items rather than resorting
     /// to the more expensive and less accurate environment lookup.
-    let GetCompleteIdentifierIsland (tolerateJustAfter: bool) (tokenText: string) (index: int) : (string * int * bool) option =
-        if String.IsNullOrEmpty tokenText then None
+    let GetCompleteIdentifierIsland (tolerateJustAfter: bool) (lineStr: string) (index: int) : (string * int * bool) option =
+        if String.IsNullOrEmpty lineStr then None
         else     
-            let directResult = GetCompleteIdentifierIslandImpl tokenText index
+            let directResult = GetCompleteIdentifierIslandImpl lineStr index
             if tolerateJustAfter && directResult = None then 
-                GetCompleteIdentifierIslandImpl tokenText (index - 1)
+                GetCompleteIdentifierIslandImpl lineStr (index - 1)
             else 
                 directResult
 
diff --git a/src/fsharp/service/QuickParse.fsi b/src/fsharp/service/QuickParse.fsi
index b4b27fc64bb..0598444e5a2 100644
--- a/src/fsharp/service/QuickParse.fsi
+++ b/src/fsharp/service/QuickParse.fsi
@@ -3,6 +3,7 @@
 namespace FSharp.Compiler.EditorServices
 
 open FSharp.Compiler.Tokenization
+open Internal.Utilities.Library
 
 /// Qualified long name.
 type public PartialLongName =
@@ -71,14 +72,14 @@ module public QuickParse =
     /// a call to `DeclItemsForNamesAtPosition` for intellisense. This will
     /// allow us to use find the correct qualified items rather than resorting
     /// to the more expensive and less accurate environment lookup.
-    val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> tokenText: string -> index: int -> (string * int * bool) option
+    val GetCompleteIdentifierIsland : tolerateJustAfter: bool -> lineStr: string MaybeNull -> index: int -> (string * int * bool) option
     
     /// Get the partial long name of the identifier to the left of index.
-    val GetPartialLongName : lineStr: string * index: int -> string list * string
+    val GetPartialLongName : lineStr: string MaybeNull * index: int -> string list * string
     
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-    val GetPartialLongNameEx : lineStr: string * index: int -> PartialLongName
+    val GetPartialLongNameEx : lineStr: string MaybeNull * index: int -> PartialLongName
     
     /// Tests whether the user is typing something like "member x." or "override (*comment*) x."
     val TestMemberOrOverrideDeclaration : tokens: FSharpTokenInfo[] -> bool
\ No newline at end of file
diff --git a/src/fsharp/symbols/SymbolHelpers.fs b/src/fsharp/symbols/SymbolHelpers.fs
index a73af2a3831..d47adc4318b 100644
--- a/src/fsharp/symbols/SymbolHelpers.fs
+++ b/src/fsharp/symbols/SymbolHelpers.fs
@@ -560,8 +560,8 @@ module internal SymbolHelpers =
               | Item.UnqualifiedType tcRefs1, Item.UnqualifiedType tcRefs2 ->
                   (tcRefs1, tcRefs2)
                   ||> List.forall2 (fun tcRef1 tcRef2 -> tyconRefEq g tcRef1 tcRef2)
-              | Item.Types(_, [TType.TType_app(tcRef1, _)]), Item.UnqualifiedType([tcRef2]) -> tyconRefEq g tcRef1 tcRef2
-              | Item.UnqualifiedType([tcRef1]), Item.Types(_, [TType.TType_app(tcRef2, _)]) -> tyconRefEq g tcRef1 tcRef2
+              | Item.Types(_, [TType_app(tcRef1, _)]), Item.UnqualifiedType([tcRef2]) -> tyconRefEq g tcRef1 tcRef2
+              | Item.UnqualifiedType([tcRef1]), Item.Types(_, [TType_app(tcRef2, _)]) -> tyconRefEq g tcRef1 tcRef2
               | _ -> false)
               
           member x.GetHashCode item =

From ce11bea6ac67aac44f477e840b6c63cacbb95442 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 22:58:13 +0000
Subject: [PATCH 073/112] align diff

---
 src/fsharp/ErrorLogger.fs                     |   1 -
 .../FSharp.Build/FSharpEmbedResourceText.fs   |  10 +-
 src/fsharp/FSharp.Build/Fsc.fs                |  48 ++---
 src/fsharp/FSharp.Build/Fsi.fs                |  21 +-
 src/fsharp/FSharp.Build/SubstituteText.fs     |   6 +-
 src/fsharp/FSharp.Build/WriteCodeFragment.fs  |  21 +-
 src/fsharp/FSharp.Core/prim-types.fs          | 204 +++++++++---------
 src/fsharp/IlxGen.fs                          |   4 +-
 src/fsharp/InnerLambdasToTopLevelFuncs.fs     |   2 +-
 src/fsharp/NameResolution.fs                  |   4 +-
 src/fsharp/PostInferenceChecks.fs             |  19 +-
 src/fsharp/QuotationTranslator.fs             |   9 +-
 src/fsharp/SignatureConformance.fs            |   2 +-
 src/fsharp/TcGlobals.fs                       |  48 ++---
 src/fsharp/TypedTree.fs                       |   5 +-
 src/fsharp/TypedTreeOps.fs                    |  15 +-
 src/fsharp/TypedTreeOps.fsi                   |   4 -
 src/fsharp/TypedTreePickle.fs                 |   2 +-
 src/fsharp/absil/illib.fs                     |   2 +-
 src/fsharp/absil/ilreflect.fs                 |  13 +-
 src/fsharp/absil/ilsupp.fs                    |  17 +-
 src/fsharp/import.fsi                         |   6 +-
 src/fsharp/service/ServiceLexing.fs           |   2 +-
 src/fsharp/tainted.fsi                        |   6 +-
 src/fsharp/utils/FileSystem.fs                |   7 -
 tests/benchmarks/TaskPerf/async2.fs           |   2 +-
 26 files changed, 229 insertions(+), 251 deletions(-)

diff --git a/src/fsharp/ErrorLogger.fs b/src/fsharp/ErrorLogger.fs
index d2dd2b16ace..676320ed846 100644
--- a/src/fsharp/ErrorLogger.fs
+++ b/src/fsharp/ErrorLogger.fs
@@ -2,7 +2,6 @@
 
 module FSharp.Compiler.ErrorLogger
 
-open Internal.Utilities.Library
 open FSharp.Compiler.Diagnostics
 open FSharp.Compiler.Features
 open FSharp.Compiler.Text.Range
diff --git a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
index 8d1b6c8e0d0..b3a9c6d5a33 100644
--- a/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
+++ b/src/fsharp/FSharp.Build/FSharpEmbedResourceText.fs
@@ -2,19 +2,13 @@
 
 namespace FSharp.Build
 
-open System.Collections
 open System.IO
 open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type FSharpEmbedResourceText() =
-#if NO_CHECKNULLS
-    let mutable _buildEngine : IBuildEngine = null
-    let mutable _hostObject : ITaskHost = null
-#else
-    let mutable _buildEngine : IBuildEngine? = null
-    let mutable _hostObject : ITaskHost? = null
-#endif
+    let mutable _buildEngine : IBuildEngine MaybeNull = null
+    let mutable _hostObject : ITaskHost MaybeNull = null
     let mutable _embeddedText : ITaskItem[] = [||]
     let mutable _generatedSource : ITaskItem[] = [||]
     let mutable _generatedResx : ITaskItem[] = [||]
diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs
index 76b804165e4..cca44d42691 100644
--- a/src/fsharp/FSharp.Build/Fsc.fs
+++ b/src/fsharp/FSharp.Build/Fsc.fs
@@ -21,27 +21,48 @@ type public Fsc () as this =
 
     inherit ToolTask ()
 
+    let mutable baseAddress: string MaybeNull = null
     let mutable capturedArguments: string list = []  // list of individual args, to pass to HostObject Compile()
     let mutable capturedFilenames: string list = []  // list of individual source filenames, to pass to HostObject Compile()
+    let mutable checksumAlgorithm: string MaybeNull = null
+    let mutable codePage: string MaybeNull = null
     let mutable commandLineArgs: ITaskItem list = []
     let mutable compilerTools: ITaskItem [] = [||]
     let mutable debugSymbols = false
+    let mutable debugType: string MaybeNull = null
     let mutable defineConstants: ITaskItem[] = [||]
     let mutable delaySign: bool = false
     let mutable deterministic: bool = false
+    let mutable disabledWarnings: string MaybeNull = null
+    let mutable documentationFile: string MaybeNull = null
+    let mutable dotnetFscCompilerPath: string MaybeNull = null
     let mutable embedAllSources = false
     let mutable embeddedFiles: ITaskItem[] = [||]
+    let mutable generateInterfaceFile: string MaybeNull = null
     let mutable highEntropyVA: bool = false
+    let mutable keyFile: string MaybeNull = null
+    let mutable langVersion: string MaybeNull = null
     let mutable noFramework = false
     let mutable optimize: bool = true
+    let mutable otherFlags: string MaybeNull = null
+    let mutable outputAssembly: string MaybeNull = null 
+    let mutable pathMap: string MaybeNull = null
+    let mutable pdbFile: string MaybeNull = null
+    let mutable platform: string MaybeNull = null
     let mutable prefer32bit: bool = false
+    let mutable preferredUILang: string MaybeNull = null
     let mutable publicSign: bool = false
     let mutable provideCommandLineArgs: bool = false
     let mutable references: ITaskItem[] = [||]
+    let mutable referencePath: string MaybeNull = null
     let mutable resources: ITaskItem[] = [||]
     let mutable skipCompilerExecution: bool  = false
     let mutable sources: ITaskItem[] = [||]
+    let mutable sourceLink: string MaybeNull = null
+    let mutable subsystemVersion: string MaybeNull = null
     let mutable tailcalls: bool = true
+    let mutable targetProfile: string MaybeNull = null
+    let mutable targetType: string MaybeNull = null
     let mutable toolExe: string = "fsc.exe"
     let defaultToolPath =
         let locationOfThisDll =
@@ -52,29 +73,6 @@ type public Fsc () as this =
         | None -> ""
     let mutable treatWarningsAsErrors: bool = false
     let mutable useStandardResourceNames: bool = false
-    let mutable vserrors: bool = false
-    let mutable utf8output: bool = false
-
-    let mutable baseAddress: string MaybeNull = null
-    let mutable codePage: string MaybeNull = null
-    let mutable debugType: string MaybeNull = null
-    let mutable disabledWarnings: string MaybeNull = null
-    let mutable documentationFile: string MaybeNull = null
-    let mutable dotnetFscCompilerPath: string MaybeNull = null
-    let mutable generateInterfaceFile: string MaybeNull = null
-    let mutable keyFile: string MaybeNull = null
-    let mutable langVersion: string MaybeNull = null
-    let mutable otherFlags: string MaybeNull = null
-    let mutable outputAssembly: string MaybeNull = null 
-    let mutable pathMap: string MaybeNull = null
-    let mutable pdbFile: string MaybeNull = null
-    let mutable platform: string MaybeNull = null
-    let mutable preferredUILang: string MaybeNull = null
-    let mutable referencePath: string MaybeNull = null
-    let mutable sourceLink: string MaybeNull = null
-    let mutable subsystemVersion: string MaybeNull = null
-    let mutable targetProfile: string MaybeNull = null
-    let mutable targetType: string MaybeNull = null
     let mutable warnOn: string MaybeNull = null
     let mutable warningsAsErrors: string MaybeNull = null
     let mutable warningsNotAsErrors: string MaybeNull = null
@@ -83,9 +81,9 @@ type public Fsc () as this =
     let mutable win32icon: string MaybeNull = null
     let mutable win32res: string MaybeNull = null
     let mutable win32manifest: string MaybeNull = null
+    let mutable vserrors: bool = false
     let mutable vslcid: string MaybeNull = null
-    let mutable checksumAlgorithm: string MaybeNull = null
-    let mutable codePage: string MaybeNull = null
+    let mutable utf8output: bool = false
 
     let mutable toolPath: string =
         let locationOfThisDll =
diff --git a/src/fsharp/FSharp.Build/Fsi.fs b/src/fsharp/FSharp.Build/Fsi.fs
index 0f0161f999b..314616132fb 100644
--- a/src/fsharp/FSharp.Build/Fsi.fs
+++ b/src/fsharp/FSharp.Build/Fsi.fs
@@ -23,19 +23,28 @@ type public Fsi () as this =
 
     let mutable capturedArguments: string list = []  // list of individual args, to pass to HostObject Compile()
     let mutable capturedFilenames: string list = []  // list of individual source filenames, to pass to HostObject Compile()
+    let mutable codePage: string MaybeNull = null
     let mutable commandLineArgs: ITaskItem list = []
     let mutable defineConstants: ITaskItem[] = [||]
+    let mutable disabledWarnings: string MaybeNull = null
+    let mutable dotnetFsiCompilerPath: string MaybeNull = null
     let mutable fsiExec = false
+    let mutable langVersion: string MaybeNull = null
     let mutable noFramework = false
     let mutable optimize = true
+    let mutable preferredUILang: string MaybeNull = null
     let mutable provideCommandLineArgs = false
+    let mutable otherFlags: string MaybeNull = null
     let mutable references: ITaskItem[] = [||]
+    let mutable referencePath: string MaybeNull = null
     let mutable resources: ITaskItem[] = [||]
     let mutable skipCompilerExecution = false
     let mutable sources: ITaskItem[] = [||]
     let mutable loadSources: ITaskItem[] = [||]
     let mutable useSources: ITaskItem[] = [||]
     let mutable tailcalls: bool = true
+    let mutable targetProfile: string MaybeNull = null
+    let mutable targetType: string MaybeNull = null
     let mutable toolExe: string = "fsi.exe"
     let mutable toolPath: string =
         let locationOfThisDll =
@@ -45,21 +54,11 @@ type public Fsi () as this =
         | Some s -> s
         | None -> ""
     let mutable treatWarningsAsErrors: bool = false
-    let mutable utf8output: bool = false
-
-    let mutable codePage: string MaybeNull = null
-    let mutable disabledWarnings: string MaybeNull = null
-    let mutable dotnetFsiCompilerPath: string MaybeNull = null
-    let mutable otherFlags: string MaybeNull = null
-    let mutable langVersion: string MaybeNull = null
-    let mutable preferredUILang: string MaybeNull = null
-    let mutable targetProfile: string MaybeNull = null
-    let mutable targetType: string MaybeNull = null
-    let mutable referencePath: string MaybeNull = null
     let mutable warningsAsErrors: string MaybeNull = null
     let mutable warningsNotAsErrors: string MaybeNull = null
     let mutable warningLevel: string MaybeNull = null
     let mutable vslcid: string MaybeNull = null
+    let mutable utf8output: bool = false
 
     // See bug 6483; this makes parallel build faster, and is fine to set unconditionally
     do this.YieldDuringToolExecution <- true
diff --git a/src/fsharp/FSharp.Build/SubstituteText.fs b/src/fsharp/FSharp.Build/SubstituteText.fs
index 76ad0ac273a..1f8b42869d0 100644
--- a/src/fsharp/FSharp.Build/SubstituteText.fs
+++ b/src/fsharp/FSharp.Build/SubstituteText.fs
@@ -10,11 +10,11 @@ open Microsoft.Build.Utilities
 
 type SubstituteText () =
 
-    let mutable _buildEngine : IBuildEngine MaybeNull = null
-    let mutable _hostObject : ITaskHost MaybeNull = null
-    let mutable embeddedResources : ITaskItem[] MaybeNull = [||]
+    let mutable _buildEngine: IBuildEngine MaybeNull = null
+    let mutable _hostObject: ITaskHost MaybeNull = null
 
     let mutable copiedFiles = new ResizeArray()
+    let mutable embeddedResources: ITaskItem[] = [||]
 
     []
     member this.EmbeddedResources
diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
index a0aa31f98f7..f051851598e 100644
--- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs
+++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
@@ -13,12 +13,12 @@ open Microsoft.Build.Framework
 open Microsoft.Build.Utilities
 
 type WriteCodeFragment() =
-    let mutable _buildEngine : IBuildEngine MaybeNull = null
-    let mutable _hostObject : ITaskHost MaybeNull = null
-    let mutable _outputDirectory : ITaskItem MaybeNull = null
-    let mutable _outputFile : ITaskItem MaybeNull = null
-    let mutable _language : string = ""
-    let mutable _assemblyAttributes : ITaskItem[] = [||]
+    let mutable _buildEngine: IBuildEngine MaybeNull = null
+    let mutable _hostObject: ITaskHost MaybeNull = null
+    let mutable _outputDirectory: ITaskItem MaybeNull = null
+    let mutable _outputFile: ITaskItem MaybeNull = null
+    let mutable _language: string = ""
+    let mutable _assemblyAttributes: ITaskItem[] = [||]
 
     static let escapeString (str:string) =
         let sb = str.ToCharArray() |> Seq.fold (fun (sb:StringBuilder) (c:char) ->
@@ -45,10 +45,11 @@ type WriteCodeFragment() =
                 |> Seq.toList
                 |> List.map (fun entry ->
                     let key = entry.Key :?> string
-                    let value = match entry.Value with
-                                | null -> "null"
-                                | :? string as value -> escapeString value
-                                | value -> value.ToString()
+                    let value =
+                        match entry.Value with
+                        | null -> "null"
+                        | :? string as value -> escapeString value
+                        | value -> value.ToString()
                     (key, value))
             let orderedParameters, namedParameters = parameterPairs |> List.partition (fun (key, _) -> key.StartsWith("_Parameter"))
             let orderedParametersWithIndex =
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index b8d826ef5dd..ff602fa94a6 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -2327,7 +2327,7 @@ namespace Microsoft.FSharp.Core
         // and only request AllowLeadingSign.
 
         let isOXB c = 
-            let c = System.Char.ToLowerInvariant c
+            let c = Char.ToLowerInvariant c
             charEq c 'x' || charEq c 'o' || charEq c 'b'
 
         let is0OXB (s:string) p l = 
@@ -2335,7 +2335,7 @@ namespace Microsoft.FSharp.Core
 
         let get0OXB (s:string) (p:byref)  l = 
             if is0OXB s p l
-            then let r = System.Char.ToLowerInvariant(s.Chars(p+1)) in p <- p + 2; r
+            then let r = Char.ToLowerInvariant(s.Chars(p+1)) in p <- p + 2; r
             else 'd' 
 
         let getSign32 (s:string) (p:byref) l = 
@@ -2358,8 +2358,8 @@ namespace Microsoft.FSharp.Core
             s.Replace("_", "")
 
         let ParseUInt32 (s:string) = 
-            if System.Object.ReferenceEquals(s,null) then
-                raise( new System.ArgumentNullException("s") )
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2375,8 +2375,8 @@ namespace Microsoft.FSharp.Core
         let inline int64OfUInt64 (x:uint64) = (# "" x  : int64 #)
 
         let ParseInt32 (s:string) = 
-            if System.Object.ReferenceEquals(s,null) then
-                raise( new System.ArgumentNullException("s") )
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2390,8 +2390,8 @@ namespace Microsoft.FSharp.Core
             | _ -> Int32.Parse(s, NumberStyles.AllowLeadingSign, CultureInfo.InvariantCulture)
 
         let ParseInt64 (s:string) = 
-            if System.Object.ReferenceEquals(s,null) then
-                raise( new System.ArgumentNullException("s") )
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2405,8 +2405,8 @@ namespace Microsoft.FSharp.Core
             | _ -> Int64.Parse(s, NumberStyles.AllowLeadingSign, CultureInfo.InvariantCulture)
 
         let ParseUInt64     (s:string) : uint64 = 
-            if System.Object.ReferenceEquals(s,null) then
-                raise( new System.ArgumentNullException("s") )
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2431,13 +2431,13 @@ namespace Microsoft.FSharp.Core
         let inline ParseUIntPtr (s:string) = (# "conv.ovf.u"  (ParseInt64 s)  : unativeint #)
 
         let inline ParseDouble (s:string)   =
-            if System.Object.ReferenceEquals(s,null) then
-                raise( new System.ArgumentNullException("s") )
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
             Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
 
         let inline ParseSingle (s:string) =
-            if System.Object.ReferenceEquals(s,null) then
-                raise( new System.ArgumentNullException("s") )
+            if Object.ReferenceEquals(s,null) then
+                raise( new ArgumentNullException("s") )
             Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
             
         []
@@ -2534,7 +2534,7 @@ namespace Microsoft.FSharp.Core
              // That is, not in the generic implementation of '+'
             when ^T : ^T = (^T : (static member One : ^T) ())
 
-        type System.Type with
+        type Type with
     
             member inline this.GetSingleStaticMethodByTypes(name: string, parameterTypes: Type[]) =
                let staticBindingFlags = (# "" 0b111000 : BindingFlags #) // BindingFlags.Static ||| BindingFlags.Public ||| BindingFlags.NonPublic
@@ -3050,7 +3050,7 @@ namespace Microsoft.FSharp.Core
                 elif typeeq<'T, float> then convPrim<_,'U> (# "conv.u2" (convPrim<_,float> value) : char #) 
                 elif typeeq<'T, float32> then convPrim<_,'U> (# "conv.u2" (convPrim<_,float32> value) : char #) 
                 elif typeeq<'T, char> then convPrim<_,'U> (# "conv.u2" (convPrim<_,char> value) : char #) 
-                elif typeeq<'T, string> then convPrim<_,'U> (System.Char.Parse (convPrim<_,string> value)) 
+                elif typeeq<'T, string> then convPrim<_,'U> (Char.Parse (convPrim<_,string> value)) 
                 else UnaryOpDynamicImplTable.Invoke "op_Explicit" value
             elif typeeq<'U, decimal> then 
                 if typeeq<'T, sbyte> then convPrim<_,'U> (Convert.ToDecimal (convPrim<_,sbyte> value))
@@ -3399,22 +3399,22 @@ namespace Microsoft.FSharp.Core
         // Note: this is not made public in the signature, because of conflicts with the Converter overload.
         // The method remains in case someone is calling it via reflection.
         []
-        static member op_Implicit(converter : System.Func<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
+        static member op_Implicit(converter : Func<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
 
         // Note: this is not made public in the signature, because of conflicts with the Converter overload.
         // The method remains in case someone is calling it via reflection.
         []
-        static member op_Implicit(func : ('T -> 'Res) ) =  new System.Func<'T,'Res>(func)
+        static member op_Implicit(func : ('T -> 'Res) ) =  new Func<'T,'Res>(func)
 
         []
-        static member op_Implicit(f : System.Converter<_,_>) : ('T -> 'Res) =  (fun t -> f.Invoke(t))
+        static member op_Implicit(f : Converter<_,_>) : ('T -> 'Res) =  (fun t -> f.Invoke(t))
 
         []
-        static member op_Implicit (func : ('T -> 'Res) ) =  new System.Converter<'T,'Res>(func)
+        static member op_Implicit (func : ('T -> 'Res) ) =  new Converter<'T,'Res>(func)
 
-        static member FromConverter (converter: System.Converter<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
+        static member FromConverter (converter: Converter<_,_>) : ('T -> 'Res) =  (fun t -> converter.Invoke(t))
 
-        static member ToConverter (func: ('T -> 'Res) ) =  new System.Converter<'T,'Res>(func)
+        static member ToConverter (func: ('T -> 'Res) ) =  new Converter<'T,'Res>(func)
 
         static member InvokeFast (func:FSharpFunc<_,_>, arg1: 'T, arg2: 'Res)                   = OptimizedClosures.invokeFast2(func, arg1, arg2) 
 
@@ -3434,31 +3434,31 @@ namespace Microsoft.FSharp.Core
 
         // Note: this is not made public in the signature, because of conflicts with the Converter overload.
         // The method remains in case someone is calling it via reflection.
-        static member  inline ToFSharpFunc (converter: System.Func<_, _>) = (fun t -> converter.Invoke(t))
+        static member  inline ToFSharpFunc (converter: Func<_, _>) = (fun t -> converter.Invoke(t))
 
-        static member  inline FromFunc (func: System.Func<_>) = (fun () -> func.Invoke())
+        static member  inline FromFunc (func: Func<_>) = (fun () -> func.Invoke())
 
-        static member  inline FromFunc (func: System.Func<_, _>) = (fun t -> func.Invoke(t))
+        static member  inline FromFunc (func: Func<_, _>) = (fun t -> func.Invoke(t))
 
-        static member  inline FromFunc (func: System.Func<_, _, _>) = (fun t1 t2 -> func.Invoke(t1,t2))
+        static member  inline FromFunc (func: Func<_, _, _>) = (fun t1 t2 -> func.Invoke(t1,t2))
 
-        static member  inline FromFunc (func: System.Func<_, _, _, _>) = (fun t1 t2 t3 -> func.Invoke(t1,t2,t3))
+        static member  inline FromFunc (func: Func<_, _, _, _>) = (fun t1 t2 t3 -> func.Invoke(t1,t2,t3))
 
-        static member  inline FromFunc (func: System.Func<_, _, _, _, _>) = (fun t1 t2 t3 t4 -> func.Invoke(t1,t2,t3,t4))
+        static member  inline FromFunc (func: Func<_, _, _, _, _>) = (fun t1 t2 t3 t4 -> func.Invoke(t1,t2,t3,t4))
 
-        static member  inline FromFunc (func: System.Func<_, _, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> func.Invoke(t1,t2,t3,t4,t5))
+        static member  inline FromFunc (func: Func<_, _, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> func.Invoke(t1,t2,t3,t4,t5))
 
-        static member  inline FromAction (action: System.Action) = (fun () -> action.Invoke())
+        static member  inline FromAction (action: Action) = (fun () -> action.Invoke())
 
-        static member  inline FromAction (action: System.Action<_>) = (fun t -> action.Invoke(t))
+        static member  inline FromAction (action: Action<_>) = (fun t -> action.Invoke(t))
 
-        static member  inline FromAction (action: System.Action<_, _>) = (fun t1 t2 -> action.Invoke(t1,t2))
+        static member  inline FromAction (action: Action<_, _>) = (fun t1 t2 -> action.Invoke(t1,t2))
 
-        static member  inline FromAction (action: System.Action<_, _, _>) = (fun t1 t2 t3 -> action.Invoke(t1,t2,t3))
+        static member  inline FromAction (action: Action<_, _, _>) = (fun t1 t2 t3 -> action.Invoke(t1,t2,t3))
 
-        static member  inline FromAction (action: System.Action<_, _, _, _>) = (fun t1 t2 t3 t4 -> action.Invoke(t1,t2,t3,t4))
+        static member  inline FromAction (action: Action<_, _, _, _>) = (fun t1 t2 t3 t4 -> action.Invoke(t1,t2,t3,t4))
 
-        static member  inline FromAction (action: System.Action<_, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> action.Invoke(t1,t2,t3,t4,t5))
+        static member  inline FromAction (action: Action<_, _, _, _, _>) = (fun t1 t2 t3 t4 t5 -> action.Invoke(t1,t2,t3,t4,t5))
 
         static member inline FuncFromTupled (func: 'T1 * 'T2 -> 'Res) = (fun a b -> func (a, b))
 
@@ -3500,7 +3500,7 @@ namespace Microsoft.FSharp.Core
         | Some : Value:'T -> 'T option 
 
         []
-        member x.Value = match x with Some x -> x | None -> raise (new System.InvalidOperationException("Option.Value"))
+        member x.Value = match x with Some x -> x | None -> raise (new InvalidOperationException("Option.Value"))
 
         []
         member x.IsNone = match x with None -> true | _ -> false
@@ -3541,7 +3541,7 @@ namespace Microsoft.FSharp.Core
         | ValueNone : 'T voption
         | ValueSome : 'T -> 'T voption
 
-        member x.Value = match x with ValueSome x -> x | ValueNone -> raise (new System.InvalidOperationException("ValueOption.Value"))
+        member x.Value = match x with ValueSome x -> x | ValueNone -> raise (new InvalidOperationException("ValueOption.Value"))
 
         []
         static member None : 'T voption = ValueNone
@@ -3640,9 +3640,9 @@ namespace Microsoft.FSharp.Collections
 
     module PrivateListHelpers = 
 
-        let notStarted() = raise (new System.InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
-        let alreadyFinished() = raise (new System.InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
-        let outOfRange() = raise (System.IndexOutOfRangeException(SR.GetString(SR.indexOutOfBounds)))
+        let notStarted() = raise (new InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
+        let alreadyFinished() = raise (new InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
+        let outOfRange() = raise (IndexOutOfRangeException(SR.GetString(SR.indexOutOfBounds)))
 
         let nonempty x = match x with [] -> false | _ -> true
         // optimized mutation-based implementation. This code is only valid in fslib, where mutation of private
@@ -3692,7 +3692,7 @@ namespace Microsoft.FSharp.Collections
                       started <- false; 
                       curr <- s
 
-             interface System.IDisposable with 
+             interface IDisposable with 
                   member x.Dispose() = () 
 
         let mkListEnumerator s = (new ListEnumerator<'T>(s) :> IEnumerator<'T>)
@@ -3701,9 +3701,9 @@ namespace Microsoft.FSharp.Collections
 
         let rec nth l n = 
             match l with 
-            | [] -> raise (new System.ArgumentException(SR.GetString(SR.indexOutOfBounds),"n"))
+            | [] -> raise (new ArgumentException(SR.GetString(SR.indexOutOfBounds),"n"))
             | h :: t -> 
-               if n < 0 then raise (new System.ArgumentException((SR.GetString(SR.inputMustBeNonNegative)),"n"))
+               if n < 0 then raise (new ArgumentException((SR.GetString(SR.inputMustBeNonNegative)),"n"))
                elif n = 0 then h
                else nth t (n - 1)
 
@@ -3743,11 +3743,11 @@ namespace Microsoft.FSharp.Collections
            let n = l.Length
            let txt = 
                if n > 1000 then "Length > 1000"
-               else System.String.Concat( [| "Length = "; n.ToString() |])
+               else String.Concat( [| "Length = "; n.ToString() |])
            txt
 
-        member l.Head   = match l with a :: _ -> a | [] -> raise (System.InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
-        member l.Tail   = match l with _ :: b -> b | [] -> raise (System.InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
+        member l.Head   = match l with a :: _ -> a | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
+        member l.Tail   = match l with _ :: b -> b | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
 
         []
         member l.IsEmpty  = match l with [] -> true | _ -> false
@@ -3851,7 +3851,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline nonNull (value : 'T? when 'T : not struct and 'T : not null) = 
             match box value with 
-            | null -> raise (System.NullReferenceException()) 
+            | null -> raise (NullReferenceException()) 
             | _ -> (# "" value : 'T #)
 
         []
@@ -3859,7 +3859,7 @@ namespace Microsoft.FSharp.Core
             if value.HasValue then 
                 value.Value
             else 
-                raise (System.NullReferenceException())
+                raise (NullReferenceException())
 
         []
         let inline (|Null|NonNull|) (value : 'T? when 'T : not null) = 
@@ -3875,13 +3875,13 @@ namespace Microsoft.FSharp.Core
         []
         let inline (|NonNullQuick|) (value : 'T? when 'T : not null) =
             match box value with 
-            | null -> raise (System.NullReferenceException()) 
+            | null -> raise (NullReferenceException()) 
             | _ -> (# "" value : 'T #)
 
         []
         let inline (|NonNullQuickV|) (value : Nullable<'T>) =
             if value.HasValue then value.Value
-            else raise (System.NullReferenceException()) 
+            else raise (NullReferenceException()) 
 
         []
         let inline withNull (value : 'T when 'T : not struct) = (# "" value : 'T? #)
@@ -3896,10 +3896,10 @@ namespace Microsoft.FSharp.Core
         []
         let inline raise (exn: exn) = (# "throw" exn : 'T #)
 
-        let Failure message = new System.Exception(message)
+        let Failure message = new Exception(message)
         
         []
-        let (|Failure|_|) (error: exn) = if error.GetType().Equals(typeof) then Some error.Message else None
+        let (|Failure|_|) (error: exn) = if error.GetType().Equals(typeof) then Some error.Message else None
 
         let inline (<) x y = GenericLessThan x y
         let inline (>) x y = GenericGreaterThan x y
@@ -3923,32 +3923,32 @@ namespace Microsoft.FSharp.Core
         []
         []
         let inline invalidArg (argumentName:string) (message:string) = 
-            raise (new System.ArgumentException(message,argumentName))
+            raise (new ArgumentException(message,argumentName))
 
         []
         []
         let inline nullArg (argumentName:string) = 
-            raise (new System.ArgumentNullException(argumentName))        
+            raise (new ArgumentNullException(argumentName))        
 
 #if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         []
         let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : not null) = 
             match value with 
-            | null -> raise (new System.ArgumentNullException(argumentName))        
+            | null -> raise (new ArgumentNullException(argumentName))        
             | _ ->  (# "" value : 'T #)
 #endif
 
         []
         []
-        let inline invalidOp message = raise (System.InvalidOperationException(message))
+        let inline invalidOp message = raise (InvalidOperationException(message))
 
         []
         []
-        let inline rethrow() = unbox(# "rethrow ldnull" : System.Object #)
+        let inline rethrow() = unbox(# "rethrow ldnull" : Object #)
 
         []
         []
-        let inline reraise() = unbox(# "rethrow ldnull" : System.Object #)
+        let inline reraise() = unbox(# "rethrow ldnull" : Object #)
 
         []
         []
@@ -3985,7 +3985,7 @@ namespace Microsoft.FSharp.Core
 
         let inline (<<) func2 func1 x = func2 (func1 x)
 
-        let (^) (s1: string) (s2: string) = System.String.Concat(s1, s2)
+        let (^) (s1: string) (s2: string) = String.Concat(s1, s2)
 
         []
         let inline defaultArg arg defaultValue = 
@@ -4019,7 +4019,7 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "neg" n  : int16 #)
              when ^T : nativeint = (# "neg" n  : nativeint #)
              when ^T : sbyte     = (# "neg" n  : sbyte #)
-             when ^T : decimal   = (# "" (System.Decimal.op_UnaryNegation((# "" n : decimal #))) : ^T #)
+             when ^T : decimal   = (# "" (Decimal.op_UnaryNegation((# "" n : decimal #))) : ^T #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              // That is, not in the generic implementation of '*'
@@ -4040,8 +4040,8 @@ namespace Microsoft.FSharp.Core
              when ^T : char        and ^U : char       = (# "conv.u2" (# "add" x y : uint32 #) : char #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "add" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "add" x y : uint32 #) : byte #)
-             when ^T : string      and ^U : string     = (# "" (System.String.Concat((# "" x : string #),(# "" y : string #))) : ^T #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Addition((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : string      and ^U : string     = (# "" (String.Concat((# "" x : string #),(# "" y : string #))) : ^T #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Addition((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (+) : ^T * ^U -> ^V) (x,y))
@@ -4061,7 +4061,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "sub" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "sub" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "sub" x y : uint32 #) : byte #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (-) : ^T * ^U -> ^V) (x,y))
@@ -4080,7 +4080,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "mul" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "mul" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "mul" x y : uint32 #) : byte #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (*) : ^T * ^U -> ^V) (x,y))
@@ -4100,7 +4100,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "div.un" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "div" x y : int32 #) : sbyte #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "div.un" x y : uint32 #) : byte #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Division((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Division((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (/) : ^T * ^U -> ^V) (x,y))
@@ -4120,7 +4120,7 @@ namespace Microsoft.FSharp.Core
              when ^T : uint16      and ^U : uint16     = (# "conv.u2" (# "rem.un" x y : uint32 #) : uint16 #)
              when ^T : sbyte       and ^U : sbyte      = (# "conv.i1" (# "rem"    x y : int32  #) : sbyte  #)
              when ^T : byte        and ^U : byte       = (# "conv.u1" (# "rem.un" x y : uint32 #) : byte   #)
-             when ^T : decimal     and ^U : decimal    = (# "" (System.Decimal.op_Modulus((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+             when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Modulus((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
              // According to the somewhat subtle rules of static optimizations,
              // this condition is used whenever ^T is resolved to a nominal type or witnesses are available
              when ^T : ^T = ((^T or ^U): (static member (%) : ^T * ^U -> ^V) (x,y))
@@ -4270,7 +4270,7 @@ namespace Microsoft.FSharp.Core
         let decr cell = cell.contents <- cell.contents - 1
 
         []
-        let exit (exitcode:int) = System.Environment.Exit(exitcode); failwith "System.Environment.Exit did not exit!"
+        let exit (exitcode:int) = Environment.Exit(exitcode); failwith "System.Environment.Exit did not exit!"
 
         []
         []
@@ -4417,16 +4417,16 @@ namespace Microsoft.FSharp.Core
         let (|KeyValue|) (keyValuePair : KeyValuePair<'T,'U>) = (keyValuePair.Key, keyValuePair.Value)
 
         []
-        let infinity = System.Double.PositiveInfinity
+        let infinity = Double.PositiveInfinity
 
         []
-        let nan = System.Double.NaN 
+        let nan = Double.NaN 
 
         []
-        let infinityf = System.Single.PositiveInfinity
+        let infinityf = Single.PositiveInfinity
 
         []
-        let nanf = System.Single.NaN 
+        let nanf = Single.NaN 
 
         []
         []
@@ -4522,19 +4522,19 @@ namespace Microsoft.FSharp.Core
         []
         let inline decimal (value: ^T) = 
              ExplicitDynamic<(^T), decimal> value
-             when ^T : string     = (System.Decimal.Parse(castToString value,NumberStyles.Float,CultureInfo.InvariantCulture))
-             when ^T : float      = (System.Convert.ToDecimal((# "" value : float #))) 
-             when ^T : float32    = (System.Convert.ToDecimal((# "" value : float32 #))) 
-             when ^T : int64      = (System.Convert.ToDecimal((# "" value : int64 #))) 
-             when ^T : int32      = (System.Convert.ToDecimal((# "" value : int32 #))) 
-             when ^T : int16      = (System.Convert.ToDecimal((# "" value : int16 #))) 
-             when ^T : nativeint  = (System.Convert.ToDecimal(int64 (# "" value : nativeint #))) 
-             when ^T : sbyte      = (System.Convert.ToDecimal((# "" value : sbyte #))) 
-             when ^T : uint64     = (System.Convert.ToDecimal((# "" value : uint64 #))) 
-             when ^T : uint32     = (System.Convert.ToDecimal((# "" value : uint32 #))) 
-             when ^T : uint16     = (System.Convert.ToDecimal((# "" value : uint16 #))) 
-             when ^T : unativeint = (System.Convert.ToDecimal(uint64 (# "" value : unativeint #))) 
-             when ^T : byte       = (System.Convert.ToDecimal((# "" value : byte #))) 
+             when ^T : string     = (Decimal.Parse(castToString value,NumberStyles.Float,CultureInfo.InvariantCulture))
+             when ^T : float      = (Convert.ToDecimal((# "" value : float #))) 
+             when ^T : float32    = (Convert.ToDecimal((# "" value : float32 #))) 
+             when ^T : int64      = (Convert.ToDecimal((# "" value : int64 #))) 
+             when ^T : int32      = (Convert.ToDecimal((# "" value : int32 #))) 
+             when ^T : int16      = (Convert.ToDecimal((# "" value : int16 #))) 
+             when ^T : nativeint  = (Convert.ToDecimal(int64 (# "" value : nativeint #))) 
+             when ^T : sbyte      = (Convert.ToDecimal((# "" value : sbyte #))) 
+             when ^T : uint64     = (Convert.ToDecimal((# "" value : uint64 #))) 
+             when ^T : uint32     = (Convert.ToDecimal((# "" value : uint32 #))) 
+             when ^T : uint16     = (Convert.ToDecimal((# "" value : uint16 #))) 
+             when ^T : unativeint = (Convert.ToDecimal(uint64 (# "" value : unativeint #))) 
+             when ^T : byte       = (Convert.ToDecimal((# "" value : byte #))) 
              when ^T : decimal    = (# "" value : decimal #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> decimal) (value))
 
@@ -4647,7 +4647,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline char (value: ^T) = 
              ExplicitDynamic<(^T), char> value
-             when ^T : string     = (System.Char.Parse(castToString value))
+             when ^T : string     = (Char.Parse(castToString value))
              when ^T : float      = (# "conv.u2" value  : char #)
              when ^T : float32    = (# "conv.u2" value  : char #)
              when ^T : int64      = (# "conv.u2" value  : char #)
@@ -4681,8 +4681,8 @@ namespace Microsoft.FSharp.Core
                 when ^T : float  = (# "clt" x y : bool #) 
                 when ^T : float32= (# "clt" x y : bool #) 
                 when ^T : char   = (# "clt" x y : bool #)
-                when ^T : decimal     = System.Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = (# "clt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when ^T : decimal     = Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = (# "clt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (<) : ^T * ^U -> bool) (x,y))
 
             /// Static greater-than with static optimizations for some well-known cases.
@@ -4702,8 +4702,8 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = (# "cgt" x y : bool #) 
                 when 'T : float32    = (# "cgt" x y : bool #) 
                 when 'T : char       = (# "cgt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = (# "cgt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when 'T : decimal     = Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = (# "cgt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (>) : ^T * ^U -> bool) (x,y))
 
             /// Static less-than-or-equal with static optimizations for some well-known cases.
@@ -4723,8 +4723,8 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "cgt.un" x y : bool #) 
                 when 'T : float32    = not (# "cgt.un" x y : bool #) 
                 when 'T : char       = not (# "cgt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = not (# "cgt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when 'T : decimal     = Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = not (# "cgt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (<=) : ^T * ^U -> bool) (x,y))
 
             /// Static greater-than-or-equal with static optimizations for some well-known cases.
@@ -4744,8 +4744,8 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "clt.un" x y : bool #) 
                 when 'T : float32    = not (# "clt.un" x y : bool #)
                 when 'T : char       = not (# "clt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
-                when ^T : string     = not (# "clt" (System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
+                when 'T : decimal     = Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string     = not (# "clt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (>=) : ^T * ^U -> bool) (x,y))
 
             /// Static greater-than-or-equal with static optimizations for some well-known cases.
@@ -4785,8 +4785,8 @@ namespace Microsoft.FSharp.Core
                 when ^T : char    = not (# "ceq" x y : bool #)
                 when ^T : nativeint  = not (# "ceq" x y : bool #)
                 when ^T : unativeint  = not (# "ceq" x y : bool #)
-                when ^T : string  = not (System.String.Equals((# "" x : string #),(# "" y : string #)))
-                when ^T : decimal     = System.Decimal.op_Inequality((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : string  = not (String.Equals((# "" x : string #),(# "" y : string #)))
+                when ^T : decimal     = Decimal.op_Inequality((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : ^T = (^T : (static member (<>) : ^T * ^T -> bool) (x,y))
 
             // static comparison (ER mode) with static optimizations for some well-known cases
@@ -4816,22 +4816,22 @@ namespace Microsoft.FSharp.Core
                                      else (# "ceq" e1 e1 : int #)
                  when ^T : char   = if (# "clt.un" e1 e2 : bool #) then (-1) else (# "cgt.un" e1 e2 : int #)
                  when ^T : string = 
-                     // NOTE: we don't have to null check here because System.String.CompareOrdinal
+                     // NOTE: we don't have to null check here because String.CompareOrdinal
                      // gives reliable results on null values.
-                     System.String.CompareOrdinal((# "" e1 : string #),(# "" e2 : string #))
-                 when ^T : decimal     = System.Decimal.Compare((# "" e1:decimal #), (# "" e2:decimal #))
+                     String.CompareOrdinal((# "" e1 : string #),(# "" e2 : string #))
+                 when ^T : decimal     = Decimal.Compare((# "" e1:decimal #), (# "" e2:decimal #))
 
             []
             let inline max (e1: ^T) (e2: ^T) = 
                 (if e1 < e2 then e2 else e1)
-                when ^T : float         = (System.Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-                when ^T : float32       = (System.Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+                when ^T : float         = (Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+                when ^T : float32       = (Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
             []
             let inline min (e1: ^T) (e2: ^T) = 
                 (if e1 < e2 then e1 else e2)
-                when ^T : float         = (System.Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-                when ^T : float32       = (System.Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+                when ^T : float         = (Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+                when ^T : float32       = (Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
             []
             let inline hash (value:'T) = 
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 139c48571ef..231c786daf6 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -403,9 +403,9 @@ type TypeReprEnv(reprs: Map, count: int, templateReplacement: (Ty
     static let empty = TypeReprEnv(count = 0, reprs = Map.empty, templateReplacement = None)
 
     /// Get the template replacement information used when using struct types for state machines based on a "template" struct
-    member __.TemplateReplacement = templateReplacement
+    member _.TemplateReplacement = templateReplacement
 
-    member __.WithTemplateReplacement(tcref, ilCloTyRef, cloFreeTyvars, templateTypeInst) =
+    member _.WithTemplateReplacement(tcref, ilCloTyRef, cloFreeTyvars, templateTypeInst) =
         TypeReprEnv(reprs, count, Some (tcref, ilCloTyRef, cloFreeTyvars, templateTypeInst)) 
 
     /// Lookup a type parameter
diff --git a/src/fsharp/InnerLambdasToTopLevelFuncs.fs b/src/fsharp/InnerLambdasToTopLevelFuncs.fs
index d364c7f42e5..13c9cda0b01 100644
--- a/src/fsharp/InnerLambdasToTopLevelFuncs.fs
+++ b/src/fsharp/InnerLambdasToTopLevelFuncs.fs
@@ -1047,7 +1047,7 @@ module Pass4_RewriteAssembly =
             let fHat_body = mkLetsFromBindings m shortRecBinds  fHat_body  // bind "f" if have short recursive calls (somewhere)
 
             // fHat binding, f rebinding
-            let fHatBind = mkMultiLambdaBind g fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body,rty)
+            let fHatBind = mkMultiLambdaBind g fHat letSeqPtOpt m fHat_tps fHat_args (fHat_body, rty)
             fHatBind
 
         let rebinds = binds |> List.map fRebinding
diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs
index 30ed77c7fbe..ef7158e34e4 100644
--- a/src/fsharp/NameResolution.fs
+++ b/src/fsharp/NameResolution.fs
@@ -130,8 +130,8 @@ let ActivePatternElemsOfModuleOrNamespace g (modref: ModuleOrNamespaceRef) : Nam
 /// Detect a use of a nominal type, including type abbreviations.
 ///
 /// When reporting symbols, we care about abbreviations, e.g. 'int' and 'int32' count as two separate symbols
-let (|AbbrevOrAppTy|_|) (ty: TType) = 
-    match stripTyparEqns ty with 
+let (|AbbrevOrAppTy|_|) (ty: TType) =
+    match stripTyparEqns ty with
     | TType_app (tcref, _, _) -> Some tcref
     | _ -> None
 
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index 3ba3ebd3109..02123d7da90 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -2549,16 +2549,15 @@ let CheckEntityDefn cenv env (tycon: Entity) =
                     elif g.checkNullness && not (TypeHasDefaultValueNew g m ty) then 
                         // Under F# 5.0 rules with checkNullness we can now give a warning for this case 
                         warning(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValueNulls(), m))
-        else
-            // These are the F# 4.5 rules, mistakenly only applied to structs
-            if tycon.IsStructOrEnumTycon then 
-                for f in tycon.AllInstanceFieldsAsList do
-                    let m = f.Range
-                    // Check if it's marked unsafe 
-                    let zeroInitUnsafe = TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute f.FieldAttribs
-                    if zeroInitUnsafe = Some true then
-                        if not (TypeHasDefaultValueOld g m ty) then 
-                            errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m))
+        // These are the F# 4.5 rules, mistakenly only applied to structs
+        elif tycon.IsStructOrEnumTycon then 
+            for f in tycon.AllInstanceFieldsAsList do
+                let m = f.Range
+                // Check if it's marked unsafe 
+                let zeroInitUnsafe = TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute f.FieldAttribs
+                if zeroInitUnsafe = Some true then
+                    if not (TypeHasDefaultValueOld g m ty) then 
+                        errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m))
 
         // Check type abbreviations
         match tycon.TypeAbbrev with                          
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index 4d34fee14e2..61a3e36d993 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -818,7 +818,6 @@ and ConvLValueArgs cenv env args =
 and ConvLValueExpr cenv env (expr: Expr) =
     EmitDebugInfoIfNecessary cenv env expr.Range (ConvLValueExprCore cenv env expr)
 
-// This function has to undo the work of mkExprAddrOfExpr 
 // This function has to undo the work of mkExprAddrOfExpr
 and ConvLValueExprCore cenv env expr =
     match expr with
@@ -990,8 +989,8 @@ and FilterMeasureTyargs tys =
 
 and ConvType cenv env m ty =
     let g = cenv.g
-    match stripTyEqnsAndMeasureEqns g ty with 
-    | TType_app(tcref, [tyarg],_) when isArrayTyconRef g tcref -> 
+    match stripTyEqnsAndMeasureEqns g ty with
+    | TType_app(tcref, [tyarg],_) when isArrayTyconRef g tcref ->
         QP.mkArrayTy(rankOfArrayTyconRef g tcref, ConvType cenv env m tyarg)
 
     | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations
@@ -1096,7 +1095,7 @@ and ConvDecisionTree cenv env tgs typR x =
                           let eR = ConvExpr cenv env e
                           // note: reverse the branches - a null test is a failure of an isinst test
                           QP.mkCond (QP.mkTypeTest (tyR, eR), acc, ConvDecisionTree cenv env tgs typR dtree)
-                      | _ -> 
+                      | _ ->
                           let ty = tyOfExpr cenv.g e1
                           let eq = mkCallEqualsOperator cenv.g m ty e1 (Expr.Const (Const.Zero, m, ty))
                           // no need to generate witnesses for generated equality operation calls, see https://github.com/dotnet/fsharp/issues/10389 
@@ -1182,7 +1181,7 @@ and ConvILTypeRef cenv (tr: ILTypeRef) =
             | _ -> tr.Scope.QualifiedName
 
         QP.Named(tr.BasicQualifiedName, assemblyRef)
-  
+
 and ConvVoidType cenv m = QP.mkILNamedTy(ConvTyconRef cenv cenv.g.system_Void_tcref m, [])
 
 and ConvILType cenv env m ty =
diff --git a/src/fsharp/SignatureConformance.fs b/src/fsharp/SignatureConformance.fs
index bd6e17a4338..9ddfebfc3de 100644
--- a/src/fsharp/SignatureConformance.fs
+++ b/src/fsharp/SignatureConformance.fs
@@ -220,7 +220,7 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) =
                 else
 
                 let aNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef implTycon))
-                let fNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef sigTycon))
+                let fNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef implTycon)) // TODO: should be sigTycon, raises extra errors
                 if aNull2 && not fNull2 then 
                     errorR(Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleImplementationSaysNull2(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m))
                     false
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index e89c17108e8..82ac1c4aafa 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -977,14 +977,14 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   override x.ToString() = ""
 
-  member __.ilg=ilg
+  member _.ilg=ilg
 
   /// A table of all intrinsics that the compiler cares about
-  member __.knownIntrinsics                = v_knownIntrinsics
+  member _.knownIntrinsics                = v_knownIntrinsics
 
-  member __.checkNullness = checkNullness
+  member _.checkNullness = checkNullness
 
-  member __.langFeatureNullness = v_langFeatureNullness
+  member _.langFeatureNullness = v_langFeatureNullness
 
   member g.knownWithoutNull = v_knownWithoutNull
 
@@ -1447,26 +1447,26 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   member val invalid_op_vref            = ValRefForIntrinsic v_invalid_op_info
   member val failwithf_vref             = ValRefForIntrinsic v_failwithf_info
 
-  member __.equals_operator_info        = v_equals_operator_info
-  member __.not_equals_operator         = v_not_equals_operator_info
-  member __.less_than_operator          = v_less_than_operator_info
-  member __.less_than_or_equals_operator = v_less_than_or_equals_operator_info
-  member __.greater_than_operator       = v_greater_than_operator_info
-  member __.greater_than_or_equals_operator = v_greater_than_or_equals_operator_info
-
-  member __.hash_info                  = v_hash_info
-  member __.box_info                   = v_box_info
-  member __.isnull_info                = v_isnull_info
-  member __.raise_info                 = v_raise_info
-  member __.failwith_info              = v_failwith_info
-  member __.invalid_arg_info           = v_invalid_arg_info
-  member __.null_arg_info              = v_null_arg_info
-  member __.invalid_op_info            = v_invalid_op_info
-  member __.failwithf_info             = v_failwithf_info
-  member __.reraise_info               = v_reraise_info
-  member __.methodhandleof_info        = v_methodhandleof_info
-  member __.typeof_info                = v_typeof_info
-  member __.typedefof_info             = v_typedefof_info
+  member _.equals_operator_info        = v_equals_operator_info
+  member _.not_equals_operator         = v_not_equals_operator_info
+  member _.less_than_operator          = v_less_than_operator_info
+  member _.less_than_or_equals_operator = v_less_than_or_equals_operator_info
+  member _.greater_than_operator       = v_greater_than_operator_info
+  member _.greater_than_or_equals_operator = v_greater_than_or_equals_operator_info
+
+  member _.hash_info                  = v_hash_info
+  member _.box_info                   = v_box_info
+  member _.isnull_info                = v_isnull_info
+  member _.raise_info                 = v_raise_info
+  member _.failwith_info              = v_failwith_info
+  member _.invalid_arg_info           = v_invalid_arg_info
+  member _.null_arg_info              = v_null_arg_info
+  member _.invalid_op_info            = v_invalid_op_info
+  member _.failwithf_info             = v_failwithf_info
+  member _.reraise_info               = v_reraise_info
+  member _.methodhandleof_info        = v_methodhandleof_info
+  member _.typeof_info                = v_typeof_info
+  member _.typedefof_info             = v_typedefof_info
 
   member val reraise_vref               = ValRefForIntrinsic v_reraise_info
   member val methodhandleof_vref        = ValRefForIntrinsic v_methodhandleof_info
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 1fbd995272b..9d8d683c27f 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -4092,7 +4092,7 @@ type TType =
     /// TType_app(tyconRef, typeInstantiation, nullness).
     ///
     /// Indicates the type is built from a named type and a number of type arguments
-    | TType_app of TyconRef * typeInstantiation: TypeInst * nullness: Nullness
+    | TType_app of tyconRef: TyconRef * typeInstantiation: TypeInst * nullness: Nullness
 
     /// TType_anon
     ///
@@ -4117,12 +4117,11 @@ type TType =
     | TType_ucase of unionCaseRef: UnionCaseRef * typeInstantiation: TypeInst
 
     /// Indicates the type is a variable type, whether declared, generalized or an inference type parameter  
-    | TType_var of Typar * nullness: Nullness
+    | TType_var of typar: Typar * nullness: Nullness
 
     /// Indicates the type is a unit-of-measure expression being used as an argument to a type or member
     | TType_measure of measure: Measure
 
-
     /// For now, used only as a discriminant in error message.
     /// See https://github.com/Microsoft/visualfsharp/issues/2561
     member x.GetAssemblyName() =
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index a632a8e5b2b..5ce363cb85f 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -3372,12 +3372,12 @@ let mkPrintfFormatTy (g: TcGlobals) aty bty cty dty ety = TType_app(g.format_tcr
 
 let mkOptionTy (g: TcGlobals) ty = TType_app (g.option_tcr_nice, [ty], g.knownWithoutNull)
 
-let mkListTy (g: TcGlobals) ty = TType_app (g.list_tcr_nice, [ty], g.knownWithoutNull)
-
 let mkValueOptionTy (g: TcGlobals) ty = TType_app (g.valueoption_tcr_nice, [ty], g.knownWithoutNull)
 
 let mkNullableTy (g: TcGlobals) ty = TType_app (g.system_Nullable_tcref, [ty], g.knownWithoutNull)
 
+let mkListTy (g: TcGlobals) ty = TType_app (g.list_tcr_nice, [ty], g.knownWithoutNull)
+
 let isValueOptionTy (g: TcGlobals) ty = 
     match tryTcrefOfAppTy g ty with 
     | ValueNone -> false
@@ -3607,7 +3607,8 @@ module DebugPrint =
     let stampL _n w = 
         w
 
-    let layoutTyconRef (tcref: TyconRef) = wordL (tagText tcref.DisplayNameWithStaticParameters) |> stampL tcref.Stamp
+    let layoutTyconRef (tcref: TyconRef) =
+        wordL (tagText tcref.DisplayNameWithStaticParameters) |> stampL tcref.Stamp
 
     let rec auxTypeL env ty = auxTypeWrapL env false ty
 
@@ -7391,13 +7392,13 @@ let mkCallArray3DSet (g: TcGlobals) m ty e1 idx1 idx2 idx3 v = mkApps g (typedEx
 
 let mkCallArray4DSet (g: TcGlobals) m ty e1 idx1 idx2 idx3 idx4 v = mkApps g (typedExprForIntrinsic g m g.array4D_set_info, [[ty]], [ e1 ; idx1; idx2; idx3; idx4; v ], m)
 
-let mkCallHash       (g: TcGlobals) m ty e1    = mkApps g (typedExprForIntrinsic g m g.hash_info,      [[ty]], [ e1 ], m)
+let mkCallHash (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.hash_info, [[ty]], [ e1 ], m)
 
-let mkCallBox        (g: TcGlobals) m ty e1    = mkApps g (typedExprForIntrinsic g m g.box_info,       [[ty]], [ e1 ], m)
+let mkCallBox (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.box_info, [[ty]], [ e1 ], m)
 
-let mkCallIsNull     (g: TcGlobals) m ty e1    = mkApps g (typedExprForIntrinsic g m g.isnull_info,    [[ty]], [ e1 ], m)
+let mkCallIsNull (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.isnull_info, [[ty]], [ e1 ], m)
 
-let mkCallRaise      (g: TcGlobals) m ty e1    = mkApps g (typedExprForIntrinsic g m g.raise_info,     [[ty]], [ e1 ], m)
+let mkCallRaise (g: TcGlobals) m ty e1 = mkApps g (typedExprForIntrinsic g m g.raise_info, [[ty]], [ e1 ], m)
 
 let mkCallNewDecimal (g: TcGlobals) m (e1, e2, e3, e4, e5) = mkApps g (typedExprForIntrinsic g m g.new_decimal_info, [], [ e1;e2;e3;e4;e5 ], m)
 
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index 11b1ed70a9d..8dbe3665a17 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -72,10 +72,6 @@ val valsOfBinds: Bindings -> Vals
 /// Look for a use of an F# value, possibly including application of a generic thing to a set of type arguments
 val (|ExprValWithPossibleTypeInst|_|): Expr -> (ValRef * ValUseFlag * TType list * range) option
 
-//-------------------------------------------------------------------------
-// Build decision trees imperatively
-//------------------------------------------------------------------------- 
-
 /// Build decision trees imperatively
 type MatchBuilder =
 
diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index e39cc37a45b..e06ed5a56d0 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -1668,7 +1668,7 @@ let p_tyar_constraint x st =
     | TyparConstraint.MayResolveMember(traitInfo, _) -> p_byte 1 st; p_trait traitInfo st
     | TyparConstraint.DefaultsTo(_, rty, _)           -> p_byte 2 st; p_ty rty st
     | TyparConstraint.SupportsNull _                -> p_byte 3 st
-    | TyparConstraint.IsNonNullableStruct _         -> p_byte 4 st 
+    | TyparConstraint.IsNonNullableStruct _         -> p_byte 4 st
     | TyparConstraint.IsReferenceType _             -> p_byte 5 st
     | TyparConstraint.RequiresDefaultConstructor _  -> p_byte 6 st
     | TyparConstraint.SimpleChoice(tys, _)           -> p_byte 7 st; p_tys tys st
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index 268ff05d654..16a438881c3 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -912,7 +912,7 @@ type LazyWithContext<'T, 'ctxt> =
 
       /// This field holds either the function to run or a LazyWithContextFailure object recording the exception raised 
       /// from running the function. It is null if the thunk has been evaluated successfully.
-      mutable funcOrException: obj 
+      mutable funcOrException: obj
 
       /// A helper to ensure we rethrow the "original" exception
       findOriginalException : exn -> exn }
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index b6aa8d8b712..9a96152df53 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -771,7 +771,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
     else
         queryableTypeGetMethodBySearch cenv emEnv parentT mref
 
-let nonQueryableTypeGetMethod (parentTI:Type) (methInfo : MethodInfo) : MethodInfo MaybeNull =
+let nonQueryableTypeGetMethod (parentTI: Type) (methInfo: MethodInfo) : MethodInfo MaybeNull =
     if (parentTI.IsGenericType &&
         not (equalTypes parentTI (getTypeConstructor parentTI)))
     then TypeBuilder.GetMethod(parentTI, methInfo )
@@ -813,10 +813,7 @@ let convMethodSpec cenv emEnv (mspec: ILMethodSpec) =
             methInfo
     methInfo
 
-//----------------------------------------------------------------------------
-// - QueryableTypeGetConstructors: get a constructor on a non-TypeBuilder type
-//----------------------------------------------------------------------------
-
+/// Get a constructor on a non-TypeBuilder type
 let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) : ConstructorInfo =
     let tyargTs  = getGenericArgumentsOfType parentT
     let reqArgTs  =
@@ -1236,15 +1233,15 @@ let rec emitInstr cenv (modB: ModuleBuilder) emEnv (ilG: ILGenerator) instr =
                     setArrayMethInfo shape.Rank ety
                 else
 #endif
-                    modB.GetArrayMethodAndLog(aty, "Set", CallingConventions.HasThis, null, Array.append (Array.create shape.Rank (typeof)) (Array.ofList [ ety ]))
+                    modB.GetArrayMethodAndLog(aty, "Set", CallingConventions.HasThis, null, Array.append (Array.create shape.Rank typeof) (Array.ofList [ ety ]))
             ilG.EmitAndLog (OpCodes.Call, meth)
 
     | I_newarr (shape, ty) ->
         if (shape = ILArrayShape.SingleDimensional)
         then ilG.EmitAndLog (OpCodes.Newarr, convType cenv emEnv ty)
         else
-            let aty = convType cenv emEnv  (ILType.Array(shape, ty))
-            let meth = modB.GetArrayMethodAndLog(aty, ".ctor", CallingConventions.HasThis, null, Array.create shape.Rank (typeof))
+            let aty = convType cenv emEnv (ILType.Array(shape, ty))
+            let meth = modB.GetArrayMethodAndLog(aty, ".ctor", CallingConventions.HasThis, null, Array.create shape.Rank typeof)
             ilG.EmitAndLog (OpCodes.Newobj, meth)
 
     | I_ldlen -> ilG.EmitAndLog OpCodes.Ldlen
diff --git a/src/fsharp/absil/ilsupp.fs b/src/fsharp/absil/ilsupp.fs
index ff925fbe9ec..2d51fed40b8 100644
--- a/src/fsharp/absil/ilsupp.fs
+++ b/src/fsharp/absil/ilsupp.fs
@@ -1014,13 +1014,16 @@ let pdbReadOpen (moduleName: string) (path: string) : PdbReader =
     let importerPtr = Marshal.GetComInterfaceForObject(o, typeof)
     try
 #if ENABLE_MONO_SUPPORT
-        // ISymWrapper.dll is not available as a compile-time dependency for the cross-platform compiler, since it is Windows-only 
-        // Access it via reflection instead.System.Diagnostics.SymbolStore.SymBinder 
-        let isym = System.Reflection.Assembly.Load("ISymWrapper, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") 
-        let symbolBinder = isym.CreateInstance("System.Diagnostics.SymbolStore.SymBinder") 
-        let symbolBinderTy = symbolBinder.GetType() 
-        let reader = symbolBinderTy.InvokeMember("GetReader",BindingFlags.Public ||| BindingFlags.InvokeMethod ||| BindingFlags.Instance,  null,symbolBinder,[| box importerPtr; box moduleName; box path |]) 
-        { symReader = reader :?> ISymbolReader } 
+        try
+            // ISymWrapper.dll is not available as a compile-time dependency for the cross-platform compiler, since it is Windows-only 
+            // Access it via reflection instead.System.Diagnostics.SymbolStore.SymBinder 
+            let isym = System.Reflection.Assembly.Load("ISymWrapper, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") 
+            let symbolBinder = isym.CreateInstance("System.Diagnostics.SymbolStore.SymBinder") 
+            let symbolBinderTy = symbolBinder.GetType() 
+            let reader = symbolBinderTy.InvokeMember("GetReader",BindingFlags.Public ||| BindingFlags.InvokeMethod ||| BindingFlags.Instance,  null,symbolBinder,[| box importerPtr; box moduleName; box path |]) 
+            { symReader = reader :?> ISymbolReader } 
+        with _ ->
+            { symReader = Unchecked.defaultof<_> }
 #else 
         let symbolBinder = new System.Diagnostics.SymbolStore.SymBinder()
         { symReader = symbolBinder.GetReader(importerPtr, moduleName, path) }
diff --git a/src/fsharp/import.fsi b/src/fsharp/import.fsi
index 595e563d3fc..81223a860f8 100644
--- a/src/fsharp/import.fsi
+++ b/src/fsharp/import.fsi
@@ -27,11 +27,7 @@ type AssemblyLoader =
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly.
-#if NO_CHECKNULLS
-    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
-#else
-    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
-#endif
+    abstract GetProvidedAssemblyInfo : CompilationThreadToken * range * Tainted -> bool * ProvidedAssemblyStaticLinkingMap option
 
     /// Record a root for a [] type to help guide static linking & type relocation
     abstract RecordGeneratedTypeRoot : ProviderGeneratedType -> unit
diff --git a/src/fsharp/service/ServiceLexing.fs b/src/fsharp/service/ServiceLexing.fs
index 5deb61a62de..6e709300d48 100644
--- a/src/fsharp/service/ServiceLexing.fs
+++ b/src/fsharp/service/ServiceLexing.fs
@@ -279,7 +279,7 @@ module internal TokenClassifications =
         | AMBIVALENT
         | TYPE_COMING_SOON | TYPE_IS_HERE | MODULE_COMING_SOON | MODULE_IS_HERE ->
             (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
-              
+
         | BEGIN ->
             (FSharpTokenColorKind.Keyword, FSharpTokenCharKind.Keyword, FSharpTokenTriggerClass.None)
 
diff --git a/src/fsharp/tainted.fsi b/src/fsharp/tainted.fsi
index 0bf4ca2bd30..f93efc0ebd0 100644
--- a/src/fsharp/tainted.fsi
+++ b/src/fsharp/tainted.fsi
@@ -101,7 +101,11 @@ type internal Tainted<'T> =
 module internal Tainted =
 
     /// Test whether the tainted value is null
-    val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice>
+#if NO_CHECKNULLS
+    val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice> when 'T : null and 'T : not struct
+#else
+    val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice> when 'T : not null
+#endif
 
     /// Test whether the tainted value equals given value. 
     /// Failure in call to equality operation will be blamed on type provider of first operand
diff --git a/src/fsharp/utils/FileSystem.fs b/src/fsharp/utils/FileSystem.fs
index d0dc8bf4076..c1d3e09111f 100644
--- a/src/fsharp/utils/FileSystem.fs
+++ b/src/fsharp/utils/FileSystem.fs
@@ -378,13 +378,6 @@ module MemoryMappedFileExtensions =
                     stream.Position <- stream.Position + length
                 )
 
-#if NO_CHECKNULLS
-[]
-module internal FileSystemHelpers =
-    // Shim to match nullness checking library support in preview
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-#endif
-
 []
 module internal FileSystemUtils =
     let checkPathForIllegalChars  =
diff --git a/tests/benchmarks/TaskPerf/async2.fs b/tests/benchmarks/TaskPerf/async2.fs
index f6dd2c96692..06938716ae1 100644
--- a/tests/benchmarks/TaskPerf/async2.fs
+++ b/tests/benchmarks/TaskPerf/async2.fs
@@ -33,7 +33,7 @@ type Async2StateMachineData<'T>() =
 and IAsync2Invokable<'T> =
     abstract StartImmediate: CancellationToken -> IAsync2Invocation<'T>
 
-and IAsync2Invocation<'T> =
+and [] IAsync2Invocation<'T> =
     inherit IAsyncStateMachine
     //abstract TailcallTarget: IAsync2Invocation<'T> 
     abstract CancellationToken: CancellationToken

From ad6299ebdcb3588330a4ac49a2fb9bb68b44fd0c Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 23:20:09 +0000
Subject: [PATCH 074/112] minimise diff

---
 src/fsharp/FSharp.Build/Fsc.fs               | 10 ----------
 src/fsharp/FSharp.Build/WriteCodeFragment.fs |  8 --------
 2 files changed, 18 deletions(-)

diff --git a/src/fsharp/FSharp.Build/Fsc.fs b/src/fsharp/FSharp.Build/Fsc.fs
index 5980d348cf7..823cb39cd91 100644
--- a/src/fsharp/FSharp.Build/Fsc.fs
+++ b/src/fsharp/FSharp.Build/Fsc.fs
@@ -130,12 +130,6 @@ type public Fsc () as this =
                 | "EMBEDDED" -> "embedded"
                 | "FULL"     -> "full"
                 | _          -> null)
-<<<<<<< HEAD
-        if embedAllSources then
-            builder.AppendSwitch("--embed+")
-        for item in embeddedFiles do
-            builder.AppendSwitchIfNotNull("--embed:", item.ItemSpec)
-=======
 
         if embedAllSources then
             builder.AppendSwitch("--embed+")
@@ -143,7 +137,6 @@ type public Fsc () as this =
         for item in embeddedFiles do
             builder.AppendSwitchIfNotNull("--embed:", item.ItemSpec)
 
->>>>>>> a9cb7dadedf48aa2084e8dddd794556e9c580790
         builder.AppendSwitchIfNotNull("--sourcelink:", sourceLink)
 
         builder.AppendSwitchIfNotNull("--langversion:", langVersion)
@@ -158,10 +151,7 @@ type public Fsc () as this =
         // DefineConstants
         for item in defineConstants do
             builder.AppendSwitchIfNotNull("--define:", item.ItemSpec)
-<<<<<<< HEAD
-=======
 
->>>>>>> a9cb7dadedf48aa2084e8dddd794556e9c580790
         // DocumentationFile
         builder.AppendSwitchIfNotNull("--doc:", documentationFile)
 
diff --git a/src/fsharp/FSharp.Build/WriteCodeFragment.fs b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
index 9f18cb9a889..65d9cf7ad9e 100644
--- a/src/fsharp/FSharp.Build/WriteCodeFragment.fs
+++ b/src/fsharp/FSharp.Build/WriteCodeFragment.fs
@@ -110,10 +110,6 @@ type WriteCodeFragment() =
                 match _outputFile with 
                 | Null -> failwith "Output location must be specified"
                 | NonNull outputFile -> 
-<<<<<<< HEAD
-
-=======
->>>>>>> a9cb7dadedf48aa2084e8dddd794556e9c580790
                 let boilerplate =
                     match _language.ToLowerInvariant() with
                     | "f#" -> "// \n//     Generated by the FSharp WriteCodeFragment class.\n// \nnamespace FSharp\n\nopen System\nopen System.Reflection\n"
@@ -125,10 +121,6 @@ type WriteCodeFragment() =
                 let code = Array.fold (fun (sb:StringBuilder) (item:ITaskItem) -> sb.AppendLine(WriteCodeFragment.GenerateAttribute (item, _language.ToLowerInvariant()))) sb _assemblyAttributes
 
                 if _language.ToLowerInvariant() = "f#" then code.AppendLine("do()") |> ignore
-<<<<<<< HEAD
-
-=======
->>>>>>> a9cb7dadedf48aa2084e8dddd794556e9c580790
                 let fileName = outputFile.ItemSpec
 
                 let outputFileItem =

From 77b648dba444b15cf691cd982ba43726789a1192 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 23:24:48 +0000
Subject: [PATCH 075/112] minimise diff

---
 src/fsharp/absil/illib.fsi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index 809783dbbba..a0bd3952f79 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -24,7 +24,7 @@ module internal PervasiveAutoOpens =
     val inline isSingleton: l:'a list -> bool
 
     /// Returns true if the argument is non-null.
-    val inline isNotNull: x:'T -> bool when 'a: null
+    val inline isNotNull: x:'T -> bool when 'T: null
 
 #if NO_CHECKNULLS
     /// Indicates that a type may be null. 'MaybeNull' is used internally in the F# compiler as 

From 9cb7754b1d567082d7ba3bcc36f1a8eac06cf56d Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 23:27:33 +0000
Subject: [PATCH 076/112] reverse change

---
 src/fsharp/FSharp.Core/prim-types.fs | 14 +++++---------
 1 file changed, 5 insertions(+), 9 deletions(-)

diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 3b78c44e273..88496ba2fc2 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -2354,7 +2354,9 @@ namespace Microsoft.FSharp.Core
             Convert.ToUInt64(s, 8)
 
         let inline removeUnderscores (s:string) =
-            s.Replace("_", "")
+            match s with
+            | null -> null
+            | s -> s.Replace("_", "")
 
         let ParseUInt32 (s:string) = 
             if System.Object.ReferenceEquals(s,null) then
@@ -2429,15 +2431,9 @@ namespace Microsoft.FSharp.Core
 
         let inline ParseUIntPtr (s:string) = (# "conv.ovf.u"  (ParseInt64 s)  : unativeint #)
 
-        let inline ParseDouble (s:string)   =
-            if Object.ReferenceEquals(s,null) then
-                raise( new ArgumentNullException("s") )
-            Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
+        let inline ParseDouble (s:string)   = Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
 
-        let inline ParseSingle (s:string) =
-            if Object.ReferenceEquals(s,null) then
-                raise( new ArgumentNullException("s") )
-            Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
+        let inline ParseSingle (s:string) = Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
             
         []
         type GenericZeroDynamicImplTable<'T>() = 

From e2f78c6f982016832855ac6fe6fd8d276100c8cc Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 23:45:41 +0000
Subject: [PATCH 077/112] merge

---
 src/fsharp/FSharp.Build/SubstituteText.fs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/fsharp/FSharp.Build/SubstituteText.fs b/src/fsharp/FSharp.Build/SubstituteText.fs
index 6b081078b64..441dba11df9 100644
--- a/src/fsharp/FSharp.Build/SubstituteText.fs
+++ b/src/fsharp/FSharp.Build/SubstituteText.fs
@@ -36,8 +36,7 @@ type SubstituteText () =
 
         member _.Execute() =
             copiedFiles.Clear()
-            if not(isNull embeddedResources) then
-                for item in embeddedResources do
+            for item in embeddedResources do
                     // Update ITaskItem metadata to point to new location
                     let sourcePath = item.GetMetadata("FullPath")
 

From d093cffaddcc9a9708b2f6f3fb7617e664edf320 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 8 Mar 2022 23:57:01 +0000
Subject: [PATCH 078/112] merge

---
 src/fsharp/absil/illib.fs  |  6 +++---
 src/fsharp/absil/illib.fsi | 10 +++++-----
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index 18fb63abd16..a1dace01b4a 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -37,12 +37,12 @@ module internal PervasiveAutoOpens =
     let inline isNotNull (x: 'T) = not (isNull x)
 
 #if NO_CHECKNULLS
-    type 'T MaybeNull when 'T : null and 'T: not struct = 'T
+    type 'T MaybeNull when 'T: null and 'T: not struct = 'T
 
     // Shim to match nullness checking library support in preview
-    let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
+    let inline (|NonNullQuick|) (x: 'T MaybeNull) = match x with null -> raise (NullReferenceException()) | v -> v
 
-    let inline nonNull<'T when 'T : null> (x: 'T) = x
+    let inline nonNull (x: 'T MaybeNull) = x
 
     let inline (|Null|NonNull|) (x: 'T MaybeNull) : Choice = match x with null -> Null | v -> NonNull v
 
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index a0bd3952f79..1680b23b4c7 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -29,19 +29,19 @@ module internal PervasiveAutoOpens =
 #if NO_CHECKNULLS
     /// Indicates that a type may be null. 'MaybeNull' is used internally in the F# compiler as 
     /// replacement for 'string?' to align with FS-1060.
-    type 'T MaybeNull when 'T : null and 'T: not struct = 'T
+    type 'T MaybeNull when 'T: null and 'T: not struct = 'T
 
     /// Asserts the argument is non-null and raises an exception if it is
-    val inline (|NonNullQuick|): 'T -> 'T when 'T : null
+    val inline (|NonNullQuick|): 'T MaybeNull -> 'T
 
     /// Match on the nullness of an argument.
-    val inline (|Null|NonNull|): 'T -> Choice when 'T : null
+    val inline (|Null|NonNull|): 'T MaybeNull -> Choice
 
     /// Asserts the argument is non-null and raises an exception if it is
-    val inline nonNull: x:'T -> 'T when 'T : null
+    val inline nonNull: x: 'T MaybeNull -> 'T
 
     /// Checks the argument is non-null
-    val inline nullArgCheck: paramName: string -> x: MaybeNull<'T> -> 'T    
+    val inline nullArgCheck: paramName: string -> x: 'T MaybeNull -> 'T    
 #else
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?'

From 6b7bcfe380156f42993319377cfc5dcf6e54d2cf Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 13:59:32 +0000
Subject: [PATCH 079/112] further cleanup

---
 src/fsharp/CheckDeclarations.fs               |  12 +-
 src/fsharp/CheckExpressions.fs                |  13 +-
 src/fsharp/CompilerDiagnostics.fs             |   6 +-
 src/fsharp/ConstraintSolver.fs                | 113 ++--
 src/fsharp/FSharp.Core/prim-types.fs          | 623 ++++++++++--------
 src/fsharp/IlxGen.fs                          |  24 +-
 src/fsharp/InfoReader.fs                      |   8 +-
 src/fsharp/MethodCalls.fs                     |   4 +-
 src/fsharp/NameResolution.fs                  |   4 +-
 src/fsharp/NicePrint.fs                       |  16 +-
 src/fsharp/Optimizer.fs                       | 433 ++++++------
 src/fsharp/PostInferenceChecks.fs             |  13 +-
 src/fsharp/QuotationTranslator.fs             |   8 +-
 src/fsharp/TcGlobals.fs                       | 481 +++++++-------
 src/fsharp/TypeRelations.fs                   |  12 +-
 src/fsharp/TypedTree.fs                       |  38 +-
 src/fsharp/TypedTreeBasics.fs                 |   4 +-
 src/fsharp/TypedTreeOps.fs                    | 402 ++++++-----
 src/fsharp/TypedTreePickle.fs                 | 112 +++-
 src/fsharp/absil/ilreflect.fs                 |  11 +-
 src/fsharp/fsi/fsi.fs                         |  31 +-
 src/fsharp/import.fs                          |  10 +-
 src/fsharp/infos.fs                           |   6 +-
 src/fsharp/service/FSharpCheckerResults.fs    |  14 +-
 src/fsharp/service/ItemKey.fs                 |  27 +-
 src/fsharp/service/SemanticClassification.fs  |   2 +-
 src/fsharp/service/ServiceDeclarationLists.fs |   8 +-
 src/fsharp/symbols/Exprs.fs                   |   4 +-
 src/fsharp/symbols/SymbolHelpers.fs           |  16 +-
 src/fsharp/symbols/Symbols.fs                 |  18 +-
 30 files changed, 1402 insertions(+), 1071 deletions(-)

diff --git a/src/fsharp/CheckDeclarations.fs b/src/fsharp/CheckDeclarations.fs
index 3813a41d660..e81a543474f 100644
--- a/src/fsharp/CheckDeclarations.fs
+++ b/src/fsharp/CheckDeclarations.fs
@@ -4249,7 +4249,7 @@ module EstablishTypeDefinitionCores =
                 | TType_anon (_,l) 
                 | TType_tuple (_, l) -> accInAbbrevTypes l acc
                 | TType_ucase (UnionCaseRef(tc, _), tinst) 
-                | TType_app (tc, tinst) -> 
+                | TType_app (tc, tinst, _) -> 
                     let tycon2 = tc.Deref
                     let acc = accInAbbrevTypes tinst acc
                     // Record immediate recursive references 
@@ -4262,7 +4262,7 @@ module EstablishTypeDefinitionCores =
                     else 
                         acc
 
-                | TType_fun (d, r) -> 
+                | TType_fun (d, r, _) -> 
                     accInAbbrevType d (accInAbbrevType r acc)
                 
                 | TType_var _ -> acc
@@ -4344,6 +4344,7 @@ module EstablishTypeDefinitionCores =
                 then
                     (tycon, tycon2) :: acc
                 else acc // note: all edges added are (tycon, _)
+
             let insertEdgeToType ty acc = 
                 match tryTcrefOfAppTy g ty with
                 | ValueSome tcref ->
@@ -4365,7 +4366,8 @@ module EstablishTypeDefinitionCores =
                     // This case was added to resolve issues/3916
                     ((doneTypes, acc), tinst2)
                     ||> List.fold (fun acc' x -> accStructFieldType structTycon structTyInst fspec x acc')
-                | TType_app (tcref2 , tinst2) when tcref2.IsStructOrEnumTycon ->
+
+                | TType_app (tcref2 , tinst2, _) when tcref2.IsStructOrEnumTycon ->
                     // The field is a struct.
                     // An edge (tycon, tycon2) should be recorded, unless it is the "static self-typed field" case.
                     let tycon2 = tcref2.Deref
@@ -4385,9 +4387,11 @@ module EstablishTypeDefinitionCores =
                     else
                         let acc = insertEdgeToTycon tycon2 acc // collect edge (tycon, tycon2), if tycon2 is initial.
                         accStructInstanceFields fieldTy tycon2 tinst2 (doneTypes, acc) // recurse through struct field looking for more edges
-                | TType_app (tcref2, tinst2) when tcref2.IsTypeAbbrev ->
+
+                | TType_app (tcref2, tinst2, _) when tcref2.IsTypeAbbrev ->
                     // The field is a type abbreviation. Expand and repeat.
                     accStructFieldType structTycon structTyInst fspec (reduceTyconRefAbbrev tcref2 tinst2) (doneTypes, acc)
+
                 | _ ->
                     doneTypes, acc
 
diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index f18059cbab1..3009d89b8d3 100644
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -1400,7 +1400,7 @@ let MakeAndPublishVal (cenv: cenv) env (altActualParent, inSig, declKind, vrec,
                 if MemberIsExplicitImpl g memberInfo then
                     let slotSig = List.head memberInfo.ImplementedSlotSigs
                     match slotSig.ImplementedType with
-                    | TType_app (tyconref, _) -> Some tyconref.Accessibility
+                    | TType_app (tyconref, _, _) -> Some tyconref.Accessibility
                     | _ -> None
                 else
                     None
@@ -1868,7 +1868,9 @@ let FreshenTyconRef (g: TcGlobals) m rigid (tcref: TyconRef) declaredTyconTypars
       tps |> List.iter (fun tp -> tp.SetRigidity rigid)
 
     let renaming, tinst = FixupNewTypars m [] [] tpsorig tps
-    (TType_app(tcref, List.map mkTyparTy tpsorig), tps, renaming, TType_app(tcref, tinst))
+    let origTy = TType_app(tcref, List.map mkTyparTy tpsorig, 0uy)
+    let instTy = TType_app(tcref, tinst, 0uy)
+    origTy, tps, renaming, instTy
 
 let FreshenPossibleForallTy g m rigid ty = 
     let tpsorig, tau = tryDestForallTy g ty
@@ -1883,8 +1885,7 @@ let FreshenPossibleForallTy g m rigid ty =
 let FreshenTyconRef2 (g: TcGlobals) m (tcref: TyconRef) = 
     ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     let tps, renaming, tinst = FreshenTypeInst m (tcref.Typars m)
-    tps, renaming, tinst, TType_app (tcref, tinst)
-
+    tps, renaming, tinst, TType_app (tcref, tinst, 0uy)
 
 /// Given a abstract method, which may be a generic method, freshen the type in preparation
 /// to apply it as a constraint to the method that implements the abstract slot
@@ -4803,7 +4804,7 @@ and TcNestedTypeApplication cenv newOk checkCxs occ env tpenv mWholeTypeApp ty p
         error(Error(FSComp.SR.tcTypeHasNoNestedTypes(), mWholeTypeApp))
 
     match ty with
-    | TType_app(tcref, _) ->
+    | TType_app(tcref, _, _) ->
         TcTypeApp cenv newOk checkCxs occ env tpenv mWholeTypeApp tcref pathTypeArgs tyargs
     | _ -> error(InternalError("TcNestedTypeApplication: expected type application", mWholeTypeApp))
 
@@ -8568,7 +8569,7 @@ and TcUnionCaseOrExnCaseOrActivePatternResultItemThen cenv overallTy env item tp
                             (currentIndex <> SEEN_NAMED_ARGUMENT) &&
                             (currentIndex < numArgTys) &&
                             match stripTyEqns g argTys.[currentIndex] with
-                            | TType_app(tcref, _) -> tyconRefEq g g.bool_tcr tcref || tyconRefEq g g.system_Bool_tcref tcref
+                            | TType_app(tcref, _, _) -> tyconRefEq g g.bool_tcr tcref || tyconRefEq g g.system_Bool_tcref tcref
                             | TType_var _ -> true
                             | _ -> false
 
diff --git a/src/fsharp/CompilerDiagnostics.fs b/src/fsharp/CompilerDiagnostics.fs
index 23257db8ec2..3dbc01ee44f 100644
--- a/src/fsharp/CompilerDiagnostics.fs
+++ b/src/fsharp/CompilerDiagnostics.fs
@@ -757,7 +757,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
 
               let retTy =
                   knownReturnType
-                  |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked()))
+                  |> Option.defaultValue (TType_var (Typar.NewUnlinked(), 0uy))
 
               let argRepr =
                   callerArgs.ArgumentNamesAndTypes
@@ -1326,7 +1326,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
               // we need to check if unit was used as a type argument
               let rec hasUnitTType_app (types: TType list) =
                   match types with
-                  | TType_app (maybeUnit, []) :: ts ->
+                  | TType_app (maybeUnit, [], _) :: ts ->
                       match maybeUnit.TypeAbbrev with
                       | Some ttype when isUnitTy g ttype -> true
                       | _ -> hasUnitTType_app ts
@@ -1334,7 +1334,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
                   | [] -> false
 
               match minfoVirt.ApparentEnclosingType with
-              | TType_app (t, types) when t.IsFSharpInterfaceTycon && hasUnitTType_app types ->
+              | TType_app (t, types, _) when t.IsFSharpInterfaceTycon && hasUnitTType_app types ->
                   // match abstract member with 'unit' passed as generic argument
                   os.Append(OverrideDoesntOverride4E().Format sig1) |> ignore
               | _ ->
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 04dfda8688d..df72178575d 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -109,7 +109,7 @@ let NewErrorMeasure () =
 let NewByRefKindInferenceType (g: TcGlobals) m = 
     let tp = Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, SynTypar(compgenId, TyparStaticReq.HeadType, true), false, TyparDynamicReq.No, [], false, false)
     if g.byrefkind_InOut_tcr.CanDeref then
-        tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, []), m)]
+        tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, [], 0uy), m)]
     mkTyparTy tp
 
 let NewInferenceTypes g l = l |> List.map (fun _ -> NewInferenceType g) 
@@ -358,15 +358,14 @@ let MakeConstraintSolverEnv contextInfo css m denv =
 let rec occursCheck g un ty = 
     match stripTyEqns g ty with 
     | TType_ucase(_, l)
-    | TType_app (_, l) 
+    | TType_app (_, l, _) 
     | TType_anon(_, l)
     | TType_tuple (_, l) -> List.exists (occursCheck g un) l
-    | TType_fun (d, r) -> occursCheck g un d || occursCheck g un r
-    | TType_var r   ->  typarEq un r 
+    | TType_fun (d, r, _) -> occursCheck g un d || occursCheck g un r
+    | TType_var (r, _) ->  typarEq un r 
     | TType_forall (_, tau) -> occursCheck g un tau
     | _ -> false 
 
-
 //-------------------------------------------------------------------------
 // Predicates on types
 //------------------------------------------------------------------------- 
@@ -837,13 +836,20 @@ let SimplifyMeasure g vars ms =
 let rec SimplifyMeasuresInType g resultFirst (generalizable, generalized as param) ty =
     match stripTyparEqns ty with 
     | TType_ucase(_, l)
-    | TType_app (_, l) 
+    | TType_app (_, l, _) 
     | TType_anon (_,l)
     | TType_tuple (_, l) -> SimplifyMeasuresInTypes g param l
 
-    | TType_fun (d, r) -> if resultFirst then SimplifyMeasuresInTypes g param [r;d] else SimplifyMeasuresInTypes g param [d;r]        
-    | TType_var _   -> param
+    | TType_fun (d, r, _) ->
+        if resultFirst then
+            SimplifyMeasuresInTypes g param [r;d]
+        else
+            SimplifyMeasuresInTypes g param [d;r]        
+
+    | TType_var _ -> param
+
     | TType_forall (_, tau) -> SimplifyMeasuresInType g resultFirst param tau
+
     | TType_measure unt -> 
         let generalizable', newlygeneralized = SimplifyMeasure g generalizable unt   
         match newlygeneralized with
@@ -875,11 +881,11 @@ let rec SimplifyMeasuresInConstraints g param cs =
 let rec GetMeasureVarGcdInType v ty =
     match stripTyparEqns ty with 
     | TType_ucase(_, l)
-    | TType_app (_, l) 
+    | TType_app (_, l, _) 
     | TType_anon (_,l)
     | TType_tuple (_, l) -> GetMeasureVarGcdInTypes v l
 
-    | TType_fun (d, r) -> GcdRational (GetMeasureVarGcdInType v d) (GetMeasureVarGcdInType v r)
+    | TType_fun (d, r, _) -> GcdRational (GetMeasureVarGcdInType v d) (GetMeasureVarGcdInType v r)
     | TType_var _   -> ZeroRational
     | TType_forall (_, tau) -> GetMeasureVarGcdInType v tau
     | TType_measure unt -> MeasureVarExponent v unt
@@ -1039,7 +1045,8 @@ and SolveTyparEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalT
     let m = csenv.m
     do! DepthCheck ndeep m
     match ty1 with 
-    | TType_var r | TType_measure (Measure.Var r) ->
+    | TType_var (r, _)
+    | TType_measure (Measure.Var r) ->
         do! SolveTyparEqualsTypePart1 csenv m2 trace ty1 r ty 
         do! SolveTyparEqualsTypePart2 csenv ndeep m2 trace r ty 
     | _ -> failwith "SolveTyparEqualsType"
@@ -1049,12 +1056,19 @@ and SolveTyparEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalT
 and SolveTyparsEqualTypes (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTrace) tptys tys = trackErrors {
     do! (tptys, tys) ||> Iterate2D (fun tpty ty -> 
             match tpty with 
-            | TType_var r | TType_measure (Measure.Var r) -> SolveTyparEqualsTypePart1 csenv m2 trace tpty r ty 
-            | _ -> failwith "SolveTyparsEqualTypes")
+            | TType_var (r, _)
+            | TType_measure (Measure.Var r) ->
+                SolveTyparEqualsTypePart1 csenv m2 trace tpty r ty 
+            | _ ->
+                failwith "SolveTyparsEqualTypes")
+
     do! (tptys, tys) ||> Iterate2D (fun tpty ty -> 
             match tpty with 
-            | TType_var r | TType_measure (Measure.Var r) -> SolveTyparEqualsTypePart2 csenv ndeep m2 trace r ty 
-            | _ -> failwith "SolveTyparsEqualTypes")
+            | TType_var (r, _)
+            | TType_measure (Measure.Var r) ->
+                SolveTyparEqualsTypePart2 csenv ndeep m2 trace r ty 
+            | _ ->
+                failwith "SolveTyparsEqualTypes")
  }
 
 and SolveAnonInfoEqualsAnonInfo (csenv: ConstraintSolverEnv) m2 (anonInfo1: AnonRecdTypeInfo) (anonInfo2: AnonRecdTypeInfo) = 
@@ -1120,40 +1134,50 @@ and SolveTypeEqualsType (csenv: ConstraintSolverEnv) ndeep m2 (trace: OptionalTr
     match sty1, sty2 with 
 
     // type vars inside forall-types may be alpha-equivalent 
-    | TType_var tp1, TType_var tp2 when typarEq tp1 tp2 || (match aenv.EquivTypars.TryFind tp1 with | Some v when typeEquiv g v ty2 -> true | _ -> false) ->
+    | TType_var (tp1, _), TType_var (tp2, _) when typarEq tp1 tp2 || (match aenv.EquivTypars.TryFind tp1 with | Some v when typeEquiv g v ty2 -> true | _ -> false) ->
         CompleteD
 
     // 'v1 = 'v2
-    | TType_var tp1, TType_var tp2 when PreferUnifyTypar tp1 tp2 ->
+    | TType_var (tp1, _), TType_var (tp2, _) when PreferUnifyTypar tp1 tp2 ->
         SolveTyparEqualsType csenv ndeep m2 trace sty1 ty2
 
     // 'v1 = 'v2
-    | TType_var tp1, TType_var tp2 when not csenv.MatchingOnly && PreferUnifyTypar tp2 tp1 ->
+    | TType_var (tp1, _), TType_var (tp2, _) when not csenv.MatchingOnly && PreferUnifyTypar tp2 tp1 ->
         SolveTyparEqualsType csenv ndeep m2 trace sty2 ty1
 
-    | TType_var r, _ when not (IsRigid csenv r) ->
+    | TType_var (r, _), _ when not (IsRigid csenv r) ->
         SolveTyparEqualsType csenv ndeep m2 trace sty1 ty2
 
-    | _, TType_var r when not csenv.MatchingOnly && not (IsRigid csenv r) ->
+    | _, TType_var (r, _) when not csenv.MatchingOnly && not (IsRigid csenv r) ->
         SolveTyparEqualsType csenv ndeep m2 trace sty2 ty1
 
     // Catch float<_>=float<1>, float32<_>=float32<1> and decimal<_>=decimal<1> 
-    | _, TType_app (tc2, [ms]) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms]))
-        -> SolveTypeEqualsType csenv ndeep m2 trace None ms (TType_measure Measure.One)
-    | TType_app (tc2, [ms]), _ when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms]))
-        -> SolveTypeEqualsType csenv ndeep m2 trace None ms (TType_measure Measure.One)
+    | _, TType_app (tc2, [ms], _) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) ->
+        SolveTypeEqualsType csenv ndeep m2 trace None ms (TType_measure Measure.One)
 
-    | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2  -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
-    | TType_app _, TType_app _   ->  localAbortD
-    | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2)      -> 
+    | TType_app (tc2, [ms], _), _ when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) ->
+        SolveTypeEqualsType csenv ndeep m2 trace None ms (TType_measure Measure.One)
+
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  ->
+        SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
+
+    | TType_app _, TType_app _ ->
+        localAbortD
+
+    | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2) -> 
         if evalTupInfoIsStruct tupInfo1 <> evalTupInfoIsStruct tupInfo2 then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m, m2)) else
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
 
-    | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2)      -> 
+    | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2) -> 
         SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> 
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2)
-    | TType_fun (d1, r1), TType_fun (d2, r2)   -> SolveFunTypeEqn csenv ndeep m2 trace None d1 d2 r1 r2
-    | TType_measure ms1, TType_measure ms2   -> UnifyMeasures csenv trace ms1 ms2
+
+    | TType_fun (d1, r1, _), TType_fun (d2, r2, _) ->
+        SolveFunTypeEqn csenv ndeep m2 trace None d1 d2 r1 r2
+
+    | TType_measure ms1, TType_measure ms2 ->
+        UnifyMeasures csenv trace ms1 ms2
+
     | TType_forall(tps1, rty1), TType_forall(tps2, rty2) -> 
         if tps1.Length <> tps2.Length then localAbortD else
         let aenv = aenv.BindEquivTypars tps1 tps2 
@@ -1213,16 +1237,17 @@ and SolveTypeSubsumesType (csenv: ConstraintSolverEnv) ndeep m2 (trace: Optional
     let denv = csenv.DisplayEnv
 
     match sty1, sty2 with 
-    | TType_var tp1, _ ->
+    | TType_var (tp1, _), _ ->
         match aenv.EquivTypars.TryFind tp1 with
         | Some v -> SolveTypeSubsumesType csenv ndeep m2 trace cxsln v ty2
         | _ ->
         match sty2 with
-        | TType_var r2 when typarEq tp1 r2 -> CompleteD
-        | TType_var r when not csenv.MatchingOnly -> SolveTyparSubtypeOfType csenv ndeep m2 trace r ty1
+        | TType_var (r2, _) when typarEq tp1 r2 -> CompleteD
+        | TType_var (r, _) when not csenv.MatchingOnly -> SolveTyparSubtypeOfType csenv ndeep m2 trace r ty1
         | _ ->  SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ty1 ty2
 
-    | _, TType_var r when not csenv.MatchingOnly -> SolveTyparSubtypeOfType csenv ndeep m2 trace r ty1
+    | _, TType_var (r, _) when not csenv.MatchingOnly ->
+        SolveTyparSubtypeOfType csenv ndeep m2 trace r ty1
 
     | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2)      -> 
         if evalTupInfoIsStruct tupInfo1 <> evalTupInfoIsStruct tupInfo2 then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m, m2)) else
@@ -1232,31 +1257,33 @@ and SolveTypeSubsumesType (csenv: ConstraintSolverEnv) ndeep m2 (trace: Optional
         SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> 
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2) (* nb. can unify since no variance *)
 
-    | TType_fun (d1, r1), TType_fun (d2, r2)   -> SolveFunTypeEqn csenv ndeep m2 trace cxsln d1 d2 r1 r2 (* nb. can unify since no variance *)
+    | TType_fun (d1, r1, _), TType_fun (d2, r2, _) ->
+        SolveFunTypeEqn csenv ndeep m2 trace cxsln d1 d2 r1 r2 (* nb. can unify since no variance *)
 
-    | TType_measure ms1, TType_measure ms2    -> UnifyMeasures csenv trace ms1 ms2
+    | TType_measure ms1, TType_measure ms2 ->
+        UnifyMeasures csenv trace ms1 ms2
 
     // Enforce the identities float=float<1>, float32=float32<1> and decimal=decimal<1> 
-    | _, TType_app (tc2, [ms]) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms]))
-        -> SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms (TType_measure Measure.One)
+    | _, TType_app (tc2, [ms], _) when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty1 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) ->
+        SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms (TType_measure Measure.One)
 
-    | TType_app (tc2, [ms]), _ when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms]))
-        -> SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms (TType_measure Measure.One)
+    | TType_app (tc2, [ms], _), _ when (tc2.IsMeasureableReprTycon && typeEquiv csenv.g sty2 (reduceTyconRefMeasureableOrProvided csenv.g tc2 [ms])) ->
+        SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ms (TType_measure Measure.One)
 
     // Special subsumption rule for byref tags
-    | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2  && g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tc1 ->
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  && g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tc1 ->
         match l1, l2 with 
         | [ h1; tag1 ], [ h2; tag2 ] -> trackErrors {
             do! SolveTypeEqualsType csenv ndeep m2 trace None h1 h2
             match stripTyEqnsA csenv.g canShortcut tag1, stripTyEqnsA csenv.g canShortcut tag2 with 
-            | TType_app(tagc1, []), TType_app(tagc2, []) 
+            | TType_app(tagc1, [], _), TType_app(tagc2, [], _) 
                 when (tyconRefEq g tagc2 g.byrefkind_InOut_tcr && 
                       (tyconRefEq g tagc1 g.byrefkind_In_tcr || tyconRefEq g tagc1 g.byrefkind_Out_tcr) ) -> ()
             | _ -> return! SolveTypeEqualsType csenv ndeep m2 trace cxsln tag1 tag2
            }
         | _ -> SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2
 
-    | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2  -> 
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  -> 
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln l1 l2
 
     | TType_ucase (uc1, l1), TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2  -> 
diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 88496ba2fc2..db6a2f7620f 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -211,7 +211,7 @@ namespace Microsoft.FSharp.Core
 
     []
     []
-    type FSharpInterfaceDataVersionAttribute(major:int,minor:int,release:int)  =
+    type FSharpInterfaceDataVersionAttribute(major:int,minor:int,release:int) =
         inherit Attribute()
         member _.Major = major
         member _.Minor = minor
@@ -223,7 +223,7 @@ namespace Microsoft.FSharp.Core
                                      variantNumber:int,
                                      sequenceNumber:int,
                                      resourceName:string,
-                                     typeDefinitions:System.Type[])  =
+                                     typeDefinitions:System.Type[]) =
         inherit Attribute()
         member _.SourceConstructFlags = sourceConstructFlags
         member _.SequenceNumber = sequenceNumber
@@ -237,7 +237,7 @@ namespace Microsoft.FSharp.Core
 
     []
     []
-    type CompilationSourceNameAttribute(sourceName:string)  =
+    type CompilationSourceNameAttribute(sourceName:string) =
         inherit Attribute()
         member _.SourceName = sourceName
 
@@ -487,7 +487,7 @@ namespace Microsoft.FSharp.Core
             let ty = typeof<'T>
             if ty.IsGenericType then ty.GetGenericTypeDefinition() else ty
         
-        let inline sizeof<'T>  =
+        let inline sizeof<'T> =
             (# "sizeof !0" type('T) : int #) 
 
         let inline unsafeDefault<'T> : 'T = (# "ilzero !0" type ('T) : 'T #)
@@ -572,7 +572,7 @@ namespace Microsoft.FSharp.Core
             // Byref usage checks prohibit type instantiations involving byrefs.
 
             []
-            let inline (~&)  (obj : 'T) : byref<'T>     = 
+            let inline (~&)  (obj : 'T) : byref<'T> = 
                 ignore obj // pretend the variable is used
                 let e = new System.ArgumentException(ErrorStrings.AddressOpNotFirstClassString) 
                 (# "throw" (e :> System.Exception) : byref<'T> #)
@@ -833,10 +833,10 @@ namespace Microsoft.FSharp.Core
             let PhysicalEqualityIntrinsic (x:'T) (y:'T) : bool when 'T : not struct = 
                 objEq (box x) (box y)
 
-            let inline PhysicalEqualityFast (x:'T) (y:'T) : bool when 'T : not struct  = 
+            let inline PhysicalEqualityFast (x:'T) (y:'T) : bool when 'T : not struct = 
                 PhysicalEqualityIntrinsic x y
           
-            let PhysicalHashIntrinsic (input: 'T) : int when 'T : not struct  = 
+            let PhysicalHashIntrinsic (input: 'T) : int when 'T : not struct = 
                 System.Runtime.CompilerServices.RuntimeHelpers.GetHashCode(box input)
 
             let inline PhysicalHashFast (input: 'T) = 
@@ -856,13 +856,13 @@ namespace Microsoft.FSharp.Core
             // so the test for nullness must be made on the caller side.
             //------------------------------------------------------------------------- 
 
-            let FailGenericComparison (obj: obj)  = 
+            let FailGenericComparison (obj: obj) = 
                 raise (new System.ArgumentException(String.Format(SR.GetString(SR.genericCompareFail1), obj.GetType().ToString())))
             
                
             /// This type has two instances - fsComparerER and fsComparerThrow.
-            ///   - fsComparerER  = ER semantics = no throw on NaN comparison = new GenericComparer(false) = GenericComparer = GenericComparison
-            ///   - fsComparerPER  = PER semantics = local throw on NaN comparison = new GenericComparer(true) = LessThan/GreaterThan etc.
+            ///   - fsComparerER = ER semantics = no throw on NaN comparison = new GenericComparer(false) = GenericComparer = GenericComparison
+            ///   - fsComparerPER = PER semantics = local throw on NaN comparison = new GenericComparer(true) = LessThan/GreaterThan etc.
             type GenericComparer(throwsOnPER:bool) = 
                 interface IComparer 
                 member  c.ThrowsOnPER = throwsOnPER
@@ -932,7 +932,7 @@ namespace Microsoft.FSharp.Core
                    | _ -> FailGenericComparison xobj
 
             /// specialcase: Core implementation of structural comparison on arbitrary arrays.
-            and GenericComparisonArbArrayWithComparer (comp:GenericComparer) (x:System.Array) (y:System.Array) : int  =
+            and GenericComparisonArbArrayWithComparer (comp:GenericComparer) (x:System.Array) (y:System.Array) : int =
                 if x.Rank = 1 && y.Rank = 1 then 
                     let lenx = x.LongLength
                     let leny = y.LongLength 
@@ -1039,7 +1039,7 @@ namespace Microsoft.FSharp.Core
                     override c.Compare(x:obj,y:obj) = GenericCompare c (x,y)
 
             /// The unique object for comparing values in PER mode (where local exceptions are thrown when NaNs are compared)
-            let fsComparerPER        = GenericComparer(true)  
+            let fsComparerPER = GenericComparer(true)  
 
             /// The unique object for comparing values in ER mode (where "0" is returned when NaNs are compared)
             let fsComparerER = GenericComparer(false) 
@@ -1085,7 +1085,7 @@ namespace Microsoft.FSharp.Core
                      // NOTE: we don't have to null check here because System.String.CompareOrdinal
                      // gives reliable results on null values.
                      System.String.CompareOrdinal((# "" x : string #),(# "" y : string #))
-                 when 'T : decimal     = System.Decimal.Compare((# "" x:decimal #), (# "" y:decimal #))
+                 when 'T : decimal  = System.Decimal.Compare((# "" x:decimal #), (# "" y:decimal #))
                  when 'T : DateTime = System.DateTime.Compare((# "" x : DateTime #), (# "" y : DateTime #))
 
 
@@ -1184,7 +1184,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float  = (# "clt" x y : bool #) 
                 when 'T : float32= (# "clt" x y : bool #) 
                 when 'T : char   = (# "clt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal = System.Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
                 when 'T : DateTime = DateTime.Compare((# "" x : DateTime #), (# "" y : DateTime #)) < 0
               
             /// Generic greater-than with static optimizations for some well-known cases.
@@ -1204,7 +1204,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = (# "cgt" x y : bool #) 
                 when 'T : float32    = (# "cgt" x y : bool #) 
                 when 'T : char       = (# "cgt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal    = System.Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
                 when 'T : DateTime = DateTime.Compare((# "" x : DateTime #), (# "" y : DateTime #)) > 0
 
             /// Generic less-than-or-equal with static optimizations for some well-known cases.
@@ -1224,7 +1224,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "cgt.un" x y : bool #) 
                 when 'T : float32    = not (# "cgt.un" x y : bool #) 
                 when 'T : char       = not(# "cgt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal    = System.Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
                 when 'T : DateTime = DateTime.Compare((# "" x : DateTime #), (# "" y : DateTime #)) <= 0
 
             /// Generic greater-than-or-equal with static optimizations for some well-known cases.
@@ -1244,7 +1244,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "clt.un" x y : bool #) 
                 when 'T : float32    = not (# "clt.un" x y : bool #)
                 when 'T : char       = not (# "clt" x y : bool #)
-                when 'T : decimal     = System.Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal    = System.Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
                 
                 when 'T : DateTime = DateTime.Compare((# "" x : DateTime #), (# "" y : DateTime #)) >= 0
 
@@ -1529,7 +1529,7 @@ namespace Microsoft.FSharp.Core
                         not (# "ceq" x x : bool #) && not (# "ceq" y y : bool #)
                   when 'T : char    = (# "ceq" x y : bool #)
                   when 'T : string  = System.String.Equals((# "" x : string #),(# "" y : string #))
-                  when 'T : decimal     = System.Decimal.op_Equality((# "" x:decimal #), (# "" y:decimal #))
+                  when 'T : decimal = System.Decimal.op_Equality((# "" x:decimal #), (# "" y:decimal #))
                   when 'T : DateTime = DateTime.Equals((# "" x : DateTime #), (# "" y : DateTime #))
                                
             /// Implements generic equality between two values, with PER semantics for NaN (so equality on two NaN values returns false)
@@ -1552,7 +1552,7 @@ namespace Microsoft.FSharp.Core
                   when 'T : nativeint  = (# "ceq" x y : bool #)
                   when 'T : unativeint  = (# "ceq" x y : bool #)
                   when 'T : string  = System.String.Equals((# "" x : string #),(# "" y : string #))
-                  when 'T : decimal     = System.Decimal.op_Equality((# "" x:decimal #), (# "" y:decimal #))
+                  when 'T : decimal = System.Decimal.op_Equality((# "" x:decimal #), (# "" y:decimal #))
                   when 'T : DateTime = DateTime.Equals((# "" x : DateTime #), (# "" y : DateTime #))
     
                   
@@ -1580,7 +1580,7 @@ namespace Microsoft.FSharp.Core
                   when 'T : nativeint  = (# "ceq" x y : bool #)
                   when 'T : unativeint  = (# "ceq" x y : bool #)
                   when 'T : string  = System.String.Equals((# "" x : string #),(# "" y : string #))                  
-                  when 'T : decimal     = System.Decimal.op_Equality((# "" x:decimal #), (# "" y:decimal #))
+                  when 'T : decimal = System.Decimal.op_Equality((# "" x:decimal #), (# "" y:decimal #))
                   when 'T : DateTime = DateTime.Equals((# "" x : DateTime #), (# "" y : DateTime #))
                   
 
@@ -2019,13 +2019,13 @@ namespace Microsoft.FSharp.Core
 
         let inline GenericMinimum (e1: 'T) (e2: 'T) = 
             if HashCompare.GenericLessThanFast e1 e2 then e1 else e2
-            when 'T : float         = (System.Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-            when 'T : float32       = (System.Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+            when 'T : float   = (Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+            when 'T : float32 = (Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
         let inline GenericMaximum (e1: 'T) (e2: 'T) = 
             if HashCompare.GenericLessThanFast e1 e2 then e2 else e1
-            when 'T : float         = (System.Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-            when 'T : float32       = (System.Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+            when 'T : float   = (Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+            when 'T : float32 = (Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
         let inline PhysicalEquality e1 e2 = HashCompare.PhysicalEqualityFast e1 e2
 
@@ -2055,14 +2055,14 @@ namespace Microsoft.FSharp.Core
         let inline MakeGenericEqualityComparer<'T>() = 
             // type-specialize some common cases to generate more efficient functions 
             { new IEqualityComparer<'T> with 
-                  member self.GetHashCode(x) = GenericHash x 
-                  member self.Equals(x,y) = GenericEquality x y }
+                  member _.GetHashCode(x) = GenericHash x 
+                  member _.Equals(x,y) = GenericEquality x y }
 
         let inline MakeGenericLimitedEqualityComparer<'T>(limit:int) = 
             // type-specialize some common cases to generate more efficient functions 
             { new IEqualityComparer<'T> with 
-                  member self.GetHashCode(x) = GenericLimitedHash limit x 
-                  member self.Equals(x,y) = GenericEquality x y }
+                  member _.GetHashCode(x) = GenericLimitedHash limit x 
+                  member _.Equals(x,y) = GenericEquality x y }
 
         let BoolIEquality    = MakeGenericEqualityComparer()
         let CharIEquality    = MakeGenericEqualityComparer()
@@ -2139,7 +2139,7 @@ namespace Microsoft.FSharp.Core
 
         let inline FastLimitedGenericEqualityComparer<'T>(limit) = MakeGenericLimitedEqualityComparer<'T>(limit) 
 
-        let inline MakeGenericComparer<'T>()  = 
+        let inline MakeGenericComparer<'T>() = 
             { new IComparer<'T> with 
                  member _.Compare(x,y) = GenericComparison x y }
 
@@ -2419,19 +2419,19 @@ namespace Microsoft.FSharp.Core
             | 'o' -> parseOctalUInt64  (s.Substring(p))
             | _ -> UInt64.Parse(s.Substring(p), NumberStyles.AllowLeadingSign, CultureInfo.InvariantCulture) 
 
-        let inline ParseByte (s:string)       = (# "conv.ovf.u1" (ParseUInt32 s) : byte #)
+        let inline ParseByte (s:string) = (# "conv.ovf.u1" (ParseUInt32 s) : byte #)
 
-        let inline ParseSByte (s:string)      = (# "conv.ovf.i1" (ParseInt32 s)  : sbyte #)
+        let inline ParseSByte (s:string) = (# "conv.ovf.i1" (ParseInt32 s)  : sbyte #)
 
-        let inline ParseInt16 (s:string)      = (# "conv.ovf.i2" (ParseInt32 s)  : int16 #)
+        let inline ParseInt16 (s:string) = (# "conv.ovf.i2" (ParseInt32 s)  : int16 #)
 
-        let inline ParseUInt16 (s:string)     = (# "conv.ovf.u2" (ParseUInt32 s) : uint16 #)
+        let inline ParseUInt16 (s:string) = (# "conv.ovf.u2" (ParseUInt32 s) : uint16 #)
 
-        let inline ParseIntPtr (s:string)  = (# "conv.ovf.i"  (ParseInt64 s)  : nativeint #)
+        let inline ParseIntPtr (s:string) = (# "conv.ovf.i"  (ParseInt64 s)  : nativeint #)
 
         let inline ParseUIntPtr (s:string) = (# "conv.ovf.u"  (ParseInt64 s)  : unativeint #)
 
-        let inline ParseDouble (s:string)   = Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
+        let inline ParseDouble (s:string) = Double.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
 
         let inline ParseSingle (s:string) = Single.Parse(removeUnderscores s,NumberStyles.Float, CultureInfo.InvariantCulture)
             
@@ -2608,6 +2608,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Addition" x y
 
         type OpSubtractionInfo = class end 
+
         let SubtractionDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, int32> then convPrim<_,'U> (# "sub" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U, float> then convPrim<_,'U> (# "sub" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2625,6 +2626,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Subtraction" x y
 
         type OpMultiplyInfo = class end
+
         let MultiplyDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U,  int32> then convPrim<_,'U> (# "mul" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U,  float> then convPrim<_,'U> (# "mul" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2642,6 +2644,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Multiply" x y
 
         type OpDivisionInfo = class end
+
         let DivisionDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U,int32> then convPrim<_,'U> (# "div" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U,float> then convPrim<_,'U> (# "div" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2659,6 +2662,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Division" x y
 
         type OpModulusInfo = class end
+
         let ModulusDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U  =
             if type3eq<'T1, 'T2, 'U, int32> then convPrim<_,'U> (# "rem" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U, float> then convPrim<_,'U> (# "rem" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2688,6 +2692,7 @@ namespace Microsoft.FSharp.Core
             else UnaryOpDynamicImplTable.Invoke "op_UnaryNegation" value
 
         type OpCheckedAdditionInfo = class end
+
         let CheckedAdditionDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, int32> then convPrim<_,'U> (# "add.ovf" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U, float> then convPrim<_,'U> (# "add" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2707,6 +2712,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Addition" x y
 
         type OpCheckedSubtractionInfo = class end
+
         let CheckedSubtractionDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, int32> then convPrim<_,'U> (# "sub.ovf" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U, float> then convPrim<_,'U> (# "sub" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2724,6 +2730,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Subtraction" x y
 
         type OpCheckedMultiplyInfo = class end
+
         let CheckedMultiplyDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, int32> then convPrim<_,'U> (# "mul.ovf" (convPrim<_,int32> x) (convPrim<_,int32> y) : int32 #) 
             elif type3eq<'T1, 'T2, 'U, float> then convPrim<_,'U> (# "mul" (convPrim<_,float> x) (convPrim<_,float> y) : float #) 
@@ -2741,6 +2748,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Multiply" x y
 
         type OpCheckedUnaryNegationInfo = class end
+
         let CheckedUnaryNegationDynamic<'T,'U> value =
             if type2eq<'T, 'U, int32> then convPrim<_,'U> (# "sub.ovf" 0 (convPrim<_,int32> value) : int32 #) 
             elif type2eq<'T, 'U, float> then convPrim<_,'U> (# "neg" (convPrim<_,float> value) : float #) 
@@ -2753,6 +2761,7 @@ namespace Microsoft.FSharp.Core
             else UnaryOpDynamicImplTable.Invoke "op_UnaryNegation" value
 
         type OpLeftShiftInfo = class end
+
         let LeftShiftDynamic<'T1, 'T2, 'U> (value: 'T1) (shift: 'T2) : 'U =
             if type2eq<'T1, 'U, sbyte> && typeeq<'T2, int> then convPrim<_,'U> (# "conv.i1" (# "shl" (convPrim<_,sbyte> value) (mask (convPrim<_,int32> shift) 7) : int32 #) : sbyte #)
             elif type2eq<'T1, 'U, byte> && typeeq<'T2, int> then convPrim<_,'U> (# "conv.u1" (# "shl" (convPrim<_,byte> value) (mask (convPrim<_,int32> shift) 7) : uint32 #) : byte #)
@@ -2767,6 +2776,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_LeftShift" value shift
 
         type OpRightShiftInfo = class end
+
         let RightShiftDynamic<'T1, 'T2, 'U> (value: 'T1) (shift: 'T2) : 'U =
             if type2eq<'T1, 'U, sbyte> && typeeq<'T2, int> then convPrim<_,'U> (# "shr" (convPrim<_,sbyte> value) (mask (convPrim<_,int32> shift) 7) : sbyte #)
             elif type2eq<'T1, 'U, byte> && typeeq<'T2, int> then convPrim<_,'U> (# "shr.un" (convPrim<_,byte> value) (mask (convPrim<_,int32> shift) 7) : byte #)
@@ -2781,6 +2791,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_RightShift" value shift
 
         type OpBitwiseAndInfo = class end
+
         let BitwiseAndDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, sbyte> then convPrim<_,'U> (# "and" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : sbyte #)
             elif type3eq<'T1, 'T2, 'U, byte> then convPrim<_,'U> (# "and" (convPrim<_,byte> x) (convPrim<_,byte> y) : byte #)
@@ -2795,6 +2806,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_BitwiseAnd" x y
 
         type OpBitwiseOrInfo = class end
+
         let BitwiseOrDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, sbyte> then convPrim<_,'U> (# "or" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : sbyte #)
             elif type3eq<'T1, 'T2, 'U, byte> then convPrim<_,'U> (# "or" (convPrim<_,byte> x) (convPrim<_,byte> y) : byte #)
@@ -2809,6 +2821,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_BitwiseOr" x y
 
         type OpExclusiveOrInfo = class end
+
         let ExclusiveOrDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type3eq<'T1, 'T2, 'U, sbyte> then convPrim<_,'U> (# "xor" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : sbyte #)
             elif type3eq<'T1, 'T2, 'U, byte> then convPrim<_,'U> (# "xor" (convPrim<_,byte> x) (convPrim<_,byte> y) : byte #)
@@ -2823,6 +2836,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_ExclusiveOr" x y
 
         type OpLogicalNotInfo = class end
+
         let LogicalNotDynamic<'T,'U> (value: 'T) : 'U =
             if type2eq<'T, 'U, sbyte> then convPrim<_,'U> (# "conv.i1" (# "not" (convPrim<_,sbyte> value) : int32 #) : sbyte #)
             elif type2eq<'T, 'U, byte> then convPrim<_,'U> (# "conv.u1" (# "not" (convPrim<_,byte> value) : uint32 #) : byte #)
@@ -2837,6 +2851,7 @@ namespace Microsoft.FSharp.Core
             else UnaryOpDynamicImplTable.Invoke "op_LogicalNot" value
 
         type OpExplicitInfo = class end
+
         let ExplicitDynamic<'T, 'U> (value: 'T) : 'U =
             if typeeq<'U, byte> then 
                 if typeeq<'T, sbyte> then convPrim<_,'U> (# "conv.u1" (convPrim<_,sbyte> value) : byte #)
@@ -3068,6 +3083,7 @@ namespace Microsoft.FSharp.Core
                 UnaryOpDynamicImplTable.Invoke "op_Explicit" value
 
         type OpLessThanInfo = class end
+
         let LessThanDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type2eq<'T1, 'T2, sbyte> && typeeq<'U, bool> then convPrim<_,'U> (# "clt" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : bool #)
             elif type2eq<'T1, 'T2, byte> && typeeq<'U, bool> then convPrim<_,'U> (# "clt.un" (convPrim<_,byte> x) (convPrim<_,byte> y) : bool #)
@@ -3087,6 +3103,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_LessThan" x y
 
         type OpGreaterThanInfo = class end
+
         let GreaterThanDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type2eq<'T1, 'T2, sbyte> && typeeq<'U, bool> then convPrim<_,'U> (# "cgt" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : bool #)
             elif type2eq<'T1, 'T2, byte> && typeeq<'U, bool> then convPrim<_,'U> (# "cgt.un" (convPrim<_,byte> x) (convPrim<_,byte> y) : bool #)
@@ -3106,6 +3123,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_GreaterThan" x y
 
         type OpLessThanOrEqualInfo = class end
+
         let LessThanOrEqualDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type2eq<'T1, 'T2, sbyte> && typeeq<'U, bool> then convPrim<_,'U> (not (# "cgt" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : bool #))
             elif type2eq<'T1, 'T2, byte> && typeeq<'U, bool> then convPrim<_,'U> (not (# "cgt.un" (convPrim<_,byte> x) (convPrim<_,byte> y) : bool #))
@@ -3125,6 +3143,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_LessThanOrEqual" x y
 
         type OpGreaterThanOrEqualInfo = class end
+
         let GreaterThanOrEqualDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type2eq<'T1, 'T2, sbyte> && typeeq<'U, bool> then convPrim<_,'U> (not (# "clt" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : bool #))
             elif type2eq<'T1, 'T2, byte> && typeeq<'U, bool> then convPrim<_,'U> (not (# "clt.un" (convPrim<_,byte> x) (convPrim<_,byte> y) : bool #))
@@ -3144,6 +3163,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_GreaterThanOrEqual" x y
 
         type OpEqualityInfo = class end
+
         let EqualityDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type2eq<'T1, 'T2, sbyte> && typeeq<'U, bool> then convPrim<_,'U> (# "ceq" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : bool #)
             elif type2eq<'T1, 'T2, byte> && typeeq<'U, bool> then convPrim<_,'U> (# "ceq" (convPrim<_,byte> x) (convPrim<_,byte> y) : bool #)
@@ -3163,6 +3183,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Equality" x y
 
         type OpInequalityInfo = class end
+
         let InequalityDynamic<'T1, 'T2, 'U> (x: 'T1) (y: 'T2) : 'U =
             if type2eq<'T1, 'T2, sbyte> && typeeq<'U, bool> then convPrim<_,'U> (not (# "ceq" (convPrim<_,sbyte> x) (convPrim<_,sbyte> y) : bool #))
             elif type2eq<'T1, 'T2, byte> && typeeq<'U, bool> then convPrim<_,'U> (not (# "ceq" (convPrim<_,byte> x) (convPrim<_,byte> y) : bool #))
@@ -3182,6 +3203,7 @@ namespace Microsoft.FSharp.Core
             else BinaryOpDynamicImplTable.Invoke "op_Inequality" x y
 
         type DivideByIntInfo = class end
+
         let DivideByIntDynamic<'T> (x: 'T) (n: int) : 'T =
             if typeeq<'T, float> then convPrim<_,'T> (# "div" (convPrim<_,float> x) (# "conv.r8" n : float #) : float #)
             elif typeeq<'T, float32> then convPrim<_,'T> (# "div" (convPrim<_,float32> x) (# "conv.r4" n : float32 #) : float32 #) 
@@ -3211,64 +3233,58 @@ namespace Microsoft.FSharp.Core
     []
     []
     type Choice<'T1,'T2> = 
-      | Choice1Of2 of 'T1 
-      | Choice2Of2 of 'T2
+        | Choice1Of2 of 'T1 
+        | Choice2Of2 of 'T2
     
     []
     []
     type Choice<'T1,'T2,'T3> = 
-      | Choice1Of3 of 'T1 
-      | Choice2Of3 of 'T2
-      | Choice3Of3 of 'T3
+        | Choice1Of3 of 'T1 
+        | Choice2Of3 of 'T2
+        | Choice3Of3 of 'T3
     
     []
     []
     type Choice<'T1,'T2,'T3,'T4> = 
-      | Choice1Of4 of 'T1 
-      | Choice2Of4 of 'T2
-      | Choice3Of4 of 'T3
-      | Choice4Of4 of 'T4
+        | Choice1Of4 of 'T1 
+        | Choice2Of4 of 'T2
+        | Choice3Of4 of 'T3
+        | Choice4Of4 of 'T4
     
     []
     []
     type Choice<'T1,'T2,'T3,'T4,'T5> = 
-      | Choice1Of5 of 'T1 
-      | Choice2Of5 of 'T2
-      | Choice3Of5 of 'T3
-      | Choice4Of5 of 'T4
-      | Choice5Of5 of 'T5
+        | Choice1Of5 of 'T1 
+        | Choice2Of5 of 'T2
+        | Choice3Of5 of 'T3
+        | Choice4Of5 of 'T4
+        | Choice5Of5 of 'T5
     
     []
     []
     type Choice<'T1,'T2,'T3,'T4,'T5,'T6> = 
-      | Choice1Of6 of 'T1
-      | Choice2Of6 of 'T2
-      | Choice3Of6 of 'T3
-      | Choice4Of6 of 'T4
-      | Choice5Of6 of 'T5
-      | Choice6Of6 of 'T6
+        | Choice1Of6 of 'T1
+        | Choice2Of6 of 'T2
+        | Choice3Of6 of 'T3
+        | Choice4Of6 of 'T4
+        | Choice5Of6 of 'T5
+        | Choice6Of6 of 'T6
     
     []
     []
     type Choice<'T1,'T2,'T3,'T4,'T5,'T6,'T7> = 
-      | Choice1Of7 of 'T1
-      | Choice2Of7 of 'T2
-      | Choice3Of7 of 'T3
-      | Choice4Of7 of 'T4
-      | Choice5Of7 of 'T5
-      | Choice6Of7 of 'T6
-      | Choice7Of7 of 'T7
+        | Choice1Of7 of 'T1
+        | Choice2Of7 of 'T2
+        | Choice3Of7 of 'T3
+        | Choice4Of7 of 'T4
+        | Choice5Of7 of 'T5
+        | Choice6Of7 of 'T6
+        | Choice7Of7 of 'T7
           
-    //-------------------------------------------------------------------------
-    // F#-specific Exceptions
-
     []
     exception MatchFailureException of string * int * int with 
         override x.Message  = SR.GetString(SR.matchCasesIncomplete)
 
-    //-------------------------------------------------------------------------
-    // Function Values
-
     []
     type FSharpTypeFunc [] () = 
         abstract Specialize<'T> : unit -> obj
@@ -3289,8 +3305,9 @@ namespace Microsoft.FSharp.Core
                   // Does it take two arguments without side effect?
                   | :? FSharpFunc<'T,'U,'V> as f -> f
 
-                  | _ -> { new FSharpFunc<'T,'U,'V>() with 
-                              member _.Invoke(t,u) = (retype func : FSharpFunc<'T,FSharpFunc<'U,'V>>).Invoke(t).Invoke(u) }
+                  | _ ->
+                      { new FSharpFunc<'T,'U,'V>() with 
+                          member _.Invoke(t,u) = (retype func : FSharpFunc<'T,FSharpFunc<'U,'V>>).Invoke(t).Invoke(u) }
 
           []
           type FSharpFunc<'T,'U,'V,'W> [] () = 
@@ -3300,15 +3317,17 @@ namespace Microsoft.FSharp.Core
               static member Adapt(func : 'T -> 'U -> 'V -> 'W) = 
                   match box func with 
                   // Does it take three arguments without side effect?
-                  | :? FSharpFunc<'T,'U,'V,'W> as f -> f
+                  | :? FSharpFunc<'T,'U,'V,'W> as f ->
+                      f
 
                   // Does it take two arguments without side effect?
                   | :? FSharpFunc<'T,'U,FSharpFunc<'V,'W>> as f ->
-                         { new FSharpFunc<'T,'U,'V,'W>() with 
-                              member _.Invoke(t,u,v) = f.Invoke(t,u).Invoke(v) }
+                      { new FSharpFunc<'T,'U,'V,'W>() with 
+                           member _.Invoke(t,u,v) = f.Invoke(t,u).Invoke(v) }
 
-                  | _ -> { new FSharpFunc<'T,'U,'V,'W>() with 
-                              member _.Invoke(t,u,v) = (retype func : FSharpFunc<'T,('U -> 'V -> 'W)>).Invoke(t) u v }
+                  | _ ->
+                      { new FSharpFunc<'T,'U,'V,'W>() with 
+                          member _.Invoke(t,u,v) = (retype func : FSharpFunc<'T,('U -> 'V -> 'W)>).Invoke(t) u v }
 
           []
           type FSharpFunc<'T,'U,'V,'W,'X> [] () = 
@@ -3321,23 +3340,28 @@ namespace Microsoft.FSharp.Core
 
                   // Does it take three arguments without side effect?
                   | :? FSharpFunc<'T,'U,'V,FSharpFunc<'W,'X>> as f ->
-                         { new FSharpFunc<'T,'U,'V,'W,'X>() with 
-                              member _.Invoke(t,u,v,w) = f.Invoke(t,u,v).Invoke(w) }
+                      { new FSharpFunc<'T,'U,'V,'W,'X>() with 
+                          member _.Invoke(t,u,v,w) = f.Invoke(t,u,v).Invoke(w) }
 
                   // Does it take two arguments without side effect?
                   | :? FSharpFunc<'T,'U,('V -> 'W -> 'X)> as f ->
-                         { new FSharpFunc<'T,'U,'V,'W,'X>() with 
-                              member _.Invoke(t,u,v,w) = f.Invoke(t,u) v w }
+                      { new FSharpFunc<'T,'U,'V,'W,'X>() with 
+                          member _.Invoke(t,u,v,w) = f.Invoke(t,u) v w }
+
+                  | _ ->
+                      { new FSharpFunc<'T,'U,'V,'W,'X>() with 
+                          member _.Invoke(t,u,v,w) = ((retype func : FSharpFunc<'T,('U -> 'V -> 'W -> 'X)>).Invoke(t)) u v w   }
 
-                  | _ -> { new FSharpFunc<'T,'U,'V,'W,'X>() with 
-                              member _.Invoke(t,u,v,w) = ((retype func : FSharpFunc<'T,('U -> 'V -> 'W -> 'X)>).Invoke(t)) u v w   }
               override f.Invoke(t) = (fun u v w -> f.Invoke(t,u,v,w))
 
           []
           type FSharpFunc<'T,'U,'V,'W,'X,'Y> [] () =
               inherit FSharpFunc<'T,('U -> 'V -> 'W -> 'X -> 'Y)>()
+
               abstract Invoke : 'T * 'U * 'V * 'W * 'X -> 'Y
+
               override f.Invoke(t) = (fun u v w x -> f.Invoke(t,u,v,w,x))
+
               static member Adapt(func : 'T -> 'U -> 'V -> 'W -> 'X -> 'Y) = 
                   match box func with 
 
@@ -3346,39 +3370,40 @@ namespace Microsoft.FSharp.Core
 
                   // Does it take four arguments without side effect?
                   | :? FSharpFunc<'T,'U,'V,'W,FSharpFunc<'X,'Y>> as f ->
-                         { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
-                              member ff.Invoke(t,u,v,w,x) = f.Invoke(t,u,v,w).Invoke(x) }
+                      { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
+                          member ff.Invoke(t,u,v,w,x) = f.Invoke(t,u,v,w).Invoke(x) }
 
                   // Does it take three arguments without side effect?
                   | :? FSharpFunc<'T,'U,'V,('W -> 'X -> 'Y)> as f ->
-                         { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
-                              member ff.Invoke(t,u,v,w,x) = f.Invoke(t,u,v) w x }
+                      { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
+                          member ff.Invoke(t,u,v,w,x) = f.Invoke(t,u,v) w x }
 
                   // Does it take two arguments without side effect?
                   | :? FSharpFunc<'T,'U,('V -> 'W -> 'X -> 'Y)> as f ->
-                         { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
-                              member ff.Invoke(t,u,v,w,x) = f.Invoke(t,u) v w x }
+                      { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
+                          member ff.Invoke(t,u,v,w,x) = f.Invoke(t,u) v w x }
 
-                  | _ -> { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
-                              member ff.Invoke(t,u,v,w,x) = ((retype func : FSharpFunc<'T,('U -> 'V -> 'W -> 'X -> 'Y)>).Invoke(t)) u v w x  }
+                  | _ ->
+                      { new FSharpFunc<'T,'U,'V,'W,'X,'Y>() with 
+                          member ff.Invoke(t,u,v,w,x) = ((retype func : FSharpFunc<'T,('U -> 'V -> 'W -> 'X -> 'Y)>).Invoke(t)) u v w x  }
           
           let inline invokeFast2((f1 : FSharpFunc<'T,('U -> 'V)>), t,u) =
               match f1 with
               | :? FSharpFunc<'T,'U,'V> as f2 -> f2.Invoke(t,u)
-              | _                            -> (f1.Invoke(t)) u     
+              | _ -> (f1.Invoke(t)) u     
           
           let inline invokeFast3((f1 : FSharpFunc<'T,('U -> 'V -> 'W)>), t,u,v) =
                match f1 with
                | :? FSharpFunc<'T,'U,'V,'W>      as f3 -> f3.Invoke(t,u,v)
                | :? FSharpFunc<'T,'U,('V -> 'W)> as f2 -> (f2.Invoke(t,u)) v
-               | _                                    -> (f1.Invoke(t)) u v
+               | _ -> (f1.Invoke(t)) u v
                
           let inline invokeFast4((f1 : FSharpFunc<'T,('U -> 'V -> 'W -> 'X)>), t,u,v,w) =
                match f1 with
                | :? FSharpFunc<'T,'U,'V,'W,'X>         as f4 -> f4.Invoke(t,u,v,w)
                | :? FSharpFunc<'T,'U,'V,('W -> 'X)>    as f3 -> (f3.Invoke(t,u,v)) w
                | :? FSharpFunc<'T,'U,('V -> 'W -> 'X)> as f2 -> (f2.Invoke(t,u)) v w
-               | _                                          -> (f1.Invoke(t)) u v w
+               | _ -> (f1.Invoke(t)) u v w
 
           let inline invokeFast5((f1 : FSharpFunc<'T,('U -> 'V -> 'W -> 'X -> 'Y)>), t,u,v,w,x) =
                match f1 with
@@ -3386,8 +3411,7 @@ namespace Microsoft.FSharp.Core
                | :? FSharpFunc<'T,'U,'V,'W,('X -> 'Y)>        as f4 -> (f4.Invoke(t,u,v,w)) x
                | :? FSharpFunc<'T,'U,'V,('W -> 'X -> 'Y)>     as f3 -> (f3.Invoke(t,u,v)) w x
                | :? FSharpFunc<'T,'U,('V -> 'W -> 'X -> 'Y)>  as f2 -> (f2.Invoke(t,u)) v w x
-               | _                                                 -> (f1.Invoke(t)) u v w x
-
+               | _ -> (f1.Invoke(t)) u v w x
 
     type FSharpFunc<'T,'Res> with
 
@@ -3638,13 +3662,17 @@ namespace Microsoft.FSharp.Collections
     module PrivateListHelpers = 
 
         let notStarted() = raise (new InvalidOperationException(SR.GetString(SR.enumerationNotStarted)))
+
         let alreadyFinished() = raise (new InvalidOperationException(SR.GetString(SR.enumerationAlreadyFinished)))
+
         let outOfRange() = raise (IndexOutOfRangeException(SR.GetString(SR.indexOutOfBounds)))
 
         let nonempty x = match x with [] -> false | _ -> true
-        // optimized mutation-based implementation. This code is only valid in fslib, where mutation of private
+
+        // Optimized mutation-based implementation. This code is only valid in fslib, where mutation of private
         // tail cons cells is permitted in carefully written library code.
         let inline setFreshConsTail cons t = cons.( :: ).1 <- t
+
         let inline freshConsNoTail h = h :: (# "ldnull" : 'T list #)
 
         // Return the last cons it the chain
@@ -3700,9 +3728,9 @@ namespace Microsoft.FSharp.Collections
             match l with 
             | [] -> raise (new ArgumentException(SR.GetString(SR.indexOutOfBounds),"n"))
             | h :: t -> 
-               if n < 0 then raise (new ArgumentException((SR.GetString(SR.inputMustBeNonNegative)),"n"))
-               elif n = 0 then h
-               else nth t (n - 1)
+                if n < 0 then raise (new ArgumentException((SR.GetString(SR.inputMustBeNonNegative)),"n"))
+                elif n = 0 then h
+                else nth t (n - 1)
 
         let rec sliceFreshConsTail cons n l =
             if n = 0 then setFreshConsTail cons [] else
@@ -3743,37 +3771,50 @@ namespace Microsoft.FSharp.Collections
                else String.Concat( [| "Length = "; n.ToString() |])
            txt
 
-        member l.Head   = match l with a :: _ -> a | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
-        member l.Tail   = match l with _ :: b -> b | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
+        member l.Head =
+            match l with
+            | a :: _ -> a
+            | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
+
+        member l.Tail =
+            match l with
+            | _ :: b -> b
+            | [] -> raise (InvalidOperationException(SR.GetString(SR.inputListWasEmpty)))
 
         []
-        member l.IsEmpty  = match l with [] -> true | _ -> false
+        member l.IsEmpty =
+            match l with
+            | [] -> true
+            | _ -> false
+
         member l.Item with get(index) = PrivateListHelpers.nth l index
 
         []
-        static member Empty       : 'T list = []
+        static member Empty : 'T list = []
 
         static member Cons(head,tail) : 'T list = head :: tail
+
         override x.ToString() = 
-           match x with 
-           | [] -> "[]"
-           | [h1] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("]").ToString()
-           | [h1;h2] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("]").ToString()
-           | [h1;h2;h3] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("]").ToString()
-           | h1 :: h2 :: h3 :: _ -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("; ... ]").ToString() 
+            match x with 
+            | [] -> "[]"
+            | [h1] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("]").ToString()
+            | [h1;h2] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("]").ToString()
+            | [h1;h2;h3] -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("]").ToString()
+            | h1 :: h2 :: h3 :: _ -> StringBuilder().Append("[").Append(anyToStringShowingNull h1).Append("; ").Append(anyToStringShowingNull h2).Append("; ").Append(anyToStringShowingNull h3).Append("; ... ]").ToString() 
 
         member l.GetSlice(startIndex: int option, endIndex: int option ) = 
             match (startIndex, endIndex) with
             | None, None -> l
-            | Some(i), None -> PrivateListHelpers.sliceSkip i l
-            | None, Some(j) -> PrivateListHelpers.sliceTake j l
-            | Some(i), Some(j) ->
+            | Some i, None -> PrivateListHelpers.sliceSkip i l
+            | None, Some j -> PrivateListHelpers.sliceTake j l
+            | Some i, Some j ->
                 if i > j then [] else
                 let start = if i < 0 then 0 else i
                 PrivateListHelpers.sliceTake (j - start) (PrivateListHelpers.sliceSkip start l)
 
         []
-        member l.GetReverseIndex(_: int, offset: int) = l.Length - offset - 1
+        member l.GetReverseIndex(_: int, offset: int) =
+            l.Length - offset - 1
 
         interface IEnumerable<'T> with
             member l.GetEnumerator() = PrivateListHelpers.mkListEnumerator l
@@ -3789,12 +3830,6 @@ namespace Microsoft.FSharp.Collections
 
     type seq<'T> = IEnumerable<'T>
 
-        
-//-------------------------------------------------------------------------
-// Operators
-//-------------------------------------------------------------------------
-
-
 namespace Microsoft.FSharp.Core
 
     open System
@@ -3820,10 +3855,10 @@ namespace Microsoft.FSharp.Core
         let inline unbox (value: obj) = UnboxGeneric(value)
 
         []
-        let inline box (value: 'T)  = (# "box !0" type ('T) value : obj #)
+        let inline box (value: 'T) = (# "box !0" type ('T) value : obj #)
 
         []
-        let inline tryUnbox (value:obj)  = 
+        let inline tryUnbox (value:obj) = 
             match value with 
             | :? 'T as v -> Some v
             | _ -> None
@@ -3841,7 +3876,8 @@ namespace Microsoft.FSharp.Core
             | _ -> true
 
         []
-        let inline raise (exn: exn) = (# "throw" exn : 'T #)
+        let inline raise (exn: exn) =
+            (# "throw" exn : 'T #)
 
         let Failure message = new Exception(message)
         
@@ -3849,10 +3885,15 @@ namespace Microsoft.FSharp.Core
         let (|Failure|_|) (error: exn) = if error.GetType().Equals(typeof) then Some error.Message else None
 
         let inline (<) x y = GenericLessThan x y
+
         let inline (>) x y = GenericGreaterThan x y
+
         let inline (>=) x y = GenericGreaterOrEqual x y
+
         let inline (<=) x y = GenericLessOrEqual x y
+
         let inline (=) x y = GenericEquality x y
+
         let inline (<>) x y = not (GenericEquality x y)
 
         []
@@ -4170,7 +4211,6 @@ namespace Microsoft.FSharp.Core
 
         let inline castToString (x:'T) = (# "" x : string #)  // internal
 
-        // let rec (@) x y = match x with [] -> y | (h :: t) -> h :: (t @ y)
         let (@) list1 list2 = 
             match list1 with
             | [] -> list2
@@ -4221,7 +4261,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline sbyte (value: ^T) = 
              ExplicitDynamic<(^T), sbyte> value
-             when ^T : string     = ParseSByte (castToString value)
+             when ^T : string    = ParseSByte (castToString value)
              when ^T : float     = (# "conv.i1" value  : sbyte #)
              when ^T : float32   = (# "conv.i1" value  : sbyte #)
              when ^T : int64     = (# "conv.i1" value  : sbyte #)
@@ -4229,10 +4269,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.i1" value  : sbyte #)
              when ^T : nativeint = (# "conv.i1" value  : sbyte #)
              when ^T : sbyte     = (# "conv.i1" value  : sbyte #)
-             when ^T : uint64     = (# "conv.i1" value  : sbyte #)
-             when ^T : uint32     = (# "conv.i1" value  : sbyte #)
-             when ^T : uint16     = (# "conv.i1" value  : sbyte #)
-             when ^T : char       = (# "conv.i1" value  : sbyte #)
+             when ^T : uint64    = (# "conv.i1" value  : sbyte #)
+             when ^T : uint32    = (# "conv.i1" value  : sbyte #)
+             when ^T : uint16    = (# "conv.i1" value  : sbyte #)
+             when ^T : char      = (# "conv.i1" value  : sbyte #)
              when ^T : unativeint = (# "conv.i1" value  : sbyte #)
              when ^T : byte     = (# "conv.i1" value  : sbyte #)
              // According to the somewhat subtle rules of static optimizations,
@@ -4243,7 +4283,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline uint16 (value: ^T) = 
              ExplicitDynamic<(^T), uint16> value
-             when ^T : string     = ParseUInt16 (castToString value)
+             when ^T : string    = ParseUInt16 (castToString value)
              when ^T : float     = (# "conv.u2" value  : uint16 #)
              when ^T : float32   = (# "conv.u2" value  : uint16 #)
              when ^T : int64     = (# "conv.u2" value  : uint16 #)
@@ -4251,10 +4291,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.u2" value  : uint16 #)
              when ^T : nativeint = (# "conv.u2" value  : uint16 #)
              when ^T : sbyte     = (# "conv.u2" value  : uint16 #)
-             when ^T : uint64     = (# "conv.u2" value  : uint16 #)
-             when ^T : uint32     = (# "conv.u2" value  : uint16 #)
-             when ^T : uint16     = (# "conv.u2" value  : uint16 #)
-             when ^T : char       = (# "conv.u2" value  : uint16 #)
+             when ^T : uint64    = (# "conv.u2" value  : uint16 #)
+             when ^T : uint32    = (# "conv.u2" value  : uint16 #)
+             when ^T : uint16    = (# "conv.u2" value  : uint16 #)
+             when ^T : char      = (# "conv.u2" value  : uint16 #)
              when ^T : unativeint = (# "conv.u2" value  : uint16 #)
              when ^T : byte     = (# "conv.u2" value  : uint16 #)
              // According to the somewhat subtle rules of static optimizations,
@@ -4265,7 +4305,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline int16 (value: ^T) = 
              ExplicitDynamic<(^T), int16> value
-             when ^T : string     = ParseInt16 (castToString value)
+             when ^T : string    = ParseInt16 (castToString value)
              when ^T : float     = (# "conv.i2" value  : int16 #)
              when ^T : float32   = (# "conv.i2" value  : int16 #)
              when ^T : int64     = (# "conv.i2" value  : int16 #)
@@ -4273,10 +4313,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.i2" value  : int16 #)
              when ^T : nativeint = (# "conv.i2" value  : int16 #)
              when ^T : sbyte     = (# "conv.i2" value  : int16 #)
-             when ^T : uint64     = (# "conv.i2" value  : int16 #)
-             when ^T : uint32     = (# "conv.i2" value  : int16 #)
-             when ^T : uint16     = (# "conv.i2" value  : int16 #)
-             when ^T : char       = (# "conv.i2" value  : int16 #)
+             when ^T : uint64    = (# "conv.i2" value  : int16 #)
+             when ^T : uint32    = (# "conv.i2" value  : int16 #)
+             when ^T : uint16    = (# "conv.i2" value  : int16 #)
+             when ^T : char      = (# "conv.i2" value  : int16 #)
              when ^T : unativeint = (# "conv.i2" value  : int16 #)
              when ^T : byte     = (# "conv.i2" value  : int16 #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> int16) (value))
@@ -4285,7 +4325,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline uint32 (value: ^T) = 
              ExplicitDynamic<(^T), uint32> value
-             when ^T : string     = ParseUInt32 (castToString value)
+             when ^T : string    = ParseUInt32 (castToString value)
              when ^T : float     = (# "conv.u4" value  : uint32 #)
              when ^T : float32   = (# "conv.u4" value  : uint32 #)
              when ^T : int64     = (# "conv.u4" value  : uint32 #)
@@ -4297,10 +4337,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int32     = (# "" value : uint32 #)
              when ^T : int16     = (# "" value : uint32 #)
              when ^T : sbyte     = (# "" value : uint32 #)             
-             when ^T : uint64     = (# "conv.u4" value  : uint32 #)
-             when ^T : uint32     = (# "conv.u4" value  : uint32 #)
-             when ^T : uint16     = (# "conv.u4" value  : uint32 #)
-             when ^T : char       = (# "conv.u4" value  : uint32 #)
+             when ^T : uint64    = (# "conv.u4" value  : uint32 #)
+             when ^T : uint32    = (# "conv.u4" value  : uint32 #)
+             when ^T : uint16    = (# "conv.u4" value  : uint32 #)
+             when ^T : char      = (# "conv.u4" value  : uint32 #)
              when ^T : unativeint = (# "conv.u4" value  : uint32 #)
              when ^T : byte     = (# "conv.u4" value  : uint32 #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> uint32) (value))
@@ -4309,7 +4349,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline int32 (value: ^T) = 
              ExplicitDynamic<(^T), int32> value
-             when ^T : string     = ParseInt32 (castToString value)
+             when ^T : string    = ParseInt32 (castToString value)
              when ^T : float     = (# "conv.i4" value  : int32 #)
              when ^T : float32   = (# "conv.i4" value  : int32 #)
              when ^T : int64     = (# "conv.i4" value  : int32 #)
@@ -4319,10 +4359,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int32     = (# "" value  : int32 #)
              when ^T : int16     = (# "" value  : int32 #)
              when ^T : sbyte     = (# "" value  : int32 #)
-             when ^T : uint64     = (# "conv.i4" value  : int32 #)             
-             when ^T : uint32     = (# "" value  : int32 #) // Signed<->Unsigned conversion is a no-op on IL stack
-             when ^T : uint16     = (# "conv.i4" value  : int32 #)
-             when ^T : char       = (# "conv.i4" value  : int32 #)
+             when ^T : uint64    = (# "conv.i4" value  : int32 #)             
+             when ^T : uint32    = (# "" value  : int32 #) // Signed<->Unsigned conversion is a no-op on IL stack
+             when ^T : uint16    = (# "conv.i4" value  : int32 #)
+             when ^T : char      = (# "conv.i4" value  : int32 #)
              when ^T : unativeint = (# "conv.i4" value  : int32 #)
              when ^T : byte     = (# "conv.i4" value  : int32 #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> int32) (value))
@@ -4337,7 +4377,7 @@ namespace Microsoft.FSharp.Core
         let inline enum< ^T when ^T : enum > (value:int32) : ^T = EnumOfValue value
 
         []
-        let (|KeyValue|) (keyValuePair : KeyValuePair<'T,'U>) = (keyValuePair.Key, keyValuePair.Value)
+        let (|KeyValue|) (keyValuePair: KeyValuePair<'T,'U>) = (keyValuePair.Key, keyValuePair.Value)
 
         []
         let infinity = Double.PositiveInfinity
@@ -4355,7 +4395,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline uint64 (value: ^T) = 
              ExplicitDynamic<(^T), uint64> value
-             when ^T : string     = ParseUInt64 (castToString value)
+             when ^T : string    = ParseUInt64 (castToString value)
              when ^T : float     = (# "conv.u8" value  : uint64 #)
              when ^T : float32   = (# "conv.u8" value  : uint64 #)
              // we must first sign-widen the signed integer to 64 bits, and then 
@@ -4367,10 +4407,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.i8" value  : uint64 #)
              when ^T : nativeint = (# "conv.i8" value  : uint64 #)
              when ^T : sbyte     = (# "conv.i8" value  : uint64 #)
-             when ^T : uint64     = (# "" value  : uint64 #)
-             when ^T : uint32     = (# "conv.u8" value  : uint64 #)
-             when ^T : uint16     = (# "conv.u8" value  : uint64 #)
-             when ^T : char       = (# "conv.u8" value  : uint64 #)
+             when ^T : uint64    = (# "" value  : uint64 #)
+             when ^T : uint32    = (# "conv.u8" value  : uint64 #)
+             when ^T : uint16    = (# "conv.u8" value  : uint64 #)
+             when ^T : char      = (# "conv.u8" value  : uint64 #)
              when ^T : unativeint = (# "conv.u8" value  : uint64 #)
              when ^T : byte     = (# "conv.u8" value  : uint64 #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> uint64) (value))
@@ -4379,7 +4419,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline int64 (value: ^T) = 
              ExplicitDynamic<(^T), int64> value
-             when ^T : string     = ParseInt64 (castToString value)
+             when ^T : string    = ParseInt64 (castToString value)
              when ^T : float     = (# "conv.i8" value  : int64 #)
              when ^T : float32   = (# "conv.i8" value  : int64 #)
              when ^T : int64     = (# "conv.i8" value  : int64 #)
@@ -4387,7 +4427,7 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.i8" value  : int64 #)
              when ^T : nativeint = (# "conv.i8" value  : int64 #)
              when ^T : sbyte     = (# "conv.i8" value  : int64 #)
-             // When converting unsigned integer, we should zero-widen them, NOT sign-widen 
+             // When converting unsigned integer, we zero-widen them, NOT sign-widen.
              // No-op for uint64, conv.u8 for uint32, for smaller types conv.u8 and conv.i8 are identical.
              // For nativeint, conv.u8 works correctly both in 32 bit and 64 bit case.
              when ^T : uint64     = (# "" value  : int64 #)             
@@ -4402,7 +4442,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline float32 (value: ^T) = 
              ExplicitDynamic<(^T), float32> value
-             when ^T : string     = ParseSingle (castToString value)
+             when ^T : string    = ParseSingle (castToString value)
              when ^T : float     = (# "conv.r4" value  : float32 #)
              // NOTE: float32 should convert its argument to 32-bit float even when applied to a higher precision float stored in a register. See devdiv2#49888.
              when ^T : float32   = (# "conv.r4" value  : float32 #)
@@ -4411,10 +4451,10 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.r4" value  : float32 #)
              when ^T : nativeint = (# "conv.r4" value  : float32 #)
              when ^T : sbyte     = (# "conv.r4" value  : float32 #)
-             when ^T : uint64     = (# "conv.r.un conv.r4" value  : float32 #)
-             when ^T : uint32     = (# "conv.r.un conv.r4" value  : float32 #)
-             when ^T : uint16     = (# "conv.r.un conv.r4" value  : float32 #)
-             when ^T : char       = (# "conv.r.un conv.r4" value  : float32 #)
+             when ^T : uint64    = (# "conv.r.un conv.r4" value  : float32 #)
+             when ^T : uint32    = (# "conv.r.un conv.r4" value  : float32 #)
+             when ^T : uint16    = (# "conv.r.un conv.r4" value  : float32 #)
+             when ^T : char      = (# "conv.r.un conv.r4" value  : float32 #)
              when ^T : unativeint = (# "conv.r.un conv.r4" value  : float32 #)
              when ^T : byte     = (# "conv.r.un conv.r4" value  : float32 #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> float32) (value))
@@ -4423,7 +4463,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline float (value: ^T) = 
              ExplicitDynamic<(^T), float> value
-             when ^T : string     = ParseDouble (castToString value)
+             when ^T : string    = ParseDouble (castToString value)
              // NOTE: float should convert its argument to 64-bit float even when applied to a higher precision float stored in a register. See devdiv2#49888.
              when ^T : float     = (# "conv.r8" value  : float #)
              when ^T : float32   = (# "conv.r8" value  : float #)
@@ -4432,13 +4472,13 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.r8" value  : float #)
              when ^T : nativeint = (# "conv.r8" value  : float #)
              when ^T : sbyte     = (# "conv.r8" value  : float #)
-             when ^T : uint64     = (# "conv.r.un conv.r8" value  : float #)
-             when ^T : uint32     = (# "conv.r.un conv.r8" value  : float #)
-             when ^T : uint16     = (# "conv.r.un conv.r8" value  : float #)
-             when ^T : char       = (# "conv.r.un conv.r8" value  : float #)
+             when ^T : uint64    = (# "conv.r.un conv.r8" value  : float #)
+             when ^T : uint32    = (# "conv.r.un conv.r8" value  : float #)
+             when ^T : uint16    = (# "conv.r.un conv.r8" value  : float #)
+             when ^T : char      = (# "conv.r.un conv.r8" value  : float #)
              when ^T : unativeint = (# "conv.r.un conv.r8" value  : float #)
-             when ^T : byte       = (# "conv.r.un conv.r8" value  : float #)
-             when ^T : decimal    = (Convert.ToDouble((# "" value : decimal #))) 
+             when ^T : byte      = (# "conv.r.un conv.r8" value  : float #)
+             when ^T : decimal   = (Convert.ToDouble((# "" value : decimal #))) 
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> float) (value))
 
         []
@@ -4465,7 +4505,7 @@ namespace Microsoft.FSharp.Core
         []
         let inline unativeint (value: ^T) = 
              ExplicitDynamic<(^T), unativeint> value
-             when ^T : string     = ParseUIntPtr (castToString value)
+             when ^T : string    = ParseUIntPtr (castToString value)
              when ^T : float     = (# "conv.u" value  : unativeint #)
              when ^T : float32   = (# "conv.u" value  : unativeint #)
              // Narrower signed types we sign-extend.
@@ -4477,12 +4517,12 @@ namespace Microsoft.FSharp.Core
              when ^T : int16     = (# "conv.i" value  : unativeint #)
              when ^T : nativeint = (# "" value  : unativeint #)
              when ^T : sbyte     = (# "conv.i" value  : unativeint #)
-             when ^T : uint64     = (# "conv.u" value  : unativeint #)
-             when ^T : uint32     = (# "conv.u" value  : unativeint #)
-             when ^T : uint16     = (# "conv.u" value  : unativeint #)
-             when ^T : char       = (# "conv.u" value  : unativeint #)
+             when ^T : uint64    = (# "conv.u" value  : unativeint #)
+             when ^T : uint32    = (# "conv.u" value  : unativeint #)
+             when ^T : uint16    = (# "conv.u" value  : unativeint #)
+             when ^T : char      = (# "conv.u" value  : unativeint #)
              when ^T : unativeint = (# "" value  : unativeint #)
-             when ^T : byte       = (# "conv.u" value  : unativeint #)
+             when ^T : byte      = (# "conv.u" value  : unativeint #)
              when ^T : ^T = (^T : (static member op_Explicit: ^T -> unativeint) (value))
 
         []
@@ -4548,10 +4588,10 @@ namespace Microsoft.FSharp.Core
 
 
              // other common mscorlib System struct types
-             when 'T : DateTime         = let x = (# "" value : DateTime #) in x.ToString(null, CultureInfo.InvariantCulture)
-             when 'T : DateTimeOffset   = let x = (# "" value : DateTimeOffset #) in x.ToString(null, CultureInfo.InvariantCulture)
-             when 'T : TimeSpan         = let x = (# "" value : TimeSpan #) in x.ToString(null, CultureInfo.InvariantCulture)
-             when 'T : Guid             = let x = (# "" value : Guid #) in x.ToString(null, CultureInfo.InvariantCulture)
+             when 'T : DateTime       = let x = (# "" value : DateTime #) in x.ToString(null, CultureInfo.InvariantCulture)
+             when 'T : DateTimeOffset = let x = (# "" value : DateTimeOffset #) in x.ToString(null, CultureInfo.InvariantCulture)
+             when 'T : TimeSpan       = let x = (# "" value : TimeSpan #) in x.ToString(null, CultureInfo.InvariantCulture)
+             when 'T : Guid           = let x = (# "" value : Guid #) in x.ToString(null, CultureInfo.InvariantCulture)
              when 'T struct = 
                 match box value with
                 | :? IFormattable as f -> f.ToString(null, CultureInfo.InvariantCulture)
@@ -4604,7 +4644,7 @@ namespace Microsoft.FSharp.Core
                 when ^T : float  = (# "clt" x y : bool #) 
                 when ^T : float32= (# "clt" x y : bool #) 
                 when ^T : char   = (# "clt" x y : bool #)
-                when ^T : decimal     = Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : decimal    = Decimal.op_LessThan ((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : string     = (# "clt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (<) : ^T * ^U -> bool) (x,y))
 
@@ -4625,7 +4665,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = (# "cgt" x y : bool #) 
                 when 'T : float32    = (# "cgt" x y : bool #) 
                 when 'T : char       = (# "cgt" x y : bool #)
-                when 'T : decimal     = Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal    = Decimal.op_GreaterThan ((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : string     = (# "cgt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (>) : ^T * ^U -> bool) (x,y))
 
@@ -4646,7 +4686,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "cgt.un" x y : bool #) 
                 when 'T : float32    = not (# "cgt.un" x y : bool #) 
                 when 'T : char       = not (# "cgt" x y : bool #)
-                when 'T : decimal     = Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal    = Decimal.op_LessThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : string     = not (# "cgt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (<=) : ^T * ^U -> bool) (x,y))
 
@@ -4667,7 +4707,7 @@ namespace Microsoft.FSharp.Core
                 when 'T : float      = not (# "clt.un" x y : bool #) 
                 when 'T : float32    = not (# "clt.un" x y : bool #)
                 when 'T : char       = not (# "clt" x y : bool #)
-                when 'T : decimal     = Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
+                when 'T : decimal    = Decimal.op_GreaterThanOrEqual ((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : string     = not (# "clt" (String.CompareOrdinal((# "" x : string #),(# "" y : string #))) 0 : bool #)             
                 when ^T : ^T = ((^T or ^U): (static member (>=) : ^T * ^U -> bool) (x,y))
 
@@ -4709,7 +4749,7 @@ namespace Microsoft.FSharp.Core
                 when ^T : nativeint  = not (# "ceq" x y : bool #)
                 when ^T : unativeint  = not (# "ceq" x y : bool #)
                 when ^T : string  = not (String.Equals((# "" x : string #),(# "" y : string #)))
-                when ^T : decimal     = Decimal.op_Inequality((# "" x:decimal #), (# "" y:decimal #))
+                when ^T : decimal = Decimal.op_Inequality((# "" x:decimal #), (# "" y:decimal #))
                 when ^T : ^T = (^T : (static member (<>) : ^T * ^T -> bool) (x,y))
 
             // static comparison (ER mode) with static optimizations for some well-known cases
@@ -4742,19 +4782,19 @@ namespace Microsoft.FSharp.Core
                      // NOTE: we don't have to null check here because String.CompareOrdinal
                      // gives reliable results on null values.
                      String.CompareOrdinal((# "" e1 : string #),(# "" e2 : string #))
-                 when ^T : decimal     = Decimal.Compare((# "" e1:decimal #), (# "" e2:decimal #))
+                 when ^T : decimal = Decimal.Compare((# "" e1:decimal #), (# "" e2:decimal #))
 
             []
             let inline max (e1: ^T) (e2: ^T) = 
                 (if e1 < e2 then e2 else e1)
-                when ^T : float         = (Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-                when ^T : float32       = (Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+                when ^T : float   = (Math.Max : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+                when ^T : float32 = (Math.Max : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
             []
             let inline min (e1: ^T) (e2: ^T) = 
                 (if e1 < e2 then e1 else e2)
-                when ^T : float         = (Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
-                when ^T : float32       = (Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
+                when ^T : float    = (Math.Min : float * float -> float)(retype<_,float> e1, retype<_,float> e2)
+                when ^T : float32  = (Math.Min : float32 * float32 -> float32)(retype<_,float32> e1, retype<_,float32> e2)
 
             []
             let inline hash (value:'T) = 
@@ -4774,7 +4814,6 @@ namespace Microsoft.FSharp.Core
                 when 'T : string = HashCompare.HashString  (# "" value : string #)
 
         module Attributes = 
-            open System.Runtime.CompilerServices
 
             []
             []
@@ -4787,14 +4826,14 @@ namespace Microsoft.FSharp.Core
 
 #if FX_NO_MONITOR_REPORTS_LOCKTAKEN
         []
-        let inline lock (lockobj : 'T when 'T : not struct) f  = 
+        let inline lock (lockobj : 'T when 'T : not struct) f = 
             System.Threading.Monitor.Enter(lockobj);
             try f()
             finally
                 System.Threading.Monitor.Exit(lockobj)
 #else
         []
-        let inline lock (lockObject : 'T when 'T : not struct) ([] action)  = 
+        let inline lock (lockObject : 'T when 'T : not struct) ([] action) = 
             let mutable lockTaken = false
             try 
                 System.Threading.Monitor.Enter(lockObject, &lockTaken);
@@ -4814,10 +4853,12 @@ namespace Microsoft.FSharp.Core
         let inline typeof<'T> = BasicInlinedOperations.typeof<'T>
 
         []
-        let inline nameof (_: 'T) : string = raise (Exception "may not call directly, should always be optimized away")
+        let inline nameof (_: 'T) : string =
+            raise (Exception "may not call directly, should always be optimized away")
 
         []
-        let methodhandleof (_call: ('T -> 'TResult)) : RuntimeMethodHandle = raise (Exception "may not call directly, should always be optimized away")
+        let methodhandleof (_call: ('T -> 'TResult)) : RuntimeMethodHandle =
+            raise (Exception "may not call directly, should always be optimized away")
 
         []
         let inline typedefof<'T> = BasicInlinedOperations.typedefof<'T>
@@ -4829,18 +4870,22 @@ namespace Microsoft.FSharp.Core
         let inline hash (obj: 'T) = LanguagePrimitives.GenericHash obj
 
         []
-        let inline limitedHash (limit:int) (obj: 'T) = LanguagePrimitives.GenericLimitedHash limit obj
+        let inline limitedHash (limit:int) (obj: 'T) =
+            LanguagePrimitives.GenericLimitedHash limit obj
 
         []
         let id x = x
 
         []
-        let inline not (value: bool) = match value with true -> false | _ -> true
+        let inline not (value: bool) =
+            match value with
+            | true -> false
+            | _ -> true
 
         // std* are TypeFunctions with the effect of reading the property on instantiation.
         // So, direct uses of stdout should capture the current System.Console.Out at that point.
         []
-        let stdin<'T>  = Console.In
+        let stdin<'T> = Console.In
 
         []
         let stdout<'T> = Console.Out
@@ -4899,11 +4944,11 @@ namespace Microsoft.FSharp.Core
                  when ^T : uint32     and ^U : uint32     = (# "sub.ovf.un" x y : uint32 #)
                  when ^T : nativeint  and ^U : nativeint  = (# "sub.ovf" x y : nativeint #)
                  when ^T : unativeint and ^U : unativeint = (# "sub.ovf.un" x y : unativeint #)
-                 when ^T : int16       and ^U : int16      = (# "conv.ovf.i2" (# "sub.ovf" x y : int32 #) : int16 #)
-                 when ^T : uint16      and ^U : uint16     = (# "conv.ovf.u2.un" (# "sub.ovf.un" x y : uint32 #) : uint16 #)
-                 when ^T : sbyte       and ^U : sbyte      = (# "conv.ovf.i1" (# "sub.ovf" x y : int32 #) : sbyte #)
-                 when ^T : byte        and ^U : byte       = (# "conv.ovf.u1.un" (# "sub.ovf.un" x y : uint32 #) : byte #)
-                 when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+                 when ^T : int16       and ^U : int16     = (# "conv.ovf.i2" (# "sub.ovf" x y : int32 #) : int16 #)
+                 when ^T : uint16      and ^U : uint16    = (# "conv.ovf.u2.un" (# "sub.ovf.un" x y : uint32 #) : uint16 #)
+                 when ^T : sbyte       and ^U : sbyte     = (# "conv.ovf.i1" (# "sub.ovf" x y : int32 #) : sbyte #)
+                 when ^T : byte        and ^U : byte      = (# "conv.ovf.u1.un" (# "sub.ovf.un" x y : uint32 #) : byte #)
+                 when ^T : decimal     and ^U : decimal   = (# "" (Decimal.op_Subtraction((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
                  when ^T : ^T = ((^T or ^U): (static member (-) : ^T * ^U -> ^V) (x,y))
 
             []
@@ -4921,19 +4966,19 @@ namespace Microsoft.FSharp.Core
 
             let inline ( * ) (x: ^T) (y: ^U) : ^V = 
                  CheckedMultiplyDynamic<(^T),(^U),(^V)>  x y 
-                 when ^T : sbyte       and ^U : sbyte      = (# "conv.ovf.i1" (# "mul.ovf" x y : int32 #) : sbyte #)
-                 when ^T : int16       and ^U : int16      = (# "conv.ovf.i2" (# "mul.ovf" x y : int32 #) : int16 #)
+                 when ^T : sbyte       and ^U : sbyte     = (# "conv.ovf.i1" (# "mul.ovf" x y : int32 #) : sbyte #)
+                 when ^T : int16       and ^U : int16     = (# "conv.ovf.i2" (# "mul.ovf" x y : int32 #) : int16 #)
                  when ^T : int64      and ^U : int64      = (# "mul.ovf" x y : int64 #)
                  when ^T : int32      and ^U : int32      = (# "mul.ovf" x y : int32 #)
                  when ^T : nativeint  and ^U : nativeint  = (# "mul.ovf" x y : nativeint #)
-                 when ^T : byte        and ^U : byte       = (# "conv.ovf.u1.un" (# "mul.ovf.un" x y : uint32 #) : byte #)
-                 when ^T : uint16      and ^U : uint16     = (# "conv.ovf.u2.un" (# "mul.ovf.un" x y : uint32 #) : uint16 #)
+                 when ^T : byte        and ^U : byte      = (# "conv.ovf.u1.un" (# "mul.ovf.un" x y : uint32 #) : byte #)
+                 when ^T : uint16      and ^U : uint16    = (# "conv.ovf.u2.un" (# "mul.ovf.un" x y : uint32 #) : uint16 #)
                  when ^T : uint32     and ^U : uint32     = (# "mul.ovf.un" x y : uint32 #)
                  when ^T : uint64     and ^U : uint64     = (# "mul.ovf.un" x y : uint64 #)
                  when ^T : unativeint and ^U : unativeint = (# "mul.ovf.un" x y : unativeint #)
                  when ^T : float      and ^U : float      = (# "mul" x y : float #)
                  when ^T : float32    and ^U : float32    = (# "mul" x y : float32 #)
-                 when ^T : decimal     and ^U : decimal    = (# "" (Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
+                 when ^T : decimal     and ^U : decimal   = (# "" (Decimal.op_Multiply((# "" x : decimal #),(# "" y : decimal #))) : ^V #)
                  // According to the somewhat subtle rules of static optimizations,
                  // this condition is used whenever ^T is resolved to a nominal type
                  // That is, not in the generic implementation of '*'
@@ -4943,7 +4988,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline byte (value: ^T) = 
                  ExplicitDynamic<(^T),byte> value 
-                 when ^T : string     = ParseByte (castToString value)
+                 when ^T : string    = ParseByte (castToString value)
                  when ^T : float     = (# "conv.ovf.u1" value  : byte #)
                  when ^T : float32   = (# "conv.ovf.u1" value  : byte #)
                  when ^T : int64     = (# "conv.ovf.u1" value  : byte #)
@@ -4951,10 +4996,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.u1" value  : byte #)
                  when ^T : nativeint = (# "conv.ovf.u1" value  : byte #)
                  when ^T : sbyte     = (# "conv.ovf.u1" value  : byte #)
-                 when ^T : uint64     = (# "conv.ovf.u1.un" value  : byte #)
-                 when ^T : uint32     = (# "conv.ovf.u1.un" value  : byte #)
-                 when ^T : uint16     = (# "conv.ovf.u1.un" value  : byte #)
-                 when ^T : char       = (# "conv.ovf.u1.un" value  : byte #)
+                 when ^T : uint64    = (# "conv.ovf.u1.un" value  : byte #)
+                 when ^T : uint32    = (# "conv.ovf.u1.un" value  : byte #)
+                 when ^T : uint16    = (# "conv.ovf.u1.un" value  : byte #)
+                 when ^T : char      = (# "conv.ovf.u1.un" value  : byte #)
                  when ^T : unativeint = (# "conv.ovf.u1.un" value  : byte #)
                  when ^T : byte     = (# "conv.ovf.u1.un" value  : byte #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> byte) (value))
@@ -4963,7 +5008,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline sbyte (value: ^T) = 
                  ExplicitDynamic<(^T),sbyte> value 
-                 when ^T : string     = ParseSByte (castToString value)
+                 when ^T : string    = ParseSByte (castToString value)
                  when ^T : float     = (# "conv.ovf.i1" value  : sbyte #)
                  when ^T : float32   = (# "conv.ovf.i1" value  : sbyte #)
                  when ^T : int64     = (# "conv.ovf.i1" value  : sbyte #)
@@ -4971,10 +5016,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.i1" value  : sbyte #)
                  when ^T : nativeint = (# "conv.ovf.i1" value  : sbyte #)
                  when ^T : sbyte     = (# "conv.ovf.i1" value  : sbyte #)
-                 when ^T : uint64     = (# "conv.ovf.i1.un" value  : sbyte #)
-                 when ^T : uint32     = (# "conv.ovf.i1.un" value  : sbyte #)
-                 when ^T : uint16     = (# "conv.ovf.i1.un" value  : sbyte #)
-                 when ^T : char       = (# "conv.ovf.i1.un" value  : sbyte #)
+                 when ^T : uint64    = (# "conv.ovf.i1.un" value  : sbyte #)
+                 when ^T : uint32    = (# "conv.ovf.i1.un" value  : sbyte #)
+                 when ^T : uint16    = (# "conv.ovf.i1.un" value  : sbyte #)
+                 when ^T : char      = (# "conv.ovf.i1.un" value  : sbyte #)
                  when ^T : unativeint = (# "conv.ovf.i1.un" value  : sbyte #)
                  when ^T : byte     = (# "conv.ovf.i1.un" value  : sbyte #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> sbyte) (value))
@@ -5023,7 +5068,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline int16 (value: ^T) = 
                  ExplicitDynamic<(^T), int16> value 
-                 when ^T : string     = ParseInt16 (castToString value)
+                 when ^T : string    = ParseInt16 (castToString value)
                  when ^T : float     = (# "conv.ovf.i2" value  : int16 #)
                  when ^T : float32   = (# "conv.ovf.i2" value  : int16 #)
                  when ^T : int64     = (# "conv.ovf.i2" value  : int16 #)
@@ -5031,10 +5076,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.i2" value  : int16 #)
                  when ^T : nativeint = (# "conv.ovf.i2" value  : int16 #)
                  when ^T : sbyte     = (# "conv.ovf.i2" value  : int16 #)
-                 when ^T : uint64     = (# "conv.ovf.i2.un" value  : int16 #)
-                 when ^T : uint32     = (# "conv.ovf.i2.un" value  : int16 #)
-                 when ^T : uint16     = (# "conv.ovf.i2.un" value  : int16 #)
-                 when ^T : char       = (# "conv.ovf.i2.un" value  : int16 #)
+                 when ^T : uint64    = (# "conv.ovf.i2.un" value  : int16 #)
+                 when ^T : uint32    = (# "conv.ovf.i2.un" value  : int16 #)
+                 when ^T : uint16    = (# "conv.ovf.i2.un" value  : int16 #)
+                 when ^T : char      = (# "conv.ovf.i2.un" value  : int16 #)
                  when ^T : unativeint = (# "conv.ovf.i2.un" value  : int16 #)
                  when ^T : byte     = (# "conv.ovf.i2.un" value  : int16 #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> int16) (value))
@@ -5043,7 +5088,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline uint32 (value: ^T) = 
                  ExplicitDynamic<(^T), uint32> value 
-                 when ^T : string     = ParseUInt32 (castToString value)
+                 when ^T : string    = ParseUInt32 (castToString value)
                  when ^T : float     = (# "conv.ovf.u4" value  : uint32 #)
                  when ^T : float32   = (# "conv.ovf.u4" value  : uint32 #)
                  when ^T : int64     = (# "conv.ovf.u4" value  : uint32 #)
@@ -5051,10 +5096,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.u4" value  : uint32 #)
                  when ^T : nativeint = (# "conv.ovf.u4" value  : uint32 #)
                  when ^T : sbyte     = (# "conv.ovf.u4" value  : uint32 #)
-                 when ^T : uint64     = (# "conv.ovf.u4.un" value  : uint32 #)
-                 when ^T : uint32     = (# "conv.ovf.u4.un" value  : uint32 #)
-                 when ^T : uint16     = (# "conv.ovf.u4.un" value  : uint32 #)
-                 when ^T : char       = (# "conv.ovf.u4.un" value  : uint32 #)
+                 when ^T : uint64    = (# "conv.ovf.u4.un" value  : uint32 #)
+                 when ^T : uint32    = (# "conv.ovf.u4.un" value  : uint32 #)
+                 when ^T : uint16    = (# "conv.ovf.u4.un" value  : uint32 #)
+                 when ^T : char      = (# "conv.ovf.u4.un" value  : uint32 #)
                  when ^T : unativeint = (# "conv.ovf.u4.un" value  : uint32 #)
                  when ^T : byte     = (# "conv.ovf.u4.un" value  : uint32 #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> uint32) (value))
@@ -5063,7 +5108,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline int32 (value: ^T) = 
                  ExplicitDynamic<(^T), int32> value 
-                 when ^T : string     = ParseInt32 (castToString value)
+                 when ^T : string    = ParseInt32 (castToString value)
                  when ^T : float     = (# "conv.ovf.i4" value  : int32 #)
                  when ^T : float32   = (# "conv.ovf.i4" value  : int32 #)
                  when ^T : int64     = (# "conv.ovf.i4" value  : int32 #)
@@ -5071,10 +5116,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.i4" value  : int32 #)
                  when ^T : nativeint = (# "conv.ovf.i4" value  : int32 #)
                  when ^T : sbyte     = (# "conv.ovf.i4" value  : int32 #)
-                 when ^T : uint64     = (# "conv.ovf.i4.un" value  : int32 #)
-                 when ^T : uint32     = (# "conv.ovf.i4.un" value  : int32 #)
-                 when ^T : uint16     = (# "conv.ovf.i4.un" value  : int32 #)
-                 when ^T : char       = (# "conv.ovf.i4.un" value  : int32 #)
+                 when ^T : uint64    = (# "conv.ovf.i4.un" value  : int32 #)
+                 when ^T : uint32    = (# "conv.ovf.i4.un" value  : int32 #)
+                 when ^T : uint16    = (# "conv.ovf.i4.un" value  : int32 #)
+                 when ^T : char      = (# "conv.ovf.i4.un" value  : int32 #)
                  when ^T : unativeint = (# "conv.ovf.i4.un" value  : int32 #)
                  when ^T : byte     = (# "conv.ovf.i4.un" value  : int32 #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> int32) (value))
@@ -5086,7 +5131,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline uint64 (value: ^T) = 
                  ExplicitDynamic<(^T), uint64> value 
-                 when ^T : string     = ParseUInt64 (castToString value)
+                 when ^T : string    = ParseUInt64 (castToString value)
                  when ^T : float     = (# "conv.ovf.u8" value  : uint64 #)
                  when ^T : float32   = (# "conv.ovf.u8" value  : uint64 #)
                  when ^T : int64     = (# "conv.ovf.u8" value  : uint64 #)
@@ -5094,10 +5139,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.u8" value  : uint64 #)
                  when ^T : nativeint = (# "conv.ovf.u8" value  : uint64 #)
                  when ^T : sbyte     = (# "conv.ovf.u8" value  : uint64 #)
-                 when ^T : uint64     = (# "conv.ovf.u8.un" value  : uint64 #)
-                 when ^T : uint32     = (# "conv.ovf.u8.un" value  : uint64 #)
-                 when ^T : uint16     = (# "conv.ovf.u8.un" value  : uint64 #)
-                 when ^T : char       = (# "conv.ovf.u8.un" value  : uint64 #)
+                 when ^T : uint64    = (# "conv.ovf.u8.un" value  : uint64 #)
+                 when ^T : uint32    = (# "conv.ovf.u8.un" value  : uint64 #)
+                 when ^T : uint16    = (# "conv.ovf.u8.un" value  : uint64 #)
+                 when ^T : char      = (# "conv.ovf.u8.un" value  : uint64 #)
                  when ^T : unativeint = (# "conv.ovf.u8.un" value  : uint64 #)
                  when ^T : byte     = (# "conv.ovf.u8.un" value  : uint64 #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> uint64) (value))
@@ -5106,7 +5151,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline int64 (value: ^T) = 
                  ExplicitDynamic<(^T), int64> value 
-                 when ^T : string     = ParseInt64 (castToString value)
+                 when ^T : string    = ParseInt64 (castToString value)
                  when ^T : float     = (# "conv.ovf.i8" value  : int64 #)
                  when ^T : float32   = (# "conv.ovf.i8" value  : int64 #)
                  when ^T : int64     = (# "conv.ovf.i8" value  : int64 #)
@@ -5114,10 +5159,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.i8" value  : int64 #)
                  when ^T : nativeint = (# "conv.ovf.i8" value  : int64 #)
                  when ^T : sbyte     = (# "conv.ovf.i8" value  : int64 #)
-                 when ^T : uint64     = (# "conv.ovf.i8.un" value  : int64 #)
-                 when ^T : uint32     = (# "conv.ovf.i8.un" value  : int64 #)
-                 when ^T : uint16     = (# "conv.ovf.i8.un" value  : int64 #)
-                 when ^T : char       = (# "conv.ovf.i8.un" value  : int64 #)
+                 when ^T : uint64    = (# "conv.ovf.i8.un" value  : int64 #)
+                 when ^T : uint32    = (# "conv.ovf.i8.un" value  : int64 #)
+                 when ^T : uint16    = (# "conv.ovf.i8.un" value  : int64 #)
+                 when ^T : char      = (# "conv.ovf.i8.un" value  : int64 #)
                  when ^T : unativeint = (# "conv.ovf.i8.un" value  : int64 #)
                  when ^T : byte     = (# "conv.ovf.i8.un" value  : int64 #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> int64) (value))
@@ -5126,7 +5171,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline unativeint (value: ^T) = 
                  ExplicitDynamic<(^T), unativeint> value 
-                 when ^T : string     = ParseUIntPtr (castToString value)
+                 when ^T : string    = ParseUIntPtr (castToString value)
                  when ^T : float     = (# "conv.ovf.u" value  : unativeint #)
                  when ^T : float32   = (# "conv.ovf.u" value  : unativeint #)
                  when ^T : int64     = (# "conv.ovf.u" value  : unativeint #)
@@ -5134,10 +5179,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.u" value  : unativeint #)
                  when ^T : nativeint = (# "conv.ovf.u" value  : unativeint #)
                  when ^T : sbyte     = (# "conv.ovf.u" value  : unativeint #)
-                 when ^T : uint64     = (# "conv.ovf.u.un" value  : unativeint #)
-                 when ^T : uint32     = (# "conv.ovf.u.un" value  : unativeint #)
-                 when ^T : uint16     = (# "conv.ovf.u.un" value  : unativeint #)
-                 when ^T : char       = (# "conv.ovf.u.un" value  : unativeint #)
+                 when ^T : uint64    = (# "conv.ovf.u.un" value  : unativeint #)
+                 when ^T : uint32    = (# "conv.ovf.u.un" value  : unativeint #)
+                 when ^T : uint16    = (# "conv.ovf.u.un" value  : unativeint #)
+                 when ^T : char      = (# "conv.ovf.u.un" value  : unativeint #)
                  when ^T : unativeint = (# "conv.ovf.u.un" value  : unativeint #)
                  when ^T : byte     = (# "conv.ovf.u.un" value  : unativeint #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> unativeint) (value))
@@ -5146,7 +5191,7 @@ namespace Microsoft.FSharp.Core
             []
             let inline nativeint (value: ^T) = 
                  ExplicitDynamic<(^T), nativeint> value 
-                 when ^T : string     = ParseIntPtr (castToString value)
+                 when ^T : string    = ParseIntPtr (castToString value)
                  when ^T : float     = (# "conv.ovf.i" value  : nativeint #)
                  when ^T : float32   = (# "conv.ovf.i" value  : nativeint #)
                  when ^T : int64     = (# "conv.ovf.i" value  : nativeint #)
@@ -5154,10 +5199,10 @@ namespace Microsoft.FSharp.Core
                  when ^T : int16     = (# "conv.ovf.i" value  : nativeint #)
                  when ^T : nativeint = (# "conv.ovf.i" value  : nativeint #)
                  when ^T : sbyte     = (# "conv.ovf.i" value  : nativeint #)
-                 when ^T : uint64     = (# "conv.ovf.i.un" value  : nativeint #)
-                 when ^T : uint32     = (# "conv.ovf.i.un" value  : nativeint #)
-                 when ^T : uint16     = (# "conv.ovf.i.un" value  : nativeint #)
-                 when ^T : char       = (# "conv.ovf.i.un" value  : nativeint #)
+                 when ^T : uint64    = (# "conv.ovf.i.un" value  : nativeint #)
+                 when ^T : uint32    = (# "conv.ovf.i.un" value  : nativeint #)
+                 when ^T : uint16    = (# "conv.ovf.i.un" value  : nativeint #)
+                 when ^T : char      = (# "conv.ovf.i.un" value  : nativeint #)
                  when ^T : unativeint = (# "conv.ovf.i.un" value  : nativeint #)
                  when ^T : byte     = (# "conv.ovf.i.un" value  : nativeint #)
                  when ^T : ^T = (^T : (static member op_Explicit: ^T -> nativeint) (value))
@@ -5234,7 +5279,7 @@ namespace Microsoft.FSharp.Core
                 override obj.DoReset() = z <- n
                 override obj.Current = obj.Result z
                 override obj.CanStep = 
-                    let x  = z
+                    let x = z
                     let x' = obj.Step z 
                     if    obj.Before x' x                       then false           // x+step has wrapped around
                     elif  obj.Equal x' x                          then false           // x+step has not moved (unexpected, step<>0)
@@ -5297,9 +5342,9 @@ namespace Microsoft.FSharp.Core
 
                 let variableStepRangeEnumerator () =
                     let state = {
-                        Started  = false
+                        Started = false
                         Complete = false
-                        Current  = Unchecked.defaultof<'T>
+                        Current = Unchecked.defaultof<'T>
                     }
 
                     let current () = 
@@ -5417,7 +5462,7 @@ namespace Microsoft.FSharp.Core
                 override obj.DoReset() = z <- n
                 override obj.Current = z
                 override obj.CanStep = 
-                    let x  = z
+                    let x = z
                     let x' = obj.Step z 
                     // NOTE: The following code is similar to the integer case, but there are differences.
                     // * With floats, there is a NaN case to consider.
@@ -5572,7 +5617,7 @@ namespace Microsoft.FSharp.Core
                 GetArraySub source start (finish - start + 1)
 
             let inline SetArraySlice (target: _[]) start finish (source: _[]) = 
-                let start  = (match start with None -> 0 | Some n -> n) 
+                let start = (match start with None -> 0 | Some n -> n) 
                 let finish = (match finish with None -> target.Length - 1 | Some n -> n) 
                 SetArraySub target start (finish - start + 1) source
 
@@ -5603,7 +5648,7 @@ namespace Microsoft.FSharp.Core
 
             let inline GetArraySlice2DFixed2 (source: _[,]) start1 finish1 index2 = GetArraySlice2DFixed source start1 finish1 index2 0
 
-            let inline SetArraySlice2DFixed (target: _[,]) (source: _[]) index start finish nonFixedDim  = 
+            let inline SetArraySlice2DFixed (target: _[,]) (source: _[]) index start finish nonFixedDim = 
                 let bound = target.GetLowerBound(nonFixedDim)
                 let start, finish = ComputeSlice bound start finish (GetArray2DLength target nonFixedDim)
                 let len = (finish - start + 1)
@@ -5622,8 +5667,8 @@ namespace Microsoft.FSharp.Core
             let inline SetArraySlice2D (target: _[,]) start1 finish1 start2 finish2 (source: _[,]) = 
                 let bound1 = target.GetLowerBound(0)
                 let bound2 = target.GetLowerBound(1)
-                let start1  = (match start1 with None -> bound1 | Some n -> n) 
-                let start2  = (match start2 with None -> bound2 | Some n -> n) 
+                let start1 = (match start1 with None -> bound1 | Some n -> n) 
+                let start2 = (match start2 with None -> bound2 | Some n -> n) 
                 let finish1 = (match finish1 with None -> bound1 + GetArray2DLength1 target - 1 | Some n -> n) 
                 let finish2 = (match finish2 with None -> bound2 + GetArray2DLength2 target - 1 | Some n -> n) 
                 SetArray2DSub target start1 start2 (finish1 - start1 + 1) (finish2 - start2 + 1) source
@@ -5696,15 +5741,15 @@ namespace Microsoft.FSharp.Core
                 let bound1 = target.GetLowerBound(0)
                 let bound2 = target.GetLowerBound(1)
                 let bound3 = target.GetLowerBound(2)
-                let start1  = (match start1 with None -> bound1 | Some n -> n) 
-                let start2  = (match start2 with None -> bound2 | Some n -> n) 
-                let start3  = (match start3 with None -> bound3 | Some n -> n) 
+                let start1 = (match start1 with None -> bound1 | Some n -> n) 
+                let start2 = (match start2 with None -> bound2 | Some n -> n) 
+                let start3 = (match start3 with None -> bound3 | Some n -> n) 
                 let finish1 = (match finish1 with None -> bound1 + GetArray3DLength1 target - 1 | Some n -> n) 
                 let finish2 = (match finish2 with None -> bound2 + GetArray3DLength2 target - 1 | Some n -> n) 
                 let finish3 = (match finish3 with None -> bound3 + GetArray3DLength3 target - 1 | Some n -> n) 
                 SetArray3DSub target start1 start2 start3 (finish1 - start1 + 1) (finish2 - start2 + 1) (finish3 - start3 + 1) source
 
-            let inline SetArraySlice3DFixedSingle (target: _[,,]) (source: _[,]) index start1 finish1 start2 finish2 nonFixedDim1 nonFixedDim2  = 
+            let inline SetArraySlice3DFixedSingle (target: _[,,]) (source: _[,]) index start1 finish1 start2 finish2 nonFixedDim1 nonFixedDim2 = 
                 let bound1 = target.GetLowerBound(nonFixedDim1)
                 let bound2 = target.GetLowerBound(nonFixedDim2)
                 let start1, finish1 = ComputeSlice bound1 start1 finish1 (GetArray3DLength target nonFixedDim1)              
@@ -5882,10 +5927,10 @@ namespace Microsoft.FSharp.Core
                 let bound2 = target.GetLowerBound(1)
                 let bound3 = target.GetLowerBound(2)
                 let bound4 = target.GetLowerBound(3)
-                let start1  = (match start1 with None -> bound1 | Some n -> n) 
-                let start2  = (match start2 with None -> bound2 | Some n -> n) 
-                let start3  = (match start3 with None -> bound3 | Some n -> n) 
-                let start4  = (match start4 with None -> bound4 | Some n -> n) 
+                let start1 = (match start1 with None -> bound1 | Some n -> n) 
+                let start2 = (match start2 with None -> bound2 | Some n -> n) 
+                let start3 = (match start3 with None -> bound3 | Some n -> n) 
+                let start4 = (match start4 with None -> bound4 | Some n -> n) 
                 let finish1 = (match finish1 with None -> bound1 + GetArray4DLength1 target - 1 | Some n -> n) 
                 let finish2 = (match finish2 with None -> bound2 + GetArray4DLength2 target - 1 | Some n -> n) 
                 let finish3 = (match finish3 with None -> bound3 + GetArray4DLength3 target - 1 | Some n -> n) 
@@ -6408,101 +6453,101 @@ namespace Microsoft.FSharp.Core
         []
         let inline  acos (value: ^T) : ^T = 
              AcosDynamic value
-             when ^T : ^T       = acosImpl value
+             when ^T : ^T = acosImpl value
 
         []
         let inline  asin (value: ^T) : ^T = 
              AsinDynamic value
-             when ^T : ^T       = asinImpl value
+             when ^T : ^T = asinImpl value
 
         []
         let inline  atan (value: ^T) : ^T = 
              AtanDynamic value
-             when ^T : ^T       = atanImpl value
+             when ^T : ^T = atanImpl value
 
         []
         let inline  atan2(y: ^T) (x: ^T) : 'U = 
              Atan2Dynamic y x
-             when ^T : ^T       = (atan2Impl y x : 'U)
+             when ^T : ^T = (atan2Impl y x : 'U)
 
         []
         let inline  ceil (value: ^T) : ^T = 
              CeilingDynamic value
-             when ^T : ^T       = ceilImpl value
+             when ^T : ^T = ceilImpl value
 
         []
         let inline  exp(value: ^T) : ^T = 
              ExpDynamic value
-             when ^T : ^T       = expImpl value
+             when ^T : ^T = expImpl value
 
         []
         let inline floor (value: ^T) : ^T = 
              FloorDynamic value
-             when ^T : ^T       = floorImpl value
+             when ^T : ^T = floorImpl value
 
         []
         let inline truncate (value: ^T) : ^T = 
              TruncateDynamic value
-             when ^T : ^T       = truncateImpl value
+             when ^T : ^T = truncateImpl value
 
         []
         let inline round (value: ^T) : ^T = 
              RoundDynamic value
-             when ^T : ^T       = roundImpl value
+             when ^T : ^T = roundImpl value
 
         []
         let inline sign (value: ^T) : int = 
              SignDynamic value
-             when ^T : ^T       = signImpl value
+             when ^T : ^T = signImpl value
 
         []
         let inline  log (value: ^T) : ^T = 
              LogDynamic value
-             when ^T : ^T       = logImpl value
+             when ^T : ^T = logImpl value
 
         []
         let inline  log10 (value: ^T) : ^T = 
              Log10Dynamic value
-             when ^T : ^T       = log10Impl value
+             when ^T : ^T = log10Impl value
 
         []
         let inline  sqrt (value: ^T) : ^U = 
              SqrtDynamic value
-             when ^T : ^T       = (sqrtImpl value : ^U)
+             when ^T : ^T = (sqrtImpl value : ^U)
 
         []
         let inline  cos (value: ^T) : ^T = 
              CosDynamic value
-             when ^T : ^T       = cosImpl value
+             when ^T : ^T = cosImpl value
 
         []
         let inline cosh (value: ^T) : ^T = 
              CoshDynamic value
-             when ^T : ^T       = coshImpl value
+             when ^T : ^T = coshImpl value
 
         []
         let inline sin (value: ^T) : ^T = 
              SinDynamic value
-             when ^T : ^T       = sinImpl value
+             when ^T : ^T = sinImpl value
 
         []
         let inline sinh (value: ^T) : ^T = 
              SinhDynamic value
-             when ^T : ^T       = sinhImpl value
+             when ^T : ^T = sinhImpl value
 
         []
         let inline tan (value: ^T) : ^T = 
              TanDynamic value
-             when ^T : ^T       = tanImpl value
+             when ^T : ^T = tanImpl value
 
         []
         let inline tanh (value: ^T) : ^T = 
              TanhDynamic value
-             when ^T : ^T       = tanhImpl value
+             when ^T : ^T = tanhImpl value
 
         let inline ( ** ) (x: ^T) (y: ^U) : ^T = 
              PowDynamic x y
-             when ^T : ^T       = powImpl x y
+             when ^T : ^T = powImpl x y
 
         let inline gpown  (x: ^T) n =
             let v = PowGeneric (GenericOne< (^T) >, Checked.( * ), x,n) 
@@ -6563,13 +6608,13 @@ namespace Microsoft.FSharp.Core
                           elif n >= 0 then PowUIntPtr x n 
                           else 1un / PowUIntPtr x n)
 
-             when ^T : float       = 
+             when ^T : float = 
                          (let x = (retype x : float) in
                          if n >= 0 then PowDouble x n else 1.0 /  PowDouble x n)
-             when ^T : float32     = 
+             when ^T : float32 = 
                          (let x = (retype x : float32) in
                           if n >= 0 then PowSingle x n else 1.0f /  PowSingle x n)
-             when ^T : decimal     = 
+             when ^T : decimal = 
                          (let x = (retype x : decimal) in
                           if n >= 0 then PowDecimal x n else 1.0M /  PowDecimal x n)
 
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 7babdadeda3..d07d29a6031 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -121,8 +121,16 @@ let mainMethName = CompilerGeneratedName "main"
 type AttributeDecoder(namedArgs) =
 
     let nameMap = namedArgs |> List.map (fun (AttribNamedArg(s, _, _, c)) -> s, c) |> NameMap.ofList
-    let findConst x = match NameMap.tryFind x nameMap with | Some(AttribExpr(_, Expr.Const (c, _, _))) -> Some c | _ -> None
-    let findAppTr x = match NameMap.tryFind x nameMap with | Some(AttribExpr(_, Expr.App (_, _, [TType_app(tr, _)], _, _))) -> Some tr | _ -> None
+
+    let findConst x =
+        match NameMap.tryFind x nameMap with
+        | Some(AttribExpr(_, Expr.Const (c, _, _))) -> Some c
+        | _ -> None
+
+    let findTyconRef x =
+        match NameMap.tryFind x nameMap with
+        | Some(AttribExpr(_, Expr.App (_, _, [TType_app(tr, _, _)], _, _))) -> Some tr
+        | _ -> None
 
     member _.FindInt16 x dflt = match findConst x with | Some(Const.Int16 x) -> x | _ -> dflt
 
@@ -132,7 +140,7 @@ type AttributeDecoder(namedArgs) =
 
     member _.FindString x dflt = match findConst x with | Some(Const.String x) -> x | _ -> dflt
 
-    member _.FindTypeName x dflt = match findAppTr x with | Some tr -> tr.DisplayName | _ -> dflt
+    member _.FindTypeName x dflt = match findTyconRef x with | Some tr -> tr.DisplayName | _ -> dflt
 
 //--------------------------------------------------------------------------
 // Statistics
@@ -546,13 +554,13 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty =
     ignore voidOK
 #endif
     match stripTyEqnsAndMeasureEqns g ty with
-    | TType_app (tcref, tinst) ->
+    | TType_app (tcref, tinst, _) ->
         GenNamedTyAppAux amap m tyenv ptrsOK tcref tinst
 
     | TType_tuple (tupInfo, args) ->
         GenTypeAux amap m tyenv VoidNotOK ptrsOK (mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) args)
 
-    | TType_fun (dty, returnTy) ->
+    | TType_fun (dty, returnTy, _) ->
         EraseClosures.mkILFuncTy g.ilxPubCloEnv (GenTypeArgAux amap m tyenv dty) (GenTypeArgAux amap m tyenv returnTy)
 
     | TType_anon (anonInfo, tinst) ->
@@ -569,9 +577,11 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty =
         if tps.IsEmpty then GenTypeAux amap m tyenv VoidNotOK ptrsOK tau
         else EraseClosures.mkILTyFuncTy g.ilxPubCloEnv
 
-    | TType_var tp -> mkILTyvarTy tyenv.[tp, m]
+    | TType_var (tp, _) ->
+        mkILTyvarTy tyenv.[tp, m]
 
-    | TType_measure _ -> g.ilg.typ_Int32
+    | TType_measure _ ->
+        g.ilg.typ_Int32
 
 //--------------------------------------------------------------------------
 // Generate ILX references to closures, classunions etc. given a tyenv
diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index 12beab6b67c..8420004aaab 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -622,7 +622,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
               // a decent hash function for these.
               canMemoize=(fun (_flags, _: range, ty) -> 
                                     match stripTyEqns g ty with 
-                                    | TType_app(tcref, []) -> tcref.TypeContents.tcaug_closed 
+                                    | TType_app(tcref, [], _) -> tcref.TypeContents.tcaug_closed 
                                     | _ -> false),
               
               keyComparer=
@@ -631,13 +631,13 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
                                     // Ignoring the ranges - that's OK.
                                     flagsEq.Equals(flags1, flags2) && 
                                     match stripTyEqns g typ1, stripTyEqns g typ2 with 
-                                    | TType_app(tcref1, []), TType_app(tcref2, []) -> tyconRefEq g tcref1 tcref2
+                                    | TType_app(tcref1, [], _), TType_app(tcref2, [], _) -> tyconRefEq g tcref1 tcref2
                                     | _ -> false
                        member _.GetHashCode((flags, _, ty)) =
                                     // Ignoring the ranges - that's OK.
                                     flagsEq.GetHashCode flags + 
                                     (match stripTyEqns g ty with 
-                                     | TType_app(tcref, []) -> hash tcref.LogicalName
+                                     | TType_app(tcref, [], _) -> hash tcref.LogicalName
                                      | _ -> 0) })
     
     let FindImplicitConversionsUncached (ad, m, ty) = 
@@ -983,7 +983,7 @@ let TryFindMetadataInfoOfExternalEntityRef (infoReader: InfoReader) m eref =
         // Generalize to get a formal signature 
         let formalTypars = eref.Typars m
         let formalTypeInst = generalizeTypars formalTypars
-        let ty = TType_app(eref, formalTypeInst)
+        let ty = TType_app(eref, formalTypeInst, 0uy)
         if isILAppTy g ty then
             let formalTypeInfo = ILTypeInfo.FromType g ty
             Some(nlref.Ccu.FileName, formalTypars, formalTypeInfo)
diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs
index 3140cfcd475..66cdd839825 100644
--- a/src/fsharp/MethodCalls.fs
+++ b/src/fsharp/MethodCalls.fs
@@ -627,12 +627,12 @@ type CalledMeth<'T>
                             let pminfo = pinfo.SetterMethod
                             let pminst =
                                 match minfo with
-                                | MethInfo.FSMeth(_, TType_app(_, types), _, _) -> types
+                                | MethInfo.FSMeth(_, TType_app(_, types, _), _, _) -> types
                                 | _ -> freshenMethInfo m pminfo
 
                             let pminst =
                                 match tyargsOpt with
-                                | Some(TType_app(_, types)) -> types
+                                | Some(TType_app(_, types, _)) -> types
                                 | _ -> pminst
 
                             Choice1Of2(AssignedItemSetter(id, AssignedPropSetter(pinfo, pminfo, pminst), e))
diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs
index 48b1c487122..a77d3ba75d2 100644
--- a/src/fsharp/NameResolution.fs
+++ b/src/fsharp/NameResolution.fs
@@ -132,7 +132,7 @@ let ActivePatternElemsOfModuleOrNamespace g (modref: ModuleOrNamespaceRef) : Nam
 /// When reporting symbols, we care about abbreviations, e.g. 'int' and 'int32' count as two separate symbols
 let (|AbbrevOrAppTy|_|) (ty: TType) =
     match stripTyparEqns ty with
-    | TType_app (tcref, _) -> Some tcref
+    | TType_app (tcref, _, _) -> Some tcref
     | _ -> None
 
 /// Represents the item with which a named argument is associated.
@@ -1757,7 +1757,7 @@ let ItemsAreEffectivelyEqual g orig other =
         nm1 = nm2 &&
         (typeEquiv g (mkTyparTy tp1) (mkTyparTy tp2) ||
          match stripTyparEqns (mkTyparTy tp1), stripTyparEqns (mkTyparTy tp2) with
-         | TType_var tp1, TType_var tp2 ->
+         | TType_var (tp1, _), TType_var (tp2, _) ->
             not tp1.IsCompilerGenerated && not tp1.IsFromError &&
             not tp2.IsCompilerGenerated && not tp2.IsFromError &&
             equals tp1.Range tp2.Range
diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs
index 61e9aa2d8b8..a8285a5724e 100755
--- a/src/fsharp/NicePrint.fs
+++ b/src/fsharp/NicePrint.fs
@@ -140,7 +140,7 @@ module internal PrintUtilities =
         elif xref.IsTypeAbbrev then
             let ty = xref.TypeAbbrev.Value
             match stripTyEqns denv.g ty with
-            | TType_app(tcref, _) when tcref.IsStructOrEnumTycon ->
+            | TType_app(tcref, _, _) when tcref.IsStructOrEnumTycon ->
                 tagStruct name
             | _ ->
                 tagAlias name
@@ -833,24 +833,24 @@ module PrintTypes =
         match stripTyparEqns ty with 
 
         // Always prefer to format 'byref' as 'inref'
-        | ty when isInByrefTy g ty && (match ty with TType_app (tc, _) when g.inref_tcr.CanDeref && tyconRefEq g tc g.byref2_tcr -> true | _ -> false) ->
+        | ty when isInByrefTy g ty && (match ty with TType_app (tc, _, _) when g.inref_tcr.CanDeref && tyconRefEq g tc g.byref2_tcr -> true | _ -> false) ->
             layoutTypeWithInfoAndPrec denv env prec (mkInByrefTy g (destByrefTy g ty))
 
         // Always prefer to format 'byref' as 'outref'
-        | ty when isOutByrefTy g ty && (match ty with TType_app (tc, _) when g.outref_tcr.CanDeref && tyconRefEq g tc g.byref2_tcr -> true | _ -> false) ->
+        | ty when isOutByrefTy g ty && (match ty with TType_app (tc, _, _) when g.outref_tcr.CanDeref && tyconRefEq g tc g.byref2_tcr -> true | _ -> false) ->
             layoutTypeWithInfoAndPrec denv env prec (mkOutByrefTy g (destByrefTy g ty))
 
         // Always prefer to format 'byref' as 'byref'
-        | ty when isByrefTy g ty && (match ty with TType_app (tc, _) when g.byref_tcr.CanDeref && tyconRefEq g tc g.byref2_tcr -> true | _ -> false) ->
+        | ty when isByrefTy g ty && (match ty with TType_app (tc, _, _) when g.byref_tcr.CanDeref && tyconRefEq g tc g.byref2_tcr -> true | _ -> false) ->
             layoutTypeWithInfoAndPrec denv env prec (mkByrefTy g (destByrefTy g ty))
 
         // Always prefer 'float' to 'float<1>'
-        | TType_app (tc, args) when tc.IsMeasureableReprTycon && List.forall (isDimensionless g) args ->
+        | TType_app (tc, args, _) when tc.IsMeasureableReprTycon && List.forall (isDimensionless g) args ->
           layoutTypeWithInfoAndPrec denv env prec (reduceTyconRefMeasureableOrProvided g tc args)
 
         // Layout a type application
         | TType_ucase (UnionCaseRef(tc, _), args)
-        | TType_app (tc, args) ->
+        | TType_app (tc, args, _) ->
           let prefix = usePrefix denv tc
           layoutTypeAppWithInfoAndPrec denv env (layoutTyconRef denv tc) prec prefix args
 
@@ -886,7 +886,7 @@ module PrintTypes =
             bracketIfL (prec <= 4) funcTyL
 
         // Layout a type variable . 
-        | TType_var r ->
+        | TType_var (r, _) ->
             layoutTyparRefWithInfo denv env r
 
         | TType_measure unt -> layoutMeasure denv unt
@@ -1060,7 +1060,7 @@ module PrintTypes =
 
         let _niceMethodTypars, typarInst =
             let memberToParentInst = List.empty
-            let typars = argInfos |> List.choose (function TType.TType_var typar,_ -> Some typar | _ -> None)
+            let typars = argInfos |> List.choose (function TType_var (typar, _),_ -> Some typar | _ -> None)
             let methTyparNames = typars |> List.mapi (fun i tp -> if (PrettyTypes.NeedsPrettyTyparName tp) then sprintf "a%d" (List.length memberToParentInst + i) else tp.Name)
             PrettyTypes.NewPrettyTypars memberToParentInst typars methTyparNames
 
diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs
index 486defdf952..1a5f1754974 100644
--- a/src/fsharp/Optimizer.fs
+++ b/src/fsharp/Optimizer.fs
@@ -825,190 +825,229 @@ module Unchecked = Microsoft.FSharp.Core.Operators
 /// in the core library used by the F# compiler will propagate to be a mistake in optimization. 
 /// The IL instructions appear in the tree through inlining.
 let mkAssemblyCodeValueInfo g instrs argvals tys =
-  match instrs, argvals, tys with
+    match instrs, argvals, tys with
     | [ AI_add ], [t1;t2], _ -> 
-         // Note: each use of Unchecked.(+) gets instantiated at a different type and inlined
-         match IntegerBinaryOp g Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) t1 t2 with 
-         | Some res -> res
-         | _ -> UnknownValue
+        // Note: each use of Unchecked.(+) gets instantiated at a different type and inlined
+        match IntegerBinaryOp g Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) Unchecked.(+) t1 t2 with 
+        | Some res -> res
+        | _ -> UnknownValue
+
     | [ AI_sub ], [t1;t2], _ -> 
          // Note: each use of Unchecked.(+) gets instantiated at a different type and inlined
          match IntegerBinaryOp g Unchecked.(-) Unchecked.(-) Unchecked.(-) Unchecked.(-) Unchecked.(-) Unchecked.(-) Unchecked.(-) Unchecked.(-) t1 t2 with 
          | Some res -> res
          | _ -> UnknownValue
-    | [ AI_mul ], [a;b], _ -> (match IntegerBinaryOp g Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) a b with Some res -> res | None -> UnknownValue)
-    | [ AI_and ], [a;b], _ -> (match IntegerBinaryOp g (&&&) (&&&) (&&&) (&&&) (&&&) (&&&) (&&&) (&&&) a b with Some res -> res | None -> UnknownValue)
-    | [ AI_or ], [a;b], _ -> (match IntegerBinaryOp g (|||) (|||) (|||) (|||) (|||) (|||) (|||) (|||) a b with Some res -> res | None -> UnknownValue)
-    | [ AI_xor ], [a;b], _ -> (match IntegerBinaryOp g (^^^) (^^^) (^^^) (^^^) (^^^) (^^^) (^^^) (^^^) a b with Some res -> res | None -> UnknownValue)
-    | [ AI_not ], [a], _ -> (match IntegerUnaryOp g (~~~) (~~~) (~~~) (~~~) (~~~) (~~~) (~~~) (~~~) a with Some res -> res | None -> UnknownValue)
-    | [ AI_neg ], [a], _ -> (match SignedIntegerUnaryOp g (~-) (~-) (~-) (~-) a with Some res -> res | None -> UnknownValue)
+
+    | [ AI_mul ], [a;b], _ ->
+        match IntegerBinaryOp g Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) Unchecked.( * ) a b with
+        | Some res -> res
+        | None -> UnknownValue
+
+    | [ AI_and ], [a;b], _ ->
+        match IntegerBinaryOp g (&&&) (&&&) (&&&) (&&&) (&&&) (&&&) (&&&) (&&&) a b with
+        | Some res -> res
+        | None -> UnknownValue
+
+    | [ AI_or ], [a;b], _ ->
+        match IntegerBinaryOp g (|||) (|||) (|||) (|||) (|||) (|||) (|||) (|||) a b with
+        | Some res -> res
+        | None -> UnknownValue
+
+    | [ AI_xor ], [a;b], _ ->
+        match IntegerBinaryOp g (^^^) (^^^) (^^^) (^^^) (^^^) (^^^) (^^^) (^^^) a b with
+        | Some res -> res
+        | None -> UnknownValue
+
+    | [ AI_not ], [a], _ ->
+        match IntegerUnaryOp g (~~~) (~~~) (~~~) (~~~) (~~~) (~~~) (~~~) (~~~) a with
+        | Some res -> res
+        | None -> UnknownValue
+
+    | [ AI_neg ], [a], _ ->
+        match SignedIntegerUnaryOp g (~-) (~-) (~-) (~-) a with
+        | Some res -> res
+        | None -> UnknownValue
 
     | [ AI_ceq ], [a;b], _ -> 
-       match stripValue a, stripValue b with
-       | ConstValue(Const.Bool a1, _), ConstValue(Const.Bool a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.SByte a1, _), ConstValue(Const.SByte a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.Int16 a1, _), ConstValue(Const.Int16 a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.Int32 a1, _), ConstValue(Const.Int32 a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.Int64 a1, _), ConstValue(Const.Int64 a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.Char a1, _), ConstValue(Const.Char a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.Byte a1, _), ConstValue(Const.Byte a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.UInt16 a1, _), ConstValue(Const.UInt16 a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.UInt32 a1, _), ConstValue(Const.UInt32 a2, _) -> mkBoolVal g (a1 = a2)
-       | ConstValue(Const.UInt64 a1, _), ConstValue(Const.UInt64 a2, _) -> mkBoolVal g (a1 = a2)
-       | _ -> UnknownValue
+        match stripValue a, stripValue b with
+        | ConstValue(Const.Bool a1, _), ConstValue(Const.Bool a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.SByte a1, _), ConstValue(Const.SByte a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.Int16 a1, _), ConstValue(Const.Int16 a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.Int32 a1, _), ConstValue(Const.Int32 a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.Int64 a1, _), ConstValue(Const.Int64 a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.Char a1, _), ConstValue(Const.Char a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.Byte a1, _), ConstValue(Const.Byte a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.UInt16 a1, _), ConstValue(Const.UInt16 a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.UInt32 a1, _), ConstValue(Const.UInt32 a2, _) -> mkBoolVal g (a1 = a2)
+        | ConstValue(Const.UInt64 a1, _), ConstValue(Const.UInt64 a2, _) -> mkBoolVal g (a1 = a2)
+        | _ -> UnknownValue
+
     | [ AI_clt ], [a;b], _ -> 
-       match stripValue a, stripValue b with
-       | ConstValue(Const.Bool a1, _), ConstValue(Const.Bool a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.Int32 a1, _), ConstValue(Const.Int32 a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.Int64 a1, _), ConstValue(Const.Int64 a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.SByte a1, _), ConstValue(Const.SByte a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.Int16 a1, _), ConstValue(Const.Int16 a2, _) -> mkBoolVal g (a1 < a2)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_U1))], [a], [ty] when typeEquiv g ty g.byte_ty -> 
-       match stripValue a with
-       | ConstValue(Const.SByte a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.Int16 a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.Int32 a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.Int64 a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.Byte a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.UInt16 a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.UInt32 a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | ConstValue(Const.UInt64 a, _) -> mkUInt8Val g (Unchecked.byte a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_U2))], [a], [ty] when typeEquiv g ty g.uint16_ty -> 
-       match stripValue a with
-       | ConstValue(Const.SByte a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.Int16 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.Int32 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.Int64 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.Byte a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.UInt16 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.UInt32 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | ConstValue(Const.UInt64 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_U4))], [a], [ty] when typeEquiv g ty g.uint32_ty -> 
-       match stripValue a with
-       | ConstValue(Const.SByte a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.Int16 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.Int32 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.Int64 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.Byte a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.UInt16 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.UInt32 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | ConstValue(Const.UInt64 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_U8))], [a], [ty] when typeEquiv g ty g.uint64_ty -> 
-       match stripValue a with
-       | ConstValue(Const.SByte a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.Int16 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.Int32 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.Int64 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.Byte a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.UInt16 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.UInt32 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | ConstValue(Const.UInt64 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_I1))], [a], [ty] when typeEquiv g ty g.sbyte_ty -> 
-       match stripValue a with
-       | ConstValue(Const.SByte a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.Int16 a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.Int32 a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.Int64 a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.Byte a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.UInt16 a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.UInt32 a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | ConstValue(Const.UInt64 a, _) -> mkInt8Val g (Unchecked.sbyte a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_I2))], [a], [ty] when typeEquiv g ty g.int16_ty -> 
-       match stripValue a with
-       | ConstValue(Const.Int32 a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.Int16 a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.SByte a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.Int64 a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.UInt32 a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.UInt16 a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.Byte a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | ConstValue(Const.UInt64 a, _) -> mkInt16Val g (Unchecked.int16 a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_I4))], [a], [ty] when typeEquiv g ty g.int32_ty -> 
-       match stripValue a with
-       | ConstValue(Const.Int32 a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.Int16 a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.SByte a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.Int64 a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.UInt32 a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.UInt16 a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.Byte a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | ConstValue(Const.UInt64 a, _) -> mkInt32Val g (Unchecked.int32 a)
-       | _ -> UnknownValue
-    | [ (AI_conv(DT_I8))], [a], [ty] when typeEquiv g ty g.int64_ty -> 
-       match stripValue a with
-       | ConstValue(Const.Int32 a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.Int16 a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.SByte a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.Int64 a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.UInt32 a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.UInt16 a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.Byte a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | ConstValue(Const.UInt64 a, _) -> mkInt64Val g (Unchecked.int64 a)
-       | _ -> UnknownValue
+        match stripValue a, stripValue b with
+        | ConstValue(Const.Bool a1, _), ConstValue(Const.Bool a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.Int32 a1, _), ConstValue(Const.Int32 a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.Int64 a1, _), ConstValue(Const.Int64 a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.SByte a1, _), ConstValue(Const.SByte a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.Int16 a1, _), ConstValue(Const.Int16 a2, _) -> mkBoolVal g (a1 < a2)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_U1 ], [a], [ty] when typeEquiv g ty g.byte_ty -> 
+        match stripValue a with
+        | ConstValue(Const.SByte a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.Int16 a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.Int32 a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.Int64 a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.Byte a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.UInt16 a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.UInt32 a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | ConstValue(Const.UInt64 a, _) -> mkUInt8Val g (Unchecked.byte a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_U2 ], [a], [ty] when typeEquiv g ty g.uint16_ty -> 
+        match stripValue a with
+        | ConstValue(Const.SByte a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.Int16 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.Int32 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.Int64 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.Byte a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.UInt16 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.UInt32 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | ConstValue(Const.UInt64 a, _) -> mkUInt16Val g (Unchecked.uint16 a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_U4 ], [a], [ty] when typeEquiv g ty g.uint32_ty -> 
+        match stripValue a with
+        | ConstValue(Const.SByte a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.Int16 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.Int32 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.Int64 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.Byte a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.UInt16 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.UInt32 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | ConstValue(Const.UInt64 a, _) -> mkUInt32Val g (Unchecked.uint32 a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_U8 ], [a], [ty] when typeEquiv g ty g.uint64_ty -> 
+        match stripValue a with
+        | ConstValue(Const.SByte a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.Int16 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.Int32 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.Int64 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.Byte a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.UInt16 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.UInt32 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | ConstValue(Const.UInt64 a, _) -> mkUInt64Val g (Unchecked.uint64 a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_I1 ], [a], [ty] when typeEquiv g ty g.sbyte_ty -> 
+        match stripValue a with
+        | ConstValue(Const.SByte a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.Int16 a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.Int32 a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.Int64 a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.Byte a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.UInt16 a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.UInt32 a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | ConstValue(Const.UInt64 a, _) -> mkInt8Val g (Unchecked.sbyte a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_I2 ], [a], [ty] when typeEquiv g ty g.int16_ty -> 
+        match stripValue a with
+        | ConstValue(Const.Int32 a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.Int16 a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.SByte a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.Int64 a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.UInt32 a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.UInt16 a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.Byte a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | ConstValue(Const.UInt64 a, _) -> mkInt16Val g (Unchecked.int16 a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_I4 ], [a], [ty] when typeEquiv g ty g.int32_ty -> 
+        match stripValue a with
+        | ConstValue(Const.Int32 a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.Int16 a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.SByte a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.Int64 a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.UInt32 a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.UInt16 a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.Byte a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | ConstValue(Const.UInt64 a, _) -> mkInt32Val g (Unchecked.int32 a)
+        | _ -> UnknownValue
+
+    | [ AI_conv DT_I8 ], [a], [ty] when typeEquiv g ty g.int64_ty -> 
+        match stripValue a with
+        | ConstValue(Const.Int32 a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.Int16 a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.SByte a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.Int64 a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.UInt32 a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.UInt16 a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.Byte a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | ConstValue(Const.UInt64 a, _) -> mkInt64Val g (Unchecked.int64 a)
+        | _ -> UnknownValue
+
     | [ AI_clt_un ], [a;b], [ty] when typeEquiv g ty g.bool_ty -> 
-       match stripValue a, stripValue b with
-       | ConstValue(Const.Char a1, _), ConstValue(Const.Char a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.Byte a1, _), ConstValue(Const.Byte a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.UInt16 a1, _), ConstValue(Const.UInt16 a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.UInt32 a1, _), ConstValue(Const.UInt32 a2, _) -> mkBoolVal g (a1 < a2)
-       | ConstValue(Const.UInt64 a1, _), ConstValue(Const.UInt64 a2, _) -> mkBoolVal g (a1 < a2)
-       | _ -> UnknownValue
+        match stripValue a, stripValue b with
+        | ConstValue(Const.Char a1, _), ConstValue(Const.Char a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.Byte a1, _), ConstValue(Const.Byte a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.UInt16 a1, _), ConstValue(Const.UInt16 a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.UInt32 a1, _), ConstValue(Const.UInt32 a2, _) -> mkBoolVal g (a1 < a2)
+        | ConstValue(Const.UInt64 a1, _), ConstValue(Const.UInt64 a2, _) -> mkBoolVal g (a1 < a2)
+        | _ -> UnknownValue
+
     | [ AI_cgt ], [a;b], [ty] when typeEquiv g ty g.bool_ty -> 
-       match stripValue a, stripValue b with
-       | ConstValue(Const.SByte a1, _), ConstValue(Const.SByte a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.Int16 a1, _), ConstValue(Const.Int16 a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.Int32 a1, _), ConstValue(Const.Int32 a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.Int64 a1, _), ConstValue(Const.Int64 a2, _) -> mkBoolVal g (a1 > a2)
-       | _ -> UnknownValue
+        match stripValue a, stripValue b with
+        | ConstValue(Const.SByte a1, _), ConstValue(Const.SByte a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.Int16 a1, _), ConstValue(Const.Int16 a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.Int32 a1, _), ConstValue(Const.Int32 a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.Int64 a1, _), ConstValue(Const.Int64 a2, _) -> mkBoolVal g (a1 > a2)
+        | _ -> UnknownValue
+
     | [ AI_cgt_un ], [a;b], [ty] when typeEquiv g ty g.bool_ty -> 
-       match stripValue a, stripValue b with
-       | ConstValue(Const.Char a1, _), ConstValue(Const.Char a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.Byte a1, _), ConstValue(Const.Byte a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.UInt16 a1, _), ConstValue(Const.UInt16 a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.UInt32 a1, _), ConstValue(Const.UInt32 a2, _) -> mkBoolVal g (a1 > a2)
-       | ConstValue(Const.UInt64 a1, _), ConstValue(Const.UInt64 a2, _) -> mkBoolVal g (a1 > a2)
-       | _ -> UnknownValue
+        match stripValue a, stripValue b with
+        | ConstValue(Const.Char a1, _), ConstValue(Const.Char a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.Byte a1, _), ConstValue(Const.Byte a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.UInt16 a1, _), ConstValue(Const.UInt16 a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.UInt32 a1, _), ConstValue(Const.UInt32 a2, _) -> mkBoolVal g (a1 > a2)
+        | ConstValue(Const.UInt64 a1, _), ConstValue(Const.UInt64 a2, _) -> mkBoolVal g (a1 > a2)
+        | _ -> UnknownValue
+
     | [ AI_shl ], [a;n], _ -> 
-       match stripValue a, stripValue n with
-       | ConstValue(Const.Int64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> (mkInt64Val g (a <<< n))
-       | ConstValue(Const.Int32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> (mkInt32Val g (a <<< n))
-       | ConstValue(Const.Int16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> (mkInt16Val g (a <<< n))
-       | ConstValue(Const.SByte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> (mkInt8Val g (a <<< n))
-       | ConstValue(Const.UInt64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> (mkUInt64Val g (a <<< n))
-       | ConstValue(Const.UInt32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> (mkUInt32Val g (a <<< n))
-       | ConstValue(Const.UInt16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> (mkUInt16Val g (a <<< n))
-       | ConstValue(Const.Byte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> (mkUInt8Val g (a <<< n))
-       | _ -> UnknownValue
+        match stripValue a, stripValue n with
+        | ConstValue(Const.Int64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> mkInt64Val g (a <<< n)
+        | ConstValue(Const.Int32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> mkInt32Val g (a <<< n)
+        | ConstValue(Const.Int16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> mkInt16Val g (a <<< n)
+        | ConstValue(Const.SByte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> mkInt8Val g (a <<< n)
+        | ConstValue(Const.UInt64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> mkUInt64Val g (a <<< n)
+        | ConstValue(Const.UInt32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> mkUInt32Val g (a <<< n)
+        | ConstValue(Const.UInt16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> mkUInt16Val g (a <<< n)
+        | ConstValue(Const.Byte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> mkUInt8Val g (a <<< n)
+        | _ -> UnknownValue
 
     | [ AI_shr ], [a;n], _ -> 
-       match stripValue a, stripValue n with
-       | ConstValue(Const.SByte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> (mkInt8Val g (a >>> n))
-       | ConstValue(Const.Int16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> (mkInt16Val g (a >>> n))
-       | ConstValue(Const.Int32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> (mkInt32Val g (a >>> n))
-       | ConstValue(Const.Int64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> (mkInt64Val g (a >>> n))
-       | _ -> UnknownValue
+        match stripValue a, stripValue n with
+        | ConstValue(Const.SByte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> mkInt8Val g (a >>> n)
+        | ConstValue(Const.Int16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> mkInt16Val g (a >>> n)
+        | ConstValue(Const.Int32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> mkInt32Val g (a >>> n)
+        | ConstValue(Const.Int64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> mkInt64Val g (a >>> n)
+        | _ -> UnknownValue
+
     | [ AI_shr_un ], [a;n], _ -> 
-       match stripValue a, stripValue n with
-       | ConstValue(Const.Byte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> (mkUInt8Val g (a >>> n))
-       | ConstValue(Const.UInt16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> (mkUInt16Val g (a >>> n))
-       | ConstValue(Const.UInt32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> (mkUInt32Val g (a >>> n))
-       | ConstValue(Const.UInt64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> (mkUInt64Val g (a >>> n))
-       | _ -> UnknownValue
+        match stripValue a, stripValue n with
+        | ConstValue(Const.Byte a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 7 -> mkUInt8Val g (a >>> n)
+        | ConstValue(Const.UInt16 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 15 -> mkUInt16Val g (a >>> n)
+        | ConstValue(Const.UInt32 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 31 -> mkUInt32Val g (a >>> n)
+        | ConstValue(Const.UInt64 a, _), ConstValue(Const.Int32 n, _) when n >= 0 && n <= 63 -> mkUInt64Val g (a >>> n)
+        | _ -> UnknownValue
        
     // Retypings using IL asm "" are quite common in prim-types.fs
     // Sometimes these are only to get the primitives to pass the type checker.
     // Here we check for retypings from know values to known types.
     // We're conservative not to apply any actual data-changing conversions here.
     | [ ], [v], [ty] -> 
-       match stripValue v with
-       | ConstValue(Const.Bool a, _) ->
+        match stripValue v with
+        | ConstValue(Const.Bool a, _) ->
             if typeEquiv g ty g.bool_ty then v
             elif typeEquiv g ty g.sbyte_ty then mkInt8Val g (if a then 1y else 0y)
             elif typeEquiv g ty g.int16_ty then mkInt16Val g (if a then 1s else 0s)
@@ -1017,44 +1056,43 @@ let mkAssemblyCodeValueInfo g instrs argvals tys =
             elif typeEquiv g ty g.uint16_ty then mkUInt16Val g (if a then 1us else 0us)
             elif typeEquiv g ty g.uint32_ty then mkUInt32Val g (if a then 1u else 0u)
             else UnknownValue
-       | ConstValue(Const.SByte a, _) ->
+         | ConstValue(Const.SByte a, _) ->
             if typeEquiv g ty g.sbyte_ty then v
             elif typeEquiv g ty g.int16_ty then mkInt16Val g (Unchecked.int16 a)
             elif typeEquiv g ty g.int32_ty then mkInt32Val g (Unchecked.int32 a)
             else UnknownValue
-       | ConstValue(Const.Byte a, _) ->
+         | ConstValue(Const.Byte a, _) ->
             if typeEquiv g ty g.byte_ty then v
             elif typeEquiv g ty g.uint16_ty then mkUInt16Val g (Unchecked.uint16 a)
             elif typeEquiv g ty g.uint32_ty then mkUInt32Val g (Unchecked.uint32 a)
             else UnknownValue
-       | ConstValue(Const.Int16 a, _) ->
+         | ConstValue(Const.Int16 a, _) ->
             if typeEquiv g ty g.int16_ty then v
             elif typeEquiv g ty g.int32_ty then mkInt32Val g (Unchecked.int32 a)
             else UnknownValue
-       | ConstValue(Const.UInt16 a, _) ->
+         | ConstValue(Const.UInt16 a, _) ->
             if typeEquiv g ty g.uint16_ty then v
             elif typeEquiv g ty g.uint32_ty then mkUInt32Val g (Unchecked.uint32 a)
             else UnknownValue
-       | ConstValue(Const.Int32 a, _) ->
+         | ConstValue(Const.Int32 a, _) ->
             if typeEquiv g ty g.int32_ty then v
             elif typeEquiv g ty g.uint32_ty then mkUInt32Val g (Unchecked.uint32 a)
             else UnknownValue
-       | ConstValue(Const.UInt32 a, _) ->
+         | ConstValue(Const.UInt32 a, _) ->
             if typeEquiv g ty g.uint32_ty then v
             elif typeEquiv g ty g.int32_ty then mkInt32Val g (Unchecked.int32 a)
             else UnknownValue
-       | ConstValue(Const.Int64 a, _) ->
+         | ConstValue(Const.Int64 a, _) ->
             if typeEquiv g ty g.int64_ty then v
             elif typeEquiv g ty g.uint64_ty then mkUInt64Val g (Unchecked.uint64 a)
             else UnknownValue
-       | ConstValue(Const.UInt64 a, _) ->
+         | ConstValue(Const.UInt64 a, _) ->
             if typeEquiv g ty g.uint64_ty then v
             elif typeEquiv g ty g.int64_ty then mkInt64Val g (Unchecked.int64 a)
             else UnknownValue
-       | _ -> UnknownValue
+         | _ -> UnknownValue
     | _ -> UnknownValue
 
-
 //-------------------------------------------------------------------------
 // Size constants and combinators
 //------------------------------------------------------------------------- 
@@ -1076,11 +1114,11 @@ let NoExprs : Expr list * list> = [], []
 
 /// Common ways of building new value infos
 let CombineValueInfos einfos res = 
-      { TotalSize = AddTotalSizes einfos
-        FunctionSize = AddFunctionSizes einfos
-        HasEffect = OrEffects einfos 
-        MightMakeCriticalTailcall = OrTailcalls einfos 
-        Info = res }
+    { TotalSize = AddTotalSizes einfos
+      FunctionSize = AddFunctionSizes einfos
+      HasEffect = OrEffects einfos 
+      MightMakeCriticalTailcall = OrTailcalls einfos 
+      Info = res }
 
 let CombineValueInfosUnknown einfos = CombineValueInfos einfos UnknownValue
 
@@ -1180,14 +1218,14 @@ let AbstractOptimizationInfoToEssentials =
 
 /// Hide information because of a "let ... in ..." or "let rec ... in ... "
 let AbstractExprInfoByVars (boundVars: Val list, boundTyVars) ivalue =
-  // Module and member bindings can be skipped when checking abstraction, since abstraction of these values has already been done when 
-  // we hit the end of the module and called AbstractLazyModulInfoByHiding. If we don't skip these then we end up quadratically retraversing  
-  // the inferred optimization data, i.e. at each binding all the way up a sequences of 'lets' in a module. 
-  let boundVars = boundVars |> List.filter (fun v -> not v.IsMemberOrModuleBinding)
+    // Module and member bindings can be skipped when checking abstraction, since abstraction of these values has already been done when 
+    // we hit the end of the module and called AbstractLazyModulInfoByHiding. If we don't skip these then we end up quadratically retraversing  
+    // the inferred optimization data, i.e. at each binding all the way up a sequences of 'lets' in a module. 
+    let boundVars = boundVars |> List.filter (fun v -> not v.IsMemberOrModuleBinding)
 
-  match boundVars, boundTyVars with 
-  | [], [] -> ivalue
-  | _ -> 
+    match boundVars, boundTyVars with 
+    | [], [] -> ivalue
+    | _ -> 
 
       let rec abstractExprInfo ivalue =
           match ivalue with 
@@ -1260,18 +1298,18 @@ let RemapOptimizationInfo g tmenv =
         | ConstExprValue (sz, expr) -> ConstExprValue (sz, remapExpr g CloneAll tmenv expr)
 
     let remapValInfo v = 
-         { ValExprInfo=remapExprInfo v.ValExprInfo
-           ValMakesNoCriticalTailcalls=v.ValMakesNoCriticalTailcalls }
+       { ValExprInfo=remapExprInfo v.ValExprInfo
+         ValMakesNoCriticalTailcalls=v.ValMakesNoCriticalTailcalls }
 
     let rec remapModulInfo ss =
-         { ModuleOrNamespaceInfos = ss.ModuleOrNamespaceInfos |> NameMap.map remapLazyModulInfo
-           ValInfos = 
-              ss.ValInfos.Map (fun (vref, vinfo) -> 
-                   let vrefR = remapValRef tmenv vref 
-                   let vinfo = remapValInfo vinfo
-                   // Propagate any inferred ValMakesNoCriticalTailcalls flag from implementation to signature information
-                   if vinfo.ValMakesNoCriticalTailcalls then vrefR.Deref.SetMakesNoCriticalTailcalls() 
-                   (vrefR, vinfo)) } 
+       { ModuleOrNamespaceInfos = ss.ModuleOrNamespaceInfos |> NameMap.map remapLazyModulInfo
+         ValInfos = 
+           ss.ValInfos.Map (fun (vref, vinfo) -> 
+               let vrefR = remapValRef tmenv vref 
+               let vinfo = remapValInfo vinfo
+               // Propagate any inferred ValMakesNoCriticalTailcalls flag from implementation to signature information
+               if vinfo.ValMakesNoCriticalTailcalls then vrefR.Deref.SetMakesNoCriticalTailcalls() 
+               (vrefR, vinfo)) } 
 
     and remapLazyModulInfo ss =
          ss |> Lazy.force |> remapModulInfo |> notlazy
@@ -1317,8 +1355,9 @@ let rec IsSmallConstExpr x =
 
 let ValueOfExpr expr = 
     if IsSmallConstExpr expr then 
-      ConstExprValue(0, expr)
-    else UnknownValue
+        ConstExprValue(0, expr)
+    else
+        UnknownValue
 
 let IsMutableStructuralBindingForTupleElement (vref: ValRef) =
     vref.IsCompilerGenerated &&
@@ -2029,7 +2068,7 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                 let resultExprAfterConvertToResultTy = 
                     match reqdResultInfo, exprIsEnumerableInfo with 
                     | Some _, Some _ | None, None -> resultExpr // the expression is a QuerySource, the result is a QuerySource, nothing to do
-                    | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy (TType_app(g.tcref_System_Collections_IEnumerable, [])) resultExpr
+                    | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy (TType_app(g.tcref_System_Collections_IEnumerable, [], 0uy)) resultExpr
                     | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource g expr.Range resultElemTy qTy resultExpr 
                 Some resultExprAfterConvertToResultTy
             | None -> 
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index 76546b51019..625c6c8c8e3 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -336,7 +336,7 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
     // In an ideal world we would, instead, record the solutions to these constraints as "witness variables" in expressions, 
     // rather than solely in types. 
     match ty with 
-    | TType_var tp when tp.Solution.IsSome ->
+    | TType_var (tp, _) when tp.Solution.IsSome ->
         for cx in tp.Constraints do
             match cx with 
             | TyparConstraint.MayResolveMember(TTrait(_, _, _, _, _, soln), _) -> 
@@ -350,7 +350,7 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
         if g.compilingFslib then
             match stripTyparEqns ty with
             // When compiling FSharp.Core, do not strip type equations at this point if we can't dereference a tycon.
-            | TType_app (tcref, _) when not tcref.CanDeref -> ty
+            | TType_app (tcref, _, _) when not tcref.CanDeref -> ty
             | _ -> stripTyEqns g ty
         else 
             stripTyEqns g ty
@@ -362,8 +362,9 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
         CheckTypeDeep cenv f g env isInner body           
         tps |> List.iter (fun tp -> tp.Constraints |> List.iter (CheckTypeConstraintDeep cenv f g env))
 
-    | TType_measure _          -> ()
-    | TType_app (tcref, tinst) -> 
+    | TType_measure _ -> ()
+
+    | TType_app (tcref, tinst, _) -> 
         match visitTyconRefOpt with 
         | Some visitTyconRef -> visitTyconRef isInner tcref 
         | None -> ()
@@ -389,10 +390,10 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
     | TType_tuple (_, tys) ->
         CheckTypesDeep cenv f g env tys
 
-    | TType_fun (s, t) ->
+    | TType_fun (s, t, _) ->
         CheckTypeDeep cenv f g env true s; CheckTypeDeep cenv f g env true t
 
-    | TType_var tp -> 
+    | TType_var (tp, _) -> 
           if not tp.IsSolved then 
               match visitTyparOpt with 
               | None -> ()
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index d87b7ca05bf..c792e1dab9a 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -990,11 +990,11 @@ and FilterMeasureTyargs tys =
 and ConvType cenv env m ty =
     let g = cenv.g
     match stripTyEqnsAndMeasureEqns g ty with
-    | TType_app(tcref, [tyarg]) when isArrayTyconRef g tcref ->
+    | TType_app(tcref, [tyarg], _) when isArrayTyconRef g tcref ->
         QP.mkArrayTy(rankOfArrayTyconRef g tcref, ConvType cenv env m tyarg)
 
     | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations
-    | TType_app(tcref, tyargs) ->
+    | TType_app(tcref, tyargs, _) ->
 #if !NO_EXTENSIONTYPING
         match TryElimErasableTyconRef cenv m tcref with
         | Some baseTy -> ConvType cenv env m baseTy
@@ -1002,7 +1002,7 @@ and ConvType cenv env m ty =
 #endif
         QP.mkILNamedTy(ConvTyconRef cenv tcref m, ConvTypes cenv env m tyargs)
 
-    | TType_fun(a, b) -> 
+    | TType_fun(a, b, _) -> 
         QP.mkFunTy(ConvType cenv env m a, ConvType cenv env m b)
 
     | TType_tuple(tupInfo, l)  -> 
@@ -1013,7 +1013,7 @@ and ConvType cenv env m ty =
         let tinstR = ConvTypes cenv env m tinst
         QP.mkILNamedTy(ConvILTypeRefUnadjusted cenv m tref, tinstR)
 
-    | TType_var(tp) ->
+    | TType_var(tp, _) ->
         QP.mkVarTy(ConvTyparRef cenv env m tp)
 
     | TType_forall(_spec, _ty) ->
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index 777b386b284..85400319960 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -83,7 +83,10 @@ module FSharpLib =
 // Access the initial environment: helpers to build references
 //-------------------------------------------------------------------------
 
-let private mkNonGenericTy tcref = TType_app(tcref, [])
+// empty flags
+let v_knownWithoutNull = 0uy
+
+let private mkNonGenericTy tcref = TType_app(tcref, [], v_knownWithoutNull)
 
 let mkNonLocalTyconRef2 ccu path n = mkNonLocalTyconRef (mkNonLocalEntityRef ccu path) n
 
@@ -297,9 +300,9 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   let lazy_tcr = findSysTyconRef sys "Lazy`1"
   let v_fslib_IEvent2_tcr        = mk_MFControl_tcref fslibCcu "IEvent`2"
-  let v_tcref_IQueryable      =  findSysTyconRef sysLinq "IQueryable`1"
-  let v_tcref_IObservable      =  findSysTyconRef sys "IObservable`1"
-  let v_tcref_IObserver        =  findSysTyconRef sys "IObserver`1"
+  let v_tcref_IQueryable      = findSysTyconRef sysLinq "IQueryable`1"
+  let v_tcref_IObservable      = findSysTyconRef sys "IObservable`1"
+  let v_tcref_IObserver        = findSysTyconRef sys "IObserver`1"
   let v_fslib_IDelegateEvent_tcr = mk_MFControl_tcref fslibCcu "IDelegateEvent`1"
 
   let v_option_tcr_nice     = mk_MFCore_tcref fslibCcu "option`1"
@@ -360,12 +363,11 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   let v_system_Reflection_MethodInfo_ty = mkSysNonGenericTy ["System";"Reflection"] "MethodInfo"
   let v_nullable_tcr = findSysTyconRef sys "Nullable`1"
-
   (* local helpers to build value infos *)
-  let mkNullableTy ty = TType_app(v_nullable_tcr, [ty])
-  let mkByrefTy ty = TType_app(v_byref_tcr, [ty])
-  let mkNativePtrTy ty = TType_app(v_nativeptr_tcr, [ty])
-  let mkFunTy d r = TType_fun (d, r)
+  let mkNullableTy ty = TType_app(v_nullable_tcr, [ty], v_knownWithoutNull)
+  let mkByrefTy ty = TType_app(v_byref_tcr, [ty], v_knownWithoutNull)
+  let mkNativePtrTy ty = TType_app(v_nativeptr_tcr, [ty], v_knownWithoutNull)
+  let mkFunTy d r = TType_fun (d, r, v_knownWithoutNull)
   let (-->) d r = mkFunTy d r
   let mkIteratedFunTy dl r = List.foldBack mkFunTy dl r
   let mkSmallRefTupledTy l = match l with [] -> v_unit_ty | [h] -> h | tys -> mkRawRefTupleTy tys
@@ -407,24 +409,41 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let mk_compare_withc_sig  ty = [[v_IComparer_ty];[ty]; [ty]], v_int_ty
   let mk_equality_withc_sig ty = [[v_IEqualityComparer_ty];[ty];[ty]], v_bool_ty
   let mk_hash_withc_sig     ty = [[v_IEqualityComparer_ty]; [ty]], v_int_ty
-  let mkListTy ty         = TType_app(v_list_tcr_nice, [ty])
-  let mkSeqTy ty1         = TType_app(v_seq_tcr, [ty1])
-  let mkRefCellTy ty      = TType_app(v_refcell_tcr_canon, [ty])
-  let mkOptionTy ty      = TType_app(v_option_tcr_nice, [ty])
-  let mkQuerySourceTy ty1 ty2         = TType_app(v_querySource_tcr, [ty1; ty2])
-  let v_tcref_System_Collections_IEnumerable         = findSysTyconRef sysCollections "IEnumerable";
+
+  let mkListTy ty = TType_app(v_list_tcr_nice, [ty], v_knownWithoutNull)
+
+  let mkSeqTy ty1 = TType_app(v_seq_tcr, [ty1], v_knownWithoutNull)
+
+  let mkIEvent2Ty ty1 ty2 = TType_app (v_fslib_IEvent2_tcr, [ty1; ty2], v_knownWithoutNull)
+
+  let mkRefCellTy ty = TType_app(v_refcell_tcr_canon, [ty], v_knownWithoutNull)
+
+  let mkOptionTy ty = TType_app(v_option_tcr_nice, [ty], v_knownWithoutNull)
+
+  let mkQuerySourceTy ty1 ty2 = TType_app(v_querySource_tcr, [ty1; ty2], v_knownWithoutNull)
+
+  let v_tcref_System_Collections_IEnumerable = findSysTyconRef sysCollections "IEnumerable";
+
   let mkArrayType rank (ty : TType) : TType =
       assert (rank >= 1 && rank <= 32)
-      TType_app(v_il_arr_tcr_map.[rank - 1], [ty])
-  let mkLazyTy ty         = TType_app(lazy_tcr, [ty])
-
-  let mkPrintfFormatTy aty bty cty dty ety = TType_app(v_format_tcr, [aty;bty;cty;dty; ety])
-  let mk_format4_ty aty bty cty dty = TType_app(v_format4_tcr, [aty;bty;cty;dty])
-  let mkQuotedExprTy aty = TType_app(v_expr_tcr, [aty])
-  let mkRawQuotedExprTy = TType_app(v_raw_expr_tcr, [])
-  let mkQueryBuilderTy = TType_app(v_query_builder_tcref, [])
-  let mkLinqExpressionTy aty = TType_app(v_linqExpression_tcr, [aty])
+      TType_app(v_il_arr_tcr_map.[rank - 1], [ty], v_knownWithoutNull)
+
+  let mkLazyTy ty = TType_app(lazy_tcr, [ty], v_knownWithoutNull)
+
+  let mkPrintfFormatTy aty bty cty dty ety = TType_app(v_format_tcr, [aty;bty;cty;dty; ety], v_knownWithoutNull)
+
+  let mk_format4_ty aty bty cty dty = TType_app(v_format4_tcr, [aty;bty;cty;dty], v_knownWithoutNull)
+
+  let mkQuotedExprTy aty = TType_app(v_expr_tcr, [aty], v_knownWithoutNull)
+
+  let mkRawQuotedExprTy = TType_app(v_raw_expr_tcr, [], v_knownWithoutNull)
+
+  let mkQueryBuilderTy = TType_app(v_query_builder_tcref, [], v_knownWithoutNull)
+
+  let mkLinqExpressionTy aty = TType_app(v_linqExpression_tcr, [aty], v_knownWithoutNull)
+
   let v_cons_ucref = mkUnionCaseRef v_list_tcr_canon "op_ColonColon"
+
   let v_nil_ucref  = mkUnionCaseRef v_list_tcr_canon "op_Nil"
 
 
@@ -539,8 +558,8 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
       match l with
       | [t1;t2;t3;t4;t5;t6;t7;marker] ->
           match marker with
-          | TType_app(tcref, [t8]) when tyconRefEq tcref v_ref_tuple1_tcr -> mkRawRefTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
-          | TType_app(tcref, [t8]) when tyconRefEq tcref v_struct_tuple1_tcr -> mkRawStructTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
+          | TType_app(tcref, [t8], _) when tyconRefEq tcref v_ref_tuple1_tcr -> mkRawRefTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
+          | TType_app(tcref, [t8], _) when tyconRefEq tcref v_struct_tuple1_tcr -> mkRawStructTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
           | TType_tuple (_structness2, t8plus) -> TType_tuple (tupInfo, [t1;t2;t3;t4;t5;t6;t7] @ t8plus) |> Some
           | _ -> None
       | [] -> None
@@ -556,7 +575,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let decodeTupleTyIfPossible tcref tupInfo l =
       match tryDecodeTupleTy tupInfo l with
       | Some ty -> ty
-      | None -> TType_app(tcref, l)
+      | None -> TType_app(tcref, l, v_knownWithoutNull)
 
   let mk_MFCore_attrib nm : BuiltinAttribInfo =
       AttribInfo(mkILTyRef(ilg.fsharpCoreAssemblyScopeRef, FSharpLib.Core + "." + nm), mk_MFCore_tcref fslibCcu nm)
@@ -732,7 +751,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let v_seq_generated_info         = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref,                        "EnumerateWhile"                       , None                 , None          , [varb],     ([[v_unit_ty --> v_bool_ty]; [mkSeqTy varbTy]], mkSeqTy varbTy))
   let v_seq_finally_info           = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref,                        "EnumerateThenFinally"                 , None                 , None          , [varb],     ([[mkSeqTy varbTy]; [v_unit_ty --> v_unit_ty]], mkSeqTy varbTy))
   let v_seq_of_functions_info      = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref,                        "EnumerateFromFunctions"               , None                 , None          , [vara;varb], ([[v_unit_ty --> varaTy]; [varaTy --> v_bool_ty]; [varaTy --> varbTy]], mkSeqTy varbTy))
-  let v_create_event_info          = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref,                        "CreateEvent"                          , None                 , None          , [vara;varb], ([[varaTy --> v_unit_ty]; [varaTy --> v_unit_ty]; [(v_obj_ty --> (varbTy --> v_unit_ty)) --> varaTy]], TType_app (v_fslib_IEvent2_tcr, [varaTy;varbTy])))
+  let v_create_event_info          = makeIntrinsicValRef(fslib_MFRuntimeHelpers_nleref,                        "CreateEvent"                          , None                 , None          , [vara;varb], ([[varaTy --> v_unit_ty]; [varaTy --> v_unit_ty]; [(v_obj_ty --> (varbTy --> v_unit_ty)) --> varaTy]], mkIEvent2Ty varaTy varbTy))
   let v_cgh__useResumableCode_info = makeIntrinsicValRef(fslib_MFStateMachineHelpers_nleref,                   "__useResumableCode"                   , None                 , None          , [vara],     ([[]], v_bool_ty))
   let v_cgh__debugPoint_info       = makeIntrinsicValRef(fslib_MFStateMachineHelpers_nleref,                   "__debugPoint"                         , None                 , None          , [vara],     ([[v_int_ty]; [varaTy]], varaTy))
   let v_cgh__resumeAt_info         = makeIntrinsicValRef(fslib_MFStateMachineHelpers_nleref,                   "__resumeAt"                           , None                 , None          , [vara],     ([[v_int_ty]; [varaTy]], varaTy))
@@ -895,7 +914,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
           let entries = betterEntries
           let t = Dictionary.newWithSize entries.Length
           for nm, tcref, builder in entries do
-              t.Add(nm, fun tcref2 tinst2 -> if tyconRefEq tcref tcref2 then builder tinst2 else TType_app (tcref2, tinst2))
+              t.Add(nm, fun tcref2 tinst2 -> if tyconRefEq tcref tcref2 then builder tinst2 else TType_app (tcref2, tinst2, v_knownWithoutNull))
           betterTypeDict1 <- t
           t
       | _ -> betterTypeDict1
@@ -920,12 +939,12 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   let decompileTy (tcref: EntityRef) tinst =
       if compilingFslib then
           // No need to decompile when compiling FSharp.Core.dll
-          TType_app (tcref, tinst)
+          TType_app (tcref, tinst, v_knownWithoutNull)
       else
           let dict = getDecompileTypeDict()
           match dict.TryGetValue tcref.Stamp with
           | true, builder -> builder tinst
-          | _ -> TType_app (tcref, tinst)
+          | _ -> TType_app (tcref, tinst, v_knownWithoutNull)
 
   /// For cosmetic purposes "improve" some .NET types, e.g. Int32 --> int32.
   /// Doing this normalization is a fairly performance critical piece of code as it is frequently invoked
@@ -935,12 +954,12 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
             let dict = getBetterTypeDict1()
             match dict.TryGetValue tcref.LogicalName with
             | true, builder -> builder tcref tinst
-            | _ -> TType_app (tcref, tinst)
+            | _ -> TType_app (tcref, tinst, v_knownWithoutNull)
         else
             let dict = getBetterTypeDict2()
             match dict.TryGetValue tcref.Stamp with
             | true, builder -> builder tinst
-            | _ -> TType_app (tcref, tinst)
+            | _ -> TType_app (tcref, tinst, v_knownWithoutNull)
 
   // Adding an unnecessary "let" instead of inlining into a muiti-line pipelined compute-once "member val" that is too complex for @dsyme
   let v_attribs_Unsupported = [
@@ -956,6 +975,9 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   // A table of all intrinsics that the compiler cares about
   member _.knownIntrinsics = v_knownIntrinsics
 
+  // empty flags
+  member _.knownWithoutNull = v_knownWithoutNull
+
   // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the
   // better the job we do of mapping from provided expressions back to FSharp.Core F# functions and values.
   member _.knownFSharpCoreModules = v_knownFSharpCoreModules
@@ -967,177 +989,194 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   member _.langVersion = langVersion
   member _.unionCaseRefEq x y = primUnionCaseRefEq compilingFslib fslibCcu x y
   member _.valRefEq x y = primValRefEq compilingFslib fslibCcu x y
-  member _.fslibCcu                 = fslibCcu
-  member val refcell_tcr_canon    = v_refcell_tcr_canon
-  member val option_tcr_canon     = mk_MFCore_tcref     fslibCcu "Option`1"
-  member val valueoption_tcr_canon    = mk_MFCore_tcref     fslibCcu "ValueOption`1"
-  member _.list_tcr_canon       = v_list_tcr_canon
-  member val set_tcr_canon        = mk_MFCollections_tcref   fslibCcu "Set`1"
-  member val map_tcr_canon        = mk_MFCollections_tcref   fslibCcu "Map`2"
-  member _.lazy_tcr_canon       = lazy_tcr
-  member val refcell_tcr_nice     = v_refcell_tcr_nice
-  member val array_tcr_nice       = v_il_arr_tcr_map.[0]
-  member _.option_tcr_nice   = v_option_tcr_nice
-  member _.valueoption_tcr_nice  = v_valueoption_tcr_nice
-  member _.list_tcr_nice     = v_list_tcr_nice
-  member _.lazy_tcr_nice     = v_lazy_tcr_nice
-  member _.format_tcr       = v_format_tcr
-  member _.expr_tcr       = v_expr_tcr
-  member _.raw_expr_tcr       = v_raw_expr_tcr
-  member _.nativeint_tcr  = v_nativeint_tcr
+  member _.fslibCcu = fslibCcu
+  member val refcell_tcr_canon = v_refcell_tcr_canon
+  member val option_tcr_canon = mk_MFCore_tcref     fslibCcu "Option`1"
+  member val valueoption_tcr_canon = mk_MFCore_tcref     fslibCcu "ValueOption`1"
+  member _.list_tcr_canon = v_list_tcr_canon
+  member val set_tcr_canon = mk_MFCollections_tcref   fslibCcu "Set`1"
+  member val map_tcr_canon = mk_MFCollections_tcref   fslibCcu "Map`2"
+  member _.lazy_tcr_canon = lazy_tcr
+  member val refcell_tcr_nice = v_refcell_tcr_nice
+  member val array_tcr_nice = v_il_arr_tcr_map.[0]
+  member _.option_tcr_nice = v_option_tcr_nice
+  member _.valueoption_tcr_nice = v_valueoption_tcr_nice
+  member _.list_tcr_nice = v_list_tcr_nice
+  member _.lazy_tcr_nice = v_lazy_tcr_nice
+  member _.format_tcr = v_format_tcr
+  member _.expr_tcr = v_expr_tcr
+  member _.raw_expr_tcr = v_raw_expr_tcr
+  member _.nativeint_tcr = v_nativeint_tcr
   member _.unativeint_tcr = v_unativeint_tcr
-  member _.int_tcr        = v_int_tcr
-  member _.int32_tcr      = v_int32_tcr
-  member _.int16_tcr      = v_int16_tcr
-  member _.int64_tcr      = v_int64_tcr
-  member _.uint16_tcr     = v_uint16_tcr
-  member _.uint32_tcr     = v_uint32_tcr
-  member _.uint64_tcr     = v_uint64_tcr
-  member _.sbyte_tcr      = v_sbyte_tcr
-  member _.decimal_tcr    = v_decimal_tcr
-  member _.date_tcr    = v_date_tcr
-  member _.pdecimal_tcr   = v_pdecimal_tcr
-  member _.byte_tcr       = v_byte_tcr
-  member _.bool_tcr       = v_bool_tcr
+  member _.int_tcr = v_int_tcr
+  member _.int32_tcr = v_int32_tcr
+  member _.int16_tcr = v_int16_tcr
+  member _.int64_tcr = v_int64_tcr
+  member _.uint16_tcr = v_uint16_tcr
+  member _.uint32_tcr = v_uint32_tcr
+  member _.uint64_tcr = v_uint64_tcr
+  member _.sbyte_tcr = v_sbyte_tcr
+  member _.decimal_tcr = v_decimal_tcr
+  member _.date_tcr = v_date_tcr
+  member _.pdecimal_tcr = v_pdecimal_tcr
+  member _.byte_tcr = v_byte_tcr
+  member _.bool_tcr = v_bool_tcr
   member _.unit_tcr_canon = v_unit_tcr_canon
-  member _.unit_tcr_nice  = v_unit_tcr_nice
-  member _.exn_tcr        = v_exn_tcr
-  member _.char_tcr       = v_char_tcr
-  member _.float_tcr      = v_float_tcr
-  member _.float32_tcr    = v_float32_tcr
-  member _.pfloat_tcr      = v_pfloat_tcr
-  member _.pfloat32_tcr    = v_pfloat32_tcr
-  member _.pint_tcr        = v_pint_tcr
-  member _.pint8_tcr       = v_pint8_tcr
-  member _.pint16_tcr      = v_pint16_tcr
-  member _.pint64_tcr      = v_pint64_tcr
-  member _.pnativeint_tcr  = v_pnativeint_tcr
-  member _.puint_tcr       = v_puint_tcr
-  member _.puint8_tcr      = v_puint8_tcr
-  member _.puint16_tcr     = v_puint16_tcr
-  member _.puint64_tcr     = v_puint64_tcr
+  member _.unit_tcr_nice = v_unit_tcr_nice
+  member _.exn_tcr = v_exn_tcr
+  member _.char_tcr = v_char_tcr
+  member _.float_tcr = v_float_tcr
+  member _.float32_tcr = v_float32_tcr
+  member _.pfloat_tcr = v_pfloat_tcr
+  member _.pfloat32_tcr = v_pfloat32_tcr
+  member _.pint_tcr = v_pint_tcr
+  member _.pint8_tcr = v_pint8_tcr
+  member _.pint16_tcr = v_pint16_tcr
+  member _.pint64_tcr = v_pint64_tcr
+  member _.pnativeint_tcr = v_pnativeint_tcr
+  member _.puint_tcr = v_puint_tcr
+  member _.puint8_tcr = v_puint8_tcr
+  member _.puint16_tcr = v_puint16_tcr
+  member _.puint64_tcr = v_puint64_tcr
   member _.punativeint_tcr = v_punativeint_tcr
-  member _.byref_tcr      = v_byref_tcr
-  member _.byref2_tcr     = v_byref2_tcr
-  member _.outref_tcr     = v_outref_tcr
-  member _.inref_tcr      = v_inref_tcr
-  member _.nativeptr_tcr  = v_nativeptr_tcr
-  member _.voidptr_tcr    = v_voidptr_tcr
-  member _.ilsigptr_tcr   = v_ilsigptr_tcr
+  member _.byref_tcr = v_byref_tcr
+  member _.byref2_tcr = v_byref2_tcr
+  member _.outref_tcr = v_outref_tcr
+  member _.inref_tcr = v_inref_tcr
+  member _.nativeptr_tcr = v_nativeptr_tcr
+  member _.voidptr_tcr = v_voidptr_tcr
+  member _.ilsigptr_tcr = v_ilsigptr_tcr
   member _.fastFunc_tcr = v_fastFunc_tcr
   member _.MatchFailureException_tcr = v_mfe_tcr
   member _.tcref_IQueryable = v_tcref_IQueryable
-  member _.tcref_IObservable      = v_tcref_IObservable
-  member _.tcref_IObserver      = v_tcref_IObserver
-  member _.fslib_IEvent2_tcr      = v_fslib_IEvent2_tcr
-  member _.fslib_IDelegateEvent_tcr      = v_fslib_IDelegateEvent_tcr
-  member _.seq_tcr        = v_seq_tcr
+  member _.tcref_IObservable = v_tcref_IObservable
+  member _.tcref_IObserver = v_tcref_IObserver
+  member _.fslib_IEvent2_tcr = v_fslib_IEvent2_tcr
+  member _.fslib_IDelegateEvent_tcr = v_fslib_IDelegateEvent_tcr
+  member _.seq_tcr = v_seq_tcr
+
   member val seq_base_tcr = mk_MFCompilerServices_tcref fslibCcu "GeneratedSequenceBase`1"
+
   member val ListCollector_tcr = mk_MFCompilerServices_tcref fslibCcu "ListCollector`1"
+
   member val ArrayCollector_tcr = mk_MFCompilerServices_tcref fslibCcu "ArrayCollector`1"
-  member g.mk_GeneratedSequenceBase_ty seqElemTy = TType_app(g.seq_base_tcr,[seqElemTy])
+
+  member g.mk_GeneratedSequenceBase_ty seqElemTy = TType_app(g.seq_base_tcr,[seqElemTy], v_knownWithoutNull)
+
   member val ResumableStateMachine_tcr = mk_MFCompilerServices_tcref fslibCcu "ResumableStateMachine`1"
-  member g.mk_ResumableStateMachine_ty dataTy = TType_app(g.ResumableStateMachine_tcr,[dataTy])
+
+  member g.mk_ResumableStateMachine_ty dataTy = TType_app(g.ResumableStateMachine_tcr,[dataTy], v_knownWithoutNull)
+
   member val IResumableStateMachine_tcr = mk_MFCompilerServices_tcref fslibCcu "IResumableStateMachine`1"
-  member g.mk_IResumableStateMachine_ty dataTy = TType_app(g.IResumableStateMachine_tcr,[dataTy])
-  member g.mk_ListCollector_ty seqElemTy = TType_app(g.ListCollector_tcr,[seqElemTy])
-  member g.mk_ArrayCollector_ty seqElemTy = TType_app(g.ArrayCollector_tcr,[seqElemTy])
-  member val byrefkind_In_tcr =  mkNonLocalTyconRef fslib_MFByRefKinds_nleref "In"
-  member val byrefkind_Out_tcr =  mkNonLocalTyconRef fslib_MFByRefKinds_nleref "Out"
-  member val byrefkind_InOut_tcr =  mkNonLocalTyconRef fslib_MFByRefKinds_nleref "InOut"
+
+  member g.mk_IResumableStateMachine_ty dataTy = TType_app(g.IResumableStateMachine_tcr,[dataTy], v_knownWithoutNull)
+
+  member g.mk_ListCollector_ty seqElemTy = TType_app(g.ListCollector_tcr,[seqElemTy], v_knownWithoutNull)
+
+  member g.mk_ArrayCollector_ty seqElemTy = TType_app(g.ArrayCollector_tcr,[seqElemTy], v_knownWithoutNull)
+
+  member val byrefkind_In_tcr = mkNonLocalTyconRef fslib_MFByRefKinds_nleref "In"
+
+  member val byrefkind_Out_tcr = mkNonLocalTyconRef fslib_MFByRefKinds_nleref "Out"
+
+  member val byrefkind_InOut_tcr = mkNonLocalTyconRef fslib_MFByRefKinds_nleref "InOut"
+
   member val measureproduct_tcr = mk_MFCompilerServices_tcref fslibCcu "MeasureProduct`2"
+
   member val measureinverse_tcr = mk_MFCompilerServices_tcref fslibCcu "MeasureInverse`1"
+
   member val measureone_tcr = mk_MFCompilerServices_tcref fslibCcu "MeasureOne"
+
   member val ResumableCode_tcr = mk_MFCompilerServices_tcref fslibCcu "ResumableCode`2"
 
   member _.il_arr_tcr_map = v_il_arr_tcr_map
-  member _.ref_tuple1_tcr     = v_ref_tuple1_tcr
-  member _.ref_tuple2_tcr     = v_ref_tuple2_tcr
-  member _.ref_tuple3_tcr     = v_ref_tuple3_tcr
-  member _.ref_tuple4_tcr     = v_ref_tuple4_tcr
-  member _.ref_tuple5_tcr     = v_ref_tuple5_tcr
-  member _.ref_tuple6_tcr     = v_ref_tuple6_tcr
-  member _.ref_tuple7_tcr     = v_ref_tuple7_tcr
-  member _.ref_tuple8_tcr     = v_ref_tuple8_tcr
-  member _.struct_tuple1_tcr     = v_struct_tuple1_tcr
-  member _.struct_tuple2_tcr     = v_struct_tuple2_tcr
-  member _.struct_tuple3_tcr     = v_struct_tuple3_tcr
-  member _.struct_tuple4_tcr     = v_struct_tuple4_tcr
-  member _.struct_tuple5_tcr     = v_struct_tuple5_tcr
-  member _.struct_tuple6_tcr     = v_struct_tuple6_tcr
-  member _.struct_tuple7_tcr     = v_struct_tuple7_tcr
-  member _.struct_tuple8_tcr     = v_struct_tuple8_tcr
-  member _.choice2_tcr    = v_choice2_tcr
-  member _.choice3_tcr    = v_choice3_tcr
-  member _.choice4_tcr    = v_choice4_tcr
-  member _.choice5_tcr    = v_choice5_tcr
-  member _.choice6_tcr    = v_choice6_tcr
-  member _.choice7_tcr    = v_choice7_tcr
-  member val nativeint_ty  = v_nativeint_ty
+  member _.ref_tuple1_tcr = v_ref_tuple1_tcr
+  member _.ref_tuple2_tcr = v_ref_tuple2_tcr
+  member _.ref_tuple3_tcr = v_ref_tuple3_tcr
+  member _.ref_tuple4_tcr = v_ref_tuple4_tcr
+  member _.ref_tuple5_tcr = v_ref_tuple5_tcr
+  member _.ref_tuple6_tcr = v_ref_tuple6_tcr
+  member _.ref_tuple7_tcr = v_ref_tuple7_tcr
+  member _.ref_tuple8_tcr = v_ref_tuple8_tcr
+  member _.struct_tuple1_tcr = v_struct_tuple1_tcr
+  member _.struct_tuple2_tcr = v_struct_tuple2_tcr
+  member _.struct_tuple3_tcr = v_struct_tuple3_tcr
+  member _.struct_tuple4_tcr = v_struct_tuple4_tcr
+  member _.struct_tuple5_tcr = v_struct_tuple5_tcr
+  member _.struct_tuple6_tcr = v_struct_tuple6_tcr
+  member _.struct_tuple7_tcr = v_struct_tuple7_tcr
+  member _.struct_tuple8_tcr = v_struct_tuple8_tcr
+  member _.choice2_tcr = v_choice2_tcr
+  member _.choice3_tcr = v_choice3_tcr
+  member _.choice4_tcr = v_choice4_tcr
+  member _.choice5_tcr = v_choice5_tcr
+  member _.choice6_tcr = v_choice6_tcr
+  member _.choice7_tcr = v_choice7_tcr
+  member val nativeint_ty = v_nativeint_ty
   member val unativeint_ty = v_unativeint_ty
-  member val int32_ty      = v_int32_ty
-  member val int16_ty      = v_int16_ty
-  member val int64_ty      = v_int64_ty
-  member val uint16_ty     = v_uint16_ty
-  member val uint32_ty     = v_uint32_ty
-  member val uint64_ty     = v_uint64_ty
-  member val sbyte_ty      = v_sbyte_ty
-  member _.byte_ty       = v_byte_ty
-  member _.bool_ty       = v_bool_ty
-  member _.int_ty       = v_int_ty
-  member _.string_ty     = v_string_ty
+  member val int32_ty = v_int32_ty
+  member val int16_ty = v_int16_ty
+  member val int64_ty = v_int64_ty
+  member val uint16_ty = v_uint16_ty
+  member val uint32_ty = v_uint32_ty
+  member val uint64_ty = v_uint64_ty
+  member val sbyte_ty = v_sbyte_ty
+  member _.byte_ty = v_byte_ty
+  member _.bool_ty = v_bool_ty
+  member _.int_ty = v_int_ty
+  member _.string_ty = v_string_ty
   member _.system_IFormattable_tcref = v_IFormattable_tcref
   member _.system_FormattableString_tcref = v_FormattableString_tcref
   member _.system_FormattableStringFactory_tcref = v_FormattableStringFactory_tcref
   member _.system_IFormattable_ty = v_IFormattable_ty
   member _.system_FormattableString_ty = v_FormattableString_ty
   member _.system_FormattableStringFactory_ty = v_FormattableStringFactory_ty
-  member _.unit_ty       = v_unit_ty
-  member _.obj_ty        = v_obj_ty
-  member _.char_ty       = v_char_ty
-  member _.decimal_ty    = v_decimal_ty
-
-  member val exn_ty        = mkNonGenericTy v_exn_tcr
-  member val float_ty      = v_float_ty
-  member val float32_ty    = v_float32_ty
+  member _.unit_ty = v_unit_ty
+  member _.obj_ty = v_obj_ty
+  member _.char_ty = v_char_ty
+  member _.decimal_ty = v_decimal_ty
+
+  member val exn_ty = mkNonGenericTy v_exn_tcr
+  member val float_ty = v_float_ty
+  member val float32_ty = v_float32_ty
       /// Memoization table to help minimize the number of ILSourceDocument objects we create
   member _.memoize_file x = v_memoize_file.Apply x
 
-  member val system_Array_ty     = mkSysNonGenericTy sys "Array"
-  member val system_Object_ty    = mkSysNonGenericTy sys "Object"
-  member val system_IDisposable_ty    = mkSysNonGenericTy sys "IDisposable"
-  member val system_RuntimeHelpers_ty    = mkSysNonGenericTy sysCompilerServices "RuntimeHelpers"
-  member val system_Value_ty     = mkSysNonGenericTy sys "ValueType"
-  member val system_Delegate_ty     = mkSysNonGenericTy sys "Delegate"
-  member val system_MulticastDelegate_ty     = mkSysNonGenericTy sys "MulticastDelegate"
-  member val system_Enum_ty      = mkSysNonGenericTy sys "Enum"
+  member val system_Array_ty = mkSysNonGenericTy sys "Array"
+  member val system_Object_ty = mkSysNonGenericTy sys "Object"
+  member val system_IDisposable_ty = mkSysNonGenericTy sys "IDisposable"
+  member val system_RuntimeHelpers_ty = mkSysNonGenericTy sysCompilerServices "RuntimeHelpers"
+  member val system_Value_ty = mkSysNonGenericTy sys "ValueType"
+  member val system_Delegate_ty = mkSysNonGenericTy sys "Delegate"
+  member val system_MulticastDelegate_ty = mkSysNonGenericTy sys "MulticastDelegate"
+  member val system_Enum_ty = mkSysNonGenericTy sys "Enum"
   member val system_Exception_ty = mkSysNonGenericTy sys "Exception"
-  member val system_String_typ    = mkSysNonGenericTy sys "String"
-  member val system_String_tcref  = findSysTyconRef sys "String"
-  member val system_Int32_ty     = mkSysNonGenericTy sys "Int32"
-  member _.system_Type_ty                  = v_system_Type_ty
-  member val system_TypedReference_tcref        = tryFindSysTyconRef sys "TypedReference"
-  member val system_ArgIterator_tcref           = tryFindSysTyconRef sys "ArgIterator"
-  member val system_RuntimeArgumentHandle_tcref =  tryFindSysTyconRef sys "RuntimeArgumentHandle"
-  member val system_SByte_tcref =  findSysTyconRef sys "SByte"
-  member val system_Decimal_tcref =  findSysTyconRef sys "Decimal"
-  member val system_Int16_tcref =  findSysTyconRef sys "Int16"
-  member val system_Int32_tcref =  findSysTyconRef sys "Int32"
-  member val system_Int64_tcref =  findSysTyconRef sys "Int64"
-  member val system_IntPtr_tcref =  findSysTyconRef sys "IntPtr"
-  member val system_Bool_tcref =  findSysTyconRef sys "Boolean"
-  member val system_Byte_tcref =  findSysTyconRef sys "Byte"
-  member val system_UInt16_tcref =  findSysTyconRef sys "UInt16"
-  member val system_Char_tcref            =  findSysTyconRef sys "Char"
-  member val system_UInt32_tcref          =  findSysTyconRef sys "UInt32"
-  member val system_UInt64_tcref          =  findSysTyconRef sys "UInt64"
-  member val system_UIntPtr_tcref         =  findSysTyconRef sys "UIntPtr"
-  member val system_Single_tcref          =  findSysTyconRef sys "Single"
-  member val system_Double_tcref          =  findSysTyconRef sys "Double"
+  member val system_String_typ = mkSysNonGenericTy sys "String"
+  member val system_String_tcref = findSysTyconRef sys "String"
+  member val system_Int32_ty = mkSysNonGenericTy sys "Int32"
+  member _.system_Type_ty = v_system_Type_ty
+  member val system_TypedReference_tcref = tryFindSysTyconRef sys "TypedReference"
+  member val system_ArgIterator_tcref = tryFindSysTyconRef sys "ArgIterator"
+  member val system_RuntimeArgumentHandle_tcref = tryFindSysTyconRef sys "RuntimeArgumentHandle"
+  member val system_SByte_tcref = findSysTyconRef sys "SByte"
+  member val system_Decimal_tcref = findSysTyconRef sys "Decimal"
+  member val system_Int16_tcref = findSysTyconRef sys "Int16"
+  member val system_Int32_tcref = findSysTyconRef sys "Int32"
+  member val system_Int64_tcref = findSysTyconRef sys "Int64"
+  member val system_IntPtr_tcref = findSysTyconRef sys "IntPtr"
+  member val system_Bool_tcref = findSysTyconRef sys "Boolean"
+  member val system_Byte_tcref = findSysTyconRef sys "Byte"
+  member val system_UInt16_tcref = findSysTyconRef sys "UInt16"
+  member val system_Char_tcref = findSysTyconRef sys "Char"
+  member val system_UInt32_tcref = findSysTyconRef sys "UInt32"
+  member val system_UInt64_tcref = findSysTyconRef sys "UInt64"
+  member val system_UIntPtr_tcref = findSysTyconRef sys "UIntPtr"
+  member val system_Single_tcref = findSysTyconRef sys "Single"
+  member val system_Double_tcref = findSysTyconRef sys "Double"
   member val system_RuntimeTypeHandle_ty = mkSysNonGenericTy sys "RuntimeTypeHandle"
   member _.system_RuntimeMethodHandle_ty = v_system_RuntimeMethodHandle_ty
 
-  member val system_MarshalByRefObject_tcref =  tryFindSysTyconRef sys "MarshalByRefObject"
+  member val system_MarshalByRefObject_tcref = tryFindSysTyconRef sys "MarshalByRefObject"
   member val system_MarshalByRefObject_ty = tryMkSysNonGenericTy sys "MarshalByRefObject"
 
   member val system_ExceptionDispatchInfo_ty =
@@ -1147,14 +1186,14 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   member _.mk_IAsyncStateMachine_ty = mkSysNonGenericTy sysCompilerServices "IAsyncStateMachine" 
     
   member val system_Array_tcref = v_Array_tcref
-  member val system_Object_tcref  = findSysTyconRef sys "Object"
+  member val system_Object_tcref = findSysTyconRef sys "Object"
   member val system_Value_tcref = findSysTyconRef sys "ValueType"
-  member val system_Void_tcref    = findSysTyconRef sys "Void"
-  member val system_IndexOutOfRangeException_tcref    = findSysTyconRef sys "IndexOutOfRangeException"
+  member val system_Void_tcref = findSysTyconRef sys "Void"
+  member val system_IndexOutOfRangeException_tcref = findSysTyconRef sys "IndexOutOfRangeException"
   member val system_Nullable_tcref = v_nullable_tcr
   member val system_GenericIComparable_tcref = findSysTyconRef sys "IComparable`1"
   member val system_GenericIEquatable_tcref = findSysTyconRef sys "IEquatable`1"
-  member val mk_IComparable_ty    = mkSysNonGenericTy sys "IComparable"
+  member val mk_IComparable_ty = mkSysNonGenericTy sys "IComparable"
   member val system_LinqExpression_tcref = v_linqExpression_tcr
 
   member val mk_IStructuralComparable_ty = mkSysNonGenericTy sysCollections "IStructuralComparable"
@@ -1171,17 +1210,17 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   member val tcref_System_IComparable = findSysTyconRef sys "IComparable"
   member val tcref_System_IStructuralComparable = findSysTyconRef sysCollections "IStructuralComparable"
-  member val tcref_System_IStructuralEquatable  = findSysTyconRef sysCollections "IStructuralEquatable"
+  member val tcref_System_IStructuralEquatable = findSysTyconRef sysCollections "IStructuralEquatable"
   member val tcref_System_IDisposable = findSysTyconRef sys "IDisposable"
 
   member val tcref_LanguagePrimitives = mk_MFCore_tcref fslibCcu "LanguagePrimitives"
 
-  member val tcref_System_Collections_Generic_List       = findSysTyconRef sysGenerics "List`1"
-  member val tcref_System_Collections_Generic_IList       = findSysTyconRef sysGenerics "IList`1"
-  member val tcref_System_Collections_Generic_IReadOnlyList       = findSysTyconRef sysGenerics "IReadOnlyList`1"
+  member val tcref_System_Collections_Generic_List = findSysTyconRef sysGenerics "List`1"
+  member val tcref_System_Collections_Generic_IList = findSysTyconRef sysGenerics "IList`1"
+  member val tcref_System_Collections_Generic_IReadOnlyList = findSysTyconRef sysGenerics "IReadOnlyList`1"
   member val tcref_System_Collections_Generic_ICollection = findSysTyconRef sysGenerics "ICollection`1"
   member val tcref_System_Collections_Generic_IReadOnlyCollection = findSysTyconRef sysGenerics "IReadOnlyCollection`1"
-  member _.tcref_System_Collections_IEnumerable         = v_tcref_System_Collections_IEnumerable
+  member _.tcref_System_Collections_IEnumerable = v_tcref_System_Collections_IEnumerable
 
   member _.tcref_System_Collections_Generic_IEnumerable = v_IEnumerable_tcr
   member _.tcref_System_Collections_Generic_IEnumerator = v_IEnumerator_tcr
@@ -1191,57 +1230,57 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
   // Review: Does this need to be an option type?
   member val System_Runtime_CompilerServices_RuntimeFeature_ty = tryFindSysTyconRef sysCompilerServices "RuntimeFeature" |> Option.map mkNonGenericTy
 
-  member val iltyp_TypedReference      = tryFindSysILTypeRef "System.TypedReference" |> Option.map mkILNonGenericValueTy
-  member val iltyp_StreamingContext    = tryFindSysILTypeRef tname_StreamingContext  |> Option.map mkILNonGenericValueTy
-  member val iltyp_SerializationInfo   = tryFindSysILTypeRef tname_SerializationInfo  |> Option.map mkILNonGenericBoxedTy
-  member val iltyp_Missing             = findSysILTypeRef tname_Missing |> mkILNonGenericBoxedTy
-  member val iltyp_AsyncCallback       = findSysILTypeRef tname_AsyncCallback |> mkILNonGenericBoxedTy
-  member val iltyp_IAsyncResult        = findSysILTypeRef tname_IAsyncResult |> mkILNonGenericBoxedTy
-  member val iltyp_IComparable         = findSysILTypeRef tname_IComparable |> mkILNonGenericBoxedTy
-  member val iltyp_Exception           = findSysILTypeRef tname_Exception |> mkILNonGenericBoxedTy
-  member val iltyp_ValueType           = findSysILTypeRef tname_ValueType |> mkILNonGenericBoxedTy
-  member val iltyp_RuntimeFieldHandle  = findSysILTypeRef tname_RuntimeFieldHandle |> mkILNonGenericValueTy
+  member val iltyp_TypedReference = tryFindSysILTypeRef "System.TypedReference" |> Option.map mkILNonGenericValueTy
+  member val iltyp_StreamingContext = tryFindSysILTypeRef tname_StreamingContext  |> Option.map mkILNonGenericValueTy
+  member val iltyp_SerializationInfo = tryFindSysILTypeRef tname_SerializationInfo  |> Option.map mkILNonGenericBoxedTy
+  member val iltyp_Missing = findSysILTypeRef tname_Missing |> mkILNonGenericBoxedTy
+  member val iltyp_AsyncCallback = findSysILTypeRef tname_AsyncCallback |> mkILNonGenericBoxedTy
+  member val iltyp_IAsyncResult = findSysILTypeRef tname_IAsyncResult |> mkILNonGenericBoxedTy
+  member val iltyp_IComparable = findSysILTypeRef tname_IComparable |> mkILNonGenericBoxedTy
+  member val iltyp_Exception = findSysILTypeRef tname_Exception |> mkILNonGenericBoxedTy
+  member val iltyp_ValueType = findSysILTypeRef tname_ValueType |> mkILNonGenericBoxedTy
+  member val iltyp_RuntimeFieldHandle = findSysILTypeRef tname_RuntimeFieldHandle |> mkILNonGenericValueTy
   member val iltyp_RuntimeMethodHandle = findSysILTypeRef tname_RuntimeMethodHandle |> mkILNonGenericValueTy
-  member val iltyp_RuntimeTypeHandle   = findSysILTypeRef tname_RuntimeTypeHandle |> mkILNonGenericValueTy
+  member val iltyp_RuntimeTypeHandle = findSysILTypeRef tname_RuntimeTypeHandle |> mkILNonGenericValueTy
 
 
   member val attrib_AttributeUsageAttribute = findSysAttrib "System.AttributeUsageAttribute"
-  member val attrib_ParamArrayAttribute     = findSysAttrib "System.ParamArrayAttribute"
-  member val attrib_IDispatchConstantAttribute  = tryFindSysAttrib "System.Runtime.CompilerServices.IDispatchConstantAttribute"
-  member val attrib_IUnknownConstantAttribute  = tryFindSysAttrib "System.Runtime.CompilerServices.IUnknownConstantAttribute"
+  member val attrib_ParamArrayAttribute = findSysAttrib "System.ParamArrayAttribute"
+  member val attrib_IDispatchConstantAttribute = tryFindSysAttrib "System.Runtime.CompilerServices.IDispatchConstantAttribute"
+  member val attrib_IUnknownConstantAttribute = tryFindSysAttrib "System.Runtime.CompilerServices.IUnknownConstantAttribute"
 
   // We use 'findSysAttrib' here because lookup on attribute is done by name comparison, and can proceed
   // even if the type is not found in a system assembly.
-  member val attrib_IsReadOnlyAttribute  = findSysAttrib "System.Runtime.CompilerServices.IsReadOnlyAttribute"
-
-  member val attrib_SystemObsolete          = findSysAttrib "System.ObsoleteAttribute"
-  member val attrib_DllImportAttribute      = tryFindSysAttrib "System.Runtime.InteropServices.DllImportAttribute"
-  member val attrib_StructLayoutAttribute   = findSysAttrib "System.Runtime.InteropServices.StructLayoutAttribute"
-  member val attrib_TypeForwardedToAttribute   = findSysAttrib "System.Runtime.CompilerServices.TypeForwardedToAttribute"
-  member val attrib_ComVisibleAttribute     = findSysAttrib "System.Runtime.InteropServices.ComVisibleAttribute"
-  member val attrib_ComImportAttribute      = tryFindSysAttrib "System.Runtime.InteropServices.ComImportAttribute"
-  member val attrib_FieldOffsetAttribute    = findSysAttrib "System.Runtime.InteropServices.FieldOffsetAttribute"
-  member val attrib_MarshalAsAttribute      = tryFindSysAttrib "System.Runtime.InteropServices.MarshalAsAttribute"
-  member val attrib_InAttribute             = findSysAttrib "System.Runtime.InteropServices.InAttribute"
-  member val attrib_OutAttribute            = findSysAttrib "System.Runtime.InteropServices.OutAttribute"
-  member val attrib_OptionalAttribute       = tryFindSysAttrib "System.Runtime.InteropServices.OptionalAttribute"
+  member val attrib_IsReadOnlyAttribute = findSysAttrib "System.Runtime.CompilerServices.IsReadOnlyAttribute"
+
+  member val attrib_SystemObsolete = findSysAttrib "System.ObsoleteAttribute"
+  member val attrib_DllImportAttribute = tryFindSysAttrib "System.Runtime.InteropServices.DllImportAttribute"
+  member val attrib_StructLayoutAttribute = findSysAttrib "System.Runtime.InteropServices.StructLayoutAttribute"
+  member val attrib_TypeForwardedToAttribute = findSysAttrib "System.Runtime.CompilerServices.TypeForwardedToAttribute"
+  member val attrib_ComVisibleAttribute = findSysAttrib "System.Runtime.InteropServices.ComVisibleAttribute"
+  member val attrib_ComImportAttribute = tryFindSysAttrib "System.Runtime.InteropServices.ComImportAttribute"
+  member val attrib_FieldOffsetAttribute = findSysAttrib "System.Runtime.InteropServices.FieldOffsetAttribute"
+  member val attrib_MarshalAsAttribute = tryFindSysAttrib "System.Runtime.InteropServices.MarshalAsAttribute"
+  member val attrib_InAttribute = findSysAttrib "System.Runtime.InteropServices.InAttribute"
+  member val attrib_OutAttribute = findSysAttrib "System.Runtime.InteropServices.OutAttribute"
+  member val attrib_OptionalAttribute = tryFindSysAttrib "System.Runtime.InteropServices.OptionalAttribute"
   member val attrib_DefaultParameterValueAttribute = tryFindSysAttrib "System.Runtime.InteropServices.DefaultParameterValueAttribute"
-  member val attrib_ThreadStaticAttribute   = tryFindSysAttrib "System.ThreadStaticAttribute"
-  member val attrib_SpecialNameAttribute   = tryFindSysAttrib "System.Runtime.CompilerServices.SpecialNameAttribute"
-  member val attrib_VolatileFieldAttribute   = mk_MFCore_attrib "VolatileFieldAttribute"
+  member val attrib_ThreadStaticAttribute = tryFindSysAttrib "System.ThreadStaticAttribute"
+  member val attrib_SpecialNameAttribute = tryFindSysAttrib "System.Runtime.CompilerServices.SpecialNameAttribute"
+  member val attrib_VolatileFieldAttribute = mk_MFCore_attrib "VolatileFieldAttribute"
   member val attrib_NoEagerConstraintApplicationAttribute = mk_MFCompilerServices_attrib "NoEagerConstraintApplicationAttribute"
-  member val attrib_ContextStaticAttribute  = tryFindSysAttrib "System.ContextStaticAttribute"
-  member val attrib_FlagsAttribute          = findSysAttrib "System.FlagsAttribute"
-  member val attrib_DefaultMemberAttribute  = findSysAttrib "System.Reflection.DefaultMemberAttribute"
-  member val attrib_DebuggerDisplayAttribute  = findSysAttrib "System.Diagnostics.DebuggerDisplayAttribute"
-  member val attrib_DebuggerTypeProxyAttribute  = findSysAttrib "System.Diagnostics.DebuggerTypeProxyAttribute"
-  member val attrib_PreserveSigAttribute    = tryFindSysAttrib "System.Runtime.InteropServices.PreserveSigAttribute"
-  member val attrib_MethodImplAttribute     = findSysAttrib "System.Runtime.CompilerServices.MethodImplAttribute"
-  member val attrib_ExtensionAttribute     = findSysAttrib "System.Runtime.CompilerServices.ExtensionAttribute"
+  member val attrib_ContextStaticAttribute = tryFindSysAttrib "System.ContextStaticAttribute"
+  member val attrib_FlagsAttribute = findSysAttrib "System.FlagsAttribute"
+  member val attrib_DefaultMemberAttribute = findSysAttrib "System.Reflection.DefaultMemberAttribute"
+  member val attrib_DebuggerDisplayAttribute = findSysAttrib "System.Diagnostics.DebuggerDisplayAttribute"
+  member val attrib_DebuggerTypeProxyAttribute = findSysAttrib "System.Diagnostics.DebuggerTypeProxyAttribute"
+  member val attrib_PreserveSigAttribute = tryFindSysAttrib "System.Runtime.InteropServices.PreserveSigAttribute"
+  member val attrib_MethodImplAttribute = findSysAttrib "System.Runtime.CompilerServices.MethodImplAttribute"
+  member val attrib_ExtensionAttribute = findSysAttrib "System.Runtime.CompilerServices.ExtensionAttribute"
   member val attrib_CallerLineNumberAttribute = findSysAttrib "System.Runtime.CompilerServices.CallerLineNumberAttribute"
   member val attrib_CallerFilePathAttribute = findSysAttrib "System.Runtime.CompilerServices.CallerFilePathAttribute"
   member val attrib_CallerMemberNameAttribute = findSysAttrib "System.Runtime.CompilerServices.CallerMemberNameAttribute"
-  member val attrib_SkipLocalsInitAttribute  = findSysAttrib "System.Runtime.CompilerServices.SkipLocalsInitAttribute"
+  member val attrib_SkipLocalsInitAttribute = findSysAttrib "System.Runtime.CompilerServices.SkipLocalsInitAttribute"
   member val attribs_Unsupported = v_attribs_Unsupported
 
   member val attrib_ProjectionParameterAttribute           = mk_MFCore_attrib "ProjectionParameterAttribute"
diff --git a/src/fsharp/TypeRelations.fs b/src/fsharp/TypeRelations.fs
index 33fb87ae3fe..29153c610f6 100755
--- a/src/fsharp/TypeRelations.fs
+++ b/src/fsharp/TypeRelations.fs
@@ -63,7 +63,7 @@ let rec TypesFeasiblyEquivalent stripMeasures ndeep g amap m ty1 ty2 =
     | TType_var _, _  
     | _, TType_var _ -> true
 
-    | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2 ->
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2 ->
         List.lengthsEqAndForall2 (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) l1 l2
 
     | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2)      -> 
@@ -76,8 +76,9 @@ let rec TypesFeasiblyEquivalent stripMeasures ndeep g amap m ty1 ty2 =
         evalTupInfoIsStruct tupInfo1 = evalTupInfoIsStruct tupInfo2 &&
         List.lengthsEqAndForall2 (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) l1 l2 
 
-    | TType_fun (d1, r1), TType_fun (d2, r2)   -> 
-        (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) d1 d2 && (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) r1 r2
+    | TType_fun (d1, r1, _), TType_fun (d2, r2, _) -> 
+        TypesFeasiblyEquivalent stripMeasures ndeep g amap m d1 d2 &&
+        TypesFeasiblyEquivalent stripMeasures ndeep g amap m r1 r2
 
     | TType_measure _, TType_measure _ ->
         true
@@ -101,12 +102,13 @@ let rec TypeFeasiblySubsumesType ndeep g amap m ty1 canCoerce ty2 =
     match ty1, ty2 with 
     | TType_var _, _  | _, TType_var _ -> true
 
-    | TType_app (tc1, l1), TType_app (tc2, l2) when tyconRefEq g tc1 tc2  ->  
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  ->  
         List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2
 
     | TType_tuple _, TType_tuple _
     | TType_anon _, TType_anon _
-    | TType_fun _, TType_fun _ -> TypesFeasiblyEquiv ndeep g amap m ty1 ty2
+    | TType_fun _, TType_fun _ ->
+        TypesFeasiblyEquiv ndeep g amap m ty1 ty2
 
     | TType_measure _, TType_measure _ ->
         true
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 5ecc0cef62c..11163417361 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -2240,7 +2240,7 @@ type Typar =
         let ty = x.typar_astype
         match box ty with 
         | null -> 
-            let ty2 = TType_var x
+            let ty2 = TType_var (x, 0uy)
             x.typar_astype <- ty2
             ty2
         | _ -> ty
@@ -4020,40 +4020,34 @@ type RecdFieldRef =
 []
 type TType =
 
-    /// TType_forall(typars, bodyTy).
-    ///
     /// Indicates the type is a universal type, only used for types of values and members 
     | TType_forall of typars: Typars * bodyTy: TType
 
-    /// TType_app(tyconRef, typeInstantiation).
+    /// Indicates the type is built from a named type and a number of type arguments.
     ///
-    /// Indicates the type is built from a named type and a number of type arguments
-    | TType_app of tyconRef: TyconRef * typeInstantiation: TypeInst
+    /// 'flags' is a placeholder for future features, in particular nullness analysis
+    | TType_app of tyconRef: TyconRef * typeInstantiation: TypeInst * flags: byte
 
-    /// TType_anon
-    ///
     /// Indicates the type is an anonymous record type whose compiled representation is located in the given assembly
     | TType_anon of anonInfo: AnonRecdTypeInfo * tys: TType list
 
-    /// TType_tuple(elementTypes).
-    ///
     /// Indicates the type is a tuple type. elementTypes must be of length 2 or greater.
     | TType_tuple of tupInfo: TupInfo * elementTypes: TTypes
 
-    /// TType_fun(domainType, rangeType).
+    /// Indicates the type is a function type.
     ///
-    /// Indicates the type is a function type 
-    | TType_fun of domainType: TType * rangeType: TType
+    /// 'flags' is a placeholder for future features, in particular nullness analysis.
+    | TType_fun of domainType: TType * rangeType: TType * flags: byte
 
-    /// TType_ucase(unionCaseRef, typeInstantiation)
-    ///
     /// Indicates the type is a non-F#-visible type representing a "proof" that a union value belongs to a particular union case
     /// These types are not user-visible and will never appear as an inferred type. They are the types given to
     /// the temporaries arising out of pattern matching on union values.
     | TType_ucase of unionCaseRef: UnionCaseRef * typeInstantiation: TypeInst
 
     /// Indicates the type is a variable type, whether declared, generalized or an inference type parameter  
-    | TType_var of typar: Typar 
+    ///
+    /// 'flags' is a placeholder for future features, in particular nullness analysis
+    | TType_var of typar: Typar * flags: byte
 
     /// Indicates the type is a unit-of-measure expression being used as an argument to a type or member
     | TType_measure of measure: Measure
@@ -4063,12 +4057,12 @@ type TType =
     member x.GetAssemblyName() =
         match x with
         | TType_forall (_tps, ty) -> ty.GetAssemblyName()
-        | TType_app (tcref, _tinst) -> tcref.CompilationPath.ILScopeRef.QualifiedName
+        | TType_app (tcref, _tinst, _) -> tcref.CompilationPath.ILScopeRef.QualifiedName
         | TType_tuple (_tupInfo, _tinst) -> ""
         | TType_anon (anonInfo, _tinst) -> defaultArg anonInfo.Assembly.QualifiedName ""
-        | TType_fun (_d, _r) -> ""
+        | TType_fun (_d, _r, _) -> ""
         | TType_measure _ms -> ""
-        | TType_var tp -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> ""
+        | TType_var (tp, _) -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> ""
         | TType_ucase (_uc, _tinst) ->
             let (TILObjectReprData(scope, _nesting, _definition)) = _uc.Tycon.ILTyconInfo
             scope.QualifiedName
@@ -4079,7 +4073,7 @@ type TType =
     override x.ToString() =  
         match x with 
         | TType_forall (_tps, ty) -> "forall ... " + ty.ToString()
-        | TType_app (tcref, tinst) -> tcref.DisplayName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">")
+        | TType_app (tcref, tinst, _) -> tcref.DisplayName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">")
         | TType_tuple (tupInfo, tinst) -> 
             (match tupInfo with 
              | TupInfo.Const false -> ""
@@ -4090,9 +4084,9 @@ type TType =
              | TupInfo.Const false -> ""
              | TupInfo.Const true -> "struct ")
              + "{|" + String.concat "," (Seq.map2 (fun nm ty -> nm + " " + string ty + ";") anonInfo.SortedNames tinst) + ")" + "|}"
-        | TType_fun (d, r) -> "(" + string d + " -> " + string r + ")"
+        | TType_fun (d, r, _) -> "(" + string d + " -> " + string r + ")"
         | TType_ucase (uc, tinst) -> "ucase " + uc.CaseName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">")
-        | TType_var tp -> 
+        | TType_var (tp, _) -> 
             match tp.Solution with 
             | None -> tp.DisplayName
             | Some _ -> tp.DisplayName + " (solved)"
diff --git a/src/fsharp/TypedTreeBasics.fs b/src/fsharp/TypedTreeBasics.fs
index b92bd6ff7bb..3223de0da5a 100644
--- a/src/fsharp/TypedTreeBasics.fs
+++ b/src/fsharp/TypedTreeBasics.fs
@@ -231,7 +231,7 @@ let rec stripUnitEqnsAux canShortcut unt =
 
 let rec stripTyparEqnsAux canShortcut ty = 
     match ty with 
-    | TType_var r -> 
+    | TType_var (r, _) -> 
         match r.Solution with
         | Some soln -> 
             if canShortcut then 
@@ -240,7 +240,7 @@ let rec stripTyparEqnsAux canShortcut ty =
                 // This is only because IterType likes to walk _all_ the constraints _everywhere_ in a type, including
                 // those attached to _solved_ type variables. In an ideal world this would never be needed - see the notes
                 // on IterType.
-                | TType_var r2 when r2.Constraints.IsEmpty -> 
+                | TType_var (r2, _) when r2.Constraints.IsEmpty -> 
                    match r2.Solution with
                    | None -> ()
                    | Some _ as soln2 -> 
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 3c58daca24a..d07eed8cfad 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -175,10 +175,12 @@ let generalizeTypars tps = List.map generalizeTypar tps
 let rec remapTypeAux (tyenv: Remap) (ty: TType) =
   let ty = stripTyparEqns ty
   match ty with
-  | TType_var tp as ty -> instTyparRef tyenv.tpinst ty tp
-  | TType_app (tcref, tinst) as ty -> 
+  | TType_var (tp, _) as ty ->
+      instTyparRef tyenv.tpinst ty tp
+
+  | TType_app (tcref, tinst, flags) as ty -> 
       match tyenv.tyconRefRemap.TryFind tcref with 
-      | Some tcref' -> TType_app (tcref', remapTypesAux tyenv tinst)
+      | Some tcref' -> TType_app (tcref', remapTypesAux tyenv tinst, flags)
       | None -> 
           match tinst with 
           | [] -> ty  // optimization to avoid re-allocation of TType_app node in the common case 
@@ -186,7 +188,7 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) =
               // avoid reallocation on idempotent 
               let tinst' = remapTypesAux tyenv tinst
               if tinst === tinst' then ty else 
-              TType_app (tcref, tinst')
+              TType_app (tcref, tinst', flags)
 
   | TType_ucase (UnionCaseRef(tcref, n), tinst) -> 
       match tyenv.tyconRefRemap.TryFind tcref with 
@@ -205,11 +207,11 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) =
       if tupInfo === tupInfo' && l === l' then ty else  
       TType_tuple (tupInfo', l')
 
-  | TType_fun (d, r) as ty -> 
+  | TType_fun (d, r, flags) as ty -> 
       let d' = remapTypeAux tyenv d
       let r' = remapTypeAux tyenv r
       if d === d' && r === r' then ty else
-      TType_fun (d', r')
+      TType_fun (d', r', flags)
 
   | TType_forall (tps, ty) -> 
       let tps', tyenv = copyAndRemapAndBindTypars tyenv tps
@@ -590,21 +592,21 @@ let tryNormalizeMeasureInType g ty =
 
 let mkNativePtrTy (g: TcGlobals) ty = 
     assert g.nativeptr_tcr.CanDeref // this should always be available, but check anyway
-    TType_app (g.nativeptr_tcr, [ty])
+    TType_app (g.nativeptr_tcr, [ty], g.knownWithoutNull)
 
 let mkByrefTy (g: TcGlobals) ty = 
     assert g.byref_tcr.CanDeref // this should always be available, but check anyway
-    TType_app (g.byref_tcr, [ty])
+    TType_app (g.byref_tcr, [ty], g.knownWithoutNull)
 
 let mkInByrefTy (g: TcGlobals) ty = 
     if g.inref_tcr.CanDeref then // If not using sufficient FSharp.Core, then inref = byref, see RFC FS-1053.md
-        TType_app (g.inref_tcr, [ty])
+        TType_app (g.inref_tcr, [ty], g.knownWithoutNull)
     else
         mkByrefTy g ty
 
 let mkOutByrefTy (g: TcGlobals) ty = 
     if g.outref_tcr.CanDeref then // If not using sufficient FSharp.Core, then outref = byref, see RFC FS-1053.md
-        TType_app (g.outref_tcr, [ty])
+        TType_app (g.outref_tcr, [ty], g.knownWithoutNull)
     else
         mkByrefTy g ty
 
@@ -616,24 +618,24 @@ let mkByrefTyWithFlag g readonly ty =
 
 let mkByref2Ty (g: TcGlobals) ty1 ty2 = 
     assert g.byref2_tcr.CanDeref // check we are using sufficient FSharp.Core, caller should check this
-    TType_app (g.byref2_tcr, [ty1; ty2])
+    TType_app (g.byref2_tcr, [ty1; ty2], g.knownWithoutNull)
 
 let mkVoidPtrTy (g: TcGlobals) = 
     assert g.voidptr_tcr.CanDeref // check we are using sufficient FSharp.Core, caller should check this
-    TType_app (g.voidptr_tcr, [])
+    TType_app (g.voidptr_tcr, [], g.knownWithoutNull)
 
 let mkByrefTyWithInference (g: TcGlobals) ty1 ty2 = 
     if g.byref2_tcr.CanDeref then // If not using sufficient FSharp.Core, then inref = byref, see RFC FS-1053.md
-        TType_app (g.byref2_tcr, [ty1; ty2]) 
+        TType_app (g.byref2_tcr, [ty1; ty2], g.knownWithoutNull) 
     else 
-        TType_app (g.byref_tcr, [ty1]) 
+        TType_app (g.byref_tcr, [ty1], g.knownWithoutNull) 
 
 let mkArrayTy (g: TcGlobals) rank ty m =
     if rank < 1 || rank > 32 then
         errorR(Error(FSComp.SR.tastopsMaxArrayThirtyTwo rank, m))
-        TType_app (g.il_arr_tcr_map.[3], [ty])
+        TType_app (g.il_arr_tcr_map.[3], [ty], g.knownWithoutNull)
     else
-        TType_app (g.il_arr_tcr_map.[rank - 1], [ty])
+        TType_app (g.il_arr_tcr_map.[rank - 1], [ty], g.knownWithoutNull)
 
 //--------------------------------------------------------------------------
 // Tuple compilation (types)
@@ -675,16 +677,16 @@ let mkCompiledTupleTyconRef (g: TcGlobals) isStruct n =
 let rec mkCompiledTupleTy g isStruct tupElemTys = 
     let n = List.length tupElemTys 
     if n < maxTuple then
-        TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys)
+        TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys, g.knownWithoutNull)
     else 
         let tysA, tysB = List.splitAfter goodTupleFields tupElemTys
-        TType_app ((if isStruct then g.struct_tuple8_tcr else g.ref_tuple8_tcr), tysA@[mkCompiledTupleTy g isStruct tysB])
+        TType_app ((if isStruct then g.struct_tuple8_tcr else g.ref_tuple8_tcr), tysA@[mkCompiledTupleTy g isStruct tysB], g.knownWithoutNull)
 
 /// Convert from F# tuple types to .NET tuple types, but only the outermost level
 let mkOuterCompiledTupleTy g isStruct tupElemTys = 
     let n = List.length tupElemTys 
     if n < maxTuple then 
-        TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys)
+        TType_app (mkCompiledTupleTyconRef g isStruct n, tupElemTys, g.knownWithoutNull)
     else 
         let tysA, tysB = List.splitAfter goodTupleFields tupElemTys
         let tcref = (if isStruct then g.struct_tuple8_tcr else g.ref_tuple8_tcr)
@@ -692,10 +694,10 @@ let mkOuterCompiledTupleTy g isStruct tupElemTys =
         // as a regular F# tuple type.
         match tysB with 
         | [ tyB ] -> 
-            let marker = TType_app (mkCompiledTupleTyconRef g isStruct 1, [tyB])
-            TType_app (tcref, tysA@[marker])
+            let marker = TType_app (mkCompiledTupleTyconRef g isStruct 1, [tyB], g.knownWithoutNull)
+            TType_app (tcref, tysA@[marker], g.knownWithoutNull)
         | _ ->
-            TType_app (tcref, tysA@[TType_tuple (mkTupInfo isStruct, tysB)])
+            TType_app (tcref, tysA@[TType_tuple (mkTupInfo isStruct, tysB)], g.knownWithoutNull)
 
 //---------------------------------------------------------------------------
 // Remove inference equations and abbreviations from types 
@@ -734,7 +736,7 @@ let reduceTyconRefMeasureableOrProvided (g: TcGlobals) (tcref: TyconRef) tyargs
 let rec stripTyEqnsA g canShortcut ty = 
     let ty = stripTyparEqnsAux canShortcut ty 
     match ty with 
-    | TType_app (tcref, tinst) -> 
+    | TType_app (tcref, tinst, _) -> 
         let tycon = tcref.Deref
         match tycon.TypeAbbrev with 
         | Some abbrevTy -> 
@@ -746,7 +748,7 @@ let rec stripTyEqnsA g canShortcut ty =
             // Add the equation byref<'T> = byref<'T, ByRefKinds.InOut> for when using sufficient FSharp.Core
             // See RFC FS-1053.md
             if tyconRefEq g tcref g.byref_tcr && g.byref2_tcr.CanDeref && g.byrefkind_InOut_tcr.CanDeref then 
-                mkByref2Ty g tinst.[0] (TType_app(g.byrefkind_InOut_tcr, []))
+                mkByref2Ty g tinst.[0] (TType_app(g.byrefkind_InOut_tcr, [], g.knownWithoutNull))
 
             // Add the equation double<1> = double for units of measure.
             elif tycon.IsMeasureableReprTycon && List.forall (isDimensionless g) tinst then
@@ -771,7 +773,7 @@ let evalAnonInfoIsStruct (anonInfo: AnonRecdTypeInfo) =
 let rec stripTyEqnsAndErase eraseFuncAndTuple (g: TcGlobals) ty =
     let ty = stripTyEqns g ty
     match ty with
-    | TType_app (tcref, args) -> 
+    | TType_app (tcref, args, _) -> 
         let tycon = tcref.Deref
         if tycon.IsErased then
             stripTyEqnsAndErase eraseFuncAndTuple g (reduceTyconMeasureableOrProvided g tycon args)
@@ -779,8 +781,13 @@ let rec stripTyEqnsAndErase eraseFuncAndTuple (g: TcGlobals) ty =
             stripTyEqnsAndErase eraseFuncAndTuple g g.nativeint_ty
         else
             ty
-    | TType_fun(a, b) when eraseFuncAndTuple -> TType_app(g.fastFunc_tcr, [ a; b]) 
-    | TType_tuple(tupInfo, l) when eraseFuncAndTuple -> mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) l
+
+    | TType_fun(a, b, flags) when eraseFuncAndTuple ->
+        TType_app(g.fastFunc_tcr, [ a; b ], flags) 
+
+    | TType_tuple(tupInfo, l) when eraseFuncAndTuple ->
+        mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) l
+
     | ty -> ty
 
 let stripTyEqnsAndMeasureEqns g ty =
@@ -801,62 +808,98 @@ let rec stripExnEqns (eref: TyconRef) =
     | _ -> exnc
 
 let primDestForallTy g ty = ty |> stripTyEqns g |> (function TType_forall (tyvs, tau) -> (tyvs, tau) | _ -> failwith "primDestForallTy: not a forall type")
-let destFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau) -> (tyv, tau) | _ -> failwith "destFunTy: not a function type")
+
+let destFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _) -> (tyv, tau) | _ -> failwith "destFunTy: not a function type")
+
 let destAnyTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) -> tupInfo, l | _ -> failwith "destAnyTupleTy: not a tuple type")
+
 let destRefTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) when not (evalTupInfoIsStruct tupInfo) -> l | _ -> failwith "destRefTupleTy: not a reference tuple type")
+
 let destStructTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) when evalTupInfoIsStruct tupInfo -> l | _ -> failwith "destStructTupleTy: not a struct tuple type")
-let destTyparTy g ty = ty |> stripTyEqns g |> (function TType_var v -> v | _ -> failwith "destTyparTy: not a typar type")
-let destAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var v -> v | TType_measure unt -> destUnitParMeasure g unt | _ -> failwith "destAnyParTy: not a typar or unpar type")
+
+let destTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> v | _ -> failwith "destTyparTy: not a typar type")
+
+let destAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> v | TType_measure unt -> destUnitParMeasure g unt | _ -> failwith "destAnyParTy: not a typar or unpar type")
+
 let destMeasureTy g ty = ty |> stripTyEqns g |> (function TType_measure m -> m | _ -> failwith "destMeasureTy: not a unit-of-measure type")
+
 let isFunTy g ty = ty |> stripTyEqns g |> (function TType_fun _ -> true | _ -> false)
+
 let isForallTy g ty = ty |> stripTyEqns g |> (function TType_forall _ -> true | _ -> false)
+
 let isAnyTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple _ -> true | _ -> false)
+
 let isRefTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, _) -> not (evalTupInfoIsStruct tupInfo) | _ -> false)
+
 let isStructTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, _) -> evalTupInfoIsStruct tupInfo | _ -> false)
+
 let isAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon _ -> true | _ -> false)
+
 let isStructAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon (anonInfo, _) -> evalAnonInfoIsStruct anonInfo | _ -> false)
-let isUnionTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsUnionTycon | _ -> false)
-let isReprHiddenTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsHiddenReprTycon | _ -> false)
-let isFSharpObjModelTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsFSharpObjectModelTycon | _ -> false)
-let isRecdTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsRecordTycon | _ -> false)
-let isFSharpStructOrEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsFSharpStructOrEnumTycon | _ -> false)
-let isFSharpEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsFSharpEnumTycon | _ -> false)
+
+let isUnionTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsUnionTycon | _ -> false)
+
+let isReprHiddenTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsHiddenReprTycon | _ -> false)
+
+let isFSharpObjModelTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsFSharpObjectModelTycon | _ -> false)
+
+let isRecdTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsRecordTycon | _ -> false)
+
+let isFSharpStructOrEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsFSharpStructOrEnumTycon | _ -> false)
+
+let isFSharpEnumTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsFSharpEnumTycon | _ -> false)
+
 let isTyparTy g ty = ty |> stripTyEqns g |> (function TType_var _ -> true | _ -> false)
+
 let isAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var _ -> true | TType_measure unt -> isUnitParMeasure g unt | _ -> false)
-let isMeasureTy g ty = ty |> stripTyEqns g |> (function TType_measure _ -> true | _ -> false)
 
+let isMeasureTy g ty = ty |> stripTyEqns g |> (function TType_measure _ -> true | _ -> false)
 
 let isProvenUnionCaseTy ty = match ty with TType_ucase _ -> true | _ -> false
 
-let mkAppTy tcref tyargs = TType_app(tcref, tyargs)
+let mkAppTy tcref tyargs = TType_app(tcref, tyargs, 0uy)
+
 let mkProvenUnionCaseTy ucref tyargs = TType_ucase(ucref, tyargs)
+
 let isAppTy g ty = ty |> stripTyEqns g |> (function TType_app _ -> true | _ -> false) 
-let tryAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst) -> ValueSome (tcref, tinst) | _ -> ValueNone) 
-let destAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst) -> tcref, tinst | _ -> failwith "destAppTy")
-let tcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref | _ -> failwith "tcrefOfAppTy") 
-let argsOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(_, tinst) -> tinst | _ -> [])
-let tryDestTyparTy g ty = ty |> stripTyEqns g |> (function TType_var v -> ValueSome v | _ -> ValueNone)
-let tryDestFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau) -> ValueSome(tyv, tau) | _ -> ValueNone)
-let tryTcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> ValueSome tcref | _ -> ValueNone)
+
+let tryAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> ValueSome (tcref, tinst) | _ -> ValueNone) 
+
+let destAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> tcref, tinst | _ -> failwith "destAppTy")
+
+let tcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref | _ -> failwith "tcrefOfAppTy") 
+
+let argsOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(_, tinst, _) -> tinst | _ -> [])
+
+let tryDestTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> ValueSome v | _ -> ValueNone)
+
+let tryDestFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _) -> ValueSome(tyv, tau) | _ -> ValueNone)
+
+let tryTcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> ValueSome tcref | _ -> ValueNone)
+
 let tryDestAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon (anonInfo, tys) -> ValueSome (anonInfo, tys) | _ -> ValueNone)
 
-let tryAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var v -> ValueSome v | TType_measure unt when isUnitParMeasure g unt -> ValueSome(destUnitParMeasure g unt) | _ -> ValueNone)
-let tryAnyParTyOption g ty = ty |> stripTyEqns g |> (function TType_var v -> Some v | TType_measure unt when isUnitParMeasure g unt -> Some(destUnitParMeasure g unt) | _ -> None)
-let (|AppTy|_|) g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst) -> Some (tcref, tinst) | _ -> None) 
+let tryAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> ValueSome v | TType_measure unt when isUnitParMeasure g unt -> ValueSome(destUnitParMeasure g unt) | _ -> ValueNone)
+
+let tryAnyParTyOption g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> Some v | TType_measure unt when isUnitParMeasure g unt -> Some(destUnitParMeasure g unt) | _ -> None)
+
+let (|AppTy|_|) g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> Some (tcref, tinst) | _ -> None) 
+
 let (|RefTupleTy|_|) g ty = ty |> stripTyEqns g |> (function TType_tuple(tupInfo, tys) when not (evalTupInfoIsStruct tupInfo) -> Some tys | _ -> None)
-let (|FunTy|_|) g ty = ty |> stripTyEqns g |> (function TType_fun(dty, rty) -> Some (dty, rty) | _ -> None)
+
+let (|FunTy|_|) g ty = ty |> stripTyEqns g |> (function TType_fun(dty, rty, _) -> Some (dty, rty) | _ -> None)
 
 let tryNiceEntityRefOfTy ty = 
     let ty = stripTyparEqnsAux false ty 
     match ty with
-    | TType_app (tcref, _) -> ValueSome tcref
+    | TType_app (tcref, _, _) -> ValueSome tcref
     | TType_measure (Measure.Con tcref) -> ValueSome tcref
     | _ -> ValueNone
 
 let tryNiceEntityRefOfTyOption ty = 
     let ty = stripTyparEqnsAux false ty 
     match ty with
-    | TType_app (tcref, _) -> Some tcref
+    | TType_app (tcref, _, _) -> Some tcref
     | TType_measure (Measure.Con tcref) -> Some tcref
     | _ -> None
     
@@ -883,9 +926,9 @@ let convertToTypeWithMetadataIfPossible g ty =
 
 let stripMeasuresFromTType g tt = 
     match tt with
-    | TType_app(a,b) ->
+    | TType_app(a, b, flags) ->
         let b' = b |> List.filter (isMeasureTy g >> not)
-        TType_app(a, b')
+        TType_app(a, b', flags)
     | _ -> tt
 
 //---------------------------------------------------------------------------
@@ -994,30 +1037,39 @@ and typeAEquivAux erasureFlag g aenv ty1 ty2 =
     match ty1, ty2 with
     | TType_forall(tps1, rty1), TType_forall(tps2, rty2) -> 
         typarsAEquivAux erasureFlag g aenv tps1 tps2 && typeAEquivAux erasureFlag g (aenv.BindEquivTypars tps1 tps2) rty1 rty2
-    | TType_var tp1, TType_var tp2 when typarEq tp1 tp2 -> 
+
+    | TType_var (tp1, _), TType_var (tp2, _) when typarEq tp1 tp2 -> 
         true
-    | TType_var tp1, _ ->
+
+    | TType_var (tp1, _), _ ->
         match aenv.EquivTypars.TryFind tp1 with
         | Some v -> typeEquivAux erasureFlag g v ty2
         | None -> false
-    | TType_app (tc1, b1), TType_app (tc2, b2) -> 
+
+    | TType_app (tc1, b1, _), TType_app (tc2, b2, _) -> 
         tcrefAEquiv g aenv tc1 tc2 &&
         typesAEquivAux erasureFlag g aenv b1 b2
+
     | TType_ucase (UnionCaseRef(tc1, n1), b1), TType_ucase (UnionCaseRef(tc2, n2), b2) -> 
         n1=n2 &&
         tcrefAEquiv g aenv tc1 tc2 &&
         typesAEquivAux erasureFlag g aenv b1 b2
+
     | TType_tuple (s1, l1), TType_tuple (s2, l2) -> 
         structnessAEquiv s1 s2 && typesAEquivAux erasureFlag g aenv l1 l2
+
     | TType_anon (anonInfo1, l1), TType_anon (anonInfo2, l2) -> 
         anonInfoEquiv anonInfo1 anonInfo2 &&
         typesAEquivAux erasureFlag g aenv l1 l2
-    | TType_fun (dtys1, rty1), TType_fun (dtys2, rty2) -> 
+
+    | TType_fun (dtys1, rty1, _), TType_fun (dtys2, rty2, _) -> 
         typeAEquivAux erasureFlag g aenv dtys1 dtys2 && typeAEquivAux erasureFlag g aenv rty1 rty2
+
     | TType_measure m1, TType_measure m2 -> 
         match erasureFlag with 
         | EraseNone -> measureAEquiv g aenv m1 m2 
         | _ -> true 
+
     | _ -> false
 
 
@@ -1039,20 +1091,26 @@ and measureAEquiv g aenv un1 un2 =
     let cons1 = ListMeasureConOccsAfterRemapping g remapTyconRef un1
     let cons2 = ListMeasureConOccsAfterRemapping g remapTyconRef un2 
  
-    List.forall (fun v -> MeasureVarExponent v un1 = MeasureVarExponent (trans v) un2) vars1 &&
-    List.forall (fun v -> MeasureVarExponent v un1 = MeasureVarExponent v un2) vars2 &&
-    List.forall (fun c -> MeasureConExponentAfterRemapping g remapTyconRef c un1 = MeasureConExponentAfterRemapping g remapTyconRef c un2) (cons1@cons2)  
-
+    vars1 |> List.forall (fun v -> MeasureVarExponent v un1 = MeasureVarExponent (trans v) un2) &&
+    vars2 |> List.forall (fun v -> MeasureVarExponent v un1 = MeasureVarExponent v un2) &&
+    (cons1@cons2) |> List.forall (fun c -> MeasureConExponentAfterRemapping g remapTyconRef c un1 = MeasureConExponentAfterRemapping g remapTyconRef c un2)
 
 and typesAEquivAux erasureFlag g aenv l1 l2 = List.lengthsEqAndForall2 (typeAEquivAux erasureFlag g aenv) l1 l2
+
 and typeEquivAux erasureFlag g ty1 ty2 = typeAEquivAux erasureFlag g TypeEquivEnv.Empty ty1 ty2
 
 let typeAEquiv g aenv ty1 ty2 = typeAEquivAux EraseNone g aenv ty1 ty2
+
 let typeEquiv g ty1 ty2 = typeEquivAux EraseNone g ty1 ty2
+
 let traitsAEquiv g aenv t1 t2 = traitsAEquivAux EraseNone g aenv t1 t2
+
 let traitKeysAEquiv g aenv t1 t2 = traitKeysAEquivAux EraseNone g aenv t1 t2
+
 let typarConstraintsAEquiv g aenv c1 c2 = typarConstraintsAEquivAux EraseNone g aenv c1 c2
+
 let typarsAEquiv g aenv d1 d2 = typarsAEquivAux EraseNone g aenv d1 d2
+
 let returnTypesAEquiv g aenv t1 t2 = returnTypesAEquivAux EraseNone g aenv t1 t2
 
 let measureEquiv g m1 m2 = measureAEquiv g TypeEquivEnv.Empty m1 m2
@@ -1069,7 +1127,7 @@ let getMeasureOfType g ty =
 let isErasedType g ty = 
   match stripTyEqns g ty with
 #if !NO_EXTENSIONTYPING
-  | TType_app (tcref, _) -> tcref.IsProvidedErasedTycon
+  | TType_app (tcref, _, _) -> tcref.IsProvidedErasedTycon
 #endif
   | _ -> false
 
@@ -1080,16 +1138,15 @@ let rec getErasedTypes g ty =
     match ty with
     | TType_forall(_, rty) -> 
         getErasedTypes g rty
-    | TType_var tp -> 
+    | TType_var (tp, _) -> 
         if tp.IsErased then [ty] else []
-    | TType_app (_, b) | TType_ucase(_, b) | TType_anon (_, b) | TType_tuple (_, b) ->
+    | TType_app (_, b, _) | TType_ucase(_, b) | TType_anon (_, b) | TType_tuple (_, b) ->
         List.foldBack (fun ty tys -> getErasedTypes g ty @ tys) b []
-    | TType_fun (dty, rty) -> 
+    | TType_fun (dty, rty, _) -> 
         getErasedTypes g dty @ getErasedTypes g rty
     | TType_measure _ -> 
         [ty]
 
-
 //---------------------------------------------------------------------------
 // Standard orderings, e.g. for order set/map keys
 //---------------------------------------------------------------------------
@@ -1115,8 +1172,7 @@ let unionCaseRefOrder =
 //---------------------------------------------------------------------------
 
 let mkFunTy (g: TcGlobals) d r =
-    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
-    TType_fun (d, r)
+    TType_fun (d, r, g.knownWithoutNull)
 
 let mkForallTy d r = TType_forall (d, r)
 
@@ -1681,37 +1737,46 @@ let tyconRefEqOpt g tcOpt tc =
     | None -> false
     | Some tc2 -> tyconRefEq g tc2 tc
 
-let isStringTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.system_String_tcref | _ -> false)
-let isListTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.list_tcr_canon | _ -> false)
-let isArrayTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isArrayTyconRef g tcref | _ -> false) 
-let isArray1DTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.il_arr_tcr_map.[0] | _ -> false) 
-let isUnitTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.unit_tcr_canon tcref | _ -> false) 
-let isObjTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.system_Object_tcref tcref | _ -> false) 
-let isValueTypeTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.system_Value_tcref tcref | _ -> false) 
-let isVoidTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.system_Void_tcref tcref | _ -> false) 
-let isILAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.IsILTycon | _ -> false) 
-let isNativePtrTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g g.nativeptr_tcr tcref | _ -> false) 
+let isStringTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.system_String_tcref | _ -> false)
+
+let isListTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.list_tcr_canon | _ -> false)
+
+let isArrayTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isArrayTyconRef g tcref | _ -> false) 
+
+let isArray1DTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.il_arr_tcr_map.[0] | _ -> false) 
+
+let isUnitTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.unit_tcr_canon tcref | _ -> false) 
+
+let isObjTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.system_Object_tcref tcref | _ -> false) 
+
+let isValueTypeTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.system_Value_tcref tcref | _ -> false) 
+
+let isVoidTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.system_Void_tcref tcref | _ -> false) 
+
+let isILAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.IsILTycon | _ -> false) 
+
+let isNativePtrTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g g.nativeptr_tcr tcref | _ -> false) 
 
 let isByrefTy g ty = 
     ty |> stripTyEqns g |> (function 
-        | TType_app(tcref, _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref
-        | TType_app(tcref, _) -> tyconRefEq g g.byref_tcr tcref
+        | TType_app(tcref, _, _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref
+        | TType_app(tcref, _, _) -> tyconRefEq g g.byref_tcr tcref
         | _ -> false) 
 
-let isInByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, []) -> tyconRefEq g g.byrefkind_In_tcr tcref | _ -> false) 
+let isInByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, [], _) -> tyconRefEq g g.byrefkind_In_tcr tcref | _ -> false) 
 let isInByrefTy g ty = 
     ty |> stripTyEqns g |> (function 
-        | TType_app(tcref, [_; tag]) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isInByrefTag g tag         
+        | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isInByrefTag g tag         
         | _ -> false) 
 
-let isOutByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, []) -> tyconRefEq g g.byrefkind_Out_tcr tcref | _ -> false) 
+let isOutByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, [], _) -> tyconRefEq g g.byrefkind_Out_tcr tcref | _ -> false) 
 let isOutByrefTy g ty = 
     ty |> stripTyEqns g |> (function 
-        | TType_app(tcref, [_; tag]) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isOutByrefTag g tag         
+        | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isOutByrefTag g tag         
         | _ -> false) 
 
 #if !NO_EXTENSIONTYPING
-let extensionInfoOfTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tcref.TypeReprInfo | _ -> TNoRepr) 
+let extensionInfoOfTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.TypeReprInfo | _ -> TNoRepr) 
 #endif
 
 type TypeDefMetadata = 
@@ -2167,18 +2232,31 @@ and accFreeTyparRef opts (tp: Typar) acc =
 
 and accFreeInType opts ty acc = 
     match stripTyparEqns ty with 
-    | TType_tuple (tupInfo, l) -> accFreeInTypes opts l (accFreeInTupInfo opts tupInfo acc)
-    | TType_anon (anonInfo, l) -> accFreeInTypes opts l (accFreeInTupInfo opts anonInfo.TupInfo acc)
-    | TType_app (tc, tinst) -> 
+    | TType_tuple (tupInfo, l) ->
+        accFreeInTypes opts l (accFreeInTupInfo opts tupInfo acc)
+
+    | TType_anon (anonInfo, l) ->
+        accFreeInTypes opts l (accFreeInTupInfo opts anonInfo.TupInfo acc)
+
+    | TType_app (tc, tinst, _) -> 
         let acc = accFreeTycon opts tc acc
         match tinst with 
         | [] -> acc  // optimization to avoid unneeded call
         | [h] -> accFreeInType opts h acc // optimization to avoid unneeded call
         | _ -> accFreeInTypes opts tinst acc
-    | TType_ucase (UnionCaseRef(tc, _), tinst) -> accFreeInTypes opts tinst (accFreeTycon opts tc acc)
-    | TType_fun (d, r) -> accFreeInType opts d (accFreeInType opts r acc)
-    | TType_var r -> accFreeTyparRef opts r acc
-    | TType_forall (tps, r) -> unionFreeTyvars (boundTypars opts tps (freeInType opts r)) acc
+
+    | TType_ucase (UnionCaseRef(tc, _), tinst) ->
+        accFreeInTypes opts tinst (accFreeTycon opts tc acc)
+
+    | TType_fun (d, r, _) ->
+        accFreeInType opts d (accFreeInType opts r acc)
+
+    | TType_var (r, _) ->
+        accFreeTyparRef opts r acc
+
+    | TType_forall (tps, r) ->
+        unionFreeTyvars (boundTypars opts tps (freeInType opts r)) acc
+
     | TType_measure unt -> accFreeInMeasure opts unt acc
 
 and accFreeInTupInfo _opts unt acc = 
@@ -2266,21 +2344,28 @@ and accFreeInTypeLeftToRight g cxFlag thruFlag acc ty =
     | TType_anon (anonInfo, anonTys) ->
         let acc = accFreeInTupInfoLeftToRight g cxFlag thruFlag acc anonInfo.TupInfo 
         accFreeInTypesLeftToRight g cxFlag thruFlag acc anonTys 
+
     | TType_tuple (tupInfo, tupTys) -> 
         let acc = accFreeInTupInfoLeftToRight g cxFlag thruFlag acc tupInfo 
         accFreeInTypesLeftToRight g cxFlag thruFlag acc tupTys 
-    | TType_app (_, tinst) -> 
+
+    | TType_app (_, tinst, _) ->
         accFreeInTypesLeftToRight g cxFlag thruFlag acc tinst 
+
     | TType_ucase (_, tinst) -> 
         accFreeInTypesLeftToRight g cxFlag thruFlag acc tinst 
-    | TType_fun (d, r) -> 
+
+    | TType_fun (d, r, _) -> 
         let dacc = accFreeInTypeLeftToRight g cxFlag thruFlag acc d 
         accFreeInTypeLeftToRight g cxFlag thruFlag dacc r
-    | TType_var r -> 
+
+    | TType_var (r, _) -> 
         accFreeTyparRefLeftToRight g cxFlag thruFlag acc r 
+
     | TType_forall (tps, r) -> 
         let racc = accFreeInTypeLeftToRight g cxFlag thruFlag emptyFreeTyparsLeftToRight r
         unionFreeTyparsLeftToRight (boundTyparsLeftToRight g cxFlag thruFlag tps racc) acc
+
     | TType_measure unt -> 
         let mvars = ListMeasureVarOccsWithNonZeroExponents unt
         List.foldBack (fun (tp, _) acc -> accFreeTyparRefLeftToRight g cxFlag thruFlag acc tp) mvars acc
@@ -2507,14 +2592,12 @@ let generalTyconRefInst (tcref: TyconRef) =
     generalizeTypars tcref.TyparsNoRange
 
 let generalizeTyconRef (g: TcGlobals) tcref = 
-    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     let tinst = generalTyconRefInst tcref
-    tinst, TType_app(tcref, tinst)
+    tinst, TType_app(tcref, tinst, g.knownWithoutNull)
 
 let generalizedTyconRef (g: TcGlobals) tcref = 
-    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     let tinst = generalTyconRefInst tcref
-    TType_app(tcref, tinst)
+    TType_app(tcref, tinst, g.knownWithoutNull)
 
 let isTTyparSupportsStaticMethod = function TyparConstraint.MayResolveMember _ -> true | _ -> false
 let isTTyparCoercesToType = function TyparConstraint.CoercesTo _ -> true | _ -> false
@@ -2711,13 +2794,20 @@ module SimplifyTypes =
         let ty = stripTyparEqns ty 
         let z = f z ty
         match ty with
-        | TType_forall (_, body) -> foldTypeButNotConstraints f z body
-        | TType_app (_, tys) 
+        | TType_forall (_, body) ->
+            foldTypeButNotConstraints f z body
+
+        | TType_app (_, tys, _) 
         | TType_ucase (_, tys) 
         | TType_anon (_, tys) 
-        | TType_tuple (_, tys) -> List.fold (foldTypeButNotConstraints f) z tys
-        | TType_fun (s, t) -> foldTypeButNotConstraints f (foldTypeButNotConstraints f z s) t
+        | TType_tuple (_, tys) ->
+            List.fold (foldTypeButNotConstraints f) z tys
+
+        | TType_fun (s, t, _) ->
+            foldTypeButNotConstraints f (foldTypeButNotConstraints f z s) t
+
         | TType_var _ -> z
+
         | TType_measure _ -> z
 
     let incM x m =
@@ -2726,7 +2816,10 @@ module SimplifyTypes =
 
     let accTyparCounts z ty =
         // Walk type to determine typars and their counts (for pprinting decisions) 
-        foldTypeButNotConstraints (fun z ty -> match ty with | TType_var tp when tp.Rigidity = TyparRigidity.Rigid -> incM tp z | _ -> z) z ty
+        (z, ty) ||> foldTypeButNotConstraints (fun z ty ->
+            match ty with
+            | TType_var (tp, _) when tp.Rigidity = TyparRigidity.Rigid -> incM tp z
+            | _ -> z)
 
     let emptyTyparCounts = Zmap.empty typarOrder
 
@@ -2970,13 +3063,13 @@ let fullDisplayTextOfModRef r =
     fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r
 
 let fullDisplayTextOfTyconRefAsLayout r =
-    fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+    fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
 
 let fullDisplayTextOfExnRef r =
-    fullNameOfEntityRef (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+    fullNameOfEntityRef (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
 
 let fullDisplayTextOfExnRefAsLayout r =
-    fullNameOfEntityRefAsLayout (fun (tc: TyconRef) -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+    fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
 
 let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) =
     fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName
@@ -3015,29 +3108,36 @@ let fullMangledPathToTyconRef (tcref:TyconRef) =
     | ERefNonLocal nlr -> nlr.EnclosingMangledPath
     
 /// generates a name like 'System.IComparable.Get'
-let tyconRefToFullName (tc:TyconRef) =
+let tyconRefToFullName (tcref:TyconRef) =
     let namespaceParts =
         // we need to ensure there are no collisions between (for example)
         // - ``IB`` (non-generic)
         // - IB<'T> instantiated with 'T = GlobalType
         // This is only an issue for types inside the global namespace, because '.' is invalid even in a quoted identifier.
         // So if the type is in the global namespace, prepend 'global`', because '`' is also illegal -> there can be no quoted identifer with that name.
-        match fullMangledPathToTyconRef tc with
+        match fullMangledPathToTyconRef tcref with
         | [||] -> [| "global`" |]
         | ns -> ns
-    seq { yield! namespaceParts; yield tc.DisplayName } |> String.concat "."
+    seq { yield! namespaceParts; yield tcref.DisplayName } |> String.concat "."
 
 let rec qualifiedInterfaceImplementationNameAux g (x:TType) : string =
     match stripMeasuresFromTType g (stripTyEqnsAndErase true g x) with
-    | TType_app (a,[]) -> tyconRefToFullName a
+    | TType_app (a, [], _) ->
+        tyconRefToFullName a
+
     | TType_anon (a,b) ->
         let genericParameters = b |> Seq.map (qualifiedInterfaceImplementationNameAux g) |> String.concat ", "
         sprintf "%s<%s>" a.ILTypeRef.FullName genericParameters
-    | TType_app (a,b) ->
+
+    | TType_app (a, b, _) ->
         let genericParameters = b |> Seq.map (qualifiedInterfaceImplementationNameAux g) |> String.concat ", "
         sprintf "%s<%s>" (tyconRefToFullName a) genericParameters
-    | TType_var v -> "'" + v.Name
-    | _ -> failwithf "unexpected: expected TType_app but got %O" (x.GetType())
+
+    | TType_var (v, _) ->
+        "'" + v.Name
+
+    | _ ->
+        failwithf "unexpected: expected TType_app but got %O" (x.GetType())
 
 /// for types in the global namespace, `global is prepended (note the backtick)
 let qualifiedInterfaceImplementationName g (tt:TType) memberName =
@@ -3078,8 +3178,10 @@ let superOfTycon (g: TcGlobals) (tycon: Tycon) =
 
 /// walk a TyconRef's inheritance tree, yielding any parent types as an array
 let supersOfTyconRef (tcref: TyconRef) =
-    Array.unfold (fun (tcref: TyconRef) -> match tcref.TypeContents.tcaug_super with Some (TType_app(sup, _)) -> Some(sup, sup) | _ -> None) tcref
-
+    tcref |> Array.unfold (fun tcref ->
+        match tcref.TypeContents.tcaug_super with
+        | Some (TType_app(sup, _, _)) -> Some(sup, sup)
+        | _ -> None)
 
 //----------------------------------------------------------------------------
 // Detect attributes
@@ -3264,7 +3366,7 @@ let isSpanLikeTyconRef g m tcref =
     not (isByrefTyconRef g tcref)
 
 let isByrefLikeTy g m ty = 
-    ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isByrefLikeTyconRef g m tcref | _ -> false)
+    ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isByrefLikeTyconRef g m tcref | _ -> false)
 
 let isSpanLikeTy g m ty =
     isByrefLikeTy g m ty && 
@@ -3275,7 +3377,7 @@ let isSpanTyconRef g m tcref =
     tcref.CompiledRepresentationForNamedType.BasicQualifiedName = "System.Span`1"
 
 let isSpanTy g m ty =
-    ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isSpanTyconRef g m tcref | _ -> false)
+    ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isSpanTyconRef g m tcref | _ -> false)
 
 let rec tryDestSpanTy g m ty =
     match tryAppTy g ty with
@@ -3292,7 +3394,7 @@ let isReadOnlySpanTyconRef g m tcref =
     tcref.CompiledRepresentationForNamedType.BasicQualifiedName = "System.ReadOnlySpan`1"
 
 let isReadOnlySpanTy g m ty =
-    ty |> stripTyEqns g |> (function TType_app(tcref, _) -> isReadOnlySpanTyconRef g m tcref | _ -> false)
+    ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> isReadOnlySpanTyconRef g m tcref | _ -> false)
 
 let tryDestReadOnlySpanTy g m ty =
     match tryAppTy g ty with
@@ -3310,8 +3412,8 @@ let destReadOnlySpanTy g m ty =
 
 let destByrefTy g ty = 
     match ty |> stripTyEqns g with
-    | TType_app(tcref, [x; _]) when g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tcref -> x // Check sufficient FSharp.Core
-    | TType_app(tcref, [x]) when tyconRefEq g g.byref_tcr tcref -> x // all others
+    | TType_app(tcref, [x; _], _) when g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tcref -> x // Check sufficient FSharp.Core
+    | TType_app(tcref, [x], _) when tyconRefEq g g.byref_tcr tcref -> x // all others
     | _ -> failwith "destByrefTy: not a byref type"
 
 let (|ByrefTy|_|) g ty = 
@@ -3320,7 +3422,7 @@ let (|ByrefTy|_|) g ty =
 
 let destNativePtrTy g ty =
     match ty |> stripTyEqns g with
-    | TType_app(tcref, [x]) when tyconRefEq g g.nativeptr_tcr tcref -> x
+    | TType_app(tcref, [x], _) when tyconRefEq g g.nativeptr_tcr tcref -> x
     | _ -> failwith "destNativePtrTy: not a native ptr type"
 
 let isRefCellTy g ty = 
@@ -3330,7 +3432,7 @@ let isRefCellTy g ty =
 
 let destRefCellTy g ty = 
     match ty |> stripTyEqns g with
-    | TType_app(tcref, [x]) when tyconRefEq g g.refcell_tcr_canon tcref -> x
+    | TType_app(tcref, [x], _) when tyconRefEq g g.refcell_tcr_canon tcref -> x
     | _ -> failwith "destRefCellTy: not a ref type"
 
 let StripSelfRefCell(g: TcGlobals, baseOrThisInfo: ValBaseOrThisInfo, tau: TType) : TType =
@@ -3338,19 +3440,19 @@ let StripSelfRefCell(g: TcGlobals, baseOrThisInfo: ValBaseOrThisInfo, tau: TType
         then destRefCellTy g tau 
         else tau
 
-let mkRefCellTy (g: TcGlobals) ty = TType_app(g.refcell_tcr_nice, [ty])
+let mkRefCellTy (g: TcGlobals) ty = TType_app(g.refcell_tcr_nice, [ty], g.knownWithoutNull)
 
-let mkLazyTy (g: TcGlobals) ty = TType_app(g.lazy_tcr_nice, [ty])
+let mkLazyTy (g: TcGlobals) ty = TType_app(g.lazy_tcr_nice, [ty], g.knownWithoutNull)
 
-let mkPrintfFormatTy (g: TcGlobals) aty bty cty dty ety = TType_app(g.format_tcr, [aty;bty;cty;dty; ety])
+let mkPrintfFormatTy (g: TcGlobals) aty bty cty dty ety = TType_app(g.format_tcr, [aty;bty;cty;dty; ety], g.knownWithoutNull)
 
-let mkOptionTy (g: TcGlobals) ty = TType_app (g.option_tcr_nice, [ty])
+let mkOptionTy (g: TcGlobals) ty = TType_app (g.option_tcr_nice, [ty], g.knownWithoutNull)
 
-let mkValueOptionTy (g: TcGlobals) ty = TType_app (g.valueoption_tcr_nice, [ty])
+let mkValueOptionTy (g: TcGlobals) ty = TType_app (g.valueoption_tcr_nice, [ty], g.knownWithoutNull)
 
-let mkNullableTy (g: TcGlobals) ty = TType_app (g.system_Nullable_tcref, [ty])
+let mkNullableTy (g: TcGlobals) ty = TType_app (g.system_Nullable_tcref, [ty], g.knownWithoutNull)
 
-let mkListTy (g: TcGlobals) ty = TType_app (g.list_tcr_nice, [ty])
+let mkListTy (g: TcGlobals) ty = TType_app (g.list_tcr_nice, [ty], g.knownWithoutNull)
 
 let isValueOptionTy (g: TcGlobals) ty = 
     match tryTcrefOfAppTy g ty with 
@@ -3581,8 +3683,8 @@ module DebugPrint =
     let stampL _n w = 
         w
 
-    let layoutTyconRef (tc: TyconRef) = 
-        wordL (tagText tc.DisplayNameWithStaticParameters) |> stampL tc.Stamp
+    let layoutTyconRef (tcref: TyconRef) = 
+        wordL (tagText tcref.DisplayNameWithStaticParameters) |> stampL tcref.Stamp
 
     let rec auxTypeL env ty = auxTypeWrapL env false ty
 
@@ -3610,7 +3712,7 @@ module DebugPrint =
 
         | TType_ucase (UnionCaseRef(tcref, _), tinst)
 
-        | TType_app (tcref, tinst) -> 
+        | TType_app (tcref, tinst, _) -> 
            let prefix = tcref.IsPrefixDisplay
            let tcL = layoutTyconRef tcref
            auxTyparsL env tcL prefix tinst
@@ -3618,10 +3720,10 @@ module DebugPrint =
         | TType_tuple (_tupInfo, tys) ->
             sepListL (wordL (tagText "*")) (List.map (auxTypeAtomL env) tys) |> wrap
 
-        | TType_fun (f, x) ->
-            ((auxTypeAtomL env f ^^ wordL (tagText "->")) --- auxTypeL env x) |> wrap
+        | TType_fun (dty, rty, _) ->
+            ((auxTypeAtomL env dty ^^ wordL (tagText "->")) --- auxTypeL env rty) |> wrap
 
-        | TType_var typar ->
+        | TType_var (typar, _) ->
             auxTyparWrapL env isAtomic typar 
 
         | TType_anon (anonInfo, tys) ->
@@ -6080,9 +6182,9 @@ let isQuotedExprTy g ty = match tryAppTy g ty with ValueSome (tcref, _) -> tycon
 
 let destQuotedExprTy g ty = match tryAppTy g ty with ValueSome (_, [ty]) -> ty | _ -> failwith "destQuotedExprTy"
 
-let mkQuotedExprTy (g: TcGlobals) ty = TType_app(g.expr_tcr, [ty])
+let mkQuotedExprTy (g: TcGlobals) ty = TType_app(g.expr_tcr, [ty], g.knownWithoutNull)
 
-let mkRawQuotedExprTy (g: TcGlobals) = TType_app(g.raw_expr_tcr, [])
+let mkRawQuotedExprTy (g: TcGlobals) = TType_app(g.raw_expr_tcr, [], g.knownWithoutNull)
 
 let mkAnyTupledTy (g: TcGlobals) tupInfo tys = 
     match tys with 
@@ -6099,7 +6201,7 @@ let mkRefTupledVarsTy g vs = mkRefTupledTy g (typesOfVals vs)
 
 let mkMethodTy g argtys rty = mkIteratedFunTy g (List.map (mkRefTupledTy g) argtys) rty 
 
-let mkArrayType (g: TcGlobals) ty = TType_app (g.array_tcr_nice, [ty])
+let mkArrayType (g: TcGlobals) ty = TType_app (g.array_tcr_nice, [ty], g.knownWithoutNull)
 
 let mkByteArrayTy (g: TcGlobals) = mkArrayType g g.byte_ty
 
@@ -7007,11 +7109,11 @@ let destIDelegateEventType g ty =
         | _ -> failwith "destIDelegateEventType: internal error"
     else failwith "destIDelegateEventType: not an IDelegateEvent type"
 
-let mkIEventType (g: TcGlobals) ty1 ty2 = TType_app (g.fslib_IEvent2_tcr, [ty1;ty2])
+let mkIEventType (g: TcGlobals) ty1 ty2 = TType_app (g.fslib_IEvent2_tcr, [ty1;ty2], g.knownWithoutNull)
 
-let mkIObservableType (g: TcGlobals) ty1 = TType_app (g.tcref_IObservable, [ty1])
+let mkIObservableType (g: TcGlobals) ty1 = TType_app (g.tcref_IObservable, [ty1], g.knownWithoutNull)
 
-let mkIObserverType (g: TcGlobals) ty1 = TType_app (g.tcref_IObserver, [ty1])
+let mkIObserverType (g: TcGlobals) ty1 = TType_app (g.tcref_IObserver, [ty1], g.knownWithoutNull)
 
 let mkRefCellContentsRef (g: TcGlobals) = mkRecdFieldRef g.refcell_tcr_canon "contents"
 
@@ -8347,11 +8449,11 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty =
         typeEnc g (gtpsType, gtpsMethod) (List.head tinst) + arraySuffix
 
     | TType_ucase (_, tinst)   
-    | TType_app (_, tinst) -> 
+    | TType_app (_, tinst, _) -> 
         let tyName = 
             let ty = stripTyEqnsAndMeasureEqns g ty
             match ty with
-            | TType_app (tcref, _tinst) -> 
+            | TType_app (tcref, _tinst, _) -> 
                 // Generic type names are (name + "`" + digits) where name does not contain "`".
                 // In XML doc, when used in type instances, these do not use the ticks.
                 let path = Array.toList (fullMangledPathToTyconRef tcref) @ [tcref.CompiledName]
@@ -8370,10 +8472,10 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty =
         else 
             sprintf "System.Tuple%s"(tyargsEnc g (gtpsType, gtpsMethod) tys)
 
-    | TType_fun (f, x) -> 
+    | TType_fun (f, x, _) -> 
         "Microsoft.FSharp.Core.FSharpFunc" + tyargsEnc g (gtpsType, gtpsMethod) [f;x]
 
-    | TType_var typar -> 
+    | TType_var (typar, _) -> 
         typarEnc g (gtpsType, gtpsMethod) typar
 
     | TType_measure _ -> "?"
@@ -9418,15 +9520,15 @@ let rec mkCompiledTuple g isStruct (argtys, args, m) =
             | [ty8], [arg8] -> 
                 match ty8 with
                 // if it's already been nested or ended, pass it through
-                | TType_app(tn, _) when (isCompiledTupleTyconRef g tn) ->
+                | TType_app(tn, _, _) when (isCompiledTupleTyconRef g tn) ->
                     ty8, arg8
                 | _ ->
-                    let ty8enc = TType_app((if isStruct then g.struct_tuple1_tcr else g.ref_tuple1_tcr), [ty8])
+                    let ty8enc = TType_app((if isStruct then g.struct_tuple1_tcr else g.ref_tuple1_tcr), [ty8], g.knownWithoutNull)
                     let v8enc = Expr.Op (TOp.Tuple (mkTupInfo isStruct), [ty8], [arg8], m) 
                     ty8enc, v8enc
             | _ -> 
                 let a, b, c, d = mkCompiledTuple g isStruct (argtysB, argsB, m)
-                let ty8plus = TType_app(a, b)
+                let ty8plus = TType_app(a, b, g.knownWithoutNull)
                 let v8plus = Expr.Op (TOp.Tuple (mkTupInfo isStruct), b, c, d)
                 ty8plus, v8plus
         let argtysAB = argtysA @ [ty8] 
@@ -9858,7 +9960,7 @@ let (|SequentialResumableCode|_|) (g: TcGlobals) expr =
 
 let mkLabelled m l e = mkCompGenSequential m (Expr.Op (TOp.Label l, [], [], m)) e
 
-let isResumableCodeTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _) -> tyconRefEq g tcref g.ResumableCode_tcr | _ -> false)
+let isResumableCodeTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tyconRefEq g tcref g.ResumableCode_tcr | _ -> false)
 
 let rec isReturnsResumableCodeTy g ty = 
     if isFunTy g ty then isReturnsResumableCodeTy g (rangeOfFunTy g ty)
diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index 8bfa10c1a9d..13e1bb3f88d 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -771,7 +771,7 @@ let p_nleref x st = p_int (encode_nleref st.occus st.ostrings st.onlerefs st.osc
 
 // Simple types are types like "int", represented as TType(Ref_nonlocal(..., "int"), []).
 // A huge number of these occur in pickled F# data, so make them unique.
-let decode_simpletyp st _ccuTab _stringTab nlerefTab a = TType_app(ERefNonLocal (lookup_nleref st nlerefTab a), [])
+let decode_simpletyp st _ccuTab _stringTab nlerefTab a = TType_app(ERefNonLocal (lookup_nleref st nlerefTab a), [], 0uy)
 let lookup_simpletyp st simpleTyTab x = lookup_uniq st simpleTyTab x
 let u_encoded_simpletyp st = u_int  st
 let u_encoded_anoninfo st = u_int  st
@@ -863,17 +863,17 @@ let check (ilscope: ILScopeRef) (inMap : NodeInTable<_, _>) =
 let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option) u (phase2bytes: ReadOnlyByteMemory) =
     let st2 =
        { is = ByteStream.FromBytes (phase2bytes, 0, phase2bytes.Length)
-         iilscope= viewedScope
-         iccus= new_itbl "iccus (fake)" [| |]
-         ientities= NodeInTable<_, _>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", 0)
-         itypars= NodeInTable<_, _>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", 0)
-         ivals  = NodeInTable<_, _>.Create (Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", 0)
-         ianoninfos=NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", 0)
+         iilscope = viewedScope
+         iccus = new_itbl "iccus (fake)" [| |]
+         ientities = NodeInTable<_, _>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", 0)
+         itypars = NodeInTable<_, _>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", 0)
+         ivals = NodeInTable<_, _>.Create (Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", 0)
+         ianoninfos = NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", 0)
          istrings = new_itbl "istrings (fake)" [| |]
          inlerefs = new_itbl "inlerefs (fake)" [| |]
          ipubpaths = new_itbl "ipubpaths (fake)" [| |]
          isimpletys = new_itbl "isimpletys (fake)" [| |]
-         ifile=file
+         ifile = file
          iILModule = ilModule }
     let ccuNameTab = u_array u_encoded_ccuref st2
     let z1 = u_int st2
@@ -896,17 +896,17 @@ let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option)
     let data =
         let st1 =
            { is = ByteStream.FromBytes (phase1bytes, 0, phase1bytes.Length)
-             iccus=  ccuTab
-             iilscope= viewedScope
-             ientities= NodeInTable<_, _>.Create(Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", ntycons)
-             itypars= NodeInTable<_, _>.Create(Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", ntypars)
-             ivals=   NodeInTable<_, _>.Create(Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", nvals)
-             ianoninfos=NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", nanoninfos)
+             iccus = ccuTab
+             iilscope = viewedScope
+             ientities = NodeInTable<_, _>.Create(Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", ntycons)
+             itypars = NodeInTable<_, _>.Create(Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", ntypars)
+             ivals = NodeInTable<_, _>.Create(Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", nvals)
+             ianoninfos = NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", nanoninfos)
              istrings = stringTab
              ipubpaths = pubpathTab
              inlerefs = nlerefTab
              isimpletys = simpletypTab
-             ifile=file
+             ifile = file
              iILModule = ilModule }
         let res = u st1
         check viewedScope st1.ientities
@@ -1722,21 +1722,33 @@ let _ = fill_p_ty2 (fun isStructThisArgPos ty st ->
               p_byte 8 st; p_tys l st
           else
               p_byte 0 st; p_tys l st
-    | TType_app(ERefNonLocal nleref, []) -> p_byte 1 st; p_simpletyp nleref st
-    | TType_app (tc, tinst)              -> p_byte 2 st; p_tup2 (p_tcref "typ") p_tys (tc, tinst) st
-    | TType_fun (d, r)                   ->
+
+    | TType_app(ERefNonLocal nleref, [], _) ->
+        p_byte 1 st; p_simpletyp nleref st
+
+    | TType_app (tc, tinst, _) ->
+        p_byte 2 st; p_tup2 (p_tcref "typ") p_tys (tc, tinst) st
+
+    | TType_fun (d, r, _) ->
         p_byte 3 st
         // Note, the "this" argument may be found in the domain position of a function type, so propagate the isStructThisArgPos value
         p_ty2 isStructThisArgPos d st
         p_ty r st
-    | TType_var r                       -> p_byte 4 st; p_tpref r st
-    | TType_forall (tps, r)              ->
+
+    | TType_var (r, _) -> p_byte 4 st; p_tpref r st
+
+    | TType_forall (tps, r) ->
         p_byte 5 st
         p_tyar_specs tps st
         // Note, the "this" argument may be found in the body of a generic forall type, so propagate the isStructThisArgPos value
         p_ty2 isStructThisArgPos r st
-    | TType_measure unt                 -> p_byte 6 st; p_measure_expr unt st
-    | TType_ucase (uc, tinst)            -> p_byte 7 st; p_tup2 p_ucref p_tys (uc, tinst) st
+
+    | TType_measure unt ->
+        p_byte 6 st; p_measure_expr unt st
+
+    | TType_ucase (uc, tinst) ->
+        p_byte 7 st; p_tup2 p_ucref p_tys (uc, tinst) st
+
     // p_byte 8 taken by TType_tuple above
     | TType_anon (anonInfo, l) ->
          p_byte 9 st
@@ -1746,18 +1758,52 @@ let _ = fill_p_ty2 (fun isStructThisArgPos ty st ->
 let _ = fill_u_ty (fun st ->
     let tag = u_byte st
     match tag with
-    | 0 -> let l = u_tys st                               in TType_tuple (tupInfoRef, l)
-    | 1 -> u_simpletyp st
-    | 2 -> let tc = u_tcref st in let tinst = u_tys st    in TType_app (tc, tinst)
-    | 3 -> let d = u_ty st    in let r = u_ty st         in TType_fun (d, r)
-    | 4 -> let r = u_tpref st                              in r.AsType
-    | 5 -> let tps = u_tyar_specs st in let r = u_ty st  in TType_forall (tps, r)
-    | 6 -> let unt = u_measure_expr st                     in TType_measure unt
-    | 7 -> let uc = u_ucref st in let tinst = u_tys st    in TType_ucase (uc, tinst)
-    | 8 -> let l = u_tys st                               in TType_tuple (tupInfoStruct, l)
-    | 9 -> let anonInfo = u_anonInfo st in let l = u_tys st  in TType_anon (anonInfo, l)
-    | _ -> ufailwith st "u_typ")
+    | 0 ->
+        let l = u_tys st
+        TType_tuple (tupInfoRef, l)
+
+    | 1 ->
+        u_simpletyp st
+
+    | 2 ->
+        let tc = u_tcref st
+        let tinst = u_tys st
+        TType_app (tc, tinst, 0uy)
+
+    | 3 ->
+        let d = u_ty st
+        let r = u_ty st
+        TType_fun (d, r, 0uy)
+
+    | 4 ->
+        let r = u_tpref st
+        r.AsType
+
+    | 5 ->
+        let tps = u_tyar_specs st
+        let r = u_ty st
+        TType_forall (tps, r)
+
+    | 6 ->
+        let unt = u_measure_expr st
+        TType_measure unt
+
+    | 7 ->
+        let uc = u_ucref st
+        let tinst = u_tys st
+        TType_ucase (uc, tinst)
 
+    | 8 ->
+        let l = u_tys st
+        TType_tuple (tupInfoStruct, l)
+
+    | 9 ->
+        let anonInfo = u_anonInfo st
+        let l = u_tys st
+        TType_anon (anonInfo, l)
+
+    | _ ->
+        ufailwith st "u_typ")
 
 let fill_p_binds, p_binds = p_hole()
 let fill_p_targets, p_targets = p_hole()
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 8c1304f76ba..8459674e3ef 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -634,9 +634,6 @@ let TypeBuilderInstantiationT =
 
 let typeIsNotQueryable (ty: Type) =
     (ty :? TypeBuilder) || ((ty.GetType()).Equals(TypeBuilderInstantiationT))
-//----------------------------------------------------------------------------
-// convFieldSpec
-//----------------------------------------------------------------------------
 
 let queryableTypeGetField _emEnv (parentT: Type) (fref: ILFieldRef) =
     let res = parentT.GetField(fref.Name, BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance ||| BindingFlags.Static )
@@ -744,7 +741,7 @@ let queryableTypeGetMethodBySearch cenv emEnv parentT (mref: ILMethodRef) =
             failwithf "convMethodRef: could not bind to method '%A' of type '%s'" (String.Join(", ", methNames)) parentT.AssemblyQualifiedName
         | Some methInfo -> methInfo (* return MethodInfo for (generic) type's (generic) method *)
 
-let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) =
+let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
     assert(not (typeIsNotQueryable parentT))
     if mref.GenericArity = 0 then
         let tyargTs = getGenericArgumentsOfType parentT
@@ -770,7 +767,7 @@ let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) =
     else
         queryableTypeGetMethodBySearch cenv emEnv parentT mref
 
-let nonQueryableTypeGetMethod (parentTI: Type) (methInfo: MethodInfo) : MethodInfo =
+let nonQueryableTypeGetMethod (parentTI: Type) (methInfo: MethodInfo) : MethodInfo MaybeNull =
     if (parentTI.IsGenericType &&
         not (equalTypes parentTI (getTypeConstructor parentTI)))
     then TypeBuilder.GetMethod(parentTI, methInfo )
@@ -1234,7 +1231,7 @@ let rec emitInstr cenv (modB: ModuleBuilder) emEnv (ilG: ILGenerator) instr =
                     setArrayMethInfo shape.Rank ety
                 else
 #endif
-                    modB.GetArrayMethodAndLog (aty, "Set", CallingConventions.HasThis, null, Array.append (Array.create shape.Rank typeof) (Array.ofList [ ety ]))
+                    modB.GetArrayMethodAndLog(aty, "Set", CallingConventions.HasThis, null, Array.append (Array.create shape.Rank typeof) (Array.ofList [ ety ]))
             ilG.EmitAndLog (OpCodes.Call, meth)
 
     | I_newarr (shape, ty) ->
@@ -1242,7 +1239,7 @@ let rec emitInstr cenv (modB: ModuleBuilder) emEnv (ilG: ILGenerator) instr =
         then ilG.EmitAndLog (OpCodes.Newarr, convType cenv emEnv ty)
         else
             let aty = convType cenv emEnv (ILType.Array(shape, ty))
-            let meth = modB.GetArrayMethodAndLog (aty, ".ctor", CallingConventions.HasThis, null, Array.create shape.Rank typeof)
+            let meth = modB.GetArrayMethodAndLog(aty, ".ctor", CallingConventions.HasThis, null, Array.create shape.Rank typeof)
             ilG.EmitAndLog (OpCodes.Newobj, meth)
 
     | I_ldlen -> ilG.EmitAndLog OpCodes.Ldlen
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index 52b0262bdfa..a13d8083e30 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -553,9 +553,10 @@ type internal FsiValuePrinter(fsi: FsiEvaluationSessionHostConfig, outWriter: Te
                                    match obj with
                                    | null -> None
                                    | _ when aty.IsAssignableFrom(obj.GetType())  ->
-                                       match printer obj with
+                                       let text = printer obj
+                                       match box text with
                                        | null -> None
-                                       | s -> Some (wordL (TaggedText.tagText s))
+                                       | _ -> Some (wordL (TaggedText.tagText text))
                                    | _ -> None)
 
                          | Choice2Of2 (aty: Type, converter) ->
@@ -1869,10 +1870,10 @@ type internal FsiDynamicCompiler
                 let outputDir =  tcConfigB.outputDir |> Option.defaultValue ""
 
                 match fsiOptions.DependencyProvider.TryFindDependencyManagerByKey(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, packageManagerKey) with
-                | null ->
+                | Null ->
                     errorR(Error(fsiOptions.DependencyProvider.CreatePackageManagerUnknownError(tcConfigB.compilerToolPaths, outputDir, packageManagerKey, reportError m), m))
                     istate
-                | dependencyManager ->
+                | NonNull dependencyManager ->
                     let directive d =
                         match d with
                         | Directive.Resolution -> "r"
@@ -1923,7 +1924,7 @@ type internal FsiDynamicCompiler
                         let dm = tcImports.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
 
                         match dm with
-                        | _, dependencyManager when not(isNull dependencyManager) ->
+                        | _, NonNull dependencyManager ->
                             if tcConfigB.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                                 fsiDynamicCompiler.EvalDependencyManagerTextFragment (dependencyManager, directive, m, path)
                                 st
@@ -1936,8 +1937,11 @@ type internal FsiDynamicCompiler
                             st
 
                         // #r "Assembly"
-                        | path, _ ->
+                        | NonNull path, _ ->
                             snd (fsiDynamicCompiler.EvalRequireReference (ctok, st, m, path))
+
+                        | Null, Null ->
+                           st
                     ),
                     (fun _ _ -> ()))
                    (tcConfigB, inp, Path.GetDirectoryName sourceFile, istate))
@@ -2264,9 +2268,7 @@ module internal MagicAssemblyResolution =
     []
     let private assemblyLoadFrom (path:string) = Assembly.UnsafeLoadFrom(path)
 
-    let Install(tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput) =
-
-        let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, _fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) =
+    let ResolveAssembly (ctok, m, tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput, fullAssemName: string) =
 
            try
                // Grab the name of the assembly
@@ -2364,6 +2366,8 @@ module internal MagicAssemblyResolution =
                stopProcessingRecovery e range0
                null
 
+    let Install(tcConfigB, tcImports: TcImports, fsiDynamicCompiler: FsiDynamicCompiler, fsiConsoleOutput: FsiConsoleOutput) =
+
         let rangeStdin0 = rangeN stdinMockFilename 0
 
         let resolveAssembly = ResolveEventHandler(fun _ args ->
@@ -2557,11 +2561,11 @@ type internal FsiInteractionProcessor
         let packageManagerDirective directive path m =
             let dm = fsiOptions.DependencyProvider.TryFindDependencyManagerInPath(tcConfigB.compilerToolPaths, getOutputDir tcConfigB, reportError m, path)
             match dm with
-            | null, null ->
+            | Null, Null ->
                 // error already reported
                 istate, CompletedWithAlreadyReportedError
 
-            | _, dependencyManager when not(isNull dependencyManager) ->
+            | _, NonNull dependencyManager ->
                if tcConfig.langVersion.SupportsFeature(LanguageFeature.PackageManagement) then
                    fsiDynamicCompiler.EvalDependencyManagerTextFragment(dependencyManager, directive, m, path)
                    istate, Completed None
@@ -2573,7 +2577,7 @@ type internal FsiInteractionProcessor
                 errorR(Error(FSComp.SR.poundiNotSupportedByRegisteredDependencyManagers(), m))
                 istate,Completed None
 
-            | p, _ ->
+            | NonNull p, Null ->
                 let path =
                     if String.IsNullOrWhiteSpace(p) then ""
                     else p
@@ -2596,6 +2600,9 @@ type internal FsiInteractionProcessor
                     fsiConsoleOutput.uprintnfnn "%s" format)
                 istate,Completed None
 
+            | _, _ ->
+                istate,Completed None
+
         istate |> InteractiveCatch errorLogger (fun istate ->
             match action with
             | ParsedScriptInteraction.Definitions ([], _) ->
diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs
index 810d5093c2a..1edd0d67c05 100644
--- a/src/fsharp/import.fs
+++ b/src/fsharp/import.fs
@@ -323,11 +323,11 @@ let rec ImportProvidedType (env: ImportMap) (m: range) (* (tinst: TypeInst) *) (
                 if tp.Kind = TyparKind.Measure then  
                     let rec conv ty = 
                         match ty with 
-                        | TType_app (tcref, [t1;t2]) when tyconRefEq g tcref g.measureproduct_tcr -> Measure.Prod (conv t1, conv t2)
-                        | TType_app (tcref, [t1]) when tyconRefEq g tcref g.measureinverse_tcr -> Measure.Inv (conv t1)
-                        | TType_app (tcref, []) when tyconRefEq g tcref g.measureone_tcr -> Measure.One 
-                        | TType_app (tcref, []) when tcref.TypeOrMeasureKind = TyparKind.Measure -> Measure.Con tcref
-                        | TType_app (tcref, _) -> 
+                        | TType_app (tcref, [t1;t2], _) when tyconRefEq g tcref g.measureproduct_tcr -> Measure.Prod (conv t1, conv t2)
+                        | TType_app (tcref, [t1], _) when tyconRefEq g tcref g.measureinverse_tcr -> Measure.Inv (conv t1)
+                        | TType_app (tcref, [], _) when tyconRefEq g tcref g.measureone_tcr -> Measure.One 
+                        | TType_app (tcref, [], _) when tcref.TypeOrMeasureKind = TyparKind.Measure -> Measure.Con tcref
+                        | TType_app (tcref, _, _) -> 
                             errorR(Error(FSComp.SR.impInvalidMeasureArgument1(tcref.CompiledName, tp.Name), m))
                             Measure.One
                         | _ -> 
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index 6c21a99431d..570e27d587f 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -96,7 +96,7 @@ let GetSuperTypeOfType g amap m ty =
             None
 
 /// Make a type for System.Collections.Generic.IList
-let mkSystemCollectionsGenericIListTy (g: TcGlobals) ty = TType_app(g.tcref_System_Collections_Generic_IList, [ty])
+let mkSystemCollectionsGenericIListTy (g: TcGlobals) ty = TType_app(g.tcref_System_Collections_Generic_IList, [ty], 0uy)
 
 /// Indicates whether we can skip interface types that lie outside the reference set
 []
@@ -1566,7 +1566,7 @@ type MethInfo =
             let formalRetTy, formalParams =
                 match x with
                 | ILMeth(_, ilminfo, _) ->
-                    let ftinfo = ILTypeInfo.FromType g (TType_app(tcref, formalEnclosingTyparTys))
+                    let ftinfo = ILTypeInfo.FromType g (TType_app(tcref, formalEnclosingTyparTys, 0uy))
                     let formalRetTy = ImportReturnTypeFromMetadata amap m ilminfo.RawMetadata.Return.Type ilminfo.RawMetadata.Return.CustomAttrs ftinfo.ILScopeRef ftinfo.TypeInstOfRawMetadata formalMethTyparTys
                     let formalParams =
                         [ [ for p in ilminfo.RawMetadata.Parameters do
@@ -1825,7 +1825,7 @@ type RecdFieldInfo =
     member x.FieldType = actualTyOfRecdFieldRef x.RecdFieldRef x.TypeInst
 
     /// Get the enclosing (declaring) type of the field in an F#-declared record, class or struct type
-    member x.DeclaringType = TType_app (x.RecdFieldRef.TyconRef, x.TypeInst)
+    member x.DeclaringType = TType_app (x.RecdFieldRef.TyconRef, x.TypeInst, 0uy)
 
     override x.ToString() = x.TyconRef.ToString() + "::" + x.LogicalName
 
diff --git a/src/fsharp/service/FSharpCheckerResults.fs b/src/fsharp/service/FSharpCheckerResults.fs
index e019d4bb63a..d945fc786a6 100644
--- a/src/fsharp/service/FSharpCheckerResults.fs
+++ b/src/fsharp/service/FSharpCheckerResults.fs
@@ -1144,10 +1144,10 @@ type internal TypeCheckInfo
                         items |> List.sortBy (fun d ->
                             let n =
                                 match d.Item with
-                                | Item.Types (_,TType_app(tcref,_) :: _) -> 1 + tcref.TyparsNoRange.Length
+                                | Item.Types (_, TType_app(tcref, _, _) :: _) -> 1 + tcref.TyparsNoRange.Length
                                 // Put delegate ctors after types, sorted by #typars. RemoveDuplicateItems will remove FakeInterfaceCtor and DelegateCtor if an earlier type is also reported with this name
-                                | Item.FakeInterfaceCtor (TType_app(tcref,_))
-                                | Item.DelegateCtor (TType_app(tcref,_)) -> 1000 + tcref.TyparsNoRange.Length
+                                | Item.FakeInterfaceCtor (TType_app(tcref, _, _))
+                                | Item.DelegateCtor (TType_app(tcref, _, _)) -> 1000 + tcref.TyparsNoRange.Length
                                 // Put type ctors after types, sorted by #typars. RemoveDuplicateItems will remove DefaultStructCtors if a type is also reported with this name
                                 | Item.CtorGroup (_, cinfo :: _) -> 1000 + 10 * cinfo.DeclaringTyconRef.TyparsNoRange.Length
                                 | _ -> 0
@@ -1161,11 +1161,11 @@ type internal TypeCheckInfo
                     let items =
                         items |> List.groupBy (fun d ->
                             match d.Item with
-                            | Item.Types (_,TType_app(tcref,_) :: _)
+                            | Item.Types (_,TType_app(tcref, _, _) :: _)
                             | Item.ExnCase tcref -> tcref.LogicalName
                             | Item.UnqualifiedType(tcref :: _)
-                            | Item.FakeInterfaceCtor (TType_app(tcref,_))
-                            | Item.DelegateCtor (TType_app(tcref,_)) -> tcref.CompiledName
+                            | Item.FakeInterfaceCtor (TType_app(tcref, _, _))
+                            | Item.DelegateCtor (TType_app(tcref, _, _)) -> tcref.CompiledName
                             | Item.CtorGroup (_, cinfo :: _) ->
                                 cinfo.ApparentEnclosingTyconRef.CompiledName
                             | _ -> d.Item.DisplayName)
@@ -1443,7 +1443,7 @@ type internal TypeCheckInfo
                         //Item.Value(vref)
                         None
 
-                    | Item.Types (_, TType_app (tr, _) :: _) when tr.IsLocalRef && tr.IsTypeAbbrev -> None
+                    | Item.Types (_, TType_app (tr, _, _) :: _) when tr.IsLocalRef && tr.IsTypeAbbrev -> None
 
                     | Item.Types (_, [ AppTy g (tr, _) ]) when not tr.IsLocalRef ->
                         match tr.TypeReprInfo, tr.PublicPath with
diff --git a/src/fsharp/service/ItemKey.fs b/src/fsharp/service/ItemKey.fs
index 0613af95551..bbfe0fcc77d 100644
--- a/src/fsharp/service/ItemKey.fs
+++ b/src/fsharp/service/ItemKey.fs
@@ -182,13 +182,19 @@ and [] ItemKeyStoreBuilder() =
 
     let rec writeILType (ilty: ILType) =
         match ilty with
-        | ILType.TypeVar n -> writeString "!"; writeUInt16 n
-        | ILType.Modified (_, _, ty2) -> writeILType ty2
+        | ILType.TypeVar n ->
+            writeString "!"
+            writeUInt16 n
+
+        | ILType.Modified (_, _, ty2) ->
+            writeILType ty2
+
         | ILType.Array (ILArrayShape s, ty) ->
             writeILType ty
             writeString "["
             writeInt32 (s.Length-1)
             writeString "]"
+
         | ILType.Value tr
         | ILType.Boxed tr ->
             tr.TypeRef.Enclosing
@@ -197,16 +203,20 @@ and [] ItemKeyStoreBuilder() =
                 writeChar '.')
             writeChar '.'
             writeString tr.TypeRef.Name
+
         | ILType.Void ->
             writeString "void"
+
         | ILType.Ptr ty ->
             writeString "ptr<"
             writeILType ty
             writeChar '>'
+
         | ILType.Byref ty ->
             writeString "byref<"
             writeILType ty
             writeChar '>'
+
         | ILType.FunctionPointer mref ->
             mref.ArgTypes
             |> List.iter (fun x ->
@@ -217,25 +227,32 @@ and [] ItemKeyStoreBuilder() =
         match stripTyparEqns ty with
         | TType_forall (_, ty) ->
             writeType false ty
-        | TType_app (tcref, _) ->
+
+        | TType_app (tcref, _, _) ->
             writeEntityRef tcref
+
         | TType_tuple (_, tinst) ->
             writeString ItemKeyTags.typeTuple
             tinst |> List.iter (writeType false)
+
         | TType_anon (anonInfo, tinst) ->
             writeString ItemKeyTags.typeAnonymousRecord
             writeString anonInfo.ILTypeRef.BasicQualifiedName
             tinst |> List.iter (writeType false)
-        | TType_fun (d, r) ->
+
+        | TType_fun (d, r, _) ->
             writeString ItemKeyTags.typeFunction
             writeType false d
             writeType false r
+
         | TType_measure ms ->
             if isStandalone then
                 writeString ItemKeyTags.typeMeasure
                 writeMeasure isStandalone ms
-        | TType_var tp ->
+
+        | TType_var (tp, _) ->
             writeTypar isStandalone tp
+
         | TType_ucase (uc, _) ->
             match uc with
             | UnionCaseRef.UnionCaseRef(tcref, nm) ->
diff --git a/src/fsharp/service/SemanticClassification.fs b/src/fsharp/service/SemanticClassification.fs
index 228c80d22e6..de290aec655 100644
--- a/src/fsharp/service/SemanticClassification.fs
+++ b/src/fsharp/service/SemanticClassification.fs
@@ -251,7 +251,7 @@ module TcResolutionsExtensions =
                                 add m SemanticClassificationType.Method
 
                     // Special case measures for struct types
-                    | Item.Types(_, TType_app(tyconRef, TType_measure _ :: _) :: _), LegitTypeOccurence, _, _, _, m when isStructTyconRef tyconRef ->
+                    | Item.Types(_, TType_app(tyconRef, TType_measure _ :: _, _) :: _), LegitTypeOccurence, _, _, _, m when isStructTyconRef tyconRef ->
                         add m SemanticClassificationType.ValueType
 
                     | Item.Types (_, ty :: _), LegitTypeOccurence, _, _, _, m ->
diff --git a/src/fsharp/service/ServiceDeclarationLists.fs b/src/fsharp/service/ServiceDeclarationLists.fs
index 50bde0b7b5e..fdc112157d0 100644
--- a/src/fsharp/service/ServiceDeclarationLists.fs
+++ b/src/fsharp/service/ServiceDeclarationLists.fs
@@ -363,7 +363,7 @@ module DeclarationListHelpers =
            ToolTipElement.Single(layout, xml)
 
         // Types.
-        | Item.Types(_, TType_app(tcref, _) :: _)
+        | Item.Types(_, TType_app(tcref, _, _) :: _)
         | Item.UnqualifiedType (tcref :: _) -> 
             let denv = { denv with
                             // tooltips are space-constrained, so use shorter names
@@ -983,10 +983,10 @@ type DeclarationListInfo(declarations: DeclarationListItem[], isForType: bool, i
             items 
             |> List.map (fun x ->
                 match x.Item with
-                | Item.Types (_, TType_app(tcref, _) :: _) -> { x with MinorPriority = 1 + tcref.TyparsNoRange.Length }
+                | Item.Types (_, TType_app(tcref, _, _) :: _) -> { x with MinorPriority = 1 + tcref.TyparsNoRange.Length }
                 // Put delegate ctors after types, sorted by #typars. RemoveDuplicateItems will remove FakeInterfaceCtor and DelegateCtor if an earlier type is also reported with this name
-                | Item.FakeInterfaceCtor (TType_app(tcref, _)) 
-                | Item.DelegateCtor (TType_app(tcref, _)) -> { x with MinorPriority = 1000 + tcref.TyparsNoRange.Length }
+                | Item.FakeInterfaceCtor (TType_app(tcref, _, _)) 
+                | Item.DelegateCtor (TType_app(tcref, _, _)) -> { x with MinorPriority = 1000 + tcref.TyparsNoRange.Length }
                 // Put type ctors after types, sorted by #typars. RemoveDuplicateItems will remove DefaultStructCtors if a type is also reported with this name
                 | Item.CtorGroup (_, cinfo :: _) -> { x with MinorPriority = 1000 + 10 * cinfo.DeclaringTyconRef.TyparsNoRange.Length }
                 | Item.MethodGroup(_, minfo :: _, _) -> { x with IsOwnMember = tyconRefOptEq x.Type minfo.DeclaringTyconRef }
diff --git a/src/fsharp/symbols/Exprs.fs b/src/fsharp/symbols/Exprs.fs
index a199e6b7e0c..035fc838bd3 100644
--- a/src/fsharp/symbols/Exprs.fs
+++ b/src/fsharp/symbols/Exprs.fs
@@ -306,7 +306,7 @@ module FSharpExprConvert =
     let (|TTypeConvOp|_|) (cenv: SymbolEnv) ty = 
         let g = cenv.g
         match ty with
-        | TType_app (tcref,_) ->
+        | TType_app (tcref, _, _) ->
             match tcref with
             | _ when tyconRefEq g tcref g.sbyte_tcr      -> Some mkCallToSByteOperator
             | _ when tyconRefEq g tcref g.byte_tcr       -> Some mkCallToByteOperator
@@ -792,7 +792,7 @@ module FSharpExprConvert =
                 let op2 = convertOp2 g m ty2 op1
                 ConvExprPrim cenv env op2
 
-            | TOp.ILAsm ([ ILConvertOp convertOp ], [TType_app (tcref,_)]), _, [arg] -> 
+            | TOp.ILAsm ([ ILConvertOp convertOp ], [TType_app (tcref, _, _)]), _, [arg] -> 
                 let ty = tyOfExpr g arg
                 let op =
                     if tyconRefEq g tcref g.char_tcr then
diff --git a/src/fsharp/symbols/SymbolHelpers.fs b/src/fsharp/symbols/SymbolHelpers.fs
index d47adc4318b..bdc37ee9196 100644
--- a/src/fsharp/symbols/SymbolHelpers.fs
+++ b/src/fsharp/symbols/SymbolHelpers.fs
@@ -433,7 +433,7 @@ module internal SymbolHelpers =
         | Item.RecdField rfinfo -> mkXmlComment (GetXmlDocSigOfRecdFieldRef rfinfo.RecdFieldRef)
         | Item.NewDef _ -> FSharpXmlDoc.None
         | Item.ILField finfo -> mkXmlComment (GetXmlDocSigOfILFieldInfo infoReader m finfo)
-        | Item.Types(_, TType_app(tcref, _) :: _) ->  mkXmlComment (GetXmlDocSigOfEntityRef infoReader m tcref)
+        | Item.Types(_, TType_app(tcref, _, _) :: _) ->  mkXmlComment (GetXmlDocSigOfEntityRef infoReader m tcref)
         | Item.CustomOperation (_, _, Some minfo) -> mkXmlComment (GetXmlDocSigOfMethInfo infoReader  m minfo)
         | Item.TypeVar _  -> FSharpXmlDoc.None
         | Item.ModuleOrNamespaces(modref :: _) -> mkXmlComment (GetXmlDocSigOfEntityRef infoReader m modref)
@@ -557,11 +557,11 @@ module internal SymbolHelpers =
               | Item.CtorGroup(_, meths1), Item.CtorGroup(_, meths2) -> 
                   (meths1, meths2)
                   ||> List.forall2 (fun minfo1 minfo2 -> MethInfo.MethInfosUseIdenticalDefinitions minfo1 minfo2)
-              | Item.UnqualifiedType tcRefs1, Item.UnqualifiedType tcRefs2 ->
-                  (tcRefs1, tcRefs2)
-                  ||> List.forall2 (fun tcRef1 tcRef2 -> tyconRefEq g tcRef1 tcRef2)
-              | Item.Types(_, [TType_app(tcRef1, _)]), Item.UnqualifiedType([tcRef2]) -> tyconRefEq g tcRef1 tcRef2
-              | Item.UnqualifiedType([tcRef1]), Item.Types(_, [TType_app(tcRef2, _)]) -> tyconRefEq g tcRef1 tcRef2
+              | Item.UnqualifiedType tcrefs1, Item.UnqualifiedType tcrefs2 ->
+                  (tcrefs1, tcrefs2)
+                  ||> List.forall2 (fun tcref1 tcref2 -> tyconRefEq g tcref1 tcref2)
+              | Item.Types(_, [TType_app(tcref1, _, _)]), Item.UnqualifiedType([tcref2]) -> tyconRefEq g tcref1 tcref2
+              | Item.UnqualifiedType([tcref1]), Item.Types(_, [TType_app(tcref2, _, _)]) -> tyconRefEq g tcref1 tcref2
               | _ -> false)
               
           member x.GetHashCode item =
@@ -723,7 +723,7 @@ module internal SymbolHelpers =
         | Item.MethodGroup(_, minfo :: _, _) ->
             GetXmlCommentForMethInfoItem infoReader m item minfo
 
-        | Item.Types(_, TType_app(tcref, _) :: _) -> 
+        | Item.Types(_, TType_app(tcref, _, _) :: _) -> 
             GetXmlCommentForItemAux (if tyconRefUsesLocalXmlDoc g.compilingFslib tcref  || tcref.XmlDoc.NonEmpty then Some tcref.XmlDoc else None) infoReader m item 
 
         | Item.ModuleOrNamespaces(modref :: _ as modrefs) -> 
@@ -767,7 +767,7 @@ module internal SymbolHelpers =
             let g = infoReader.g
             let amap = infoReader.amap
             match item with
-            | Item.Types(_, TType_app(tcref, _) :: _)
+            | Item.Types(_, TType_app(tcref, _, _) :: _)
             | Item.UnqualifiedType(tcref :: _) ->
                 let ty = generalizedTyconRef g tcref
                 ExistsHeadTypeInEntireHierarchy g amap range0 ty g.tcref_System_Attribute
diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs
index b0a6bda8847..9a1bf8001bb 100644
--- a/src/fsharp/symbols/Symbols.fs
+++ b/src/fsharp/symbols/Symbols.fs
@@ -714,7 +714,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
             let (TILObjectReprData(_scoref, _enc, tdef)) = entity.ILTyconInfo
             let formalTypars = entity.Typars(range.Zero)
             let formalTypeInst = generalizeTypars formalTypars
-            let ty = TType_app(entity, formalTypeInst)
+            let ty = TType_app(entity, formalTypeInst, 0uy)
             let formalTypeInfo = ILTypeInfo.FromType cenv.g ty
             tdef.Fields.AsList()
             |> List.map (fun tdef ->
@@ -2299,7 +2299,7 @@ type FSharpType(cenv, ty:TType) =
     let isUnresolved() = 
        ErrorLogger.protectAssemblyExploration true <| fun () -> 
         match stripTyparEqns ty with 
-        | TType_app (tcref, _) -> FSharpEntity(cenv, tcref).IsUnresolved
+        | TType_app (tcref, _, _) -> FSharpEntity(cenv, tcref).IsUnresolved
         | TType_measure (Measure.Con tcref) ->  FSharpEntity(cenv, tcref).IsUnresolved
         | TType_measure (Measure.Prod _) ->  FSharpEntity(cenv, cenv.g.measureproduct_tcr).IsUnresolved 
         | TType_measure Measure.One ->  FSharpEntity(cenv, cenv.g.measureone_tcr).IsUnresolved 
@@ -2336,7 +2336,7 @@ type FSharpType(cenv, ty:TType) =
     member _.TypeDefinition = 
        protect <| fun () -> 
         match stripTyparEqns ty with 
-        | TType_app (tcref, _) -> FSharpEntity(cenv, tcref) 
+        | TType_app (tcref, _, _) -> FSharpEntity(cenv, tcref) 
         | TType_measure (Measure.Con tcref) ->  FSharpEntity(cenv, tcref) 
         | TType_measure (Measure.Prod _) ->  FSharpEntity(cenv, cenv.g.measureproduct_tcr) 
         | TType_measure Measure.One ->  FSharpEntity(cenv, cenv.g.measureone_tcr) 
@@ -2347,9 +2347,9 @@ type FSharpType(cenv, ty:TType) =
        protect <| fun () -> 
         match stripTyparEqns ty with 
         | TType_anon (_, tyargs) 
-        | TType_app (_, tyargs) 
+        | TType_app (_, tyargs, _) 
         | TType_tuple (_, tyargs) -> (tyargs |> List.map (fun ty -> FSharpType(cenv, ty)) |> makeReadOnlyCollection) 
-        | TType_fun(d, r) -> [| FSharpType(cenv, d); FSharpType(cenv, r) |] |> makeReadOnlyCollection
+        | TType_fun(d, r, _) -> [| FSharpType(cenv, d); FSharpType(cenv, r) |] |> makeReadOnlyCollection
         | TType_measure (Measure.Con _) ->  [| |] |> makeReadOnlyCollection
         | TType_measure (Measure.Prod (t1, t2)) ->  [| FSharpType(cenv, TType_measure t1); FSharpType(cenv, TType_measure t2) |] |> makeReadOnlyCollection
         | TType_measure Measure.One ->  [| |] |> makeReadOnlyCollection
@@ -2401,7 +2401,7 @@ type FSharpType(cenv, ty:TType) =
     member _.GenericParameter = 
        protect <| fun () -> 
         match stripTyparEqns ty with 
-        | TType_var tp 
+        | TType_var (tp, _) 
         | TType_measure (Measure.Var tp) -> 
             FSharpGenericParameter (cenv, tp)
         | _ -> invalidOp "not a generic parameter type"
@@ -2439,11 +2439,11 @@ type FSharpType(cenv, ty:TType) =
             let ty = stripTyEqnsWrtErasure EraseNone cenv.g ty
             match ty with
             | TType_forall _ ->  10000
-            | TType_var tp  -> 10100 + int32 tp.Stamp
-            | TType_app (tc1, b1)  -> 10200 + int32 tc1.Stamp + List.sumBy hashType b1
+            | TType_var (tp, _)  -> 10100 + int32 tp.Stamp
+            | TType_app (tc1, b1, _)  -> 10200 + int32 tc1.Stamp + List.sumBy hashType b1
             | TType_ucase _   -> 10300  // shouldn't occur in symbols
             | TType_tuple (_, l1) -> 10400 + List.sumBy hashType l1
-            | TType_fun (dty, rty) -> 10500 + hashType dty + hashType rty
+            | TType_fun (dty, rty, _) -> 10500 + hashType dty + hashType rty
             | TType_measure _ -> 10600 
             | TType_anon (_,l1) -> 10800 + List.sumBy hashType l1
         hashType ty

From 3e4ef73271eb79994561c93264461c5f2ed2f579 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 14:04:46 +0000
Subject: [PATCH 080/112] minimise diff

---
 src/fsharp/CheckDeclarations.fs               |  6 +--
 src/fsharp/CheckExpressions.fs                |  4 +-
 src/fsharp/CompilerDiagnostics.fs             |  4 +-
 src/fsharp/ConstraintSolver.fs                |  8 ++--
 src/fsharp/IlxGen.fs                          |  6 +--
 src/fsharp/InfoReader.fs                      |  6 +--
 src/fsharp/PostInferenceChecks.fs             |  8 ++--
 src/fsharp/QuotationTranslator.fs             |  4 +-
 src/fsharp/TcGlobals.fs                       |  4 +-
 src/fsharp/TypeRelations.fs                   |  6 +--
 src/fsharp/TypedTree.fs                       |  4 +-
 src/fsharp/TypedTreeBasics.fs                 |  6 +--
 src/fsharp/TypedTreeOps.fs                    | 42 +++++++++----------
 src/fsharp/TypedTreePickle.fs                 | 24 +++++------
 src/fsharp/absil/ilreflect.fs                 |  2 +-
 src/fsharp/service/ServiceDeclarationLists.fs |  4 +-
 src/fsharp/symbols/Symbols.fs                 |  8 ++--
 17 files changed, 73 insertions(+), 73 deletions(-)

diff --git a/src/fsharp/CheckDeclarations.fs b/src/fsharp/CheckDeclarations.fs
index 47cdfd972d7..91d7328698f 100644
--- a/src/fsharp/CheckDeclarations.fs
+++ b/src/fsharp/CheckDeclarations.fs
@@ -4262,7 +4262,7 @@ module EstablishTypeDefinitionCores =
                     else 
                         acc
 
-                | TType_fun (d, r, _nullness) -> 
+                | TType_fun (d, r, _) -> 
                     accInAbbrevType d (accInAbbrevType r acc)
                 
                 | TType_var _ -> acc
@@ -4365,7 +4365,7 @@ module EstablishTypeDefinitionCores =
                     // This case was added to resolve issues/3916
                     ((doneTypes, acc), tinst2)
                     ||> List.fold (fun acc' x -> accStructFieldType structTycon structTyInst fspec x acc')
-                | TType_app (tcref2 , tinst2, _nullness) when tcref2.IsStructOrEnumTycon ->
+                | TType_app (tcref2 , tinst2, _) when tcref2.IsStructOrEnumTycon ->
                     // The field is a struct.
                     // An edge (tycon, tycon2) should be recorded, unless it is the "static self-typed field" case.
                     let tycon2 = tcref2.Deref
@@ -4385,7 +4385,7 @@ module EstablishTypeDefinitionCores =
                     else
                         let acc = insertEdgeToTycon tycon2 acc // collect edge (tycon, tycon2), if tycon2 is initial.
                         accStructInstanceFields fieldTy tycon2 tinst2 (doneTypes, acc) // recurse through struct field looking for more edges
-                | TType_app (tcref2, tinst2, _nullness) when tcref2.IsTypeAbbrev ->
+                | TType_app (tcref2, tinst2, _) when tcref2.IsTypeAbbrev ->
                     // The field is a type abbreviation. Expand and repeat.
                     accStructFieldType structTycon structTyInst fspec (reduceTyconRefAbbrev tcref2 tinst2) (doneTypes, acc)
                 | _ ->
diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index d1519d6112c..7ade46a5516 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -1400,7 +1400,7 @@ let MakeAndPublishVal (cenv: cenv) env (altActualParent, inSig, declKind, vrec,
                 if MemberIsExplicitImpl g memberInfo then
                     let slotSig = List.head memberInfo.ImplementedSlotSigs
                     match slotSig.ImplementedType with
-                    | TType_app (tyconref, _, _nullness) -> Some tyconref.Accessibility
+                    | TType_app (tyconref, _, _) -> Some tyconref.Accessibility
                     | _ -> None
                 else
                     None
@@ -4840,7 +4840,7 @@ and TcNestedTypeApplication cenv newOk checkCxs occ env tpenv mWholeTypeApp ty p
         error(Error(FSComp.SR.tcTypeHasNoNestedTypes(), mWholeTypeApp))
 
     match ty with
-    | TType_app(tcref, _, _nullness) ->
+    | TType_app(tcref, _, _) ->
         TcTypeApp cenv newOk checkCxs occ env tpenv mWholeTypeApp tcref pathTypeArgs tyargs
     | _ -> error(InternalError("TcNestedTypeApplication: expected type application", mWholeTypeApp))
 
diff --git a/src/fsharp/CompilerDiagnostics.fs b/src/fsharp/CompilerDiagnostics.fs
index e3b0d2eed6e..30d9d30b7ad 100644
--- a/src/fsharp/CompilerDiagnostics.fs
+++ b/src/fsharp/CompilerDiagnostics.fs
@@ -652,7 +652,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
           if m.StartLine <> m2.StartLine then
              os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
 
-      | ConstraintSolverNullnessWarningWithType(denv, ty, _nullness, m, m2) ->
+      | ConstraintSolverNullnessWarningWithType(denv, ty, _, m, m2) ->
 
           let t = NicePrint.minimalStringOfType denv ty
           os.Append(ConstraintSolverNullnessWarningWithTypeE().Format (t)) |> ignore
@@ -660,7 +660,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
           if m.StartLine <> m2.StartLine then
              os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
 
-      | ConstraintSolverNonNullnessWarningWithType(denv, ty, _nullness, m, m2) ->
+      | ConstraintSolverNonNullnessWarningWithType(denv, ty, _, m, m2) ->
 
           let t = NicePrint.minimalStringOfType denv ty
           os.Append(ConstraintSolverNonNullnessWarningWithTypeE().Format (t)) |> ignore
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 7db8e099e18..73e50257d48 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -374,7 +374,7 @@ let rec occursCheck g un ty =
     | TType_app (_, l, _) 
     | TType_anon(_, l)
     | TType_tuple (_, l) -> List.exists (occursCheck g un) l
-    | TType_fun (d, r, _nullness) -> occursCheck g un d || occursCheck g un r
+    | TType_fun (d, r, _) -> occursCheck g un d || occursCheck g un r
     | TType_var (r, _)   ->  typarEq un r 
     | TType_forall (_, tau) -> occursCheck g un tau
     | _ -> false 
@@ -854,7 +854,7 @@ let rec SimplifyMeasuresInType g resultFirst (generalizable, generalized as para
     | TType_anon (_, l)
     | TType_tuple (_, l) -> SimplifyMeasuresInTypes g param l
 
-    | TType_fun (d, r, _nullness) -> if resultFirst then SimplifyMeasuresInTypes g param [r;d] else SimplifyMeasuresInTypes g param [d;r]        
+    | TType_fun (d, r, _) -> if resultFirst then SimplifyMeasuresInTypes g param [r;d] else SimplifyMeasuresInTypes g param [d;r]        
     | TType_var _   -> param
     | TType_forall (_, tau) -> SimplifyMeasuresInType g resultFirst param tau
     | TType_measure unt -> 
@@ -892,7 +892,7 @@ let rec GetMeasureVarGcdInType v ty =
     | TType_anon (_, l)
     | TType_tuple (_, l) -> GetMeasureVarGcdInTypes v l
 
-    | TType_fun (d, r, _nullness) -> GcdRational (GetMeasureVarGcdInType v d) (GetMeasureVarGcdInType v r)
+    | TType_fun (d, r, _) -> GcdRational (GetMeasureVarGcdInType v d) (GetMeasureVarGcdInType v r)
     | TType_var _   -> ZeroRational
     | TType_forall (_, tau) -> GetMeasureVarGcdInType v tau
     | TType_measure unt -> MeasureVarExponent v unt
@@ -1408,7 +1408,7 @@ and SolveTypeSubsumesType (csenv: ConstraintSolverEnv) ndeep m2 (trace: Optional
         )
 
     // Special subsumption rule for byref tags
-    | TType_app (tc1, l1, _nullness1)  , TType_app (tc2, l2, _nullness2) when tyconRefEq g tc1 tc2  && g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tc1 ->
+    | TType_app (tc1, l1, _)  , TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  && g.byref2_tcr.CanDeref && tyconRefEq g g.byref2_tcr tc1 ->
         match l1, l2 with 
         | [ h1; tag1 ], [ h2; tag2 ] -> trackErrors {
             do! SolveTypeEqualsType csenv ndeep m2 trace None h1 h2
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 02ec5e091ea..5fbadd44173 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -546,13 +546,13 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty =
     ignore voidOK
 #endif
     match stripTyEqnsAndMeasureEqns g ty with
-    | TType_app (tcref, tinst, _nullness) ->
+    | TType_app (tcref, tinst, _) ->
         GenNamedTyAppAux amap m tyenv ptrsOK tcref tinst
 
     | TType_tuple (tupInfo, args) ->
         GenTypeAux amap m tyenv VoidNotOK ptrsOK (mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) args)
 
-    | TType_fun (dty, returnTy, _nullness) ->
+    | TType_fun (dty, returnTy, _) ->
         EraseClosures.mkILFuncTy g.ilxPubCloEnv (GenTypeArgAux amap m tyenv dty) (GenTypeArgAux amap m tyenv returnTy)
 
     | TType_anon (anonInfo, tinst) ->
@@ -569,7 +569,7 @@ and GenTypeAux amap m (tyenv: TypeReprEnv) voidOK ptrsOK ty =
         if tps.IsEmpty then GenTypeAux amap m tyenv VoidNotOK ptrsOK tau
         else EraseClosures.mkILTyFuncTy g.ilxPubCloEnv
 
-    | TType_var (tp, _nullness) -> mkILTyvarTy tyenv.[tp, m]
+    | TType_var (tp, _) -> mkILTyvarTy tyenv.[tp, m]
 
     | TType_measure _ -> g.ilg.typ_Int32
 
diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index 2a494da4549..ec75ee92d71 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -626,7 +626,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
               // a decent hash function for these.
               canMemoize=(fun (_flags, _: range, ty) -> 
                                     match stripTyEqns g ty with 
-                                    | TType_app(tcref, [], _nullness) -> tcref.TypeContents.tcaug_closed // TODO NULLNESS: consider whether ignoring _nullness is valid here
+                                    | TType_app(tcref, [], _) -> tcref.TypeContents.tcaug_closed // TODO NULLNESS: consider whether ignoring _nullness is valid here
                                     | _ -> false),
               
               keyComparer=
@@ -635,13 +635,13 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
                                     // Ignoring the ranges - that's OK.
                                     flagsEq.Equals(flags1, flags2) && 
                                     match stripTyEqns g typ1, stripTyEqns g typ2 with 
-                                    | TType_app(tcref1, [], _nullness1),TType_app(tcref2, [], _nullness2) -> tyconRefEq g tcref1 tcref2  // TODO NULLNESS: consider whether ignoring _nullness is valid here
+                                    | TType_app(tcref1, [], _),TType_app(tcref2, [], _) -> tyconRefEq g tcref1 tcref2  // TODO NULLNESS: consider whether ignoring _nullness is valid here
                                     | _ -> false
                        member _.GetHashCode((flags, _, ty)) =
                                     // Ignoring the ranges - that's OK.
                                     flagsEq.GetHashCode flags + 
                                     (match stripTyEqns g ty with 
-                                     | TType_app(tcref, [], _nullness1) -> hash tcref.LogicalName  // TODO NULLNESS: consider whether ignoring _nullness is valid here
+                                     | TType_app(tcref, [], _) -> hash tcref.LogicalName  // TODO NULLNESS: consider whether ignoring _nullness is valid here
                                      | _ -> 0) })
     
     let FindImplicitConversionsUncached (ad, m, ty) = 
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index 02123d7da90..d8b09627595 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -336,7 +336,7 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
     // In an ideal world we would, instead, record the solutions to these constraints as "witness variables" in expressions, 
     // rather than solely in types. 
     match ty with 
-    | TType_var (tp, _nullness) when tp.Solution.IsSome ->
+    | TType_var (tp, _) when tp.Solution.IsSome ->
         for cx in tp.Constraints do
             match cx with 
             | TyparConstraint.MayResolveMember(TTrait(_, _, _, _, _, soln), _) -> 
@@ -363,7 +363,7 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
         tps |> List.iter (fun tp -> tp.Constraints |> List.iter (CheckTypeConstraintDeep cenv f g env))
 
     | TType_measure _          -> ()
-    | TType_app (tcref, tinst, _nullness) -> 
+    | TType_app (tcref, tinst, _) -> 
         match visitTyconRefOpt with 
         | Some visitTyconRef -> visitTyconRef isInner tcref 
         | None -> ()
@@ -389,11 +389,11 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
     | TType_tuple (_, tys) ->
         CheckTypesDeep cenv f g env tys
 
-    | TType_fun (s, t, _nullness) ->
+    | TType_fun (s, t, _) ->
         CheckTypeDeep cenv f g env true s
         CheckTypeDeep cenv f g env true t
 
-    | TType_var (tp, _nullness) -> 
+    | TType_var (tp, _) -> 
           if not tp.IsSolved then 
               match visitTyparOpt with 
               | None -> ()
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index 61a3e36d993..98a272d4ba3 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -1002,7 +1002,7 @@ and ConvType cenv env m ty =
 #endif
         QP.mkILNamedTy(ConvTyconRef cenv tcref m, ConvTypes cenv env m tyargs)
 
-    | TType_fun(a, b, _nullness) -> 
+    | TType_fun(a, b, _) -> 
         QP.mkFunTy(ConvType cenv env m a, ConvType cenv env m b)
 
     | TType_tuple(tupInfo, l)  -> 
@@ -1013,7 +1013,7 @@ and ConvType cenv env m ty =
         let tinstR = ConvTypes cenv env m tinst
         QP.mkILNamedTy(ConvILTypeRefUnadjusted cenv m tref, tinstR)
 
-    | TType_var(tp, _nullness) ->
+    | TType_var(tp, _) ->
         QP.mkVarTy(ConvTyparRef cenv env m tp)
 
     | TType_forall(_spec, _ty) ->
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index f9fc1d6b3c5..1d0e5f1ca21 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -554,8 +554,8 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
       match l with
       | [t1;t2;t3;t4;t5;t6;t7;marker] ->
           match marker with
-          | TType_app(tcref, [t8], _nullness) when tyconRefEq tcref v_ref_tuple1_tcr -> mkRawRefTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
-          | TType_app(tcref, [t8], _nullness) when tyconRefEq tcref v_struct_tuple1_tcr -> mkRawStructTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
+          | TType_app(tcref, [t8], _) when tyconRefEq tcref v_ref_tuple1_tcr -> mkRawRefTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
+          | TType_app(tcref, [t8], _) when tyconRefEq tcref v_struct_tuple1_tcr -> mkRawStructTupleTy [t1;t2;t3;t4;t5;t6;t7;t8] |> Some
           | TType_tuple (_structness2, t8plus) -> TType_tuple (tupInfo, [t1;t2;t3;t4;t5;t6;t7] @ t8plus) |> Some
           | _ -> None
       | [] -> None
diff --git a/src/fsharp/TypeRelations.fs b/src/fsharp/TypeRelations.fs
index edab35df338..62e6e6a9413 100755
--- a/src/fsharp/TypeRelations.fs
+++ b/src/fsharp/TypeRelations.fs
@@ -63,7 +63,7 @@ let rec TypesFeasiblyEquivalent stripMeasures ndeep g amap m ty1 ty2 =
     | TType_var _, _  
     | _, TType_var _ -> true
 
-    | TType_app (tc1, l1, _nullness1), TType_app (tc2, l2, _nullness2) when tyconRefEq g tc1 tc2 ->
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2 ->
         List.lengthsEqAndForall2 (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) l1 l2
 
     | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2)      -> 
@@ -76,7 +76,7 @@ let rec TypesFeasiblyEquivalent stripMeasures ndeep g amap m ty1 ty2 =
         evalTupInfoIsStruct tupInfo1 = evalTupInfoIsStruct tupInfo2 &&
         List.lengthsEqAndForall2 (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) l1 l2 
 
-    | TType_fun (d1, r1, _nullness1), TType_fun (d2, r2, _nullness2)   ->
+    | TType_fun (d1, r1, _), TType_fun (d2, r2, _)   ->
         (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) d1 d2 && (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) r1 r2
 
     | TType_measure _, TType_measure _ ->
@@ -100,7 +100,7 @@ let rec TypeFeasiblySubsumesType ndeep g amap m ty1 canCoerce ty2 =
     let ty2 = stripTyEqns g ty2
     match ty1, ty2 with 
     | TType_var _, _  | _, TType_var _ -> true
-    | TType_app (tc1, l1, _nullness1), TType_app (tc2, l2, _nullness2) when tyconRefEq g tc1 tc2  ->
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  ->
         List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2
 
     | TType_tuple _, TType_tuple _
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index da225475aea..16f44e749ae 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -4132,7 +4132,7 @@ type TType =
         | TType_anon (anonInfo, _tinst) -> defaultArg anonInfo.Assembly.QualifiedName ""
         | TType_fun _ -> ""
         | TType_measure _ -> ""
-        | TType_var (tp, _nullness) -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> ""
+        | TType_var (tp, _) -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> ""
         | TType_ucase (_uc, _tinst) ->
             let (TILObjectReprData(scope, _nesting, _definition)) = _uc.Tycon.ILTyconInfo
             scope.QualifiedName
@@ -4156,7 +4156,7 @@ type TType =
              | TupInfo.Const true -> "struct ")
              + "{|" + String.concat "," (Seq.map2 (fun nm ty -> nm + " " + string ty + ";") anonInfo.SortedNames tinst) + ")" + "|}"
         | TType_ucase (uc, tinst) -> "ucase " + uc.CaseName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">")
-        | TType_var (tp, _nullness) -> 
+        | TType_var (tp, _) -> 
             match tp.Solution with 
             | None -> tp.DisplayName
             | Some _ -> tp.DisplayName + " (solved)"
diff --git a/src/fsharp/TypedTreeBasics.fs b/src/fsharp/TypedTreeBasics.fs
index a2285a1fc26..8d86cec7a99 100644
--- a/src/fsharp/TypedTreeBasics.fs
+++ b/src/fsharp/TypedTreeBasics.fs
@@ -308,9 +308,9 @@ let stripUnitEqns unt = stripUnitEqnsAux false unt
 
 let replaceNullnessOfTy nullness (ty:TType) =
     match stripTyparEqns ty with
-    | TType_var (tp, _nullnessOrig) -> TType_var (tp, nullness)
-    | TType_app (tcr, tinst, _nullnessOrig) -> TType_app (tcr, tinst, nullness)
-    | TType_fun (d, r, _nullnessOrig) -> TType_fun (d, r, nullness)
+    | TType_var (tp, _) -> TType_var (tp, nullness)
+    | TType_app (tcr, tinst, _) -> TType_app (tcr, tinst, nullness)
+    | TType_fun (d, r, _) -> TType_fun (d, r, nullness)
     //| TType_ucase _ -> None // TODO NULLNESS
     //| TType_tuple _ -> None // TODOTODO NULLNESS
     //| TType_anon _ -> None // TODO NULLNESS
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index bccd2092e2d..8e73ab16751 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -811,12 +811,12 @@ let rec stripExnEqns (eref: TyconRef) =
     | _ -> exnc
 
 let primDestForallTy g ty = ty |> stripTyEqns g |> (function TType_forall (tyvs, tau) -> (tyvs, tau) | _ -> failwith "primDestForallTy: not a forall type")
-let destFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _nullness) -> (tyv, tau) | _ -> failwith "destFunTy: not a function type")
+let destFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _) -> (tyv, tau) | _ -> failwith "destFunTy: not a function type")
 let destAnyTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) -> tupInfo, l | _ -> failwith "destAnyTupleTy: not a tuple type")
 let destRefTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) when not (evalTupInfoIsStruct tupInfo) -> l | _ -> failwith "destRefTupleTy: not a reference tuple type")
 let destStructTupleTy g ty = ty |> stripTyEqns g |> (function TType_tuple (tupInfo, l) when evalTupInfoIsStruct tupInfo -> l | _ -> failwith "destStructTupleTy: not a struct tuple type")
-let destTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> v | _ -> failwith "destTyparTy: not a typar type")
-let destAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> v | TType_measure unt -> destUnitParMeasure g unt | _ -> failwith "destAnyParTy: not a typar or unpar type")
+let destTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> v | _ -> failwith "destTyparTy: not a typar type")
+let destAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> v | TType_measure unt -> destUnitParMeasure g unt | _ -> failwith "destAnyParTy: not a typar or unpar type")
 let destMeasureTy g ty = ty |> stripTyEqns g |> (function TType_measure m -> m | _ -> failwith "destMeasureTy: not a unit-of-measure type")
 let isFunTy g ty = ty |> stripTyEqns g |> (function TType_fun _ -> true | _ -> false)
 let isForallTy g ty = ty |> stripTyEqns g |> (function TType_forall _ -> true | _ -> false)
@@ -850,11 +850,11 @@ let tryDestFunTy g ty = ty |> stripTyEqns g |> (function TType_fun (tyv, tau, _)
 let tryTcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> ValueSome tcref | _ -> ValueNone)
 let tryDestAnonRecdTy g ty = ty |> stripTyEqns g |> (function TType_anon (anonInfo, tys) -> ValueSome (anonInfo, tys) | _ -> ValueNone)
 
-let tryAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> ValueSome v | TType_measure unt when isUnitParMeasure g unt -> ValueSome(destUnitParMeasure g unt) | _ -> ValueNone)
-let tryAnyParTyOption g ty = ty |> stripTyEqns g |> (function TType_var (v, _nullness) -> Some v | TType_measure unt when isUnitParMeasure g unt -> Some(destUnitParMeasure g unt) | _ -> None)
+let tryAnyParTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> ValueSome v | TType_measure unt when isUnitParMeasure g unt -> ValueSome(destUnitParMeasure g unt) | _ -> ValueNone)
+let tryAnyParTyOption g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> Some v | TType_measure unt when isUnitParMeasure g unt -> Some(destUnitParMeasure g unt) | _ -> None)
 let (|AppTy|_|) g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _) -> Some (tcref, tinst) | _ -> None) 
 let (|RefTupleTy|_|) g ty = ty |> stripTyEqns g |> (function TType_tuple(tupInfo, tys) when not (evalTupInfoIsStruct tupInfo) -> Some tys | _ -> None)
-let (|FunTy|_|) g ty = ty |> stripTyEqns g |> (function TType_fun(dty, rty, _nullness) -> Some (dty, rty) | _ -> None)
+let (|FunTy|_|) g ty = ty |> stripTyEqns g |> (function TType_fun(dty, rty, _) -> Some (dty, rty) | _ -> None)
 
 let tryNiceEntityRefOfTy ty = 
     let ty = stripTyparEqnsAux KnownWithoutNull false ty 
@@ -1005,13 +1005,13 @@ and typeAEquivAux erasureFlag g aenv ty1 ty2 =
     match ty1, ty2 with
     | TType_forall(tps1, rty1), TType_forall(tps2, rty2) -> 
         typarsAEquivAux erasureFlag g aenv tps1 tps2 && typeAEquivAux erasureFlag g (aenv.BindEquivTypars tps1 tps2) rty1 rty2
-    | TType_var (tp1, _nullness1), TType_var (tp2, _nullness2) when typarEq tp1 tp2 -> // NOTE: nullness annotations are ignored for type equivalence
+    | TType_var (tp1, _), TType_var (tp2, _) when typarEq tp1 tp2 -> // NOTE: nullness annotations are ignored for type equivalence
         true
-    | TType_var (tp1, _nullness1), _ ->
+    | TType_var (tp1, _), _ ->
         match aenv.EquivTypars.TryFind tp1 with
         | Some v -> typeEquivAux erasureFlag g v ty2
         | None -> false
-    | TType_app (tc1, b1, _nullness1), TType_app (tc2, b2, _nullness2) -> // NOTE: nullness annotations are ignored for type equivalence
+    | TType_app (tc1, b1, _), TType_app (tc2, b2, _) -> // NOTE: nullness annotations are ignored for type equivalence
         tcrefAEquiv g aenv tc1 tc2 &&
         typesAEquivAux erasureFlag g aenv b1 b2
     | TType_ucase (UnionCaseRef(tc1, n1), b1), TType_ucase (UnionCaseRef(tc2, n2), b2) -> 
@@ -1020,7 +1020,7 @@ and typeAEquivAux erasureFlag g aenv ty1 ty2 =
         typesAEquivAux erasureFlag g aenv b1 b2
     | TType_tuple (s1, l1), TType_tuple (s2, l2) -> 
         structnessAEquiv s1 s2 && typesAEquivAux erasureFlag g aenv l1 l2
-    | TType_fun (dtys1, rty1, _nullness1), TType_fun (dtys2, rty2, _nullness2) -> // NOTE: nullness annotations are ignored for type equivalence
+    | TType_fun (dtys1, rty1, _), TType_fun (dtys2, rty2, _) -> // NOTE: nullness annotations are ignored for type equivalence
         typeAEquivAux erasureFlag g aenv dtys1 dtys2 && typeAEquivAux erasureFlag g aenv rty1 rty2
     | TType_anon (anonInfo1, l1), TType_anon (anonInfo2, l2) -> 
         anonInfoEquiv anonInfo1 anonInfo2 &&
@@ -2188,17 +2188,17 @@ and accFreeInType opts ty acc =
     match stripTyparEqns ty with 
     | TType_tuple (tupInfo, l) -> accFreeInTypes opts l (accFreeInTupInfo opts tupInfo acc)
     | TType_anon (anonInfo, l) -> accFreeInTypes opts l (accFreeInTupInfo opts anonInfo.TupInfo acc)
-    | TType_app (tc, tinst, _nullness) -> 
+    | TType_app (tc, tinst, _) -> 
         let acc = accFreeTycon opts tc acc
         match tinst with 
         | [] -> acc  // optimization to avoid unneeded call
         | [h] -> accFreeInType opts h acc // optimization to avoid unneeded call
         | _ -> accFreeInTypes opts tinst acc
     | TType_ucase (UnionCaseRef(tc, _), tinst) -> accFreeInTypes opts tinst (accFreeTycon opts tc  acc)
-    | TType_fun (d, r, _nullness) -> 
+    | TType_fun (d, r, _) -> 
        // note, nullness variables are _not_ part of the type system proper
        accFreeInType opts d (accFreeInType opts r acc)
-    | TType_var (r, _nullness) -> accFreeTyparRef opts r acc
+    | TType_var (r, _) -> accFreeTyparRef opts r acc
     | TType_forall (tps, r) -> unionFreeTyvars (boundTypars opts tps (freeInType opts r)) acc
     | TType_measure unt -> accFreeInMeasure opts unt acc
 
@@ -2291,13 +2291,13 @@ and accFreeInTypeLeftToRight g cxFlag thruFlag acc ty =
     | TType_tuple (tupInfo, tupTys) -> 
         let acc = accFreeInTupInfoLeftToRight g cxFlag thruFlag acc tupInfo 
         accFreeInTypesLeftToRight g cxFlag thruFlag acc tupTys 
-    | TType_app (_, tinst, _nullness) ->
+    | TType_app (_, tinst, _) ->
         accFreeInTypesLeftToRight g cxFlag thruFlag acc tinst 
     | TType_ucase (_, tinst) ->
         accFreeInTypesLeftToRight g cxFlag thruFlag acc tinst 
-    | TType_fun (d, r, _nullness) ->
+    | TType_fun (d, r, _) ->
         accFreeInTypeLeftToRight g cxFlag thruFlag (accFreeInTypeLeftToRight g cxFlag thruFlag acc d ) r
-    | TType_var (r, _nullness) ->
+    | TType_var (r, _) ->
         accFreeTyparRefLeftToRight g cxFlag thruFlag acc r 
     | TType_forall (tps, r) ->
         unionFreeTyparsLeftToRight (boundTyparsLeftToRight g cxFlag thruFlag tps (accFreeInTypeLeftToRight g cxFlag thruFlag emptyFreeTyparsLeftToRight r)) acc
@@ -2740,7 +2740,7 @@ module SimplifyTypes =
         | TType_ucase (_, tys) 
         | TType_anon (_, tys) 
         | TType_tuple (_, tys) -> List.fold (foldTypeButNotConstraints f) z tys
-        | TType_fun (s, t, _nullness) -> foldTypeButNotConstraints f (foldTypeButNotConstraints f z s) t
+        | TType_fun (s, t, _) -> foldTypeButNotConstraints f (foldTypeButNotConstraints f z s) t
         | TType_var _ -> z
         | TType_measure _ -> z
 
@@ -2750,7 +2750,7 @@ module SimplifyTypes =
 
     let accTyparCounts z ty =
         // Walk type to determine typars and their counts (for pprinting decisions) 
-        foldTypeButNotConstraints (fun z ty -> match ty with | TType_var (tp, _nullness) when tp.Rigidity = TyparRigidity.Rigid  -> incM tp z | _ -> z) z ty
+        foldTypeButNotConstraints (fun z ty -> match ty with | TType_var (tp, _) when tp.Rigidity = TyparRigidity.Rigid  -> incM tp z | _ -> z) z ty
 
     let emptyTyparCounts = Zmap.empty typarOrder
 
@@ -8391,7 +8391,7 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty =
         let tyName = 
             let ty = stripTyEqnsAndMeasureEqns g ty
             match ty with
-            | TType_app (tcref, _tinst, _nullness) -> 
+            | TType_app (tcref, _tinst, _) -> 
                 // Generic type names are (name + "`" + digits) where name does not contain "`".
                 // In XML doc, when used in type instances, these do not use the ticks.
                 let path = Array.toList (fullMangledPathToTyconRef tcref) @ [tcref.CompiledName]
@@ -8410,10 +8410,10 @@ let rec typeEnc g (gtpsType, gtpsMethod) ty =
         else 
             sprintf "System.Tuple%s"(tyargsEnc g (gtpsType, gtpsMethod) tys)
 
-    | TType_fun (f, x, _nullness) -> 
+    | TType_fun (f, x, _) -> 
         "Microsoft.FSharp.Core.FSharpFunc" + tyargsEnc g (gtpsType, gtpsMethod) [f;x]
 
-    | TType_var (typar, _nullness) -> 
+    | TType_var (typar, _) -> 
         typarEnc g (gtpsType, gtpsMethod) typar
 
     | TType_measure _ -> "?"
diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index 7e74ca1a400..227dd65c2f2 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -118,9 +118,9 @@ type NodeOutTable<'Data, 'Node> =
           Table = Table<_>.Create nm }
 
 []
-type WriterState = 
-  { os: ByteBuffer 
-    osB: ByteBuffer 
+type WriterState =
+  { os: ByteBuffer
+    osB: ByteBuffer
     oscope: CcuThunk
     occus: Table
     oentities: NodeOutTable
@@ -152,8 +152,8 @@ type NodeInTable<'Data, 'Node> =
         { LinkNode = lnk; IsLinked = isLinked; Name = nm; Nodes = Array.init n (fun _i -> mkEmpty() ) }
 
 []
-type ReaderState = 
-  { is: ByteStream 
+type ReaderState =
+  { is: ByteStream
     // secondary stream of information for F# 5.0
     isB: ByteStream
     iilscope: ILScopeRef
@@ -312,7 +312,7 @@ type unpickler<'T> = ReaderState -> 'T
 let u_bool st = let b = u_byte st in (b = 1)
 
 /// Unpickle an uncompressed integer from the main stream
-let prim_u_int32 st = 
+let prim_u_int32 st =
     let b0 =  (u_byte st)
     let b1 =  (u_byte st)
     let b2 =  (u_byte st)
@@ -327,7 +327,7 @@ let prim_u_int32B st =
     let b3 = u_byteB st
     b0 ||| (b1 <<< 8) ||| (b2 <<< 16) ||| (b3 <<< 24)
 
-let u_int32 st = 
+let u_int32 st =
     let b0 = u_byte st
     if b0 <= 0x7F then b0
     else if b0 <= 0xbf then
@@ -684,7 +684,7 @@ let u_option f st =
     | 1 -> Some (f st)
     | n -> ufailwith st ("u_option: found number " + string n)
 
-let u_lazy u st = 
+let u_lazy u st =
 
     // Read the number of bytes in the record
     let len         = prim_u_int32 st // fixupPos1
@@ -799,7 +799,7 @@ let p_simpletyp x st = p_int (encode_simpletyp st.occus st.ostrings st.onlerefs
 []
 let PickleBufferCapacity = 100000
 
-let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x =
+let pickleObjWithDanglingCcus inMem file g scope p x =
   let st1 =
       { os = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
         osB = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
@@ -824,10 +824,10 @@ let pickleObjWithDanglingCcus inMem file (g: TcGlobals) scope p x =
       st1.oentities.Size,
       st1.otypars.Size,
       st1.ovals.Size,
-      st1.oanoninfos.Size 
-    st1.occus, sizes, st1.ostrings, st1.opubpaths,st1.onlerefs, st1.osimpletys, st1.os.AsMemory(), st1.osB
+      st1.oanoninfos.Size
+    st1.occus, sizes, st1.ostrings, st1.opubpaths, st1.onlerefs, st1.osimpletys, st1.os.AsMemory(), st1.osB
 
-  let st2 = 
+  let st2 =
      { os = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
        osB = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
        oscope=scope
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 9a96152df53..8996377178f 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -746,7 +746,7 @@ let queryableTypeGetMethodBySearch cenv emEnv parentT (mref: ILMethodRef) =
         | Some methInfo -> methInfo (* return MethodInfo for (generic) type's (generic) method *)
 
 let queryableTypeGetMethod cenv emEnv parentT (mref: ILMethodRef) : MethodInfo =
-    assert(not (typeIsNotQueryable(parentT)))
+    assert(not (typeIsNotQueryable parentT))
     if mref.GenericArity = 0 then
         let tyargTs = getGenericArgumentsOfType parentT
         let argTs, resT =
diff --git a/src/fsharp/service/ServiceDeclarationLists.fs b/src/fsharp/service/ServiceDeclarationLists.fs
index 7cc972cf414..78a94269c36 100644
--- a/src/fsharp/service/ServiceDeclarationLists.fs
+++ b/src/fsharp/service/ServiceDeclarationLists.fs
@@ -985,8 +985,8 @@ type DeclarationListInfo(declarations: DeclarationListItem[], isForType: bool, i
                 match x.Item with
                 | Item.Types (_, TType_app(tcref, _, _) :: _) -> { x with MinorPriority = 1 + tcref.TyparsNoRange.Length }
                 // Put delegate ctors after types, sorted by #typars. RemoveDuplicateItems will remove FakeInterfaceCtor and DelegateCtor if an earlier type is also reported with this name
-                | Item.FakeInterfaceCtor (TType_app(tcref,_,_)) 
-                | Item.DelegateCtor (TType_app(tcref,_,_)) -> { x with MinorPriority = 1000 + tcref.TyparsNoRange.Length }
+                | Item.FakeInterfaceCtor (TType_app(tcref, _, _)) 
+                | Item.DelegateCtor (TType_app(tcref, _, _)) -> { x with MinorPriority = 1000 + tcref.TyparsNoRange.Length }
                 // Put type ctors after types, sorted by #typars. RemoveDuplicateItems will remove DefaultStructCtors if a type is also reported with this name
                 | Item.CtorGroup (_, cinfo :: _) -> { x with MinorPriority = 1000 + 10 * cinfo.DeclaringTyconRef.TyparsNoRange.Length }
                 | Item.MethodGroup(_, minfo :: _, _) -> { x with IsOwnMember = tyconRefOptEq x.Type minfo.DeclaringTyconRef }
diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs
index e5e1e972edb..54a1ffc2572 100644
--- a/src/fsharp/symbols/Symbols.fs
+++ b/src/fsharp/symbols/Symbols.fs
@@ -2371,7 +2371,7 @@ type FSharpType(cenv, ty:TType) =
         | TType_anon (_, tyargs) 
         | TType_app (_, tyargs, _) 
         | TType_tuple (_, tyargs) -> (tyargs |> List.map (fun ty -> FSharpType(cenv, ty)) |> makeReadOnlyCollection) 
-        | TType_fun(d, r, _nullness) -> [| FSharpType(cenv, d); FSharpType(cenv, r) |] |> makeReadOnlyCollection
+        | TType_fun(d, r, _) -> [| FSharpType(cenv, d); FSharpType(cenv, r) |] |> makeReadOnlyCollection
         | TType_measure (Measure.Con _) ->  [| |] |> makeReadOnlyCollection
         | TType_measure (Measure.Prod (t1, t2)) ->  [| FSharpType(cenv, TType_measure t1); FSharpType(cenv, TType_measure t2) |] |> makeReadOnlyCollection
         | TType_measure Measure.One ->  [| |] |> makeReadOnlyCollection
@@ -2423,7 +2423,7 @@ type FSharpType(cenv, ty:TType) =
     member _.GenericParameter = 
        protect <| fun () -> 
         match stripTyparEqns ty with 
-        | TType_var (tp, _nullness) ->
+        | TType_var (tp, _) ->
             FSharpGenericParameter (cenv, tp)
         | TType_measure (Measure.Var tp) -> 
             FSharpGenericParameter (cenv, tp)
@@ -2462,11 +2462,11 @@ type FSharpType(cenv, ty:TType) =
             let ty = stripTyEqnsWrtErasure EraseNone cenv.g ty
             match ty with
             | TType_forall _ ->  10000
-            | TType_var (tp, _nullness)  -> 10100 + int32 tp.Stamp
+            | TType_var (tp, _)  -> 10100 + int32 tp.Stamp
             | TType_app (tc1, b1, _)  -> 10200 + int32 tc1.Stamp + List.sumBy hashType b1
             | TType_ucase _   -> 10300  // shouldn't occur in symbols
             | TType_tuple (_, l1) -> 10400 + List.sumBy hashType l1
-            | TType_fun (dty, rty, _nullness) -> 10500 + hashType dty + hashType rty
+            | TType_fun (dty, rty, _) -> 10500 + hashType dty + hashType rty
             | TType_measure _ -> 10600 
             | TType_anon (_,l1) -> 10800 + List.sumBy hashType l1
         hashType ty

From 548021bececf8d27bb94031db9802f170bbb28fb Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 14:20:51 +0000
Subject: [PATCH 081/112] minimise diff

---
 src/fsharp/CheckExpressions.fs | 28 ++++++++--------
 src/fsharp/ConstraintSolver.fs |  2 +-
 src/fsharp/Optimizer.fs        |  7 ++--
 src/fsharp/infos.fs            |  7 ++--
 src/fsharp/symbols/Symbols.fs  | 60 +++++++++++++++++-----------------
 5 files changed, 54 insertions(+), 50 deletions(-)

diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index 3009d89b8d3..1b55d292794 100644
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -1861,31 +1861,29 @@ let MakeAndPublishSimpleValsForMergedScope (cenv: cenv) env m (names: NameMap<_>
 //-------------------------------------------------------------------------
 
 let FreshenTyconRef (g: TcGlobals) m rigid (tcref: TyconRef) declaredTyconTypars = 
-    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
-    let tpsorig = declaredTyconTypars
-    let tps = copyTypars tpsorig
+    let origTypars = declaredTyconTypars
+    let freshTypars = copyTypars origTypars
     if rigid <> TyparRigidity.Rigid then
-      tps |> List.iter (fun tp -> tp.SetRigidity rigid)
+        freshTypars |> List.iter (fun tp -> tp.SetRigidity rigid)
 
-    let renaming, tinst = FixupNewTypars m [] [] tpsorig tps
-    let origTy = TType_app(tcref, List.map mkTyparTy tpsorig, 0uy)
-    let instTy = TType_app(tcref, tinst, 0uy)
-    origTy, tps, renaming, instTy
+    let renaming, tinst = FixupNewTypars m [] [] origTypars freshTypars
+    let origTy = TType_app(tcref, List.map mkTyparTy origTypars, g.knownWithoutNull)
+    let freshTy = TType_app(tcref, tinst, g.knownWithoutNull)
+    origTy, freshTypars, renaming, freshTy
 
 let FreshenPossibleForallTy g m rigid ty = 
-    let tpsorig, tau = tryDestForallTy g ty
-    if isNil tpsorig then
+    let origTypars, tau = tryDestForallTy g ty
+    if isNil origTypars then
         [], [], [], tau
     else
         // tps may be have been equated to other tps in equi-recursive type inference and units-of-measure type inference. Normalize them here
-        let tpsorig = NormalizeDeclaredTyparsForEquiRecursiveInference g tpsorig
-        let tps, renaming, tinst = CopyAndFixupTypars m rigid tpsorig
-        tpsorig, tps, tinst, instType renaming tau
+        let origTypars = NormalizeDeclaredTyparsForEquiRecursiveInference g origTypars
+        let tps, renaming, tinst = CopyAndFixupTypars m rigid origTypars
+        origTypars, tps, tinst, instType renaming tau
 
 let FreshenTyconRef2 (g: TcGlobals) m (tcref: TyconRef) = 
-    ignore g // included for future, minimizing code diffs, see https://github.com/dotnet/fsharp/pull/6804
     let tps, renaming, tinst = FreshenTypeInst m (tcref.Typars m)
-    tps, renaming, tinst, TType_app (tcref, tinst, 0uy)
+    tps, renaming, tinst, TType_app (tcref, tinst, g.knownWithoutNull)
 
 /// Given a abstract method, which may be a generic method, freshen the type in preparation
 /// to apply it as a constraint to the method that implements the abstract slot
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index df72178575d..3b19333d7ad 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -109,7 +109,7 @@ let NewErrorMeasure () =
 let NewByRefKindInferenceType (g: TcGlobals) m = 
     let tp = Construct.NewTypar (TyparKind.Type, TyparRigidity.Flexible, SynTypar(compgenId, TyparStaticReq.HeadType, true), false, TyparDynamicReq.No, [], false, false)
     if g.byrefkind_InOut_tcr.CanDeref then
-        tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, [], 0uy), m)]
+        tp.SetConstraints [TyparConstraint.DefaultsTo(10, TType_app(g.byrefkind_InOut_tcr, [], g.knownWithoutNull), m)]
     mkTyparTy tp
 
 let NewInferenceTypes g l = l |> List.map (fun _ -> NewInferenceType g) 
diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs
index 1a5f1754974..737424478d4 100644
--- a/src/fsharp/Optimizer.fs
+++ b/src/fsharp/Optimizer.fs
@@ -2068,8 +2068,11 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                 let resultExprAfterConvertToResultTy = 
                     match reqdResultInfo, exprIsEnumerableInfo with 
                     | Some _, Some _ | None, None -> resultExpr // the expression is a QuerySource, the result is a QuerySource, nothing to do
-                    | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy (TType_app(g.tcref_System_Collections_IEnumerable, [], 0uy)) resultExpr
-                    | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource g expr.Range resultElemTy qTy resultExpr 
+                    | Some resultElemTy, None ->
+                        let iety = TType_app(g.tcref_System_Collections_IEnumerable, [], g.knownWithoutNull)
+                        mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy iety resultExpr
+                    | None, Some (resultElemTy, qTy) ->
+                        mkCallNewQuerySource g expr.Range resultElemTy qTy resultExpr 
                 Some resultExprAfterConvertToResultTy
             | None -> 
                 None
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index 570e27d587f..0b24982a34b 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -96,7 +96,8 @@ let GetSuperTypeOfType g amap m ty =
             None
 
 /// Make a type for System.Collections.Generic.IList
-let mkSystemCollectionsGenericIListTy (g: TcGlobals) ty = TType_app(g.tcref_System_Collections_Generic_IList, [ty], 0uy)
+let mkSystemCollectionsGenericIListTy (g: TcGlobals) ty =
+    TType_app(g.tcref_System_Collections_Generic_IList, [ty], g.knownWithoutNull)
 
 /// Indicates whether we can skip interface types that lie outside the reference set
 []
@@ -1563,10 +1564,11 @@ type MethInfo =
             let _, formalEnclosingTyparTys = FixupNewTypars m [] [] formalEnclosingTyparsOrig formalEnclosingTypars
             let formalMethTypars = copyTypars x.FormalMethodTypars
             let _, formalMethTyparTys = FixupNewTypars m formalEnclosingTypars formalEnclosingTyparTys x.FormalMethodTypars formalMethTypars
+
             let formalRetTy, formalParams =
                 match x with
                 | ILMeth(_, ilminfo, _) ->
-                    let ftinfo = ILTypeInfo.FromType g (TType_app(tcref, formalEnclosingTyparTys, 0uy))
+                    let ftinfo = ILTypeInfo.FromType g (TType_app(tcref, formalEnclosingTyparTys, g.knownWithoutNull))
                     let formalRetTy = ImportReturnTypeFromMetadata amap m ilminfo.RawMetadata.Return.Type ilminfo.RawMetadata.Return.CustomAttrs ftinfo.ILScopeRef ftinfo.TypeInstOfRawMetadata formalMethTyparTys
                     let formalParams =
                         [ [ for p in ilminfo.RawMetadata.Parameters do
@@ -1589,6 +1591,7 @@ type MethInfo =
                     formalRetTy, formalParams
 #endif
                 | _ -> failwith "unreachable"
+
             MakeSlotSig(x.LogicalName, x.ApparentEnclosingType, formalEnclosingTypars, formalMethTypars, formalParams, formalRetTy)
 
     /// Get the ParamData objects for the parameters of a MethInfo
diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs
index 9a1bf8001bb..4c940c97c16 100644
--- a/src/fsharp/symbols/Symbols.fs
+++ b/src/fsharp/symbols/Symbols.fs
@@ -201,17 +201,17 @@ module Impl =
         | _ -> ""
 
 type FSharpDisplayContext(denv: TcGlobals -> DisplayEnv) = 
-    member x.Contents g = denv g
+    member _.Contents g = denv g
 
     static member Empty = FSharpDisplayContext(fun g -> DisplayEnv.Empty g)
 
-    member x.WithShortTypeNames shortNames =
+    member _.WithShortTypeNames shortNames =
          FSharpDisplayContext(fun g -> { denv g with shortTypeNames = shortNames })
 
-    member x.WithPrefixGenericParameters () =
+    member _.WithPrefixGenericParameters () =
         FSharpDisplayContext(fun g -> { denv g with genericParameterStyle = GenericParameterStyle.Prefix }  )
 
-    member x.WithSuffixGenericParameters () =
+    member _.WithSuffixGenericParameters () =
         FSharpDisplayContext(fun g -> { denv g with genericParameterStyle = GenericParameterStyle.Suffix }  )
 
 // delay the realization of 'item' in case it is unresolved
@@ -444,7 +444,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         | None -> invalidOp (sprintf "the type '%s' does not have a qualified name" x.LogicalName)
         | Some nm -> nm
     
-    member x.TryFullName = 
+    member _.TryFullName = 
         if isUnresolved() then None
 #if !NO_EXTENSIONTYPING
         elif entity.IsTypeAbbrev || entity.IsProvidedErasedTycon then None
@@ -461,14 +461,14 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         checkIsResolved()
         entity.Range
 
-    member x.GenericParameters = 
+    member _.GenericParameters = 
         checkIsResolved()
         entity.TyparsNoRange |> List.map (fun tp -> FSharpGenericParameter(cenv, tp)) |> makeReadOnlyCollection
 
     member _.IsMeasure = 
         isResolvedAndFSharp() && (entity.TypeOrMeasureKind = TyparKind.Measure)
 
-    member x.IsAbstractClass = 
+    member _.IsAbstractClass = 
         isResolved() && isAbstractTycon entity.Deref
 
     member _.IsFSharpModule = 
@@ -483,7 +483,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         isResolved() &&
         entity.IsStructOrEnumTycon 
 
-    member x.IsArrayType  = 
+    member _.IsArrayType  = 
         isResolved() &&
         isArrayTyconRef cenv.g entity
 
@@ -583,7 +583,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         if isUnresolved() then FSharpAccessibility taccessPublic else
         FSharpAccessibility(entity.TypeReprAccessibility)
 
-    member x.DeclaredInterfaces = 
+    member _.DeclaredInterfaces = 
         if isUnresolved() then makeReadOnlyCollection [] else
         let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration [] (fun () -> 
@@ -591,7 +591,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
                  yield FSharpType(cenv, ity) ])
         |> makeReadOnlyCollection
 
-    member x.AllInterfaces = 
+    member _.AllInterfaces = 
         if isUnresolved() then makeReadOnlyCollection [] else
         let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration [] (fun () -> 
@@ -599,19 +599,19 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
                  yield FSharpType(cenv, ity) ])
         |> makeReadOnlyCollection
     
-    member x.IsAttributeType =
+    member _.IsAttributeType =
         if isUnresolved() then false else
         let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration false <| fun () -> 
         ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_Attribute
         
-    member x.IsDisposableType =
+    member _.IsDisposableType =
         if isUnresolved() then false else
         let ty = generalizedTyconRef cenv.g entity
         ErrorLogger.protectAssemblyExploration false <| fun () -> 
         ExistsHeadTypeInEntireHierarchy cenv.g cenv.amap range0 ty cenv.g.tcref_System_IDisposable
 
-    member x.BaseType = 
+    member _.BaseType = 
         checkIsResolved()        
         let ty = generalizedTyconRef cenv.g entity
         GetSuperTypeOfType cenv.g cenv.amap range0 ty
@@ -621,7 +621,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         if isUnresolved() then true else
         not (isResolvedAndFSharp()) || entity.Deref.IsPrefixDisplay
 
-    member x.IsNamespace =  entity.IsNamespace
+    member _.IsNamespace =  entity.IsNamespace
 
     member x.MembersFunctionsAndValues = 
       if isUnresolved() then makeReadOnlyCollection [] else
@@ -701,20 +701,20 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         |> List.map (fun x -> FSharpEntity(cenv, entity.NestedTyconRef x))
         |> makeReadOnlyCollection
 
-    member x.UnionCases = 
+    member _.UnionCases = 
         if isUnresolved() then makeReadOnlyCollection [] else
         entity.UnionCasesAsRefList
         |> List.map (fun x -> FSharpUnionCase(cenv, x)) 
         |> makeReadOnlyCollection
 
-    member x.FSharpFields =
+    member _.FSharpFields =
         if isUnresolved() then makeReadOnlyCollection [] else
     
         if entity.IsILEnumTycon then
             let (TILObjectReprData(_scoref, _enc, tdef)) = entity.ILTyconInfo
             let formalTypars = entity.Typars(range.Zero)
             let formalTypeInst = generalizeTypars formalTypars
-            let ty = TType_app(entity, formalTypeInst, 0uy)
+            let ty = TType_app(entity, formalTypeInst, cenv.g.knownWithoutNull)
             let formalTypeInfo = ILTypeInfo.FromType cenv.g ty
             tdef.Fields.AsList()
             |> List.map (fun tdef ->
@@ -727,7 +727,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
             |> List.map (fun x -> FSharpField(cenv, mkRecdFieldRef entity x.LogicalName))
             |> makeReadOnlyCollection
 
-    member x.AbbreviatedType   = 
+    member _.AbbreviatedType   = 
         checkIsResolved()
 
         match entity.TypeAbbrev with
@@ -1423,7 +1423,7 @@ type FSharpGenericParameterMemberConstraint(cenv, info: TraitConstraintInfo) =
 
     member _.MemberArgumentTypes = atys   |> List.map (fun ty -> FSharpType(cenv, ty)) |> makeReadOnlyCollection
 
-    member x.MemberReturnType =
+    member _.MemberReturnType =
         match rty with 
         | None -> FSharpType(cenv, cenv.g.unit_ty) 
         | Some ty -> FSharpType(cenv, ty) 
@@ -1663,7 +1663,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
         | ParentNone -> invalidOp "the value or member doesn't have a logical parent" 
         | Parent p -> FSharpEntity(cenv, p)
 
-    member x.GenericParameters = 
+    member _.GenericParameters = 
         checkIsResolved()
         let tps = 
             match d with 
@@ -1673,7 +1673,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
             | V v -> v.Typars 
         tps |> List.map (fun tp -> FSharpGenericParameter(cenv, tp)) |> makeReadOnlyCollection
 
-    member x.FullType = 
+    member _.FullType = 
         checkIsResolved()
         let ty = 
             match d with 
@@ -1787,17 +1787,17 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
         | M m | C m -> m.IsDispatchSlot
         | V v -> v.IsDispatchSlot
 
-    member x.IsProperty = 
+    member _.IsProperty = 
         match d with 
         | P _ -> true
         | _ -> false
 
-    member x.IsEvent = 
+    member _.IsEvent = 
         match d with 
         | E _ -> true
         | _ -> false
 
-    member x.EventForFSharpProperty = 
+    member _.EventForFSharpProperty = 
         match d with 
         | P p when p.IsFSharpEventProperty  ->
             let minfos1 = GetImmediateIntrinsicMethInfosOfType (Some("add_"+p.PropertyName), AccessibleFromSomeFSharpCode) cenv.g cenv.amap range0 p.ApparentEnclosingType 
@@ -2181,25 +2181,25 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
 
         | V v -> FSharpAccessibility(v.Accessibility)
 
-    member x.IsConstructor =
+    member _.IsConstructor =
         match d with
         | C _ -> true
         | V v -> v.IsConstructor
         | _ -> false
 
-    member x.Data = d
+    member _.Data = d
 
-    member x.IsValCompiledAsMethod =
+    member _.IsValCompiledAsMethod =
         match d with
         | V valRef -> IlxGen.IsFSharpValCompiledAsMethod cenv.g valRef.Deref
         | _ -> false
 
-    member x.IsValue =
+    member _.IsValue =
         match d with
         | V valRef -> not (isForallFunctionTy cenv.g valRef.Type)
         | _ -> false
 
-    member x.IsFunction =
+    member _.IsFunction =
         match d with
         | V valRef -> isForallFunctionTy cenv.g valRef.Type
         | _ -> false
@@ -2420,7 +2420,7 @@ type FSharpType(cenv, ty:TType) =
         let typI = instType (instantiation |> List.map (fun (tyv, ty) -> tyv.TypeParameter, ty.Type)) ty
         FSharpType(cenv, typI)
 
-    member x.Type = ty
+    member _.Type = ty
     member private x.cenv = cenv
 
     member private ty.AdjustType t = 

From cdb2a605b8857f258df72bfdf76dacf3245544e4 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 14:21:46 +0000
Subject: [PATCH 082/112] reduce diff

---
 src/fsharp/CheckExpressions.fs | 12 ++++++------
 src/fsharp/Optimizer.fs        |  7 +++++--
 2 files changed, 11 insertions(+), 8 deletions(-)

diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index 7ade46a5516..37fe38f9480 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -1861,15 +1861,15 @@ let MakeAndPublishSimpleValsForMergedScope (cenv: cenv) env m (names: NameMap<_>
 //-------------------------------------------------------------------------
 
 let FreshenTyconRef (g: TcGlobals) m rigid (tcref: TyconRef) declaredTyconTypars = 
-    let tpsorig = declaredTyconTypars
-    let tps = copyTypars tpsorig
+    let origTypars = declaredTyconTypars
+    let freshTypars = copyTypars origTypars
     if rigid <> TyparRigidity.Rigid then
-      tps |> List.iter (fun tp -> tp.SetRigidity rigid)
+        freshTypars |> List.iter (fun tp -> tp.SetRigidity rigid)
 
-    let renaming, tinst = FixupNewTypars m [] [] tpsorig tps
-    let origObjTy = TType_app(tcref, List.map mkTyparTy tpsorig, g.knownWithoutNull)
+    let renaming, tinst = FixupNewTypars m [] [] origTypars freshTypars
+    let origTy = TType_app(tcref, List.map mkTyparTy origTypars, g.knownWithoutNull)
     let freshTy = TType_app(tcref, tinst, g.knownWithoutNull)
-    (origObjTy, tps, renaming, freshTy)
+    origTy, freshTypars, renaming, freshTy
 
 let FreshenPossibleForallTy g m rigid ty = 
     let tpsorig, tau = tryDestForallTy g ty
diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs
index 34d5af42cd4..1055ceddc22 100644
--- a/src/fsharp/Optimizer.fs
+++ b/src/fsharp/Optimizer.fs
@@ -2029,8 +2029,11 @@ let TryDetectQueryQuoteAndRun cenv (expr: Expr) =
                 let resultExprAfterConvertToResultTy = 
                     match reqdResultInfo, exprIsEnumerableInfo with 
                     | Some _, Some _ | None, None -> resultExpr // the expression is a QuerySource, the result is a QuerySource, nothing to do
-                    | Some resultElemTy, None -> mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy (TType_app(g.tcref_System_Collections_IEnumerable, [], g.knownWithoutNull)) resultExpr
-                    | None, Some (resultElemTy, qTy) -> mkCallNewQuerySource g expr.Range resultElemTy qTy resultExpr 
+                    | Some resultElemTy, None ->
+                        let iety = TType_app(g.tcref_System_Collections_IEnumerable, [], g.knownWithoutNull)
+                        mkCallGetQuerySourceAsEnumerable g expr.Range resultElemTy iety resultExpr
+                    | None, Some (resultElemTy, qTy) ->
+                        mkCallNewQuerySource g expr.Range resultElemTy qTy resultExpr 
                 Some resultExprAfterConvertToResultTy
             | None -> 
                 None

From 969b12dadfd5ac8f29eb8fc74827479084aa1104 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 14:43:09 +0000
Subject: [PATCH 083/112] merge feature/cleanup

---
 src/fsharp/TcGlobals.fs    |  3 ---
 src/fsharp/TypedTreeOps.fs | 11 +++++++++--
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index c403b726997..a867e5df2c8 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -1002,11 +1002,8 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   member _.langFeatureNullness = v_langFeatureNullness
 
-  member g.knownWithoutNull = v_knownWithoutNull
-
   member _.langVersion = langVersion
 
-  // empty flags
   member _.knownWithoutNull = v_knownWithoutNull
 
   // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index dad5d5face9..d28082a53b1 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -872,6 +872,8 @@ let destAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, tinst, _)
 
 let tcrefOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref | _ -> failwith "tcrefOfAppTy") 
 
+let nullnessOfTy g ty = ty |> stripTyEqns g |> (function TType_app(_, _, nullness) | TType_fun (_, _, nullness) | TType_var (_, nullness) -> nullness | _ -> g.knownWithoutNull) 
+
 let argsOfAppTy g ty = ty |> stripTyEqns g |> (function TType_app(_, tinst, _) -> tinst | _ -> [])
 
 let tryDestTyparTy g ty = ty |> stripTyEqns g |> (function TType_var (v, _) -> ValueSome v | _ -> ValueNone)
@@ -1780,12 +1782,14 @@ let isByrefTy g ty =
         | _ -> false) 
 
 let isInByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, [], _) -> tyconRefEq g g.byrefkind_In_tcr tcref | _ -> false) 
+
 let isInByrefTy g ty = 
     ty |> stripTyEqns g |> (function 
         | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isInByrefTag g tag         
         | _ -> false) 
 
 let isOutByrefTag g ty = ty |> stripTyEqns g |> (function TType_app(tcref, [], _) -> tyconRefEq g g.byrefkind_Out_tcr tcref | _ -> false) 
+
 let isOutByrefTy g ty = 
     ty |> stripTyEqns g |> (function 
         | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isOutByrefTag g tag         
@@ -3740,9 +3744,12 @@ module DebugPrint =
         | TType_forall (typars, rty) -> 
            (leftL (tagText "!") ^^ layoutTyparDecls typars --- auxTypeL env rty) |> wrap
 
-        | TType_ucase (UnionCaseRef(tcref, _), tinst)
+        | TType_ucase (UnionCaseRef(tcref, _), tinst) ->
+           let prefix = tcref.IsPrefixDisplay
+           let tcL = layoutTyconRef tcref
+           auxTyparsL env tcL prefix tinst
 
-        | TType_app (tcref, tinst, nullness)   -> 
+        | TType_app (tcref, tinst, nullness) -> 
            let prefix = tcref.IsPrefixDisplay
            let tcL = layoutTyconRef tcref
            let coreL = auxTyparsL env tcL prefix tinst

From a5fb8758f6bf74f1c9761af07f28a68399498005 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 14:54:02 +0000
Subject: [PATCH 084/112] more cleanup

---
 src/fsharp/ExtensionTyping.fs | 226 +++++++++++++++++++++++++++++-----
 1 file changed, 195 insertions(+), 31 deletions(-)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 27bc4a8bf9a..7168067a78d 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -39,7 +39,12 @@ module internal ExtensionTyping =
 
     /// Load a the design-time part of a type-provider into the host process, and look for types
     /// marked with the TypeProviderAttribute attribute.
-    let GetTypeProviderImplementationTypes (runTimeAssemblyFileName, designTimeAssemblyNameString, m:range, compilerToolPaths:string list) =
+    let GetTypeProviderImplementationTypes (
+            runTimeAssemblyFileName,
+            designTimeAssemblyNameString,
+            m:range,
+            compilerToolPaths:string list
+        ) =
 
         // Report an error, blaming the particular type provider component
         let raiseError designTimeAssemblyPathOpt (e: exn) =
@@ -91,14 +96,16 @@ module internal ExtensionTyping =
 
     /// Create an instance of a type provider from the implementation type for the type provider in the
     /// design-time assembly by using reflection-invoke on a constructor for the type provider.
-    let CreateTypeProvider (typeProviderImplementationType: Type, 
-                            runtimeAssemblyPath, 
-                            resolutionEnvironment: ResolutionEnvironment, 
-                            isInvalidationSupported: bool, 
-                            isInteractive: bool, 
-                            systemRuntimeContainsType, 
-                            systemRuntimeAssemblyVersion, 
-                            m) =
+    let CreateTypeProvider (
+            typeProviderImplementationType: Type, 
+            runtimeAssemblyPath, 
+            resolutionEnvironment: ResolutionEnvironment, 
+            isInvalidationSupported: bool, 
+            isInteractive: bool, 
+            systemRuntimeContainsType, 
+            systemRuntimeAssemblyVersion, 
+            m
+        ) =
 
         // Protect a .NET reflection call as we load the type provider component into the host process, 
         // reporting errors.
@@ -112,14 +119,15 @@ module internal ExtensionTyping =
         if typeProviderImplementationType.GetConstructor([| typeof |]) <> null then
 
             // Create the TypeProviderConfig to pass to the type provider constructor
-            let e = TypeProviderConfig(systemRuntimeContainsType, 
-                                       ResolutionFolder=resolutionEnvironment.resolutionFolder, 
-                                       RuntimeAssembly=runtimeAssemblyPath, 
-                                       ReferencedAssemblies=Array.copy resolutionEnvironment.referencedAssemblies, 
-                                       TemporaryFolder=resolutionEnvironment.temporaryFolder, 
-                                       IsInvalidationSupported=isInvalidationSupported, 
-                                       IsHostedExecution= isInteractive, 
-                                       SystemRuntimeAssemblyVersion = systemRuntimeAssemblyVersion)
+            let e =
+                TypeProviderConfig(systemRuntimeContainsType, 
+                    ResolutionFolder=resolutionEnvironment.resolutionFolder, 
+                    RuntimeAssembly=runtimeAssemblyPath, 
+                    ReferencedAssemblies=Array.copy resolutionEnvironment.referencedAssemblies, 
+                    TemporaryFolder=resolutionEnvironment.temporaryFolder, 
+                    IsInvalidationSupported=isInvalidationSupported, 
+                    IsHostedExecution= isInteractive, 
+                    SystemRuntimeAssemblyVersion = systemRuntimeAssemblyVersion)
 
             protect (fun () -> Activator.CreateInstance(typeProviderImplementationType, [| box e|]) :?> ITypeProvider )
 
@@ -130,17 +138,18 @@ module internal ExtensionTyping =
             // No appropriate constructor found
             raise (TypeProviderError(FSComp.SR.etProviderDoesNotHaveValidConstructor(), typeProviderImplementationType.FullName, m))
 
-    let GetTypeProvidersOfAssembly
-            (runtimeAssemblyFilename: string, 
-             ilScopeRefOfRuntimeAssembly: ILScopeRef, 
-             designTimeName: string, 
-             resolutionEnvironment: ResolutionEnvironment, 
-             isInvalidationSupported: bool, 
-             isInteractive: bool, 
-             systemRuntimeContainsType: string -> bool, 
-             systemRuntimeAssemblyVersion: Version, 
-             compilerToolPaths: string list,
-             m:range) =
+    let GetTypeProvidersOfAssembly (
+            runtimeAssemblyFilename: string, 
+            ilScopeRefOfRuntimeAssembly: ILScopeRef, 
+            designTimeName: string, 
+            resolutionEnvironment: ResolutionEnvironment, 
+            isInvalidationSupported: bool, 
+            isInteractive: bool, 
+            systemRuntimeContainsType: string -> bool, 
+            systemRuntimeAssemblyVersion: Version, 
+            compilerToolPaths: string list,
+            m:range
+        ) =
 
         let providerSpecs = 
                 try
@@ -221,7 +230,7 @@ module internal ExtensionTyping =
         resolver.PUntaint((fun tp -> tp.GetType().Name), m)
 
     /// Validate a provided namespace name
-    let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string) =
+    let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string MaybeNull) =
         match nsp with 
         | Null -> ()
         | NonNull nsp -> 
@@ -241,7 +250,9 @@ module internal ExtensionTyping =
         BindingFlags.Public
 
     type CustomAttributeData = System.Reflection.CustomAttributeData
+
     type CustomAttributeNamedArgument = System.Reflection.CustomAttributeNamedArgument
+
     type CustomAttributeTypedArgument = System.Reflection.CustomAttributeTypedArgument
 
     // NOTE: for the purposes of remapping the closure of generated types, the FullName is sufficient.
@@ -259,7 +270,9 @@ module internal ExtensionTyping =
             match ty.Assembly with
             | Null -> ("", ty.FullName)
             | NonNull a -> (a.FullName, ty.FullName)
+
         static member val Instance = ProvidedTypeComparer()
+
         interface IEqualityComparer with
             member _.GetHashCode(ty: ProvidedType) = hash (key ty)
             member _.Equals(ty1: ProvidedType, ty2: ProvidedType) = (key ty1 = key ty2)
@@ -316,11 +329,14 @@ module internal ExtensionTyping =
     and []
         ProvidedType (x: Type, ctxt: ProvidedTypeContext) =
         inherit ProvidedMemberInfo(x, ctxt)
+
         let isMeasure = 
             lazy
                 x.CustomAttributes 
                 |> Seq.exists (fun a -> a.Constructor.DeclaringType.FullName = typeof.FullName)
+
         let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+
         interface IProvidedCustomAttributeProvider with 
             member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
             member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
@@ -334,75 +350,135 @@ module internal ExtensionTyping =
 
         // Suppress relocation of generated types
         member _.IsSuppressRelocate = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.SuppressRelocate)) <> enum 0  
+
         member _.IsErased = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.IsErased)) <> enum 0  
+
         member _.IsGenericType = x.IsGenericType
+
         member _.Namespace = x.Namespace
+
         member _.FullName = x.FullName
+
         member _.IsArray = x.IsArray
+
         member _.Assembly: ProvidedAssembly = x.Assembly |> ProvidedAssembly.Create
+
         member _.GetInterfaces() = x.GetInterfaces() |> ProvidedType.CreateArray ctxt
+
         member _.GetMethods() = x.GetMethods bindingFlags |> ProvidedMethodInfo.CreateArray ctxt
+
         member _.GetEvents() = x.GetEvents bindingFlags |> ProvidedEventInfo.CreateArray ctxt
+
         member _.GetEvent nm = x.GetEvent(nm, bindingFlags) |> ProvidedEventInfo.Create ctxt
+
         member _.GetProperties() = x.GetProperties bindingFlags |> ProvidedPropertyInfo.CreateArray ctxt
+
         member _.GetProperty nm = x.GetProperty(nm, bindingFlags) |> ProvidedPropertyInfo.Create ctxt
+
         member _.GetConstructors() = x.GetConstructors bindingFlags |> ProvidedConstructorInfo.CreateArray ctxt
+
         member _.GetFields() = x.GetFields bindingFlags |> ProvidedFieldInfo.CreateArray ctxt
+
         member _.GetField nm = x.GetField(nm, bindingFlags) |> ProvidedFieldInfo.Create ctxt
+
         member _.GetAllNestedTypes() = x.GetNestedTypes(bindingFlags ||| BindingFlags.NonPublic) |> ProvidedType.CreateArray ctxt
+
         member _.GetNestedTypes() = x.GetNestedTypes bindingFlags |> ProvidedType.CreateArray ctxt
+
         /// Type.GetNestedType(string) can return null if there is no nested type with given name
         member _.GetNestedType nm = x.GetNestedType (nm, bindingFlags) |> ProvidedType.Create ctxt
+
         /// Type.GetGenericTypeDefinition() either returns type or throws exception, null is not permitted
         member _.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
+
         /// Type.BaseType can be null when Type is interface or object
         member _.BaseType = x.BaseType |> ProvidedType.Create ctxt
+
         member _.GetStaticParameters(provider: ITypeProvider) = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
+
         /// Type.GetElementType can be null if i.e. Type is not array\pointer\byref type
         member _.GetElementType() = x.GetElementType() |> ProvidedType.Create ctxt
+
         member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
+
         member _.ApplyStaticArguments(provider: ITypeProvider, fullTypePathAfterArguments, staticArgs: obj[]) = 
             provider.ApplyStaticArguments(x, fullTypePathAfterArguments,  staticArgs) |> ProvidedType.Create ctxt
+
         member _.IsVoid = (typeof.Equals x || (x.Namespace = "System" && x.Name = "Void"))
+
         member _.IsGenericParameter = x.IsGenericParameter
+
         member _.IsValueType = x.IsValueType
+
         member _.IsByRef = x.IsByRef
+
         member _.IsPointer = x.IsPointer
+
         member _.IsPublic = x.IsPublic
+
         member _.IsNestedPublic = x.IsNestedPublic
+
         member _.IsEnum = x.IsEnum
+
         member _.IsClass = x.IsClass
+
         member _.IsMeasure = isMeasure.Value
+
         member _.IsSealed = x.IsSealed
+
         member _.IsAbstract = x.IsAbstract
+
         member _.IsInterface = x.IsInterface
+
         member _.GetArrayRank() = x.GetArrayRank()
+
         member _.GenericParameterPosition = x.GenericParameterPosition
+
         member _.RawSystemType = x
+
         /// Type.GetEnumUnderlyingType either returns type or raises exception, null is not permitted
         member _.GetEnumUnderlyingType() = 
             x.GetEnumUnderlyingType() 
             |> ProvidedType.CreateWithNullCheck ctxt "EnumUnderlyingType"    
+
         member _.MakePointerType() = ProvidedType.CreateNoContext(x.MakePointerType())
+
         member _.MakeByRefType() = ProvidedType.CreateNoContext(x.MakeByRefType())
+
         member _.MakeArrayType() = ProvidedType.CreateNoContext(x.MakeArrayType())
+
         member _.MakeArrayType rank = ProvidedType.CreateNoContext(x.MakeArrayType(rank))
+
         member _.MakeGenericType (args: ProvidedType[]) =
             let argTypes = args |> Array.map (fun arg -> arg.RawSystemType)
             ProvidedType.CreateNoContext(x.MakeGenericType(argTypes))
+
         member _.AsProvidedVar name = ProvidedVar.Create ctxt (Quotations.Var(name, x))
+
         static member Create ctxt x = match x with null -> null | t -> ProvidedType (t, ctxt)
+
         static member CreateWithNullCheck ctxt name x = match x with null -> nullArg name | t -> ProvidedType (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedType.Create ctxt)
+
         static member CreateNoContext (x: Type) = ProvidedType.Create ProvidedTypeContext.Empty x
+
         static member Void = ProvidedType.CreateNoContext typeof
+
         member _.Handle = x
+
         override _.Equals y = assert false; match y with :? ProvidedType as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
+
         member _.Context = ctxt
+
         member this.TryGetILTypeRef() = this.Context.TryGetILTypeRef this
+
         member this.TryGetTyconRef() = this.Context.TryGetTyconRef this
+
         static member ApplyContext (pt: ProvidedType, ctxt) = ProvidedType(pt.Handle, ctxt)
+
         static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
@@ -460,9 +536,12 @@ module internal ExtensionTyping =
     and [] 
         ProvidedMemberInfo (x: MemberInfo, ctxt) = 
         let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+
         member _.Name = x.Name
+
         /// DeclaringType can be null if MemberInfo belongs to Module, not to Type
         member _.DeclaringType = ProvidedType.Create ctxt x.DeclaringType
+
         interface IProvidedCustomAttributeProvider with 
             member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
             member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
@@ -472,55 +551,92 @@ module internal ExtensionTyping =
     and [] 
         ProvidedParameterInfo (x: ParameterInfo, ctxt) = 
         let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+
         member _.Name = x.Name
+
         member _.IsOut = x.IsOut
+
         member _.IsIn = x.IsIn
+
         member _.IsOptional = x.IsOptional
+
         member _.RawDefaultValue = x.RawDefaultValue
+
         member _.HasDefaultValue = x.Attributes.HasFlag(ParameterAttributes.HasDefault)
+
         /// ParameterInfo.ParameterType cannot be null
         member _.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType 
+
         static member Create ctxt x = match x with null -> null | t -> ProvidedParameterInfo (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedParameterInfo.Create ctxt)  // TODO null wrong?
+
         interface IProvidedCustomAttributeProvider with 
             member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
             member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
             member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
             member _.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName)
+
         member _.Handle = x
+
         override _.Equals y = assert false; match y with :? ProvidedParameterInfo as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and [] 
         ProvidedAssembly (x: Assembly) = 
+
         member _.GetName() = x.GetName()
+
         member _.FullName = x.FullName
+
         member _.GetManifestModuleContents(provider: ITypeProvider) = provider.GetGeneratedAssemblyContents x
+
         static member Create (x: Assembly) = match x with null -> null | t -> ProvidedAssembly t
+
         member _.Handle = x
+
         override _.Equals y = assert false; match y with :? ProvidedAssembly as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and [] 
         ProvidedMethodBase (x: MethodBase, ctxt) = 
         inherit ProvidedMemberInfo(x, ctxt)
+
         member _.Context = ctxt
+
         member _.IsGenericMethod = x.IsGenericMethod
+
         member _.IsStatic  = x.IsStatic
+
         member _.IsFamily  = x.IsFamily
+
         member _.IsFamilyOrAssembly = x.IsFamilyOrAssembly
+
         member _.IsFamilyAndAssembly = x.IsFamilyAndAssembly
+
         member _.IsVirtual  = x.IsVirtual
+
         member _.IsFinal = x.IsFinal
+
         member _.IsPublic = x.IsPublic
+
         member _.IsAbstract  = x.IsAbstract
+
         member _.IsHideBySig = x.IsHideBySig
+
         member _.IsConstructor  = x.IsConstructor
+
         member _.GetParameters() = x.GetParameters() |> ProvidedParameterInfo.CreateArray ctxt 
+
         member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
+
         member _.Handle = x
+
         static member TaintedGetHashCode (x: Tainted) =            
            Tainted.GetHashCodeTainted (x.PApplyNoFailure(fun st -> (st.Name, st.DeclaringType.Assembly.FullName, st.DeclaringType.FullName))) 
+
         static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
@@ -578,28 +694,44 @@ module internal ExtensionTyping =
     and [] 
         ProvidedFieldInfo (x: FieldInfo, ctxt) = 
         inherit ProvidedMemberInfo(x, ctxt)
+
         static member Create ctxt x = match x with null -> null | t -> ProvidedFieldInfo (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedFieldInfo.Create ctxt)
+
         member _.IsInitOnly = x.IsInitOnly
+
         member _.IsStatic = x.IsStatic
+
         member _.IsSpecialName = x.IsSpecialName
+
         member _.IsLiteral = x.IsLiteral
+
         member _.GetRawConstantValue() = x.GetRawConstantValue()
+
         /// FieldInfo.FieldType cannot be null
+
         member _.FieldType = x.FieldType |> ProvidedType.CreateWithNullCheck ctxt "FieldType" 
+
         member _.Handle = x
+
         member _.IsPublic = x.IsPublic
+
         member _.IsFamily = x.IsFamily
+
         member _.IsPrivate = x.IsPrivate
+
         member _.IsFamilyOrAssembly = x.IsFamilyOrAssembly
+
         member _.IsFamilyAndAssembly = x.IsFamilyAndAssembly
+
         override _.Equals y = assert false; match y with :? ProvidedFieldInfo as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
+
         static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
-
-
     and [] 
         ProvidedMethodInfo (x: MethodInfo, ctxt) = 
         inherit ProvidedMethodBase(x, ctxt)
@@ -609,55 +741,87 @@ module internal ExtensionTyping =
         static member Create ctxt x = match x with null -> null | t -> ProvidedMethodInfo (t, ctxt)
 
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedMethodInfo.Create ctxt)
+
         member _.Handle = x
+
         member _.MetadataToken = x.MetadataToken
+
         override _.Equals y = assert false; match y with :? ProvidedMethodInfo as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and [] 
         ProvidedPropertyInfo (x: PropertyInfo, ctxt) = 
         inherit ProvidedMemberInfo(x, ctxt)
+
         member _.GetGetMethod() = x.GetGetMethod() |> ProvidedMethodInfo.Create ctxt
+
         member _.GetSetMethod() = x.GetSetMethod() |> ProvidedMethodInfo.Create ctxt
+
         member _.CanRead = x.CanRead
+
         member _.CanWrite = x.CanWrite
+
         member _.GetIndexParameters() = x.GetIndexParameters() |> ProvidedParameterInfo.CreateArray ctxt
+
         /// PropertyInfo.PropertyType cannot be null
         member _.PropertyType = x.PropertyType |> ProvidedType.CreateWithNullCheck ctxt "PropertyType"
+
         static member Create ctxt x = match x with null -> null | t -> ProvidedPropertyInfo (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedPropertyInfo.Create ctxt)
+
         member _.Handle = x
+
         override _.Equals y = assert false; match y with :? ProvidedPropertyInfo as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
+
         static member TaintedGetHashCode (x: Tainted) = 
            Tainted.GetHashCodeTainted (x.PApplyNoFailure(fun st -> (st.Name, st.DeclaringType.Assembly.FullName, st.DeclaringType.FullName))) 
+
         static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
     and [] 
         ProvidedEventInfo (x: EventInfo, ctxt) = 
         inherit ProvidedMemberInfo(x, ctxt)
+
         member _.GetAddMethod() = x.GetAddMethod() |> ProvidedMethodInfo.Create  ctxt
+
         member _.GetRemoveMethod() = x.GetRemoveMethod() |> ProvidedMethodInfo.Create ctxt
+
         /// EventInfo.EventHandlerType cannot be null
         member _.EventHandlerType = x.EventHandlerType |> ProvidedType.CreateWithNullCheck ctxt "EventHandlerType"
+
         static member Create ctxt x = match x with null -> null | t -> ProvidedEventInfo (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedEventInfo.Create ctxt)
+
         member _.Handle = x
+
         override _.Equals y = assert false; match y with :? ProvidedEventInfo as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
+
         static member TaintedGetHashCode (x: Tainted) = 
            Tainted.GetHashCodeTainted (x.PApplyNoFailure(fun st -> (st.Name, st.DeclaringType.Assembly.FullName, st.DeclaringType.FullName))) 
+
         static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
            Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
 
     and [] 
         ProvidedConstructorInfo (x: ConstructorInfo, ctxt) = 
         inherit ProvidedMethodBase(x, ctxt)
+
         static member Create ctxt x = match x with null -> null | t -> ProvidedConstructorInfo (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedConstructorInfo.Create ctxt)
+
         member _.Handle = x
+
         override _.Equals y = assert false; match y with :? ProvidedConstructorInfo as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = assert false; x.GetHashCode()
 
     and ProvidedExprType =

From 47175cc7e5e5ce79b9b8f4d2d1a346c463ba1b8c Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 14:57:22 +0000
Subject: [PATCH 085/112] more cleanup

---
 src/fsharp/ExtensionTyping.fs | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 7168067a78d..bc526901a71 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -851,10 +851,15 @@ module internal ExtensionTyping =
 
     and []
         ProvidedExpr (x: Quotations.Expr, ctxt) =
+
         member _.Type = x.Type |> ProvidedType.Create ctxt
+
         member _.Handle = x
+
         member _.Context = ctxt
+
         member _.UnderlyingExpressionString = x.ToString()
+
         member _.GetExprType() =
             match x with
             | Quotations.Patterns.NewObject(ctor, args) ->
@@ -902,9 +907,13 @@ module internal ExtensionTyping =
             | Quotations.Patterns.Var v ->
                 Some (ProvidedVarExpr (ProvidedVar.Create ctxt v))
             | _ -> None
+
         static member Create ctxt t = match box t with null -> null | _ -> ProvidedExpr (t, ctxt)
+
         static member CreateArray ctxt xs = match xs with null -> null | _ -> xs |> Array.map (ProvidedExpr.Create ctxt)
+
         override _.Equals y = match y with :? ProvidedExpr as y -> x.Equals y.Handle | _ -> false
+
         override _.GetHashCode() = x.GetHashCode()
 
     and []

From b462169bc4b7c4875f2338f4e6bc58558427d375 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 15:40:37 +0000
Subject: [PATCH 086/112] more cleanup

---
 src/fsharp/FSharp.Core/prim-types.fsi |   6 +-
 src/fsharp/IlxGen.fs                  |   4 +-
 src/fsharp/PostInferenceChecks.fs     |   3 +-
 src/fsharp/TcGlobals.fs               |   8 +-
 src/fsharp/TypeRelations.fs           |   2 +-
 src/fsharp/TypedTree.fs               |   6 +-
 src/fsharp/TypedTreeOps.fs            |  21 ++--
 src/fsharp/TypedTreeOps.fsi           |   3 +-
 src/fsharp/absil/illib.fs             |   2 +-
 src/fsharp/absil/illib.fsi            |  10 +-
 src/fsharp/absil/ilreflect.fs         |   2 +-
 src/fsharp/absil/ilsign.fs            |  10 +-
 src/fsharp/fsi/console.fs             | 134 ++++++++++++++------------
 13 files changed, 116 insertions(+), 95 deletions(-)

diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 46048910bbe..b14bd33e17c 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -3365,7 +3365,7 @@ namespace Microsoft.FSharp.Core
         ///
         /// The exception message.
         ///
-        /// The result value.
+        /// Never returns.
         ///
         /// 
         /// 
@@ -3386,7 +3386,7 @@ namespace Microsoft.FSharp.Core
         /// The argument name.
         /// The exception message.
         ///
-        /// The result value.
+        /// Never returns.
         ///
         /// 
         /// 
@@ -3409,7 +3409,7 @@ namespace Microsoft.FSharp.Core
         ///
         /// The argument name.
         ///
-        /// The result value.
+        /// Never returns.
         /// 
         /// 
         /// 
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index d07d29a6031..96197a59294 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -411,9 +411,9 @@ type TypeReprEnv(reprs: Map, count: int, templateReplacement: (Ty
     static let empty = TypeReprEnv(count = 0, reprs = Map.empty, templateReplacement = None)
 
     /// Get the template replacement information used when using struct types for state machines based on a "template" struct
-    member __.TemplateReplacement = templateReplacement
+    member _.TemplateReplacement = templateReplacement
 
-    member __.WithTemplateReplacement(tcref, ilCloTyRef, cloFreeTyvars, templateTypeInst) =
+    member _.WithTemplateReplacement(tcref, ilCloTyRef, cloFreeTyvars, templateTypeInst) =
         TypeReprEnv(reprs, count, Some (tcref, ilCloTyRef, cloFreeTyvars, templateTypeInst)) 
 
     /// Lookup a type parameter
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index 625c6c8c8e3..83738b4b00f 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -391,7 +391,8 @@ let rec CheckTypeDeep (cenv: cenv) (visitTy, visitTyconRefOpt, visitAppTyOpt, vi
         CheckTypesDeep cenv f g env tys
 
     | TType_fun (s, t, _) ->
-        CheckTypeDeep cenv f g env true s; CheckTypeDeep cenv f g env true t
+        CheckTypeDeep cenv f g env true s
+        CheckTypeDeep cenv f g env true t
 
     | TType_var (tp, _) -> 
           if not tp.IsSolved then 
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index 85400319960..d0142d9a824 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -446,7 +446,6 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   let v_nil_ucref  = mkUnionCaseRef v_list_tcr_canon "op_Nil"
 
-
   let fslib_MF_nleref                   = mkNonLocalEntityRef fslibCcu FSharpLib.RootPathArray
   let fslib_MFCore_nleref               = mkNonLocalEntityRef fslibCcu FSharpLib.CorePathArray
   let fslib_MFLinq_nleref               = mkNonLocalEntityRef fslibCcu FSharpLib.LinqPathArray
@@ -914,7 +913,12 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
           let entries = betterEntries
           let t = Dictionary.newWithSize entries.Length
           for nm, tcref, builder in entries do
-              t.Add(nm, fun tcref2 tinst2 -> if tyconRefEq tcref tcref2 then builder tinst2 else TType_app (tcref2, tinst2, v_knownWithoutNull))
+              t.Add(nm, 
+                     (fun tcref2 tinst2 -> 
+                         if tyconRefEq tcref tcref2 then 
+                             builder tinst2
+                         else 
+                             TType_app (tcref2, tinst2, v_knownWithoutNull)))
           betterTypeDict1 <- t
           t
       | _ -> betterTypeDict1
diff --git a/src/fsharp/TypeRelations.fs b/src/fsharp/TypeRelations.fs
index 29153c610f6..618799eac0a 100755
--- a/src/fsharp/TypeRelations.fs
+++ b/src/fsharp/TypeRelations.fs
@@ -102,7 +102,7 @@ let rec TypeFeasiblySubsumesType ndeep g amap m ty1 canCoerce ty2 =
     match ty1, ty2 with 
     | TType_var _, _  | _, TType_var _ -> true
 
-    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2  ->  
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2 ->
         List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2
 
     | TType_tuple _, TType_tuple _
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 11163417361..b63e1ed3943 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -4058,10 +4058,10 @@ type TType =
         match x with
         | TType_forall (_tps, ty) -> ty.GetAssemblyName()
         | TType_app (tcref, _tinst, _) -> tcref.CompilationPath.ILScopeRef.QualifiedName
-        | TType_tuple (_tupInfo, _tinst) -> ""
+        | TType_tuple _ -> ""
         | TType_anon (anonInfo, _tinst) -> defaultArg anonInfo.Assembly.QualifiedName ""
-        | TType_fun (_d, _r, _) -> ""
-        | TType_measure _ms -> ""
+        | TType_fun _ -> ""
+        | TType_measure _ -> ""
         | TType_var (tp, _) -> tp.Solution |> function Some sln -> sln.GetAssemblyName() | None -> ""
         | TType_ucase (_uc, _tinst) ->
             let (TILObjectReprData(scope, _nesting, _definition)) = _uc.Tycon.ILTyconInfo
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index d07eed8cfad..654aada0e6e 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -3026,8 +3026,8 @@ let tagEntityRefName (xref: EntityRef) name =
     elif xref.IsRecordTycon then tagRecord name
     else tagClass name
 
-let fullDisplayTextOfTyconRef (tc: TyconRef) = 
-    fullNameOfEntityRef (fun tc -> tc.DisplayNameWithStaticParametersAndUnderscoreTypars) tc
+let fullDisplayTextOfTyconRef (tcref: TyconRef) = 
+    fullNameOfEntityRef (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
 let fullNameOfEntityRefAsLayout nmF (xref: EntityRef) =
     let navigableText = 
@@ -3056,20 +3056,19 @@ let fullNameOfParentOfValRefAsLayout vref =
     | VRefNonLocal nlr -> 
         ValueSome (fullNameOfEntityRefAsLayout (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) nlr.EnclosingEntity)
 
-
-let fullDisplayTextOfParentOfModRef r = fullNameOfParentOfEntityRef r 
+let fullDisplayTextOfParentOfModRef eref = fullNameOfParentOfEntityRef eref
 
 let fullDisplayTextOfModRef r =
-    fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r
+    fullNameOfEntityRef (fun eref -> eref.DemangledModuleOrNamespaceName) r
 
-let fullDisplayTextOfTyconRefAsLayout r =
-    fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfTyconRefAsLayout tcref =
+    fullNameOfEntityRefAsLayout (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
-let fullDisplayTextOfExnRef r =
-    fullNameOfEntityRef (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfExnRef tcref =
+    fullNameOfEntityRef (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
-let fullDisplayTextOfExnRefAsLayout r =
-    fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfExnRefAsLayout tcref =
+    fullNameOfEntityRefAsLayout (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
 let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) =
     fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index fc60ead2e89..0b1f08daef3 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -6,6 +6,7 @@ module internal FSharp.Compiler.TypedTreeOps
 open System.Collections.Generic
 open System.Collections.Immutable
 open Internal.Utilities.Collections
+open Internal.Utilities.Library
 open Internal.Utilities.Rational
 open FSharp.Compiler.AbstractIL.IL 
 open FSharp.Compiler.ErrorLogger
@@ -2165,7 +2166,7 @@ val TryFindAttributeUsageAttribute: TcGlobals -> range -> TyconRef -> bool optio
 
 #if !NO_EXTENSIONTYPING
 /// returns Some(assemblyName) for success
-val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string option
+val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string MaybeNull option
 #endif
 
 val IsSignatureDataVersionAttr: ILAttribute -> bool
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index c59f5ae9af2..cdbfa003ca0 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -36,7 +36,7 @@ module internal PervasiveAutoOpens =
 
     type 'T MaybeNull when 'T : null and 'T: not struct = 'T
 
-    let inline isNotNull (x: 'T MaybeNull) = not (isNull x)
+    let inline isNotNull (x: 'T) = not (isNull x)
 
     let inline (|NonNullQuick|) (x: 'T MaybeNull) = match x with null -> raise (NullReferenceException()) | v -> v
 
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index 0ea072b3c3b..b9f86798fd2 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -23,21 +23,21 @@ module internal PervasiveAutoOpens =
     /// Returns true if the list contains exactly 1 element. Otherwise false.
     val inline isSingleton: l:'a list -> bool
 
+    /// Returns true if the argument is non-null.
+    val inline isNotNull: x:'T -> bool when 'T: null
+
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?' for example for future FS-1060.
     type 'T MaybeNull when 'T : null and 'T: not struct = 'T
  
-    /// Returns true if the argument is non-null.
-    val inline isNotNull: x: 'T MaybeNull -> bool
-
     /// Asserts the argument is non-null and raises an exception if it is
     val inline (|NonNullQuick|): 'T MaybeNull -> 'T
 
     /// Match on the nullness of an argument.
-    val inline (|Null|NonNull|): 'T MaybeNull -> Choice when 'T: null and 'T: not struct
+    val inline (|Null|NonNull|): 'T MaybeNull -> Choice
 
     /// Asserts the argument is non-null and raises an exception if it is
-    val inline nonNull: x: 'T MaybeNull -> 'T when 'T : null and 'T: not struct
+    val inline nonNull: x: 'T MaybeNull -> 'T
 
     /// Checks the argument is non-null
     val inline nullArgCheck: paramName: string -> x: 'T MaybeNull -> 'T
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 8459674e3ef..173de710522 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -821,7 +821,7 @@ let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) =
     | _ -> res
 
 
-let nonQueryableTypeGetConstructor (parentTI: Type) (consInfo: ConstructorInfo) : ConstructorInfo =
+let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo MaybeNull =
     if parentTI.IsGenericType then TypeBuilder.GetConstructor(parentTI, consInfo) else consInfo
 
 /// convConstructorSpec (like convMethodSpec)
diff --git a/src/fsharp/absil/ilsign.fs b/src/fsharp/absil/ilsign.fs
index 5a5f904eb50..0f47b333f16 100644
--- a/src/fsharp/absil/ilsign.fs
+++ b/src/fsharp/absil/ilsign.fs
@@ -148,11 +148,15 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
         key.D <- reader.ReadBigInteger byteLen
         key
 
-    let toCLRKeyBlob (rsaParameters:RSAParameters) (algId:int) : byte[] =
-        let validateRSAField (field:byte[]) expected (name:string) =
-            if field <> null && field.Length <> expected then
+    let validateRSAField (field: byte[] MaybeNull) expected (name: string) =
+        match field with 
+        | Null -> ()
+        | NonNull field ->
+            if field.Length <> expected then 
                 raise (CryptographicException(String.Format(getResourceString(FSComp.SR.ilSignInvalidRSAParams()), name)))
 
+    let toCLRKeyBlob (rsaParameters: RSAParameters) (algId: int) : byte[] = 
+
         // The original FCall this helper emulates supports other algId's - however, the only algid we need to support is CALG_RSA_KEYX. We will not port the codepaths dealing with other algid's.
         if algId <> CALG_RSA_KEYX then raise (CryptographicException(getResourceString(FSComp.SR.ilSignInvalidAlgId())))
 
diff --git a/src/fsharp/fsi/console.fs b/src/fsharp/fsi/console.fs
index 2c36a667f82..bd8e130390b 100644
--- a/src/fsharp/fsi/console.fs
+++ b/src/fsharp/fsi/console.fs
@@ -16,15 +16,15 @@ module internal ConsoleOptions =
       // Assumes the c:char is actually a byte in the System.Console.InputEncoding.
       // Convert it to a Unicode char through the encoding.
       if 0 <= int c && int c <= 255 then
-        let chars = System.Console.InputEncoding.GetChars [| byte c |]
-        if chars.Length = 1 then
-          chars.[0] // fixed up char
-        else
-          assert("readKeyFixHook: InputEncoding.GetChars(single-byte) returned multiple chars" = "")
-          c // no fix up
+          let chars = System.Console.InputEncoding.GetChars [| byte c |]
+          if chars.Length = 1 then
+              chars.[0] // fixed up char
+          else
+              assert("readKeyFixHook: InputEncoding.GetChars(single-byte) returned multiple chars" = "")
+              c // no fix up
       else
-        assert("readKeyFixHook: given char is outside the 0..255 byte range" = "")
-        c
+          assert("readKeyFixHook: given char is outside the 0..255 byte range" = "")
+          c
 
 type internal Style = Prompt | Out | Error
 
@@ -33,17 +33,19 @@ type internal History() =
     let list  = new List()
     let mutable current  = 0
 
-    member x.Count = list.Count
-    member x.Current =
+    member _.Count = list.Count
+
+    member _.Current =
         if current >= 0 && current < list.Count then list.[current] else String.Empty
 
-    member x.Clear() = list.Clear(); current <- -1
-    member x.Add line =
+    member _.Clear() = list.Clear(); current <- -1
+
+    member _.Add line =
         match line with
         | null | "" -> ()
         | _ -> list.Add(line)
 
-    member x.AddLast line =
+    member _.AddLast line =
         match line with
         | null | "" -> ()
         | _ -> list.Add(line); current <- list.Count
@@ -63,21 +65,17 @@ type internal History() =
         x.Current
 
 /// List of available optionsCache
-
 type internal Options() =
     inherit History()
+
     let mutable root = ""
-    member x.Root with get() = root and set(v) = (root <- v)
+
+    member _.Root with get() = root and set(v) = (root <- v)
 
 /// Cursor position management
 
 module internal Utils =
 
-    open System
-    open System.Reflection
-    open Microsoft.FSharp.Core
-    open Microsoft.FSharp.Collections
-
     let guard(f) =
         try f()
         with e ->
@@ -112,8 +110,11 @@ type internal Cursor =
 
 type internal Anchor =
     {top:int; left:int}
+
     static member Current(inset) = {top=Console.CursorTop;left= max inset Console.CursorLeft}
+
     static member Top(inset) = {top = 0; left = inset}
+
     member p.PlaceAt(inset, index) =
         //printf "p.top = %d, p.left = %d, inset = %d, index = %d\n" p.top p.left inset index
         let left = inset + (( (p.left - inset) + index) % (Console.BufferWidth - inset))
@@ -123,14 +124,17 @@ type internal Anchor =
 type internal ReadLineConsole() =
     let history = new History()
     let mutable complete : (string option * string -> seq) = fun (_s1,_s2) -> Seq.empty
-    member x.SetCompletionFunction f = complete <- f
+
+    member _.SetCompletionFunction f = complete <- f
 
     /// Inset all inputs by this amount
-    member x.Prompt = "> "
-    member x.Prompt2 = "- "
+    member _.Prompt = "> "
+
+    member _.Prompt2 = "- "
+
     member x.Inset = x.Prompt.Length
 
-    member x.GetOptions(input:string) =
+    member _.GetOptions(input:string) =
         /// Tab optionsCache available in current context
         let optionsCache = new Options()
 
@@ -146,7 +150,7 @@ type internal ReadLineConsole() =
         let start = look 0 input.Length
 
         let name = input.Substring(start, input.Length - start)
-        if (name.Trim().Length > 0) then
+        if name.Trim().Length > 0 then
             let lastDot = name.LastIndexOf('.')
             let attr, pref, root =
                 if (lastDot < 0) then
@@ -155,34 +159,35 @@ type internal ReadLineConsole() =
                     Some(name.Substring(0, lastDot)),
                     name.Substring(lastDot + 1),
                     input.Substring(0, start + lastDot + 1)
-            //printf "attr, pref, root = %s\n" (any_to_string (attr, pref, root))
+
             try
                 complete(attr,pref)
                 |> Seq.filter(fun option -> option.StartsWith(pref,StringComparison.Ordinal))
                 |> Seq.iter (fun option -> optionsCache.Add(option))
-                 // engine.Evaluate(String.Format("dir({0})", attr)) as IEnumerable
                 optionsCache.Root <-root
-            with e ->
+            with _ ->
                 optionsCache.Clear()
+
             optionsCache,true
         else
             optionsCache,false
 
-    member x.MapCharacter(c) : string =
+    member _.MapCharacter(c) : string =
         match c with
         | '\x1A'-> "^Z"
         | _ -> "^?"
 
     member x.GetCharacterSize(c) =
-        if (Char.IsControl(c))
-        then x.MapCharacter(c).Length
-        else 1
+        if Char.IsControl(c) then
+            x.MapCharacter(c).Length
+        else
+            1
 
     static member TabSize = 4
 
     member x.ReadLine() =
 
-        let checkLeftEdge(prompt) =
+        let checkLeftEdge prompt =
             let currLeft = Console.CursorLeft
             if currLeft < x.Inset then
                 if currLeft = 0 then Console.Write (if prompt then x.Prompt2 else String(' ',x.Inset))
@@ -196,23 +201,27 @@ type internal ReadLineConsole() =
 
         /// Cursor anchor - position of !anchor when the routine was called
         let mutable anchor = Anchor.Current x.Inset
+
         /// Length of the output currently rendered on screen.
         let mutable rendered = 0
+
         /// Input has changed, therefore options cache is invalidated.
         let mutable changed = false
+
         /// Cache of optionsCache
         let mutable optionsCache = Options()
 
         let writeBlank() =
             Console.Write(' ')
             checkLeftEdge false
+
         let writeChar(c) =
             if Console.CursorTop = Console.BufferHeight - 1 && Console.CursorLeft = Console.BufferWidth - 1 then
                 //printf "bottom right!\n"
                 anchor <- { anchor with top = (anchor).top - 1 }
             checkLeftEdge true
-            if (Char.IsControl(c)) then
-                let s = x.MapCharacter(c)
+            if Char.IsControl(c) then
+                let s = x.MapCharacter c
                 Console.Write(s)
                 rendered <- rendered + s.Length
             else
@@ -222,6 +231,7 @@ type internal ReadLineConsole() =
 
         /// The console input buffer.
         let input = new StringBuilder()
+
         /// Current position - index into the input buffer
         let mutable current = 0
 
@@ -235,8 +245,8 @@ type internal ReadLineConsole() =
                 if (i = curr) then
                     position <- output.Length
                 let c = input.Chars(i)
-                if (Char.IsControl(c)) then
-                    output.Append(x.MapCharacter(c)) |> ignore
+                if (Char.IsControl c) then
+                    output.Append(x.MapCharacter c) |> ignore
                 else
                     output.Append(c) |> ignore
 
@@ -258,7 +268,7 @@ type internal ReadLineConsole() =
         render()
 
         let insertChar(c:char) =
-            if (current = input.Length)  then
+            if current = input.Length  then
                 current <- current + 1
                 input.Append(c) |> ignore
                 writeChar(c)
@@ -272,25 +282,25 @@ type internal ReadLineConsole() =
                 insertChar(' ')
 
         let moveLeft() =
-            if (current > 0 && (current - 1 < input.Length)) then
+            if current > 0 && (current - 1 < input.Length) then
                 current <- current - 1
                 let c = input.Chars(current)
-                Cursor.Move(x.Inset, - x.GetCharacterSize(c))
+                Cursor.Move(x.Inset, - x.GetCharacterSize c)
 
         let moveRight() =
-            if (current < input.Length) then
+            if current < input.Length then
                 let c = input.Chars(current)
                 current <- current + 1
-                Cursor.Move(x.Inset, x.GetCharacterSize(c))
+                Cursor.Move(x.Inset, x.GetCharacterSize c)
                 
         let moveWordLeft() =
-            if (current > 0 && (current - 1 < input.Length)) then
+            if current > 0 && (current - 1 < input.Length) then
                 let line = input.ToString()
                 current <- Utils.previousWordFromIdx line (current - 1, false)
                 anchor.PlaceAt(x.Inset, current)
                 
         let moveWordRight() =
-            if (current < input.Length) then
+            if current < input.Length then
                 let line = input.ToString()
                 let idxToMoveTo = Utils.nextWordFromIdx line (current + 1, false)
                 
@@ -365,6 +375,7 @@ type internal ReadLineConsole() =
                 input.Remove(current - 1, 1) |> ignore
                 current <- current - 1
                 render()
+
         let enter() = 
             Console.Write("\n")
             let line = input.ToString()
@@ -373,6 +384,7 @@ type internal ReadLineConsole() =
                 if (line.Length > 0) then 
                     history.AddLast(line)
                 line
+
         let clear() = 
             current <- input.Length
             let setPrompt prompt = 
@@ -387,7 +399,6 @@ type internal ReadLineConsole() =
                 setPrompt true
             else
                 setPrompt (previous.EndsWith(";;"))
-
             
         let home() =
             current <- 0
@@ -430,50 +441,51 @@ type internal ReadLineConsole() =
                 anchor.PlaceAt(x.Inset,rendered)
                 change()
             | _ ->
-            match (key.Modifiers, key.Key) with
-            | (ConsoleModifiers.Control, ConsoleKey.A) ->
+
+            match key.Modifiers, key.Key with
+            | ConsoleModifiers.Control, ConsoleKey.A ->
                 home()
                 change ()
-            | (ConsoleModifiers.Control, ConsoleKey.E) ->
+            | ConsoleModifiers.Control, ConsoleKey.E ->
                 current <- input.Length
                 anchor.PlaceAt(x.Inset, rendered)
                 change ()
-            | (ConsoleModifiers.Control, ConsoleKey.B) ->
+            | ConsoleModifiers.Control, ConsoleKey.B ->
                 moveLeft()
                 change ()
-            | (ConsoleModifiers.Control, ConsoleKey.F) ->
+            | ConsoleModifiers.Control, ConsoleKey.F ->
                 moveRight()
                 change ()
-            | (ConsoleModifiers.Control, ConsoleKey.LeftArrow) 
-            | (ConsoleModifiers.Alt, ConsoleKey.B) ->
+            | ConsoleModifiers.Control, ConsoleKey.LeftArrow
+            | ConsoleModifiers.Alt, ConsoleKey.B ->
                 moveWordLeft()
                 change ()
-            | (ConsoleModifiers.Control, ConsoleKey.RightArrow) 
-            | (ConsoleModifiers.Alt, ConsoleKey.F) ->
+            | ConsoleModifiers.Control, ConsoleKey.RightArrow 
+            | ConsoleModifiers.Alt, ConsoleKey.F ->
                 moveWordRight()
                 change ()
-            | (ConsoleModifiers.Control, ConsoleKey.K) ->
+            | ConsoleModifiers.Control, ConsoleKey.K ->
                 deleteToEndOfLine()
                 change()
-            | (ConsoleModifiers.Control,ConsoleKey.P) ->
+            | ConsoleModifiers.Control,ConsoleKey.P ->
                 setInput(history.Previous())
                 change()
-            | (ConsoleModifiers.Control, ConsoleKey.N) ->
+            | ConsoleModifiers.Control, ConsoleKey.N ->
                 setInput(history.Next())
                 change()
-            | (ConsoleModifiers.Control, ConsoleKey.D) ->
+            | ConsoleModifiers.Control, ConsoleKey.D ->
                 if (input.Length = 0) then
                     exit 0 //quit
                 else
                     delete()
                     change()
-            | (ConsoleModifiers.Control, ConsoleKey.L) ->
+            | ConsoleModifiers.Control, ConsoleKey.L ->
                 clear()
                 change()
-            | (ConsoleModifiers.Control, ConsoleKey.U) ->
+            | ConsoleModifiers.Control, ConsoleKey.U ->
                 deleteFromStartOfLineToCursor()
                 change()
-            | (ConsoleModifiers.Control, ConsoleKey.W) ->
+            | ConsoleModifiers.Control, ConsoleKey.W ->
                 deleteWordLeadingToCursor()
                 change()
             | _ ->

From 563753af0286b45577bf29e4913dfbdbd200cd14 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 15:40:45 +0000
Subject: [PATCH 087/112] minimise diff

---
 src/fsharp/FSharp.Core/prim-types.fsi |  8 +++---
 src/fsharp/QuotationTranslator.fs     |  2 +-
 src/fsharp/TcGlobals.fs               | 20 +++++++-------
 src/fsharp/TypeRelations.fs           |  4 +--
 src/fsharp/TypedTree.fs               |  6 ++---
 src/fsharp/TypedTreeBasics.fs         |  4 ++-
 src/fsharp/TypedTreeOps.fs            | 38 +++++++++++++++------------
 src/fsharp/absil/illib.fs             |  3 +--
 src/fsharp/absil/illib.fsi            |  2 +-
 src/fsharp/absil/ilread.fs            |  6 +----
 src/fsharp/absil/ilreflect.fs         | 10 +++----
 src/fsharp/absil/ilsupp.fs            | 18 ++++++-------
 12 files changed, 60 insertions(+), 61 deletions(-)

diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index eeaea6c88b4..2d52e67b85a 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -3126,7 +3126,7 @@ namespace Microsoft.FSharp.Core
         /// 
         /// 
         []
-        val inline defaultValueArg: arg: 'T voption -> defaultValue: 'T -> 'T 
+        val defaultValueArg: arg: 'T voption -> defaultValue: 'T -> 'T 
 
         /// Concatenate two strings. The operator '+' may also be used.
         []
@@ -3428,7 +3428,7 @@ namespace Microsoft.FSharp.Core
         ///
         /// True when value is not null, false otherwise.
         []
-        val inline internal isNotNull : value:'T -> bool when 'T : null
+        val inline internal isNotNull: value:'T -> bool when 'T : null
 
 #if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         /// Get the null value for a value type.
@@ -3545,7 +3545,7 @@ namespace Microsoft.FSharp.Core
 #endif
 
         /// Throw a  exception
-        /// 
+        ///
         /// The exception message.
         ///
         /// The result value.
@@ -3718,7 +3718,7 @@ namespace Microsoft.FSharp.Core
         /// otherwise raise an exception. Calls .
         ///
         /// The exit code to use.
-        /// 
+        ///
         /// Never returns.
         /// 
         /// 
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index 98a272d4ba3..215cae5c9e8 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -994,7 +994,7 @@ and ConvType cenv env m ty =
         QP.mkArrayTy(rankOfArrayTyconRef g tcref, ConvType cenv env m tyarg)
 
     | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations
-    | TType_app(tcref, tyargs, _) -> 
+    | TType_app(tcref, tyargs, _) ->
 #if !NO_EXTENSIONTYPING
         match TryElimErasableTyconRef cenv m tcref with
         | Some baseTy -> ConvType cenv env m baseTy
diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index a867e5df2c8..33f7aa36964 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -565,7 +565,7 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
                             fslib_MFRuntimeHelpers_nleref ] do
 
                     yield nleref.LastItemMangledName, ERefNonLocal nleref  ]
-                                               
+
   let tryDecodeTupleTy tupInfo l =
       match l with
       | [t1;t2;t3;t4;t5;t6;t7;marker] ->
@@ -995,26 +995,24 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
 
   member _.ilg = ilg
 
-  /// A table of all intrinsics that the compiler cares about
-  member _.knownIntrinsics                = v_knownIntrinsics
+  // A table of all intrinsics that the compiler cares about
+  member _.knownIntrinsics = v_knownIntrinsics
 
   member _.checkNullness = checkNullness
 
   member _.langFeatureNullness = v_langFeatureNullness
 
-  member _.langVersion = langVersion
-
   member _.knownWithoutNull = v_knownWithoutNull
 
   // A table of known modules in FSharp.Core. Not all modules are necessarily listed, but the more we list the
   // better the job we do of mapping from provided expressions back to FSharp.Core F# functions and values.
-  member _.knownFSharpCoreModules         = v_knownFSharpCoreModules
-
-  member _.compilingFslib                 = compilingFslib
-  member _.mlCompatibility                = mlCompatibility
-  member _.emitDebugInfoInQuotations      = emitDebugInfoInQuotations
-  member _.directoryToResolveRelativePaths= directoryToResolveRelativePaths
+  member _.knownFSharpCoreModules = v_knownFSharpCoreModules
+  member _.compilingFslib = compilingFslib
+  member _.mlCompatibility = mlCompatibility
+  member _.emitDebugInfoInQuotations = emitDebugInfoInQuotations
+  member _.directoryToResolveRelativePaths = directoryToResolveRelativePaths
   member _.pathMap = pathMap
+  member _.langVersion = langVersion
   member _.unionCaseRefEq x y = primUnionCaseRefEq compilingFslib fslibCcu x y
   member _.valRefEq x y = primValRefEq compilingFslib fslibCcu x y
   member _.fslibCcu = fslibCcu
diff --git a/src/fsharp/TypeRelations.fs b/src/fsharp/TypeRelations.fs
index 09d30d97256..9c054b3be46 100755
--- a/src/fsharp/TypeRelations.fs
+++ b/src/fsharp/TypeRelations.fs
@@ -76,7 +76,7 @@ let rec TypesFeasiblyEquivalent stripMeasures ndeep g amap m ty1 ty2 =
         evalTupInfoIsStruct tupInfo1 = evalTupInfoIsStruct tupInfo2 &&
         List.lengthsEqAndForall2 (TypesFeasiblyEquivalent stripMeasures ndeep g amap m) l1 l2 
 
-    | TType_fun (d1, r1, _), TType_fun (d2, r2, _)   ->
+    | TType_fun (d1, r1, _), TType_fun (d2, r2, _) ->
         TypesFeasiblyEquivalent stripMeasures ndeep g amap m d1 d2 &&
         TypesFeasiblyEquivalent stripMeasures ndeep g amap m r1 r2
 
@@ -102,7 +102,7 @@ let rec TypeFeasiblySubsumesType ndeep g amap m ty1 canCoerce ty2 =
     match ty1, ty2 with 
     | TType_var _, _  | _, TType_var _ -> true
 
-    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2 ->  
+    | TType_app (tc1, l1, _), TType_app (tc2, l2, _) when tyconRefEq g tc1 tc2 ->
         List.lengthsEqAndForall2 (TypesFeasiblyEquiv ndeep g amap m) l1 l2
 
     | TType_tuple _, TType_tuple _
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 56b4bd41274..b5bbfda4aa6 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -4134,19 +4134,19 @@ type TType =
 
     override x.ToString() =  
         match x with 
-        | TType_forall (_tps, ty) -> "forall ...  " + ty.ToString()
+        | TType_forall (_tps, ty) -> "forall ... " + ty.ToString()
         | TType_app (tcref, tinst, nullness) -> tcref.DisplayName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">") + nullness.ToString() 
         | TType_tuple (tupInfo, tinst) -> 
             (match tupInfo with 
              | TupInfo.Const false -> ""
              | TupInfo.Const true -> "struct ")
              + String.concat "," (List.map string tinst) + ")"
-        | TType_fun (d,r,nullness) -> "(" + string d + " -> " + string r + ")" + nullness.ToString()
         | TType_anon (anonInfo, tinst) -> 
             (match anonInfo.TupInfo with 
              | TupInfo.Const false -> ""
              | TupInfo.Const true -> "struct ")
              + "{|" + String.concat "," (Seq.map2 (fun nm ty -> nm + " " + string ty + ";") anonInfo.SortedNames tinst) + ")" + "|}"
+        | TType_fun (d,r,nullness) -> "(" + string d + " -> " + string r + ")" + nullness.ToString()
         | TType_ucase (uc, tinst) -> "ucase " + uc.CaseName + (match tinst with [] -> "" | tys -> "<" + String.concat "," (List.map string tys) + ">")
         | TType_var (tp, _) -> 
             match tp.Solution with 
@@ -5383,7 +5383,7 @@ type CcuThunk =
    
     /// Indicates if this assembly reference is unresolved
     member ccu.IsUnresolvedReference = isNull (box ccu.target)
-   
+
     /// Ensure the ccu is derefable in advance. Supply a path to attach to any resulting error message.
     member ccu.EnsureDerefable(requiringPath: string[]) = 
         if ccu.IsUnresolvedReference then 
diff --git a/src/fsharp/TypedTreeBasics.fs b/src/fsharp/TypedTreeBasics.fs
index 8d86cec7a99..2c0862d3070 100644
--- a/src/fsharp/TypedTreeBasics.fs
+++ b/src/fsharp/TypedTreeBasics.fs
@@ -190,7 +190,9 @@ let ccuOfTyconRef eref =
 let NewNullnessVar() = Nullness.Variable (NullnessVar()) // we don't known (and if we never find out then it's non-null)
 
 let KnownAmbivalentToNull = Nullness.Known NullnessInfo.AmbivalentToNull
+
 let KnownWithNull = Nullness.Known NullnessInfo.WithNull
+
 let KnownWithoutNull = Nullness.Known NullnessInfo.WithoutNull
 
 let mkTyparTy (tp:Typar) = 
@@ -312,7 +314,7 @@ let replaceNullnessOfTy nullness (ty:TType) =
     | TType_app (tcr, tinst, _) -> TType_app (tcr, tinst, nullness)
     | TType_fun (d, r, _) -> TType_fun (d, r, nullness)
     //| TType_ucase _ -> None // TODO NULLNESS
-    //| TType_tuple _ -> None // TODOTODO NULLNESS
+    //| TType_tuple _ -> None // TODO NULLNESS
     //| TType_anon _ -> None // TODO NULLNESS
     | sty -> sty
 
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index d28082a53b1..b3bcecf7e04 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -208,7 +208,7 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) =
       if tupInfo === tupInfo' && l === l' then ty else  
       TType_tuple (tupInfo', l')
 
-  | TType_fun (d, r, nullness) as ty      -> 
+  | TType_fun (d, r, nullness) as ty -> 
       let d' = remapTypeAux tyenv d
       let r' = remapTypeAux tyenv r
       if d === d' && r === r' then ty else
@@ -623,7 +623,7 @@ let mkByref2Ty (g: TcGlobals) ty1 ty2 =
     TType_app (g.byref2_tcr, [ty1; ty2], g.knownWithoutNull)
 
 let mkVoidPtrTy (g: TcGlobals) = 
-    assert g.voidptr_tcr.CanDeref // check we are using sufficient FSharp.Core , caller should check this
+    assert g.voidptr_tcr.CanDeref // check we are using sufficient FSharp.Core, caller should check this
     TType_app (g.voidptr_tcr, [], g.knownWithoutNull)
 
 let mkByrefTyWithInference (g: TcGlobals) ty1 ty2 = 
@@ -789,8 +789,13 @@ let rec stripTyEqnsAndErase eraseFuncAndTuple (g: TcGlobals) ty =
             stripTyEqnsAndErase eraseFuncAndTuple g g.nativeint_ty
         else
             ty
-    | TType_fun(a, b, nullness) when eraseFuncAndTuple -> TType_app(g.fastFunc_tcr, [ a; b], nullness)
-    | TType_tuple(tupInfo, l) when eraseFuncAndTuple -> mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) l
+
+    | TType_fun(a, b, nullness) when eraseFuncAndTuple ->
+        TType_app(g.fastFunc_tcr, [ a; b], nullness)
+
+    | TType_tuple(tupInfo, l) when eraseFuncAndTuple ->
+        mkCompiledTupleTy g (evalTupInfoIsStruct tupInfo) l
+
     | ty -> ty
 
 let stripTyEqnsAndMeasureEqns g ty =
@@ -931,9 +936,9 @@ let convertToTypeWithMetadataIfPossible g ty =
 
 let stripMeasuresFromTType g tt = 
     match tt with
-    | TType_app(a,b,nullness) ->
+    | TType_app(a, b, nullness) ->
         let b' = b |> List.filter (isMeasureTy g >> not)
-        TType_app(a, b',nullness)
+        TType_app(a, b', nullness)
     | _ -> tt
 
 //---------------------------------------------------------------------------
@@ -3054,8 +3059,8 @@ let tagEntityRefName (xref: EntityRef) name =
     elif xref.IsRecordTycon then tagRecord name
     else tagClass name
 
-let fullDisplayTextOfTyconRef  r = 
-    fullNameOfEntityRef (fun (tcref:TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfTyconRef tcref = 
+    fullNameOfEntityRef (fun (tcref:TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
 let fullNameOfEntityRefAsLayout nmF (xref: EntityRef) =
     let navigableText = 
@@ -3084,20 +3089,19 @@ let fullNameOfParentOfValRefAsLayout vref =
     | VRefNonLocal nlr -> 
         ValueSome (fullNameOfEntityRefAsLayout (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) nlr.EnclosingEntity)
 
-
-let fullDisplayTextOfParentOfModRef r = fullNameOfParentOfEntityRef r 
+let fullDisplayTextOfParentOfModRef eref = fullNameOfParentOfEntityRef eref
 
 let fullDisplayTextOfModRef r =
-    fullNameOfEntityRef (fun (x: EntityRef) -> x.DemangledModuleOrNamespaceName) r
+    fullNameOfEntityRef (fun eref -> eref.DemangledModuleOrNamespaceName) r
 
-let fullDisplayTextOfTyconRefAsLayout r =
-    fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfTyconRefAsLayout tcref =
+    fullNameOfEntityRefAsLayout (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
-let fullDisplayTextOfExnRef r =
-    fullNameOfEntityRef (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfExnRef tcref =
+    fullNameOfEntityRef (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
-let fullDisplayTextOfExnRefAsLayout r =
-    fullNameOfEntityRefAsLayout (fun (tcref: TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) r
+let fullDisplayTextOfExnRefAsLayout tcref =
+    fullNameOfEntityRefAsLayout (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
 
 let fullDisplayTextOfUnionCaseRef (ucref: UnionCaseRef) =
     fullDisplayTextOfTyconRef ucref.TyconRef +.+ ucref.CaseName
diff --git a/src/fsharp/absil/illib.fs b/src/fsharp/absil/illib.fs
index a1dace01b4a..14cc119da83 100644
--- a/src/fsharp/absil/illib.fs
+++ b/src/fsharp/absil/illib.fs
@@ -39,10 +39,9 @@ module internal PervasiveAutoOpens =
 #if NO_CHECKNULLS
     type 'T MaybeNull when 'T: null and 'T: not struct = 'T
 
-    // Shim to match nullness checking library support in preview
     let inline (|NonNullQuick|) (x: 'T MaybeNull) = match x with null -> raise (NullReferenceException()) | v -> v
 
-    let inline nonNull (x: 'T MaybeNull) = x
+    let inline nonNull (x: 'T MaybeNull) = match x with null -> raise (NullReferenceException()) | v -> v
 
     let inline (|Null|NonNull|) (x: 'T MaybeNull) : Choice = match x with null -> Null | v -> NonNull v
 
diff --git a/src/fsharp/absil/illib.fsi b/src/fsharp/absil/illib.fsi
index 1680b23b4c7..da72b8baa4a 100644
--- a/src/fsharp/absil/illib.fsi
+++ b/src/fsharp/absil/illib.fsi
@@ -41,7 +41,7 @@ module internal PervasiveAutoOpens =
     val inline nonNull: x: 'T MaybeNull -> 'T
 
     /// Checks the argument is non-null
-    val inline nullArgCheck: paramName: string -> x: 'T MaybeNull -> 'T    
+    val inline nullArgCheck: paramName: string -> x: 'T MaybeNull -> 'T
 #else
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?'
diff --git a/src/fsharp/absil/ilread.fs b/src/fsharp/absil/ilread.fs
index c0839d1cd0f..4a9b00bee7f 100644
--- a/src/fsharp/absil/ilread.fs
+++ b/src/fsharp/absil/ilread.fs
@@ -732,11 +732,7 @@ type GenericParamsIdx = GenericParamsIdx of numtypars: int * TypeOrMethodDefTag
 
 let mkCacheInt32 lowMem _inbase _nm _sz =
     if lowMem then (fun f x -> f x) else
-#if NO_CHECKNULLS
-    let mutable cache = null
-#else
-    let mutable cache : ConcurrentDictionary? = null // TODO NULLNESS: this explicit annotation should not be needed
-#endif
+    let mutable cache : ConcurrentDictionary MaybeNull = null // TODO NULLNESS: this explicit annotation should not be needed
     let mutable count = 0
 #if STATISTICS
     addReport (fun oc -> if count <> 0 then oc.WriteLine ((_inbase + string count + " "+ _nm + " cache hits"): string))
diff --git a/src/fsharp/absil/ilreflect.fs b/src/fsharp/absil/ilreflect.fs
index 122ba7027c5..a7590d9e036 100644
--- a/src/fsharp/absil/ilreflect.fs
+++ b/src/fsharp/absil/ilreflect.fs
@@ -650,7 +650,7 @@ let nonQueryableTypeGetField (parentTI: Type) (fieldInfo: FieldInfo) : FieldInfo
     | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("field", fieldInfo.Name, parentTI.AssemblyQualifiedName, parentTI.Assembly.FullName), range0))
     | NonNull res -> res
 
-let convFieldSpec cenv emEnv fspec : FieldInfo =
+let convFieldSpec cenv emEnv fspec =
     let fref = fspec.FieldRef
     let tref = fref.DeclaringTypeRef
     let parentTI = convType cenv emEnv fspec.DeclaringType
@@ -774,7 +774,7 @@ let nonQueryableTypeGetMethod (parentTI: Type) (methInfo: MethodInfo) : MethodIn
     then TypeBuilder.GetMethod(parentTI, methInfo )
     else methInfo
 
-let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) : MethodInfo =
+let convMethodRef cenv emEnv (parentTI: Type) (mref: ILMethodRef) =
     let parent = mref.DeclaringTypeRef
     let res =
         if isEmittedTypeRef emEnv parent then
@@ -811,9 +811,9 @@ let convMethodSpec cenv emEnv (mspec: ILMethodSpec) =
     methInfo
 
 /// Get a constructor on a non-TypeBuilder type
-let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) : ConstructorInfo =
-    let tyargTs  = getGenericArgumentsOfType parentT
-    let reqArgTs  =
+let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) =
+    let tyargTs = getGenericArgumentsOfType parentT
+    let reqArgTs =
         let emEnv = envPushTyvars emEnv tyargTs
         convTypesToArray cenv emEnv mref.ArgTypes
     let res = parentT.GetConstructor(BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance, null, reqArgTs, null)
diff --git a/src/fsharp/absil/ilsupp.fs b/src/fsharp/absil/ilsupp.fs
index 2d51fed40b8..39ec642e03f 100644
--- a/src/fsharp/absil/ilsupp.fs
+++ b/src/fsharp/absil/ilsupp.fs
@@ -802,7 +802,7 @@ type ISymUnmanagedWriter2 =
     abstract GetDebugInfo: iDD: ImageDebugDirectory byref *
                           cData: int *
                           pcData: int byref *
-                          []data : byte[] MaybeNull -> unit
+                          []data: byte[] MaybeNull -> unit
     abstract DefineSequencePoints: document: ISymUnmanagedDocumentWriter *
                                   spCount: int *
                                   []offsets: int [] *
@@ -1015,16 +1015,16 @@ let pdbReadOpen (moduleName: string) (path: string) : PdbReader =
     try
 #if ENABLE_MONO_SUPPORT
         try
-            // ISymWrapper.dll is not available as a compile-time dependency for the cross-platform compiler, since it is Windows-only 
-            // Access it via reflection instead.System.Diagnostics.SymbolStore.SymBinder 
-            let isym = System.Reflection.Assembly.Load("ISymWrapper, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a") 
-            let symbolBinder = isym.CreateInstance("System.Diagnostics.SymbolStore.SymBinder") 
-            let symbolBinderTy = symbolBinder.GetType() 
-            let reader = symbolBinderTy.InvokeMember("GetReader",BindingFlags.Public ||| BindingFlags.InvokeMethod ||| BindingFlags.Instance,  null,symbolBinder,[| box importerPtr; box moduleName; box path |]) 
-            { symReader = reader :?> ISymbolReader } 
+            // ISymWrapper.dll is not available as a compile-time dependency for the cross-platform compiler, since it is Windows-only
+            // Access it via reflection instead.System.Diagnostics.SymbolStore.SymBinder
+            let isym = System.Reflection.Assembly.Load("ISymWrapper, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a")
+            let symbolBinder = isym.CreateInstance("System.Diagnostics.SymbolStore.SymBinder")
+            let symbolBinderTy = symbolBinder.GetType()
+            let reader = symbolBinderTy.InvokeMember("GetReader",BindingFlags.Public ||| BindingFlags.InvokeMethod ||| BindingFlags.Instance,  null,symbolBinder,[| box importerPtr; box moduleName; box path |])
+            { symReader = reader :?> ISymbolReader }
         with _ ->
             { symReader = Unchecked.defaultof<_> }
-#else 
+#else
         let symbolBinder = new System.Diagnostics.SymbolStore.SymBinder()
         { symReader = symbolBinder.GetReader(importerPtr, moduleName, path) }
 #endif

From 670b27fa8467d1aa0e1833404295847b6babd0f7 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 16:00:06 +0000
Subject: [PATCH 088/112] fix build

---
 src/fsharp/FSharp.Core/prim-types.fs  | 4 ++--
 src/fsharp/FSharp.Core/prim-types.fsi | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/fsharp/FSharp.Core/prim-types.fs b/src/fsharp/FSharp.Core/prim-types.fs
index 57e098e4e15..e8531945e4c 100644
--- a/src/fsharp/FSharp.Core/prim-types.fs
+++ b/src/fsharp/FSharp.Core/prim-types.fs
@@ -4028,11 +4028,11 @@ namespace Microsoft.FSharp.Core
         let (^) (s1: string) (s2: string) = String.Concat(s1, s2)
 
         []
-        let inline defaultArg arg defaultValue = 
+        let defaultArg arg defaultValue = 
             match arg with None -> defaultValue | Some v -> v
         
         []
-        let inline defaultValueArg arg defaultValue = 
+        let defaultValueArg arg defaultValue = 
             match arg with ValueNone -> defaultValue | ValueSome v -> v
 
         []
diff --git a/src/fsharp/FSharp.Core/prim-types.fsi b/src/fsharp/FSharp.Core/prim-types.fsi
index 5925974a599..decbe6b62f5 100644
--- a/src/fsharp/FSharp.Core/prim-types.fsi
+++ b/src/fsharp/FSharp.Core/prim-types.fsi
@@ -3108,7 +3108,7 @@ namespace Microsoft.FSharp.Core
         /// 
         /// 
         []
-        val inline defaultArg: arg: 'T option -> defaultValue: 'T -> 'T 
+        val defaultArg: arg: 'T option -> defaultValue: 'T -> 'T 
 
         /// Used to specify a default value for an optional argument in the implementation of a function
         ///

From 78d8effe63ec90d36e67754550d55050cb0e7a10 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 9 Mar 2022 21:06:58 +0000
Subject: [PATCH 089/112] fix merge

---
 src/fsharp/TcGlobals.fs    | 8 --------
 src/fsharp/TypedTreeOps.fs | 5 -----
 2 files changed, 13 deletions(-)

diff --git a/src/fsharp/TcGlobals.fs b/src/fsharp/TcGlobals.fs
index c6a8dc1c5f9..33f7aa36964 100755
--- a/src/fsharp/TcGlobals.fs
+++ b/src/fsharp/TcGlobals.fs
@@ -933,19 +933,11 @@ type public TcGlobals(compilingFslib: bool, ilg:ILGlobals, fslibCcu: CcuThunk, d
           let t = Dictionary.newWithSize entries.Length
           for nm, tcref, builder in entries do
               t.Add(nm, 
-<<<<<<< HEAD
                      (fun tcref2 tinst2 nullness -> 
                          if tyconRefEq tcref tcref2 then 
                              builder tinst2 nullness 
                          else 
                              TType_app (tcref2, tinst2, nullness)))
-=======
-                     (fun tcref2 tinst2 -> 
-                         if tyconRefEq tcref tcref2 then 
-                             builder tinst2
-                         else 
-                             TType_app (tcref2, tinst2, v_knownWithoutNull)))
->>>>>>> b462169bc4b7c4875f2338f4e6bc58558427d375
           betterTypeDict1 <- t
           t
       | _ -> betterTypeDict1
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 8482f0d2c8d..7d6ba440119 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -3059,13 +3059,8 @@ let tagEntityRefName (xref: EntityRef) name =
     elif xref.IsRecordTycon then tagRecord name
     else tagClass name
 
-<<<<<<< HEAD
-let fullDisplayTextOfTyconRef tcref = 
-    fullNameOfEntityRef (fun (tcref:TyconRef) -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
-=======
 let fullDisplayTextOfTyconRef (tcref: TyconRef) = 
     fullNameOfEntityRef (fun tcref -> tcref.DisplayNameWithStaticParametersAndUnderscoreTypars) tcref
->>>>>>> b462169bc4b7c4875f2338f4e6bc58558427d375
 
 let fullNameOfEntityRefAsLayout nmF (xref: EntityRef) =
     let navigableText = 

From 0e7aa56ac4c5c246d69de3dc51ca21a7a2288925 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 10 Mar 2022 11:52:55 +0000
Subject: [PATCH 090/112] more cleanup

---
 src/fsharp/absil/ilsign.fs | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/fsharp/absil/ilsign.fs b/src/fsharp/absil/ilsign.fs
index 0f47b333f16..319d2672891 100644
--- a/src/fsharp/absil/ilsign.fs
+++ b/src/fsharp/absil/ilsign.fs
@@ -116,7 +116,7 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
         val mutable _offset:int
         new (blob:byte[]) = { _blob = blob; _offset = 0; }
 
-        member x.ReadInt32:int =
+        member x.ReadInt32() : int =
             let offset = x._offset
             x._offset <- offset + 4
             int x._blob.[offset] ||| (int x._blob.[offset + 1] <<< 8) ||| (int x._blob.[offset + 2] <<< 16) ||| (int x._blob.[offset + 3] <<< 24)
@@ -129,11 +129,11 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
 
     let RSAParamatersFromBlob (blob:byte[]) keyType =
         let mutable reader = BlobReader blob
-        if reader.ReadInt32 <> 0x00000207 && keyType = KeyType.KeyPair then raise (CryptographicException(getResourceString(FSComp.SR.ilSignPrivateKeyExpected())))
-        reader.ReadInt32 |>ignore                                                                                                       // ALG_ID
-        if reader.ReadInt32 <> RSA_PRIV_MAGIC then raise (CryptographicException(getResourceString(FSComp.SR.ilSignRsaKeyExpected())))  // 'RSA2'
+        if reader.ReadInt32() <> 0x00000207 && keyType = KeyType.KeyPair then raise (CryptographicException(getResourceString(FSComp.SR.ilSignPrivateKeyExpected())))
+        reader.ReadInt32()                                                                                                        // ALG_ID
+        if reader.ReadInt32() <> RSA_PRIV_MAGIC then raise (CryptographicException(getResourceString(FSComp.SR.ilSignRsaKeyExpected())))  // 'RSA2'
         let byteLen, halfLen =
-            let bitLen = reader.ReadInt32
+            let bitLen = reader.ReadInt32()
             match bitLen % 16 with
             | 0 -> (bitLen / 8, bitLen / 16)
             | _ -> raise (CryptographicException(getResourceString(FSComp.SR.ilSignInvalidBitLen())))
@@ -255,10 +255,10 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
         let mutable reader = BlobReader pk
         reader.ReadBigInteger 12 |> ignore                                                     // Skip CLRHeader
         reader.ReadBigInteger 8  |> ignore                                                     // Skip BlobHeader
-        let magic = reader.ReadInt32                                                           // Read magic
+        let magic = reader.ReadInt32()                                                           // Read magic
         if not (magic = RSA_PRIV_MAGIC || magic = RSA_PUB_MAGIC) then                          // RSAPubKey.magic
             raise (CryptographicException(getResourceString(FSComp.SR.ilSignInvalidPKBlob())))
-        let x = reader.ReadInt32 / 8
+        let x = reader.ReadInt32() / 8
         x
 
     // Returns a CLR Format Blob public key

From 26f9241b9684c2fdbc987e3fc6be809c486f6e55 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 10 Mar 2022 11:53:45 +0000
Subject: [PATCH 091/112] update baseline

---
 ...erService.SurfaceArea.netstandard.expected | 33 ++++++++++++++++++-
 1 file changed, 32 insertions(+), 1 deletion(-)

diff --git a/tests/FSharp.Compiler.Service.Tests/FSharp.CompilerService.SurfaceArea.netstandard.expected b/tests/FSharp.Compiler.Service.Tests/FSharp.CompilerService.SurfaceArea.netstandard.expected
index 6384964188c..59ad2755b16 100644
--- a/tests/FSharp.Compiler.Service.Tests/FSharp.CompilerService.SurfaceArea.netstandard.expected
+++ b/tests/FSharp.Compiler.Service.Tests/FSharp.CompilerService.SurfaceArea.netstandard.expected
@@ -10772,4 +10772,35 @@ FSharp.Compiler.Xml.XmlDoc: System.String GetXmlText()
 FSharp.Compiler.Xml.XmlDoc: System.String[] GetElaboratedXmlLines()
 FSharp.Compiler.Xml.XmlDoc: System.String[] UnprocessedLines
 FSharp.Compiler.Xml.XmlDoc: System.String[] get_UnprocessedLines()
-FSharp.Compiler.Xml.XmlDoc: Void .ctor(System.String[], FSharp.Compiler.Text.Range)
\ No newline at end of file
+FSharp.Compiler.Xml.XmlDoc: Void .ctor(System.String[], FSharp.Compiler.Text.Range)
+FSharp.Compiler.Symbols.FSharpType: Boolean HasNullAnnotation
+FSharp.Compiler.Symbols.FSharpType: Boolean IsNullAmbivalent
+FSharp.Compiler.Symbols.FSharpType: Boolean get_HasNullAnnotation()
+FSharp.Compiler.Symbols.FSharpType: Boolean get_IsNullAmbivalent()
+FSharp.Compiler.Syntax.SynType+StaticConstantNull: FSharp.Compiler.Text.Range get_range()
+FSharp.Compiler.Syntax.SynType+StaticConstantNull: FSharp.Compiler.Text.Range range
+FSharp.Compiler.Syntax.SynType+Tags: Int32 StaticConstantNull
+FSharp.Compiler.Syntax.SynType+Tags: Int32 WithNull
+FSharp.Compiler.Syntax.SynType+WithNull: Boolean ambivalent
+FSharp.Compiler.Syntax.SynType+WithNull: Boolean get_ambivalent()
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Syntax.SynType get_innerType()
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Syntax.SynType innerType
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Text.Range get_range()
+FSharp.Compiler.Syntax.SynType+WithNull: FSharp.Compiler.Text.Range range
+FSharp.Compiler.Syntax.SynType: Boolean IsStaticConstantNull
+FSharp.Compiler.Syntax.SynType: Boolean IsWithNull
+FSharp.Compiler.Syntax.SynType: Boolean get_IsStaticConstantNull()
+FSharp.Compiler.Syntax.SynType: Boolean get_IsWithNull()
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewStaticConstantNull(FSharp.Compiler.Text.Range)
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType NewWithNull(FSharp.Compiler.Syntax.SynType, Boolean, FSharp.Compiler.Text.Range)
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+StaticConstantNull
+FSharp.Compiler.Syntax.SynType: FSharp.Compiler.Syntax.SynType+WithNull
+FSharp.Compiler.Syntax.SynTypeConstraint+Tags: Int32 WhereTyparNotSupportsNull
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Syntax.SynTypar genericName
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Syntax.SynTypar get_genericName()
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Text.Range get_range()
+FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull: FSharp.Compiler.Text.Range range
+FSharp.Compiler.Syntax.SynTypeConstraint: Boolean IsWhereTyparNotSupportsNull
+FSharp.Compiler.Syntax.SynTypeConstraint: Boolean get_IsWhereTyparNotSupportsNull()
+FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint NewWhereTyparNotSupportsNull(FSharp.Compiler.Syntax.SynTypar, FSharp.Compiler.Text.Range)
+FSharp.Compiler.Syntax.SynTypeConstraint: FSharp.Compiler.Syntax.SynTypeConstraint+WhereTyparNotSupportsNull

From 2e874a9618dfd6e112f63483fa53bc0bb21730c8 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 10 Mar 2022 12:01:45 +0000
Subject: [PATCH 092/112] more cleanup

---
 src/fsharp/absil/ilsign.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/absil/ilsign.fs b/src/fsharp/absil/ilsign.fs
index 319d2672891..d1eaef75e90 100644
--- a/src/fsharp/absil/ilsign.fs
+++ b/src/fsharp/absil/ilsign.fs
@@ -130,7 +130,7 @@ module internal FSharp.Compiler.AbstractIL.StrongNameSign
     let RSAParamatersFromBlob (blob:byte[]) keyType =
         let mutable reader = BlobReader blob
         if reader.ReadInt32() <> 0x00000207 && keyType = KeyType.KeyPair then raise (CryptographicException(getResourceString(FSComp.SR.ilSignPrivateKeyExpected())))
-        reader.ReadInt32()                                                                                                        // ALG_ID
+        reader.ReadInt32() |> ignore                                                                                                      // ALG_ID
         if reader.ReadInt32() <> RSA_PRIV_MAGIC then raise (CryptographicException(getResourceString(FSComp.SR.ilSignRsaKeyExpected())))  // 'RSA2'
         let byteLen, halfLen =
             let bitLen = reader.ReadInt32()

From f4238dd020d907e10cfa2991710be3750107885e Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 11 Mar 2022 16:05:37 +0000
Subject: [PATCH 093/112] fix some of build

---
 .../FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj  | 3 +++
 .../FSharp.DependencyManager.Nuget.fsproj                   | 6 ++++++
 2 files changed, 9 insertions(+)

diff --git a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
index be63af92bec..555ed54040d 100644
--- a/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
+++ b/src/fsharp/FSharp.Compiler.Service/FSharp.Compiler.Service.fsproj
@@ -19,6 +19,9 @@
     true
     
     true
+    
+    $(DefineConstants);NO_CHECKNULLS
+    false
     $(DefineConstants);USE_SHIPPED_FSCORE
     
     $(OtherFlags) --warnon:1182
diff --git a/src/fsharp/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj b/src/fsharp/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
index fb0a1e1fccf..bec60c9abf2 100644
--- a/src/fsharp/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
+++ b/src/fsharp/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
@@ -12,6 +12,12 @@
     true 
   
 
+  
+    
+    false
+    $(DefineConstants);NO_CHECKNULLS
+  
+
   
     
       $(BaseOutputPath)\$(Configuration)\$(TargetFramework)

From 810cc3f73c1cb9bb44de99b2f472cbc15869370f Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 7 May 2022 13:49:04 +0100
Subject: [PATCH 094/112] apply change

---
 src/fsharp/AccessibilityLogic.fs              |   8 +-
 src/fsharp/AttributeChecking.fs               |  32 ++--
 src/fsharp/AttributeChecking.fsi              |   2 +-
 src/fsharp/CheckDeclarations.fs               |   6 +-
 src/fsharp/CheckExpressions.fsi               |   4 +-
 src/fsharp/CompilerConfig.fs                  |  12 +-
 src/fsharp/CompilerConfig.fsi                 |   4 +-
 src/fsharp/CompilerDiagnostics.fs             |  12 +-
 src/fsharp/CompilerImports.fs                 |  46 ++---
 src/fsharp/CompilerImports.fsi                |  12 +-
 src/fsharp/CompilerOptions.fs                 |   2 +-
 src/fsharp/ConstraintSolver.fs                |   6 +-
 src/fsharp/ExtensionTyping.fs                 |   2 +-
 src/fsharp/ExtensionTyping.fsi                |   2 +-
 src/fsharp/IlxGen.fs                          |   4 +-
 src/fsharp/InfoReader.fs                      |  16 +-
 src/fsharp/MethodCalls.fs                     |  10 +-
 src/fsharp/MethodCalls.fsi                    |   4 +-
 src/fsharp/MethodOverrides.fs                 |   4 +-
 src/fsharp/NameResolution.fs                  |  26 +--
 src/fsharp/NicePrint.fs                       |   6 +-
 src/fsharp/ParseAndCheckInputs.fs             |   2 +-
 src/fsharp/PostInferenceChecks.fs             |   2 +-
 src/fsharp/QuotationTranslator.fs             |   8 +-
 src/fsharp/SignatureConformance.fs            |   6 +-
 src/fsharp/StaticLinking.fs                   |  10 +-
 src/fsharp/TypedTree.fs                       |  40 ++---
 src/fsharp/TypedTreeBasics.fs                 |   2 +-
 src/fsharp/TypedTreeOps.fs                    |  40 ++---
 src/fsharp/TypedTreeOps.fsi                   |   4 +-
 src/fsharp/TypedTreePickle.fs                 |   4 +-
 src/fsharp/fsi/fsi.fs                         |   4 +-
 src/fsharp/import.fs                          |  10 +-
 src/fsharp/import.fsi                         |   6 +-
 src/fsharp/infos.fs                           | 170 +++++++++---------
 src/fsharp/infos.fsi                          |  14 +-
 src/fsharp/service/FSharpCheckerResults.fs    |   6 +-
 src/fsharp/service/IncrementalBuild.fs        |  18 +-
 src/fsharp/service/IncrementalBuild.fsi       |   2 +-
 src/fsharp/service/SemanticClassification.fs  |   2 +-
 src/fsharp/service/ServiceAssemblyContent.fs  |   4 +-
 src/fsharp/service/ServiceDeclarationLists.fs |  10 +-
 src/fsharp/service/service.fs                 |   2 +-
 src/fsharp/symbols/SymbolHelpers.fs           |  24 +--
 src/fsharp/symbols/SymbolHelpers.fsi          |   2 +-
 src/fsharp/symbols/SymbolPatterns.fs          |   6 +-
 src/fsharp/symbols/SymbolPatterns.fsi         |   4 +-
 src/fsharp/symbols/Symbols.fs                 |  18 +-
 src/fsharp/symbols/Symbols.fsi                |   8 +-
 src/fsharp/tainted.fs                         |   2 +-
 src/fsharp/tainted.fsi                        |   2 +-
 tests/service/Common.fs                       |   2 +-
 tests/service/ProjectAnalysisTests.fs         |  10 +-
 53 files changed, 332 insertions(+), 332 deletions(-)

diff --git a/src/fsharp/AccessibilityLogic.fs b/src/fsharp/AccessibilityLogic.fs
index e65eb7be1a2..ad7bd0bb16d 100644
--- a/src/fsharp/AccessibilityLogic.fs
+++ b/src/fsharp/AccessibilityLogic.fs
@@ -13,7 +13,7 @@ open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -227,7 +227,7 @@ let ComputeILAccess isPublic isFamily isFamilyOrAssembly isFamilyAndAssembly =
 let IsILFieldInfoAccessible g amap m ad x = 
     match x with 
     | ILFieldInfo (tinfo, fd) -> IsILTypeAndMemberAccessible g amap m ad ad tinfo fd.Access
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedField (amap, tpfi, m) -> 
         let access = tpfi.PUntaint((fun fi -> ComputeILAccess fi.IsPublic fi.IsFamily fi.IsFamilyOrAssembly fi.IsFamilyAndAssembly), m)
         IsProvidedMemberAccessible amap m ad x.ApparentEnclosingType access
@@ -354,7 +354,7 @@ let IsTypeAndMethInfoAccessible amap m accessDomainTy ad = function
     | ILMeth (g, x, _) -> IsILMethInfoAccessible g amap m accessDomainTy ad x 
     | FSMeth (_, _, vref, _) -> IsValAccessible ad vref
     | DefaultStructCtor(g, ty) -> IsTypeAccessible g amap m ad ty
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedMeth(amap, tpmb, _, m) as etmi -> 
         let access = tpmb.PUntaint((fun mi -> ComputeILAccess mi.IsPublic mi.IsFamily mi.IsFamilyOrAssembly mi.IsFamilyAndAssembly), m)        
         IsProvidedMemberAccessible amap m ad etmi.ApparentEnclosingType access
@@ -368,7 +368,7 @@ let IsPropInfoAccessible g amap m ad = function
     | FSProp (_, _, Some vrefGet, Some vrefSet) -> 
         // pick most accessible
         IsValAccessible ad vrefGet || IsValAccessible ad vrefSet
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedProp (amap, tppi, m) as pp-> 
         let access = 
             let a = tppi.PUntaint((fun ppi -> 
diff --git a/src/fsharp/AttributeChecking.fs b/src/fsharp/AttributeChecking.fs
index 998b2582855..403f3cd2bc3 100644
--- a/src/fsharp/AttributeChecking.fs
+++ b/src/fsharp/AttributeChecking.fs
@@ -16,7 +16,7 @@ open FSharp.Compiler.Text
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeOps
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 open FSharp.Core.CompilerServices
 #endif
@@ -132,7 +132,7 @@ let AttribInfosOfFS g attribs =
 
 let GetAttribInfosOfEntity g amap m (tcref:TyconRef) = 
     match metadataOfTycon tcref.Deref with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // TODO: provided attributes
     | ProvidedTypeMetadata _info -> []
         //let provAttribs = info.ProvidedType.PApply((fun a -> (a :> IProvidedCustomAttributeProvider)), m)
@@ -151,7 +151,7 @@ let GetAttribInfosOfMethod amap m minfo =
     | ILMeth (g, ilminfo, _) -> ilminfo.RawMetadata.CustomAttrs  |> AttribInfosOfIL g amap ilminfo.MetadataScope m
     | FSMeth (g, _, vref, _) -> vref.Attribs |> AttribInfosOfFS g 
     | DefaultStructCtor _ -> []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // TODO: provided attributes
     | ProvidedMeth (_, _mi, _, _m) -> 
             []
@@ -164,7 +164,7 @@ let GetAttribInfosOfProp amap m pinfo =
     | FSProp(g, _, Some vref, _) 
     | FSProp(g, _, _, Some vref) -> vref.Attribs |> AttribInfosOfFS g 
     | FSProp _ -> failwith "GetAttribInfosOfProp: unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // TODO: provided attributes
     | ProvidedProp _ ->  []
 #endif
@@ -173,7 +173,7 @@ let GetAttribInfosOfEvent amap m einfo =
     match einfo with 
     | ILEvent ileinfo -> ileinfo.RawMetadata.CustomAttrs |> AttribInfosOfIL einfo.TcGlobals amap ileinfo.ILTypeInfo.ILScopeRef m
     | FSEvent(_, pi, _vref1, _vref2) -> GetAttribInfosOfProp amap m pi
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // TODO: provided attributes
     | ProvidedEvent _ -> []
 #endif
@@ -186,21 +186,21 @@ let BindMethInfoAttributes m minfo f1 f2 f3 =
     | ILMeth (_, x, _) -> f1 x.RawMetadata.CustomAttrs 
     | FSMeth (_, _, vref, _) -> f2 vref.Attribs
     | DefaultStructCtor _ -> f2 []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedMeth (_, mi, _, _) -> f3 (mi.PApply((fun st -> (st :> IProvidedCustomAttributeProvider)), m))
 #endif
 
 /// Analyze three cases for attributes declared on methods: IL-declared attributes, F#-declared attributes and
 /// provided attributes.
 let TryBindMethInfoAttribute g (m: range) (AttribInfo(atref, _) as attribSpec) minfo f1 f2 f3 = 
-#if NO_EXTENSIONTYPING
+#if NO_TYPEPROVIDERS
     // to prevent unused parameter warning
     ignore f3
 #endif
     BindMethInfoAttributes m minfo 
         (fun ilAttribs -> TryDecodeILAttribute atref ilAttribs |> Option.bind f1)
         (fun fsAttribs -> TryFindFSharpAttribute g attribSpec fsAttribs |> Option.bind f2)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         (fun provAttribs -> 
             match provAttribs.PUntaint((fun a -> a.GetAttributeConstructorArgs(provAttribs.TypeProvider.PUntaintNoFailure(id), atref.FullName)), m) with
             | Some args -> f3 args
@@ -307,7 +307,7 @@ let CheckFSharpAttributes (g:TcGlobals) attribs m =
             CompleteD
         )
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// Check a list of provided attributes for 'ObsoleteAttribute', returning errors and warnings as data
 let private CheckProvidedAttributes (g: TcGlobals) m (provAttribs: Tainted)  = 
     let (AttribInfo(tref, _)) = g.attrib_SystemObsolete
@@ -359,7 +359,7 @@ let CheckFSharpAttributesForUnseen g attribs _m =
     (CheckFSharpAttributesForObsolete g attribs ||
         CheckFSharpAttributesForHidden g attribs)
       
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// Indicate if a list of provided attributes contains 'ObsoleteAttribute'. Used to suppress the item in intellisense.
 let CheckProvidedAttributesForUnseen (provAttribs: Tainted) m = 
     provAttribs.PUntaint((fun a -> a.GetAttributeConstructorArgs(provAttribs.TypeProvider.PUntaintNoFailure(id), typeof.FullName).IsSome), m)
@@ -372,7 +372,7 @@ let CheckPropInfoAttributes pinfo m =
     | FSProp(g, _, Some vref, _) 
     | FSProp(g, _, _, Some vref) -> CheckFSharpAttributes g vref.Attribs m
     | FSProp _ -> failwith "CheckPropInfoAttributes: unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedProp (amap, pi, m) ->  
         CheckProvidedAttributes amap.g m (pi.PApply((fun st -> (st :> IProvidedCustomAttributeProvider)), m))
          
@@ -384,7 +384,7 @@ let CheckILFieldAttributes g (finfo:ILFieldInfo) m =
     match finfo with 
     | ILFieldInfo(_, pd) -> 
         CheckILAttributes g false pd.CustomAttrs m |> CommitOperationResult
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedField (amap, fi, m) -> 
         CheckProvidedAttributes amap.g m (fi.PApply((fun st -> (st :> IProvidedCustomAttributeProvider)), m)) |> CommitOperationResult
 #endif
@@ -402,7 +402,7 @@ let CheckMethInfoAttributes g m tyargsOpt minfo =
                         else
                             CompleteD)
                 Some res) 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             (fun provAttribs -> Some (CheckProvidedAttributes g m provAttribs)) 
 #else
             (fun _provAttribs -> None)
@@ -418,7 +418,7 @@ let MethInfoIsUnseen g (m: range) (ty: TType) minfo =
         match BindMethInfoAttributes m minfo 
                 (fun ilAttribs -> Some(CheckILAttributesForUnseen g ilAttribs m)) 
                 (fun fsAttribs -> Some(CheckFSharpAttributesForUnseen g fsAttribs m))
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 (fun provAttribs -> Some(CheckProvidedAttributesForUnseen provAttribs m))
 #else
                 (fun _provAttribs -> None)
@@ -428,7 +428,7 @@ let MethInfoIsUnseen g (m: range) (ty: TType) minfo =
         | None -> false
 
     let isUnseenByHidingAttribute () = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         not (isObjTy g ty) &&
         isAppTy g ty &&
         isObjTy g minfo.ApparentEnclosingType &&
@@ -465,7 +465,7 @@ let PropInfoIsUnseen m pinfo =
     | FSProp (g, _, Some vref, _) 
     | FSProp (g, _, _, Some vref) -> CheckFSharpAttributesForUnseen g vref.Attribs m
     | FSProp _ -> failwith "CheckPropInfoAttributes: unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedProp (_amap, pi, m) -> 
         CheckProvidedAttributesForUnseen (pi.PApply((fun st -> (st :> IProvidedCustomAttributeProvider)), m)) m
 #endif
diff --git a/src/fsharp/AttributeChecking.fsi b/src/fsharp/AttributeChecking.fsi
index e6f3cc18da2..932cb3a5feb 100644
--- a/src/fsharp/AttributeChecking.fsi
+++ b/src/fsharp/AttributeChecking.fsi
@@ -35,7 +35,7 @@ val GetAttribInfosOfProp: amap:Import.ImportMap -> m:range -> pinfo:PropInfo ->
 
 val GetAttribInfosOfEvent: amap:Import.ImportMap -> m:range -> einfo:EventInfo -> AttribInfo list
 
-#if NO_EXTENSIONTYPING
+#if NO_TYPEPROVIDERS
 val TryBindMethInfoAttribute: g:TcGlobals -> m:range -> BuiltinAttribInfo -> minfo:MethInfo -> f1:(ILAttribElem list * ILAttributeNamedArg list -> 'a option) -> f2:(Attrib -> 'a option) -> f3: _ -> 'a option
 #else
 val TryBindMethInfoAttribute: g:TcGlobals -> m:range -> BuiltinAttribInfo -> minfo:MethInfo -> f1:(ILAttribElem list * ILAttributeNamedArg list -> 'a option) -> f2:(Attrib -> 'a option) -> f3:(obj option list * (string * obj option) list -> 'a option) -> 'a option
diff --git a/src/fsharp/CheckDeclarations.fs b/src/fsharp/CheckDeclarations.fs
index 5794d50233f..680019b8c63 100644
--- a/src/fsharp/CheckDeclarations.fs
+++ b/src/fsharp/CheckDeclarations.fs
@@ -37,7 +37,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TypeRelations
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -3513,7 +3513,7 @@ module EstablishTypeDefinitionCores =
         tycon.entity_tycon_repr <- repr
         attrs, getFinalAttrs
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Get the items on the r.h.s. of a 'type X = ABC<...>' definition
     let private TcTyconDefnCore_GetGenerateDeclaration_Rhs (StripParenTypes rhsType) =
         match rhsType with 
@@ -3739,7 +3739,7 @@ module EstablishTypeDefinitionCores =
             
             | SynTypeDefnSimpleRepr.TypeAbbrev(ParserDetail.Ok, rhsType, m) ->
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
               // Check we have not already decided that this is a generative provided type definition. If we have already done this (i.e. this is the second pass
               // for a generative provided type definition, then there is no more work to do).
               if (match tycon.entity_tycon_repr with TNoRepr -> true | _ -> false) then 
diff --git a/src/fsharp/CheckExpressions.fsi b/src/fsharp/CheckExpressions.fsi
index 0b7cdac4244..5a997fa6e5c 100644
--- a/src/fsharp/CheckExpressions.fsi
+++ b/src/fsharp/CheckExpressions.fsi
@@ -26,7 +26,7 @@ open FSharp.Compiler.Xml
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeOps
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -719,7 +719,7 @@ val TcLetrecAdjustMemberForSpecialVals: cenv: TcFileState -> pgrbind: PostGenera
 /// Check an inheritance expression or other 'new XYZ()' expression
 val TcNewExpr: cenv:TcFileState -> env:TcEnv -> tpenv:UnscopedTyparEnv -> objTy:TType -> mObjTyOpt:range option -> superInit:bool -> arg:SynExpr -> mWholeExprOrObjTy:range -> Expr * UnscopedTyparEnv    
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// Check the application of a provided type to static args
 val TcProvidedTypeAppToStaticConstantArgs: cenv:TcFileState -> env:TcEnv -> optGeneratedTypePath:string list option -> tpenv:UnscopedTyparEnv -> tcref:TyconRef -> args:SynType list -> m:range -> bool * Tainted * (unit -> unit)
 #endif
diff --git a/src/fsharp/CompilerConfig.fs b/src/fsharp/CompilerConfig.fs
index 3da50bcae4e..37e8cef220b 100644
--- a/src/fsharp/CompilerConfig.fs
+++ b/src/fsharp/CompilerConfig.fs
@@ -26,7 +26,7 @@ open FSharp.Compiler.Xml
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.BuildGraph
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Core.CompilerServices
 #endif
 
@@ -242,7 +242,7 @@ type AssemblyReference =
     override x.ToString() = sprintf "AssemblyReference(%s)" x.Text
 
 type UnresolvedAssemblyReference = UnresolvedAssemblyReference of string * AssemblyReference list
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 type ResolvedExtensionReference = ResolvedExtensionReference of string * AssemblyReference list * Tainted list
 #endif
 
@@ -251,7 +251,7 @@ type ImportedAssembly =
       FSharpViewOfMetadata: CcuThunk
       AssemblyAutoOpenAttributes: string list
       AssemblyInternalsVisibleToAttributes: string list
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       IsProviderGenerated: bool
       mutable TypeProviders: Tainted list
 #endif
@@ -449,7 +449,7 @@ type TcConfigBuilder =
       mutable showLoadedAssemblies: bool
       mutable continueAfterParseFailure: bool
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       /// show messages about extension type resolution?
       mutable showExtensionTypeMessages: bool
 #endif
@@ -655,7 +655,7 @@ type TcConfigBuilder =
           showTimes = false
           showLoadedAssemblies = false
           continueAfterParseFailure = false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
           showExtensionTypeMessages = false
 #endif
           pause = false
@@ -1044,7 +1044,7 @@ type TcConfig private (data: TcConfigBuilder, validate: bool) =
     member x.showTimes = data.showTimes
     member x.showLoadedAssemblies = data.showLoadedAssemblies
     member x.continueAfterParseFailure = data.continueAfterParseFailure
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member x.showExtensionTypeMessages = data.showExtensionTypeMessages
 #endif
     member x.pause = data.pause
diff --git a/src/fsharp/CompilerConfig.fsi b/src/fsharp/CompilerConfig.fsi
index 45e1ea6664a..ed370ac4e41 100644
--- a/src/fsharp/CompilerConfig.fsi
+++ b/src/fsharp/CompilerConfig.fsi
@@ -259,7 +259,7 @@ type TcConfigBuilder =
       mutable showTimes: bool
       mutable showLoadedAssemblies: bool
       mutable continueAfterParseFailure: bool
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       mutable showExtensionTypeMessages: bool
 #endif
       mutable pause: bool
@@ -452,7 +452,7 @@ type TcConfig =
     member showTimes: bool
     member showLoadedAssemblies: bool
     member continueAfterParseFailure: bool
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member showExtensionTypeMessages: bool
 #endif
     member pause: bool
diff --git a/src/fsharp/CompilerDiagnostics.fs b/src/fsharp/CompilerDiagnostics.fs
index 30d9d30b7ad..47f53aa81f9 100644
--- a/src/fsharp/CompilerDiagnostics.fs
+++ b/src/fsharp/CompilerDiagnostics.fs
@@ -78,7 +78,7 @@ exception InternalCommandLineOption of string * range
 let GetRangeOfDiagnostic(err: PhasedDiagnostic) =
   let rec RangeFromException = function
       | ErrorFromAddingConstraint(_, err2, _) -> RangeFromException err2
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       | ExtensionTyping.ProvidedTypeResolutionNoRange e -> RangeFromException e
       | ExtensionTyping.ProvidedTypeResolution(m, _)
 #endif
@@ -211,7 +211,7 @@ let GetRangeOfDiagnostic(err: PhasedDiagnostic) =
       // Strip TargetInvocationException wrappers
       | :? System.Reflection.TargetInvocationException as e ->
           RangeFromException e.InnerException
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       | :? TypeProviderError as e -> e.Range |> Some
 #endif
 
@@ -329,7 +329,7 @@ let GetDiagnosticNumber(err: PhasedDiagnostic) =
       | UnresolvedConversionOperator _ -> 93
       // avoid 94-100 for safety
       | ObsoleteError _ -> 101
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       | ExtensionTyping.ProvidedTypeResolutionNoRange _
       | ExtensionTyping.ProvidedTypeResolution _ -> 103
 #endif
@@ -346,7 +346,7 @@ let GetDiagnosticNumber(err: PhasedDiagnostic) =
       | ErrorWithSuggestions ((n, _), _, _, _) -> n
       | Failure _ -> 192
       | IllegalFileNameChar(fileName, invalidChar) -> fst (FSComp.SR.buildUnexpectedFileNameCharacter(fileName, string invalidChar))
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       | :? TypeProviderError as e -> e.Number
 #endif
       | ErrorsFromAddingSubsumptionConstraint (_, _, _, _, _, ContextInfo.DowncastUsedInsteadOfUpcast _, _) -> fst (FSComp.SR.considerUpcast("", ""))
@@ -778,7 +778,7 @@ let OutputPhasedErrorR (os: StringBuilder) (err: PhasedDiagnostic) (canSuggestNa
       | ErrorFromAddingConstraint(_, e, _) ->
           OutputExceptionR os e
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       | ExtensionTyping.ProvidedTypeResolutionNoRange e
 
       | ExtensionTyping.ProvidedTypeResolution(_, e) ->
@@ -1871,7 +1871,7 @@ let CollectDiagnostic (implicitIncludeDir, showFullPaths, flattenErrors, errorSt
             relatedErrors |> List.iter OutputRelatedError
 
         match err with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | {Exception = :? TypeProviderError as tpe} ->
             tpe.Iter (fun e ->
                 let newErr = {err with Exception = e}
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 5222d4ae79a..af077fc41fb 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -39,7 +39,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.BuildGraph
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 open FSharp.Core.CompilerServices
 #endif
@@ -241,7 +241,7 @@ let OpenILBinary(filename, reduceMemoryUsage, pdbDirPath, shadowCopyReferences,
 []
 type ResolveAssemblyReferenceMode = Speculative | ReportErrors
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 type ResolvedExtensionReference = ResolvedExtensionReference of string * AssemblyReference list * Tainted list
 #endif
 
@@ -294,7 +294,7 @@ type AssemblyResolution =
 type ImportedBinary =
     { FileName: string
       RawMetadata: IRawFSharpAssemblyData
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       ProviderGeneratedAssembly: System.Reflection.Assembly option
       IsProviderGenerated: bool
       ProviderGeneratedStaticLinkMap: ProvidedAssemblyStaticLinkingMap option
@@ -307,7 +307,7 @@ type ImportedAssembly =
       FSharpViewOfMetadata: CcuThunk
       AssemblyAutoOpenAttributes: string list
       AssemblyInternalsVisibleToAttributes: string list
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       IsProviderGenerated: bool
       mutable TypeProviders: Tainted list
 #endif
@@ -893,7 +893,7 @@ type TcImportsSafeDisposal(tciLock: TcImportsLock, disposeActions: ResizeArray] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAssemblyResolutions, importsBase: TcImports option, dependencyProviderOpt: DependencyProvider option)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                          as this
 #endif
        =
@@ -949,7 +949,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
     let disposeActions = ResizeArray()
     let disposeTypeProviderActions = ResizeArray()
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let mutable generatedTypeRoots = Dictionary()
     let tcImportsWeak = TcImportsWeakHack (tciLock, WeakReference<_> this)
 #endif
@@ -1018,7 +1018,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         CheckDisposed()
         dllTable
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member tcImports.Weak =
             CheckDisposed()
             tcImportsWeak
@@ -1039,7 +1039,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         RequireTcImportsLock(tcitok, dllInfos)
         RequireTcImportsLock(tcitok, dllTable)
         dllInfos <- dllInfos ++ dllInfo
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         tcImportsWeak.SetDllInfos dllInfos
 #endif
         dllTable <- NameMap.add (getNameOfScopeRef dllInfo.ILScopeRef) dllInfo dllTable
@@ -1144,7 +1144,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         | Some res -> res.FSharpViewOfMetadata.Deref.XmlDocumentationInfo
         | _ -> None
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member tcImports.GetProvidedAssemblyInfo(ctok, m, assembly: Tainted) =
         match assembly with
         | Tainted.Null -> false,None
@@ -1248,7 +1248,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         RequireTcImportsLock(tcitok, disposeActions)
         disposeActions.Add action
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member private tcImports.AttachDisposeTypeProviderAction action =
         CheckDisposed()
         disposeTypeProviderActions.Add action
@@ -1327,7 +1327,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
                  member _.TryFindXmlDocumentationInfo assemblyName =
                     tcImports.TryFindXmlDocumentationInfo(assemblyName)
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                  member _.GetProvidedAssemblyInfo (ctok, m, assembly) =
                      tcImports.GetProvidedAssemblyInfo (ctok, m, assembly)
 
@@ -1358,7 +1358,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         CheckDisposed()
         tcGlobals <- Some g
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member private tcImports.InjectProvidedNamespaceOrTypeIntoEntity
             (typeProviderEnvironment,
              tcConfig: TcConfig,
@@ -1584,7 +1584,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
               ILScopeRef = ilScopeRef
               AssemblyAutoOpenAttributes = GetAutoOpenAttributes ilModule
               AssemblyInternalsVisibleToAttributes = GetInternalsVisibleToAttributes ilModule
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
               IsProviderGenerated = false
               TypeProviders = []
 #endif
@@ -1592,7 +1592,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         tcImports.RegisterCcu ccuinfo
 
         let phase2 () =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             ccuinfo.TypeProviders <- tcImports.ImportTypeProviderExtensions (ctok, tcConfig, filename, ilScopeRef, ilModule.ManifestOfAssembly.CustomAttrs.AsList(), ccu.Contents, invalidateCcu, m)
 #endif
             [ResolvedImportedAssembly ccuinfo]
@@ -1600,7 +1600,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
 
     member tcImports.PrepareToImportReferencedFSharpAssembly (ctok, m, filename, dllinfo: ImportedBinary) =
         CheckDisposed()
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         let tcConfig = tcConfigP.Get ctok
 #endif
         let ilModule = dllinfo.RawMetadata
@@ -1620,7 +1620,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
                 let minfo: PickledCcuInfo = data.RawData
                 let mspec = minfo.mspec
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 let invalidateCcu = Event<_>()
 #endif
 
@@ -1633,7 +1633,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
                       SourceCodeDirectory = codeDir (* note: in some cases we fix up this information later *)
                       IsFSharp=true
                       Contents = mspec
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                       InvalidateEvent=invalidateCcu.Publish
                       IsProviderGenerated = false
                       ImportProvidedType = (fun ty -> ImportProvidedType (tcImports.GetImportMap()) m ty)
@@ -1676,14 +1676,14 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
                       AssemblyAutoOpenAttributes = ilModule.GetAutoOpenAttributes()
                       AssemblyInternalsVisibleToAttributes = ilModule.GetInternalsVisibleToAttributes()
                       FSharpOptimizationData=optdata
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                       IsProviderGenerated = false
                       TypeProviders = []
 #endif
                       ILScopeRef = ilScopeRef }
 
                 let phase2() =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                      match ilModule.TryGetILModuleDef() with
                      | None -> () // no type providers can be used without a real IL Module present
                      | Some ilModule ->
@@ -1709,7 +1709,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
                         RequireTcImportsLock(tcitok, ccuThunks)
                         ccuThunks.Add(ccuThunk, fixupThunk)
                 )
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             ccuRawDataAndInfos |> List.iter (fun (_, _, phase2) -> phase2())
 #endif
             ccuRawDataAndInfos |> List.map p23 |> List.map ResolvedImportedAssembly
@@ -1755,7 +1755,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
             let dllinfo =
                 { RawMetadata=assemblyData
                   FileName=filename
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                   ProviderGeneratedAssembly=None
                   IsProviderGenerated=false
                   ProviderGeneratedStaticLinkMap = None
@@ -1826,7 +1826,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
             if tryFile (assemblyName + ".dll") then ()
             else tryFile (assemblyName + ".exe") |> ignore
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member tcImports.TryFindProviderGeneratedAssemblyByName(ctok, assemblyName: string) : System.Reflection.Assembly option =
         // The assembly may not be in the resolutions, but may be in the load set including EST injected assemblies
         match tcImports.TryFindDllInfo (ctok, range0, assemblyName, lookupOnly=true) with
diff --git a/src/fsharp/CompilerImports.fsi b/src/fsharp/CompilerImports.fsi
index 616486d0c83..2ab616ce32c 100644
--- a/src/fsharp/CompilerImports.fsi
+++ b/src/fsharp/CompilerImports.fsi
@@ -20,7 +20,7 @@ open FSharp.Compiler.BuildGraph
 open FSharp.Compiler.Text
 open FSharp.Core.CompilerServices
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -88,7 +88,7 @@ type AssemblyResolution =
        mutable ilAssemblyRef: ILAssemblyRef option
      }
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 type ResolvedExtensionReference = ResolvedExtensionReference of string * AssemblyReference list * Tainted list
 #endif
 
@@ -97,7 +97,7 @@ type ResolvedExtensionReference = ResolvedExtensionReference of string * Assembl
 type ImportedBinary = 
     { FileName: string
       RawMetadata: IRawFSharpAssemblyData
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       ProviderGeneratedAssembly: System.Reflection.Assembly option
       IsProviderGenerated: bool
       ProviderGeneratedStaticLinkMap: ProvidedAssemblyStaticLinkingMap  option
@@ -112,7 +112,7 @@ type ImportedAssembly =
       FSharpViewOfMetadata: CcuThunk
       AssemblyAutoOpenAttributes: string list
       AssemblyInternalsVisibleToAttributes: string list
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       IsProviderGenerated: bool
       mutable TypeProviders: Tainted list
 #endif
@@ -161,7 +161,7 @@ type TcImports =
 
     member FindCcuFromAssemblyRef: CompilationThreadToken * range * ILAssemblyRef -> CcuResolutionResult
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member ProviderGeneratedTypeRoots: ProviderGeneratedType list
 #endif
 
@@ -182,7 +182,7 @@ type TcImports =
     /// Try to find the given assembly reference.
     member TryFindExistingFullyQualifiedPathByExactAssemblyRef: ILAssemblyRef -> string option
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Try to find a provider-generated assembly
     member TryFindProviderGeneratedAssemblyByName: CompilationThreadToken * assemblyName:string -> System.Reflection.Assembly option
 #endif
diff --git a/src/fsharp/CompilerOptions.fs b/src/fsharp/CompilerOptions.fs
index 33827523b0b..30f63c34e12 100644
--- a/src/fsharp/CompilerOptions.fs
+++ b/src/fsharp/CompilerOptions.fs
@@ -1245,7 +1245,7 @@ let internalFlags (tcConfigB:TcConfigBuilder) =
         OptionUnit  (fun () -> tcConfigB.showTimes <- true),
         Some(InternalCommandLineOption("times", rangeCmdArgs)), None)
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // "Display information about extension type resolution")
     CompilerOption
        ("showextensionresolution", tagNone,
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index f8a0a8265d1..c8d5f67381e 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -68,7 +68,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TypeRelations
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -1954,7 +1954,7 @@ and RecordMemberConstraintSolution css m trace traitInfo res =
 
 /// Convert a MethInfo into the data we save in the TAST
 and MemberConstraintSolutionOfMethInfo css m minfo minst = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 #else
     // to prevent unused parameter warning
     ignore css
@@ -1971,7 +1971,7 @@ and MemberConstraintSolutionOfMethInfo css m minfo minst =
     | MethInfo.DefaultStructCtor _ -> 
        error(InternalError("the default struct constructor was the unexpected solution to a trait constraint", m))
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedMeth(amap, mi, _, m) -> 
         let g = amap.g
         let minst = []   // GENERIC TYPE PROVIDERS: for generics, we would have an minst here
diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
index 91688c9ef95..1d69b9ff607 100644
--- a/src/fsharp/ExtensionTyping.fs
+++ b/src/fsharp/ExtensionTyping.fs
@@ -4,7 +4,7 @@
 
 namespace FSharp.Compiler
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 open System
 open System.Collections.Concurrent
diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi
index 8d80a7636ef..fd93c91d818 100755
--- a/src/fsharp/ExtensionTyping.fsi
+++ b/src/fsharp/ExtensionTyping.fsi
@@ -4,7 +4,7 @@
 
 namespace rec FSharp.Compiler
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 open System
 open System.Collections.Concurrent
diff --git a/src/fsharp/IlxGen.fs b/src/fsharp/IlxGen.fs
index 2b38b9bce92..0c4fe94a434 100644
--- a/src/fsharp/IlxGen.fs
+++ b/src/fsharp/IlxGen.fs
@@ -539,7 +539,7 @@ and GenNamedTyAppAux (amap: ImportMap) m (tyenv: TypeReprEnv) ptrsOK tcref tinst
     if ptrsOK = PtrTypesOK && tyconRefEq g tcref g.nativeptr_tcr && (freeInTypes CollectTypars tinst).FreeTypars.IsEmpty then
         GenNamedTyAppAux amap m tyenv ptrsOK g.ilsigptr_tcr tinst
     else
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match tcref.TypeReprInfo with
         // Generate the base type, because that is always the representation of the erased type, unless the assembly is being injected
         | TProvidedTypeRepr info when info.IsErased ->
@@ -7825,7 +7825,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
     let tcref = mkLocalTyconRef tycon
     if tycon.IsTypeAbbrev then () else
     match tycon.TypeReprInfo with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | TProvidedNamespaceRepr _
     | TProvidedTypeRepr _
 #endif
diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index 8f2fe1c3499..0b99c99b171 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -22,7 +22,7 @@ open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypeRelations
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -58,7 +58,7 @@ let rec GetImmediateIntrinsicMethInfosOfTypeAux (optFilter, ad) g amap m origTy
 
     let minfos =
         match metadataOfTy g metadataTy with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedTypeMetadata info -> 
             let st = info.ProvidedType
             let meths = 
@@ -145,7 +145,7 @@ let rec GetImmediateIntrinsicPropInfosOfTypeAux (optFilter, ad) g amap m origTy
 
     let pinfos =
         match metadataOfTy g metadataTy with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedTypeMetadata info -> 
             let st = info.ProvidedType
             let matchingProps =
@@ -302,7 +302,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
     let GetImmediateIntrinsicILFieldsOfType (optFilter, ad) m ty =
         let infos =
             match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedTypeMetadata info -> 
                 let st = info.ProvidedType
                 match optFilter with
@@ -327,7 +327,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
     let ComputeImmediateIntrinsicEventsOfType (optFilter, ad) m ty =
         let infos =
             match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedTypeMetadata info -> 
                 let st = info.ProvidedType
                 match optFilter with
@@ -770,7 +770,7 @@ type InfoReader(g: TcGlobals, amap: Import.ImportMap) as this =
         let g = infoReader.g
         let amap = infoReader.amap 
         match metadataOfTy g metadataTy with 
-    #if !NO_EXTENSIONTYPING
+    #if !NO_TYPEPROVIDERS
         | ProvidedTypeMetadata info -> 
             let st = info.ProvidedType
             [ for ci in st.PApplyArray((fun st -> st.GetConstructors()), "GetConstructors", m) do
@@ -1084,7 +1084,7 @@ let GetXmlDocSigOfMethInfo (infoReader: InfoReader)  m (minfo: MethInfo) =
 
             Some (ccuFileName, "M:"+actualTypeName+"."+normalizedName+genArity+XmlDocArgsEnc g (formalTypars, fmtps) args)
     | DefaultStructCtor _ -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedMeth _ -> None
 #endif
 
@@ -1105,7 +1105,7 @@ let GetXmlDocSigOfValRef g (vref: ValRef) =
 let GetXmlDocSigOfProp infoReader m (pinfo: PropInfo) =
     let g = pinfo.TcGlobals
     match pinfo with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedProp _ -> None // No signature is possible. If an xml comment existed it would have been returned by PropInfo.XmlDoc in infos.fs
 #endif
     | FSProp _ as fspinfo -> 
diff --git a/src/fsharp/MethodCalls.fs b/src/fsharp/MethodCalls.fs
index 4e8bce50ad9..8ce2dedff44 100644
--- a/src/fsharp/MethodCalls.fs
+++ b/src/fsharp/MethodCalls.fs
@@ -28,7 +28,7 @@ open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TypedTreeOps.DebugPrint
 open FSharp.Compiler.TypeRelations
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -1023,7 +1023,7 @@ let MakeMethInfoCall amap m minfo minst args =
     | DefaultStructCtor(_, ty) -> 
        mkDefault (m, ty)
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedMeth(amap, mi, _, m) -> 
         let isProp = false // not necessarily correct, but this is only used post-creflect where this flag is irrelevant 
         let ilMethodRef = Import.ImportProvidedMethodBaseAsILMethodRef amap m mi
@@ -1037,7 +1037,7 @@ let MakeMethInfoCall amap m minfo minst args =
 
 #endif
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 // This imports a provided method, and checks if it is a known compiler intrinsic like "1 + 2"
 let TryImportProvidedMethodBaseAsLibraryIntrinsic (amap: Import.ImportMap, m: range, mbase: Tainted) = 
     let methodName = mbase.PUntaint((fun x -> x.Name), m)
@@ -1086,7 +1086,7 @@ let BuildMethodCall tcVal g amap isMutable m isProp minfo valUseFlags minst objA
                     valUseFlags
 
         match minfo with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         // By this time this is an erased method info, e.g. one returned from an expression
         // REVIEW: copied from tastops, which doesn't allow protected methods
         | ProvidedMeth (amap, providedMeth, _, _) -> 
@@ -1681,7 +1681,7 @@ let AdjustCallerArgs tcVal tcFieldInit eCallerMemberName (infoReader: InfoReader
 //------------------------------------------------------------------------- 
 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 // This file is not a great place for this functionality to sit, it's here because of BuildMethodCall
 module ProvidedMethodCalls =
 
diff --git a/src/fsharp/MethodCalls.fsi b/src/fsharp/MethodCalls.fsi
index ff772370c14..de41eda0548 100644
--- a/src/fsharp/MethodCalls.fsi
+++ b/src/fsharp/MethodCalls.fsi
@@ -16,7 +16,7 @@ open FSharp.Compiler.TcGlobals
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeOps
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -411,7 +411,7 @@ val GenWitnessExprLambda: amap:ImportMap -> g:TcGlobals -> m:range -> traitInfo:
 /// Generate the arguments passed for a set of (solved) traits in non-generic code
 val GenWitnessArgs: amap:ImportMap -> g:TcGlobals -> m:range -> traitInfos:TraitConstraintInfo list -> Choice list
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 module ProvidedMethodCalls =
   val BuildInvokerExpressionForProvidedMethodCall:
       tcVal:(ValRef -> ValUseFlag -> TType list -> range -> Expr * TType) ->
diff --git a/src/fsharp/MethodOverrides.fs b/src/fsharp/MethodOverrides.fs
index 12b6be23306..b7106786524 100644
--- a/src/fsharp/MethodOverrides.fs
+++ b/src/fsharp/MethodOverrides.fs
@@ -834,7 +834,7 @@ let FinalTypeDefinitionChecksAtEndOfInferenceScope (infoReader: InfoReader, nenv
   
     // Note you only have to explicitly implement 'System.IComparable' to customize structural comparison AND equality on F# types 
     if isImplementation &&
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
        not tycon.IsProvidedGeneratedTycon &&
 #endif
        Option.isNone tycon.GeneratedCompareToValues &&
@@ -851,7 +851,7 @@ let FinalTypeDefinitionChecksAtEndOfInferenceScope (infoReader: InfoReader, nenv
     AugmentWithHashCompare.CheckAugmentationAttribs isImplementation g amap tycon
     // Check some conditions about generic comparison and hashing. We can only check this condition after we've done the augmentation 
     if isImplementation 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
        && not tycon.IsProvidedGeneratedTycon  
 #endif
        then
diff --git a/src/fsharp/NameResolution.fs b/src/fsharp/NameResolution.fs
index b40aab4cab2..9956a856c95 100644
--- a/src/fsharp/NameResolution.fs
+++ b/src/fsharp/NameResolution.fs
@@ -33,7 +33,7 @@ open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -622,7 +622,7 @@ let TrySelectExtensionMethInfoOfILExtMem m amap apparentTy (actualParent, minfo,
     // F#-defined IL-style extension methods are not seen as extension methods in F# code
     | FSMeth(g,_,vref,_) -> 
         FSMeth(g, apparentTy, vref, Some pri) |> Some
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // // Provided extension methods are not yet supported
     | ProvidedMeth(amap,providedMeth,_,m) -> 
         ProvidedMeth(amap, providedMeth, Some pri,m) |> Some
@@ -873,7 +873,7 @@ type PermitDirectReferenceToGeneratedType =
     | Yes
     | No
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 /// Check for direct references to generated provided types.
 let CheckForDirectReferenceToGeneratedType (tcref: TyconRef, genOk, m) =
@@ -987,7 +987,7 @@ let LookupTypeNameInEntityMaybeHaveArity (amap, m, ad, nm, staticResInfo: TypeNa
             match LookupTypeNameInEntityHaveArity nm staticResInfo mtyp with
             | Some tycon -> [modref.NestedTyconRef tycon]
             | None -> []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let tcrefs =
         match tcrefs with
         | [] -> ResolveProvidedTypeNameInEntity (amap, m, nm, modref)
@@ -1008,7 +1008,7 @@ let GetNestedTyconRefsOfType (infoReader: InfoReader) (amap: Import.ImportMap) (
             let tycon = tcref.Deref
             let mty = tycon.ModuleOrNamespaceType
             // No dotting through type generators to get to a nested type!
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             if checkForGenerated then
                 CheckForDirectReferenceToGeneratedType (tcref, PermitDirectReferenceToGeneratedType.No, m)
 #else
@@ -1019,7 +1019,7 @@ let GetNestedTyconRefsOfType (infoReader: InfoReader) (amap: Import.ImportMap) (
             | Some nm ->
                 LookupTypeNameInEntityMaybeHaveArity (amap, m, ad, nm, staticResInfo, tcref)
             | None ->
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 match tycon.TypeReprInfo with
                 | TProvidedTypeRepr info ->
                     [ for nestedType in info.ProvidedType.PApplyArray((fun sty -> sty.GetNestedTypes()), "GetNestedTypes", m) do
@@ -2218,7 +2218,7 @@ let CheckForTypeLegitimacyAndMultipleGenericTypeAmbiguities
         | _ ->
             tcrefs
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     for _, tcref in tcrefs do
         // Type generators can't be returned by name resolution, unless PermitDirectReferenceToGeneratedType.Yes
         CheckForDirectReferenceToGeneratedType (tcref, genOk, m)
@@ -2409,7 +2409,7 @@ let DisplayNameCoreMangled(pinfo: PropInfo) =
     | FSProp(_, _, Some get, _) -> get.DisplayNameCoreMangled
     | FSProp _ -> failwith "unexpected (property must have either getter or setter)"
     | ILProp(ILPropInfo(_, def))  -> def.Name
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedProp(_, pi, m) -> pi.PUntaint((fun pi -> pi.Name), m)
 #endif
 
@@ -2600,7 +2600,7 @@ let ResolveLongIdentInType sink ncenv nenv lookupKind m ad id findFlag typeNameR
     item, rest
 
 let private ResolveLongIdentInTyconRef (ncenv: NameResolver) nenv lookupKind (resInfo: ResolutionInfo) depth m ad id rest typeNameResInfo tcref =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // No dotting through type generators to get to a member!
     CheckForDirectReferenceToGeneratedType (tcref, PermitDirectReferenceToGeneratedType.No, m)
 #endif
@@ -3138,7 +3138,7 @@ let rec ResolveTypeLongIdentInTyconRefPrim (ncenv: NameResolver) (typeNameResInf
     let tcref = ResolveNestedTypeThroughAbbreviation ncenv tcref m
     match rest with
     | [] ->
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         // No dotting through type generators to get to a nested type!
         CheckForDirectReferenceToGeneratedType (tcref, PermitDirectReferenceToGeneratedType.No, m)
 #endif
@@ -3155,7 +3155,7 @@ let rec ResolveTypeLongIdentInTyconRefPrim (ncenv: NameResolver) (typeNameResInf
 
             raze (UndefinedName(depth, FSComp.SR.undefinedNameType, id, suggestTypes))
     | id2 :: rest2 ->
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         // No dotting through type generators to get to a nested type!
         CheckForDirectReferenceToGeneratedType (tcref, PermitDirectReferenceToGeneratedType.No, m)
 #endif
@@ -3996,7 +3996,7 @@ let ResolveCompletionsInType (ncenv: NameResolver) nenv (completionTargets: Reso
                         if addersAndRemovers.Count = 0 then minfos
                         else minfos |> List.filter (fun minfo -> not (addersAndRemovers.Contains minfo.LogicalName))
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                     // Filter out the ones with mangled names from applying static parameters
                     let minfos =
                         let methsWithStaticParams =
@@ -4706,7 +4706,7 @@ let ResolveCompletionsInTypeForItem (ncenv: NameResolver) nenv m ad statics ty (
                             if addersAndRemovers.Count = 0 then minfos
                             else minfos |> List.filter (fun minfo -> not (addersAndRemovers.Contains minfo.LogicalName))
 
-        #if !NO_EXTENSIONTYPING
+        #if !NO_TYPEPROVIDERS
                         // Filter out the ones with mangled names from applying static parameters
                         let minfos =
                             let methsWithStaticParams =
diff --git a/src/fsharp/NicePrint.fs b/src/fsharp/NicePrint.fs
index ed863bd3e0a..9221b2688ae 100755
--- a/src/fsharp/NicePrint.fs
+++ b/src/fsharp/NicePrint.fs
@@ -1507,7 +1507,7 @@ module InfoMemberPrinting =
             let prettyTyparInst, prettyMethInfo, minst = prettifyILMethInfo amap m methInfo typarInst ilminfo
             let resL = layoutMethInfoCSharpStyle amap m denv prettyMethInfo minst
             prettyTyparInst, resL
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> 
             let prettyTyparInst, _ = PrettyTypes.PrettifyInst amap.g typarInst 
             prettyTyparInst, layoutMethInfoCSharpStyle amap m denv methInfo methInfo.FormalMethodInst
@@ -1626,7 +1626,7 @@ module TastDefinitionPrinting =
              r.CasesTable.UnionCasesAsList |> List.exists (fun uc -> not uc.XmlDoc.IsEmpty)
         | TAsmRepr _ 
         | TMeasureableRepr _ 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | TProvidedTypeRepr _
         | TProvidedNamespaceRepr _
 #endif
@@ -1840,7 +1840,7 @@ module TastDefinitionPrinting =
             |> List.map snd
 
         let nestedTypeLs =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             match tryTcrefOfAppTy g ty with
             | ValueSome tcref ->
                 match tcref.TypeReprInfo with 
diff --git a/src/fsharp/ParseAndCheckInputs.fs b/src/fsharp/ParseAndCheckInputs.fs
index 6d01c915f91..2e7a07aedd5 100644
--- a/src/fsharp/ParseAndCheckInputs.fs
+++ b/src/fsharp/ParseAndCheckInputs.fs
@@ -791,7 +791,7 @@ let GetInitialTcState(m, ccuName, tcConfig: TcConfig, tcGlobals, tcImports: TcIm
     let ccuData: CcuData =
         { IsFSharp=true
           UsesFSharp20PlusQuotations=false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
           InvalidateEvent=(Event<_>()).Publish
           IsProviderGenerated = false
           ImportProvidedType = (fun ty -> Import.ImportProvidedType (tcImports.GetImportMap()) m ty)
diff --git a/src/fsharp/PostInferenceChecks.fs b/src/fsharp/PostInferenceChecks.fs
index 5797950c063..5a2d7e443f0 100644
--- a/src/fsharp/PostInferenceChecks.fs
+++ b/src/fsharp/PostInferenceChecks.fs
@@ -2246,7 +2246,7 @@ let CheckRecdField isUnion cenv env (tycon: Tycon) (rfield: RecdField) =
     CheckAttribs cenv env rfield.FieldAttribs
 
 let CheckEntityDefn cenv env (tycon: Entity) =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
   if not tycon.IsProvidedGeneratedTycon then
 #endif
     let g = cenv.g
diff --git a/src/fsharp/QuotationTranslator.fs b/src/fsharp/QuotationTranslator.fs
index 215cae5c9e8..eaef94f81ac 100644
--- a/src/fsharp/QuotationTranslator.fs
+++ b/src/fsharp/QuotationTranslator.fs
@@ -995,7 +995,7 @@ and ConvType cenv env m ty =
 
     | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations
     | TType_app(tcref, tyargs, _) ->
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match TryElimErasableTyconRef cenv m tcref with
         | Some baseTy -> ConvType cenv env m baseTy
         | _ ->
@@ -1137,7 +1137,7 @@ and ConvDecisionTree cenv env tgs typR x =
 and IsILTypeRefStaticLinkLocal cenv m (tr: ILTypeRef) =
         ignore cenv; ignore m
         match tr.Scope with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ILScopeRef.Assembly aref
             when not cenv.g.isInteractive &&
                  aref.Name <> cenv.g.ilg.primaryAssemblyName && // optimization to avoid this check in the common case
@@ -1196,7 +1196,7 @@ and ConvILType cenv env m ty =
     | ILType.FunctionPointer _ -> wfail(Error(FSComp.SR.crefQuotationsCantContainThisType(), m))
 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 and TryElimErasableTyconRef cenv m (tcref: TyconRef) =
     match tcref.TypeReprInfo with
     // Get the base type
@@ -1205,7 +1205,7 @@ and TryElimErasableTyconRef cenv m (tcref: TyconRef) =
 #endif
 
 and ConvTyconRef cenv (tcref: TyconRef) m =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     match TryElimErasableTyconRef cenv m tcref with
     | Some baseTy -> ConvTyconRef cenv (tcrefOfAppTy cenv.g baseTy) m
     | None ->
diff --git a/src/fsharp/SignatureConformance.fs b/src/fsharp/SignatureConformance.fs
index 9ddfebfc3de..4bae2dc44ff 100644
--- a/src/fsharp/SignatureConformance.fs
+++ b/src/fsharp/SignatureConformance.fs
@@ -20,7 +20,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.InfoReader
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -490,7 +490,7 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) =
             | (TFSharpRecdRepr _ 
               | TFSharpUnionRepr _ 
               | TILObjectRepr _ 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
               | TProvidedTypeRepr _ 
               | TProvidedNamespaceRepr _
 #endif
@@ -542,7 +542,7 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) =
             | TMeasureableRepr ty1,  TMeasureableRepr ty2 -> 
                 if typeAEquiv g aenv ty1 ty2 then true else (errorR (Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleRepresentationsDiffer(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m)); false)
             | TNoRepr, TNoRepr -> true
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | TProvidedTypeRepr info1, TProvidedTypeRepr info2 ->  
                 Tainted.EqTainted info1.ProvidedType.TypeProvider info2.ProvidedType.TypeProvider && ProvidedType.TaintedEquals(info1.ProvidedType, info2.ProvidedType)
             | TProvidedNamespaceRepr _, TProvidedNamespaceRepr _ -> 
diff --git a/src/fsharp/StaticLinking.fs b/src/fsharp/StaticLinking.fs
index 2d0a40e0c04..8aa72ed8e28 100644
--- a/src/fsharp/StaticLinking.fs
+++ b/src/fsharp/StaticLinking.fs
@@ -20,7 +20,7 @@ open FSharp.Compiler.Text.Range
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeBasics
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -136,7 +136,7 @@ let StaticLinkILModules (tcConfig:TcConfig, ilGlobals, tcImports, ilxMainModule,
             // Don't save interface, optimization or resource definitions for provider-generated assemblies.
             // These are "fake".
             let isProvided (ccu: CcuThunk option) =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 match ccu with
                 | Some c -> c.IsProviderGenerated
                 | None -> false
@@ -339,7 +339,7 @@ let FindProviderGeneratedILModules (ctok, tcImports: TcImports, providerGenerate
 // prior to this point.
 let StaticLink (ctok, tcConfig: TcConfig, tcImports: TcImports, ilGlobals: ILGlobals) =
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let providerGeneratedAssemblies =
 
         [ // Add all EST-generated assemblies into the static linking set
@@ -350,7 +350,7 @@ let StaticLink (ctok, tcConfig: TcConfig, tcImports: TcImports, ilGlobals: ILGlo
                     | Some provAssemStaticLinkInfo -> yield (importedBinary, provAssemStaticLinkInfo) ]
 #endif
     if not tcConfig.standalone && tcConfig.extraStaticLinkRoots.IsEmpty
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             && providerGeneratedAssemblies.IsEmpty
 #endif
             then
@@ -363,7 +363,7 @@ let StaticLink (ctok, tcConfig: TcConfig, tcImports: TcImports, ilGlobals: ILGlo
 
             ReportTime tcConfig "Static link"
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             Morphs.enableMorphCustomAttributeData()
             let providerGeneratedILModules =  FindProviderGeneratedILModules (ctok, tcImports, providerGeneratedAssemblies)
 
diff --git a/src/fsharp/TypedTree.fs b/src/fsharp/TypedTree.fs
index 114f3149b52..99f48556cf6 100644
--- a/src/fsharp/TypedTree.fs
+++ b/src/fsharp/TypedTree.fs
@@ -26,7 +26,7 @@ open FSharp.Compiler.Text
 open FSharp.Compiler.Text.Range
 open FSharp.Compiler.Xml
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 open FSharp.Core.CompilerServices
 #endif
@@ -678,7 +678,7 @@ type Entity =
     member x.DisplayNameWithStaticParameters =
         x.GetDisplayName(coreName=false, withStaticParameters=true, withUnderscoreTypars=false)
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member x.IsStaticInstantiationTycon = 
         x.IsProvidedErasedTycon &&
             let _nm, args = demangleProvidedTypeName x.LogicalName
@@ -690,7 +690,7 @@ type Entity =
         let withUnderscoreTypars = defaultArg withUnderscoreTypars false
         let nm = x.LogicalName
         if x.IsModuleOrNamespace then x.DemangledModuleOrNamespaceName 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         elif x.IsProvidedErasedTycon then 
             let nm, args = demangleProvidedTypeName nm
             if withStaticParameters && args.Length > 0 then 
@@ -714,7 +714,7 @@ type Entity =
 
     /// The code location where the module, namespace or type is defined.
     member x.Range = 
-#if !NO_EXTENSIONTYPING    
+#if !NO_TYPEPROVIDERS    
         match x.TypeReprInfo with
         | TProvidedTypeRepr info ->
             match Construct.ComputeDefinitionLocationOfProvidedItem info.ProvidedType with
@@ -754,7 +754,7 @@ type Entity =
     /// or comes from another F# assembly then it does not (because the documentation will get read from 
     /// an XML file).
     member x.XmlDoc = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match x.TypeReprInfo with
         | TProvidedTypeRepr info ->
             let lines = info.ProvidedType.PUntaintNoFailure(fun st -> (st :> IProvidedCustomAttributeProvider).GetXmlDocAttributes(info.ProvidedType.TypeProvider.PUntaintNoFailure id))
@@ -869,7 +869,7 @@ type Entity =
 
     /// Indicates if the entity is an F# module definition
     member x.IsModule = x.IsModuleOrNamespace && (match x.ModuleOrNamespaceType.ModuleOrNamespaceKind with Namespace -> false | _ -> true)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
     /// Indicates if the entity is a provided type or namespace definition
     member x.IsProvided = 
@@ -900,7 +900,7 @@ type Entity =
     /// Indicates if the entity is erased, either a measure definition, or an erased provided type definition
     member x.IsErased = 
         x.IsMeasureableReprTycon 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         || x.IsProvidedErasedTycon
 #endif
 
@@ -1100,7 +1100,7 @@ type Entity =
 
     /// Indicates if this is an enum type definition 
     member x.IsEnumTycon = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match x.TypeReprInfo with 
         | TProvidedTypeRepr info -> info.IsEnum 
         | TProvidedNamespaceRepr _ -> false
@@ -1127,7 +1127,7 @@ type Entity =
 
     /// Indicates if this is a struct or enum type definition, i.e. a value type definition
     member x.IsStructOrEnumTycon = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match x.TypeReprInfo with 
         | TProvidedTypeRepr info -> info.IsStructOrEnum 
         | TProvidedNamespaceRepr _ -> false
@@ -1185,7 +1185,7 @@ type Entity =
 
     /// Gets the data indicating the compiled representation of a type or module in terms of Abstract IL data structures.
     member x.CompiledRepresentation =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match x.TypeReprInfo with 
         // We should never be computing this property for erased types
         | TProvidedTypeRepr info when info.IsErased -> 
@@ -1398,7 +1398,7 @@ type TyconRepresentation =
     /// Indicates the type is parameterized on a measure (e.g. float<_>) but erases to some other type (e.g. float)
     | TMeasureableRepr of TType
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// TProvidedTypeRepr
     ///
     /// Indicates the representation information for a provided type. 
@@ -1435,7 +1435,7 @@ type TILObjectReprData =
     override x.ToString() = "TILObjectReprData(...)"
 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 /// The information kept about a provided type
 []
@@ -1911,7 +1911,7 @@ type ModuleOrNamespaceType(kind: ModuleOrNamespaceKind, vals: QueueList, en
         modulesByDemangledNameCache <- None          
         allEntitiesByMangledNameCache <- None       
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Mutation used in hosting scenarios to hold the hosted types in this module or namespace
     member mtyp.AddProvidedTypeEntity(entity: Entity) = 
         entities <- QueueList.appendOne entities entity
@@ -3138,13 +3138,13 @@ type NonLocalEntityRef =
         else  
             match entity.ModuleOrNamespaceType.AllEntitiesByCompiledAndLogicalMangledNames.TryGetValue path.[i] with 
             | true, res -> NonLocalEntityRef.TryDerefEntityPath(ccu, path, (i+1), res)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | _ -> NonLocalEntityRef.TryDerefEntityPathViaProvidedType(ccu, path, i, entity)
 #else
             | _ -> ValueNone
 #endif
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Try to find the entity corresponding to the given path, using type-providers to link the data
     static member TryDerefEntityPathViaProvidedType(ccu: CcuThunk, path: string[], i: int, entity: Entity) = 
         // Errors during linking are not necessarily given good ranges. This has always been the case in F# 2.0, but also applies to
@@ -3484,7 +3484,7 @@ type EntityRef =
     /// Get a blob of data indicating how this type is nested inside other namespaces, modules and types.
     member x.CompilationPathOpt = x.Deref.CompilationPathOpt
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Indicates if the entity is a provided namespace fragment
     member x.IsProvided = x.Deref.IsProvided
 
@@ -5315,7 +5315,7 @@ type CcuData =
       /// Indicates that this DLL was compiled using the F# compiler and has F# metadata
       IsFSharp: bool 
       
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       /// Is the CCu an assembly injected by a type provider
       IsProviderGenerated: bool 
 
@@ -5420,7 +5420,7 @@ type CcuThunk =
     /// in-memory cross-project references
     member ccu.TryGetILModuleDef() = ccu.Deref.TryGetILModuleDef()
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Is this a provider-injected assembly
     member ccu.IsProviderGenerated = ccu.Deref.IsProviderGenerated
 
@@ -5638,7 +5638,7 @@ type Construct() =
     static member NewEmptyModuleOrNamespaceType mkind = 
         Construct.NewModuleOrNamespaceType mkind [] []
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
     /// Create a new node for the representation information for a provided type definition
     static member NewProvidedTyconRepr(resolutionEnvironment, st: Tainted, importProvidedType, isSuppressRelocate, m) = 
@@ -5929,7 +5929,7 @@ type Construct() =
     static member NewClonedTycon orig =
         Construct.NewModifiedTycon id orig
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Compute the definition location of a provided item
     static member ComputeDefinitionLocationOfProvidedItem<'T when 'T :> IProvidedCustomAttributeProvider> (p: Tainted<'T>) : range option =
         let attrs = p.PUntaintNoFailure(fun x -> x.GetDefinitionLocationAttribute(p.TypeProvider.PUntaintNoFailure id))
diff --git a/src/fsharp/TypedTreeBasics.fs b/src/fsharp/TypedTreeBasics.fs
index 2c0862d3070..4482574aef4 100644
--- a/src/fsharp/TypedTreeBasics.fs
+++ b/src/fsharp/TypedTreeBasics.fs
@@ -355,7 +355,7 @@ let tyconRefUsesLocalXmlDoc compilingFslib (x: TyconRef) =
     match x with 
     | ERefLocal _ -> true
     | ERefNonLocal _ ->
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match x.TypeReprInfo with
         | TProvidedTypeRepr _ -> true
         | _ -> 
diff --git a/src/fsharp/TypedTreeOps.fs b/src/fsharp/TypedTreeOps.fs
index 2570696a9f0..dd9beb522c9 100644
--- a/src/fsharp/TypedTreeOps.fs
+++ b/src/fsharp/TypedTreeOps.fs
@@ -28,7 +28,7 @@ open FSharp.Compiler.Text.TaggedText
 open FSharp.Compiler.Xml
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeBasics
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -720,14 +720,14 @@ let reduceTyconRefAbbrev (tcref: TyconRef) tyargs =
     reduceTyconAbbrev tcref.Deref tyargs
 
 let reduceTyconMeasureableOrProvided (g: TcGlobals) (tycon: Tycon) tyargs =
-#if NO_EXTENSIONTYPING
+#if NO_TYPEPROVIDERS
     ignore g  // otherwise g would be unused
 #endif
     let repr = tycon.TypeReprInfo
     match repr with 
     | TMeasureableRepr ty -> 
         if isNil tyargs then ty else instType (mkTyconInst tycon tyargs) ty
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | TProvidedTypeRepr info when info.IsErased -> info.BaseTypeForErased (range0, g.obj_ty)
 #endif
     | _ -> invalidArg "tc" "this type definition is not a refinement" 
@@ -1137,7 +1137,7 @@ let getMeasureOfType g ty =
 
 let isErasedType g ty = 
   match stripTyEqns g ty with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
   | TType_app (tcref, _, _) -> tcref.IsProvidedErasedTycon
 #endif
   | _ -> false
@@ -1799,19 +1799,19 @@ let isOutByrefTy g ty =
         | TType_app(tcref, [_; tag], _) when g.byref2_tcr.CanDeref -> tyconRefEq g g.byref2_tcr tcref && isOutByrefTag g tag         
         | _ -> false) 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 let extensionInfoOfTy g ty = ty |> stripTyEqns g |> (function TType_app(tcref, _, _) -> tcref.TypeReprInfo | _ -> TNoRepr) 
 #endif
 
 type TypeDefMetadata = 
      | ILTypeMetadata of TILObjectReprData
      | FSharpOrArrayOrByrefOrTupleOrExnTypeMetadata 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
      | ProvidedTypeMetadata of TProvidedTypeInfo
 #endif
 
 let metadataOfTycon (tycon: Tycon) = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     match tycon.TypeReprInfo with 
     | TProvidedTypeRepr info -> ProvidedTypeMetadata info
     | _ -> 
@@ -1823,7 +1823,7 @@ let metadataOfTycon (tycon: Tycon) =
 
 
 let metadataOfTy g ty = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     match extensionInfoOfTy g ty with 
     | TProvidedTypeRepr info -> ProvidedTypeMetadata info
     | _ -> 
@@ -1837,7 +1837,7 @@ let metadataOfTy g ty =
 
 let isILReferenceTy g ty = 
     match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> not info.IsStructOrEnum
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, td)) -> not td.IsStructOrEnum
@@ -1845,7 +1845,7 @@ let isILReferenceTy g ty =
 
 let isILInterfaceTycon (tycon: Tycon) = 
     match metadataOfTycon tycon with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> info.IsInterface
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsInterface
@@ -1877,7 +1877,7 @@ let isFSharpInterfaceTy g ty =
 
 let isDelegateTy g ty = 
     match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> info.IsDelegate ()
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsDelegate
@@ -1888,7 +1888,7 @@ let isDelegateTy g ty =
 
 let isInterfaceTy g ty = 
     match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> info.IsInterface
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsInterface
@@ -1898,7 +1898,7 @@ let isFSharpDelegateTy g ty = isDelegateTy g ty && isFSharpObjModelTy g ty
 
 let isClassTy g ty = 
     match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> info.IsClass
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsClass
@@ -3290,7 +3290,7 @@ let TryFindILAttributeOpt attr attrs =
 let TryBindTyconRefAttribute g (m: range) (AttribInfo (atref, _) as args) (tcref: TyconRef) f1 f2 (f3: obj option list * (string * obj option) list -> 'a option) : 'a option = 
     ignore m; ignore f3
     match metadataOfTycon tcref.Deref with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> 
         let provAttribs = info.ProvidedType.PApply((fun a -> (a :> IProvidedCustomAttributeProvider)), m)
         match provAttribs.PUntaint((fun a -> a.GetAttributeConstructorArgs(provAttribs.TypeProvider.PUntaintNoFailure id, atref.FullName)), m) with
@@ -3353,7 +3353,7 @@ let TyconRefHasAttribute g m attribSpec tcref =
 let TyconRefHasAttributeByName (m: range) attrFullName (tcref: TyconRef) = 
     ignore m
     match metadataOfTycon tcref.Deref with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> 
         let provAttribs = info.ProvidedType.PApply((fun a -> (a :> IProvidedCustomAttributeProvider)), m)
         provAttribs.PUntaint((fun a ->
@@ -4103,7 +4103,7 @@ module DebugPrint =
 
         let reprL = 
             match tycon.TypeReprInfo with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | TProvidedTypeRepr _
             | TProvidedNamespaceRepr _
 #endif
@@ -5281,7 +5281,7 @@ let InferArityOfExprBinding g allowTypeDirectedDetupling (v: Val) expr =
 let underlyingTypeOfEnumTy (g: TcGlobals) ty = 
     assert(isEnumTy g ty)
     match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata info -> info.UnderlyingTypeOfEnum()
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, tdef)) -> 
@@ -5803,7 +5803,7 @@ and remapTyconRepr ctxt tmenv repr =
     | TFSharpRecdRepr x -> TFSharpRecdRepr (remapRecdFields ctxt tmenv x)
     | TFSharpUnionRepr x -> TFSharpUnionRepr (remapUnionCases ctxt tmenv x)
     | TILObjectRepr _ -> failwith "cannot remap IL type definitions"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | TProvidedNamespaceRepr _ -> repr
     | TProvidedTypeRepr info -> 
        TProvidedTypeRepr 
@@ -7764,7 +7764,7 @@ let mkCompilationMappingAttrForQuotationResource (g: TcGlobals) (nm, tys: ILType
 // Decode extensible typing attributes
 //----------------------------------------------------------------------------
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 let isTypeProviderAssemblyAttr (cattr: ILAttribute) = 
     cattr.Method.DeclaringType.BasicQualifiedName = typeof.FullName
@@ -8898,7 +8898,7 @@ let isSealedTy g ty =
     isArrayTy g ty || 
 
     match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | ProvidedTypeMetadata st -> st.IsSealed
 #endif
     | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsSealed
diff --git a/src/fsharp/TypedTreeOps.fsi b/src/fsharp/TypedTreeOps.fsi
index 31261aec8de..f48df8c6719 100755
--- a/src/fsharp/TypedTreeOps.fsi
+++ b/src/fsharp/TypedTreeOps.fsi
@@ -1501,7 +1501,7 @@ val mkPrintfFormatTy: TcGlobals -> TType -> TType -> TType -> TType -> TType ->
 type TypeDefMetadata = 
      | ILTypeMetadata of TILObjectReprData
      | FSharpOrArrayOrByrefOrTupleOrExnTypeMetadata 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
      | ProvidedTypeMetadata of  TProvidedTypeInfo
 #endif
 
@@ -2170,7 +2170,7 @@ val TyconRefHasAttributeByName: range -> string -> TyconRef -> bool
 /// Try to find the AttributeUsage attribute, looking for the value of the AllowMultiple named parameter
 val TryFindAttributeUsageAttribute: TcGlobals -> range -> TyconRef -> bool option
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// returns Some(assemblyName) for success
 val TryDecodeTypeProviderAssemblyAttr: ILAttribute -> string MaybeNull option
 #endif
diff --git a/src/fsharp/TypedTreePickle.fs b/src/fsharp/TypedTreePickle.fs
index c4eb65092b1..8324718feab 100644
--- a/src/fsharp/TypedTreePickle.fs
+++ b/src/fsharp/TypedTreePickle.fs
@@ -760,7 +760,7 @@ let u_encoded_nleref = u_tup2 u_int (u_array u_int)
 let u_nleref st = lookup_uniq st st.inlerefs (u_int st)
 
 let encode_nleref ccuTab stringTab nlerefTab thisCcu (nleref: NonLocalEntityRef) =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // Remap references to statically-linked Entity nodes in provider-generated entities to point to the current assembly.
     // References to these nodes _do_ appear in F# assembly metadata, because they may be public.
     let nleref =
@@ -1995,7 +1995,7 @@ and p_tycon_repr x st =
     | TFSharpObjectRepr r  -> p_byte 1 st; p_byte 3 st; p_tycon_objmodel_data r st; false
     | TMeasureableRepr ty  -> p_byte 1 st; p_byte 4 st; p_ty ty st; false
     | TNoRepr              -> p_byte 0 st; false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     | TProvidedTypeRepr info ->
         if info.IsErased then
             // Pickle erased type definitions as a NoRepr
diff --git a/src/fsharp/fsi/fsi.fs b/src/fsharp/fsi/fsi.fs
index 881910681db..11def25d91b 100644
--- a/src/fsharp/fsi/fsi.fs
+++ b/src/fsharp/fsi/fsi.fs
@@ -2329,7 +2329,7 @@ module internal MagicAssemblyResolution =
                    | Some (OkResult (warns,[r])) -> OkResult (warns, Choice1Of2 r.resolvedPath)
                    | _ ->
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                    match tcImports.TryFindProviderGeneratedAssemblyByName(ctok, simpleAssemName) with
                    | Some(assembly) -> OkResult([],Choice2Of2 assembly)
                    | None ->
@@ -3286,7 +3286,7 @@ type FsiEvaluationSession (fsi: FsiEvaluationSessionHostConfig, argv:string[], i
         // Explanation: This callback is invoked during compilation to resolve assembly references
         // We don't yet propagate the ctok through these calls (though it looks plausible to do so).
         let ctok = AssumeCompilationThreadWithoutEvidence ()
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         match tcImports.TryFindProviderGeneratedAssemblyByName (ctok, aref.Name) with
         | Some assembly -> Some (Choice2Of2 assembly)
         | None ->
diff --git a/src/fsharp/import.fs b/src/fsharp/import.fs
index f4be7e0925e..c9d848c8f3c 100644
--- a/src/fsharp/import.fs
+++ b/src/fsharp/import.fs
@@ -19,7 +19,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TcGlobals
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -32,7 +32,7 @@ type AssemblyLoader =
 
     abstract TryFindXmlDocumentationInfo : assemblyName: string -> XmlDocumentationInfo option
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
@@ -109,7 +109,7 @@ let ImportTypeRefData (env: ImportMap) m (scoref, path, typeName) =
             fakeTyconRef.Deref
         with _ ->
             error (Error(FSComp.SR.impReferencedTypeCouldNotBeFoundInAssembly(String.concat "." (Array.append path  [| typeName |]), ccu.AssemblyName), m))
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     // Validate (once because of caching)
     match tycon.TypeReprInfo with
     | TProvidedTypeRepr info ->
@@ -230,7 +230,7 @@ let rec CanImportILType (env: ImportMap) m ty =
     | ILType.Modified(_, _, ety) -> CanImportILType env m ety
     | ILType.TypeVar _u16 -> true
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 /// Import a provided type reference as an F# type TyconRef
 let ImportProvidedNamedType (env: ImportMap) (m: range) (st: Tainted) = 
@@ -631,7 +631,7 @@ let ImportILAssembly(amap: unit -> ImportMap, m, auxModuleLoader, xmlDocInfoLoad
     let ccuData: CcuData = 
         { IsFSharp=false
           UsesFSharp20PlusQuotations=false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
           InvalidateEvent=invalidateCcu
           IsProviderGenerated = false
           ImportProvidedType = (fun ty -> ImportProvidedType (amap()) m ty)
diff --git a/src/fsharp/import.fsi b/src/fsharp/import.fsi
index 81223a860f8..7df2e23d79d 100644
--- a/src/fsharp/import.fsi
+++ b/src/fsharp/import.fsi
@@ -10,7 +10,7 @@ open FSharp.Compiler.Text
 open FSharp.Compiler.Xml
 open FSharp.Compiler.TypedTree
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -23,7 +23,7 @@ type AssemblyLoader =
 
     abstract TryFindXmlDocumentationInfo : assemblyName: string -> XmlDocumentationInfo option
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Get a flag indicating if an assembly is a provided assembly, plus the
     /// table of information recording remappings from type names in the provided assembly to type
     /// names in the statically linked, embedded assembly.
@@ -61,7 +61,7 @@ val internal ImportILType : ImportMap -> range -> TType list -> ILType -> TType
 /// Pre-check for ability to import an IL type as an F# type.
 val internal CanImportILType : ImportMap -> range -> ILType -> bool
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// Import a provided type as an F# type.
 val internal ImportProvidedType : ImportMap -> range -> (* TType list -> *) Tainted -> TType
 
diff --git a/src/fsharp/infos.fs b/src/fsharp/infos.fs
index 355d47611f2..1e37581965f 100755
--- a/src/fsharp/infos.fs
+++ b/src/fsharp/infos.fs
@@ -18,7 +18,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TypedTreeOps.DebugPrint
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -47,7 +47,7 @@ let isExnDeclTy g ty =
 /// Get the base type of a type, taking into account type instantiations. Return None if the
 /// type has no base type.
 let GetSuperTypeOfType g amap m ty =
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let ty =
         match tryTcrefOfAppTy g ty with
         | ValueSome tcref when tcref.IsProvided -> stripTyEqns g ty 
@@ -58,7 +58,7 @@ let GetSuperTypeOfType g amap m ty =
 
     let resBeforeNull = 
       match metadataOfTy g ty with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       | ProvidedTypeMetadata info -> 
         let st = info.ProvidedType
         let superOpt = st.PApplyOption((fun st -> match st.BaseType with null -> None | t -> Some (nonNull t)), m)
@@ -117,7 +117,7 @@ type SkipUnrefInterfaces = Yes | No
 let GetImmediateInterfacesOfMetadataType g amap m skipUnref ty (tcref: TyconRef) tinst =
     [
         match metadataOfTy g ty with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedTypeMetadata info ->
             for ity in info.ProvidedType.PApplyArray((fun st -> st.GetInterfaces()), "GetInterfaces", m) do
                 // TODO NULLNESS: the nullness of ty should propagate to each of these
@@ -483,7 +483,7 @@ type ValRef with
 // as backing data for MethInfo, PropInfo etc.
 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// Get the return type of a provided method, where 'void' is returned as 'None'
 let GetCompiledReturnTyOfProvidedMethodInfo amap m (mi: Tainted) =
     let returnType = 
@@ -674,7 +674,7 @@ type ParamData =
         reflArgInfo: ReflectedArgInfo *
         ttype: TType
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 type ILFieldInit with
     /// Compute the ILFieldInit for the given provided constant value for a provided enum type.
@@ -966,7 +966,7 @@ type MethInfo =
     /// Describes a use of a pseudo-method corresponding to the default constructor for a .NET struct type
     | DefaultStructCtor of tcGlobals: TcGlobals * structTy: TType
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Describes a use of a method backed by provided metadata
     | ProvidedMeth of amap: Import.ImportMap * methodBase: Tainted * extensionMethodPriority: ExtensionMethodPriority option * m: range
 #endif
@@ -980,7 +980,7 @@ type MethInfo =
         | ILMeth(_, ilminfo, _) -> ilminfo.ApparentEnclosingType
         | FSMeth(_, ty, _, _) -> ty
         | DefaultStructCtor(_, ty) -> ty
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(amap, mi, _, m) -> 
               Import.ImportProvidedType amap m (mi.PApply((fun mi -> nonNull mi.DeclaringType), m))
 #endif
@@ -1006,7 +1006,7 @@ type MethInfo =
         match x with
         | ILMeth _ -> None
         | FSMeth _  -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth (_, mb, _, m) ->
             let staticParams = mb.PApplyWithProvider((fun (mb, provider) -> mb.GetStaticParametersForMethod provider), range=m)
             let staticParams = staticParams.PApplyArray(id, "GetStaticParametersForMethod", m)
@@ -1021,7 +1021,7 @@ type MethInfo =
         match x with
         | ILMeth(_, _, pri) -> pri
         | FSMeth(_, _, _, pri) -> pri
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, _, pri, _) -> pri
 #endif
         | DefaultStructCtor _ -> None
@@ -1036,7 +1036,7 @@ type MethInfo =
         match x with
         | ILMeth(_, y, _) -> "ILMeth: " + y.ILName
         | FSMeth(_, _, vref, _) -> "FSMeth: " + vref.LogicalName
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> "ProvidedMeth: " + mi.PUntaint((fun mi -> mi.Name), m)
 #endif
         | DefaultStructCtor _ -> ".ctor"
@@ -1046,7 +1046,7 @@ type MethInfo =
         match x with
         | ILMeth(_, y, _) -> y.ILName
         | FSMeth(_, _, vref, _) -> vref.LogicalName
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.Name), m)
 #endif
         | DefaultStructCtor _ -> ".ctor"
@@ -1067,7 +1067,7 @@ type MethInfo =
     member x.HasDirectXmlComment =
         match x with
         | FSMeth(g, _, vref, _) -> valRefInThisAssembly g.compilingFslib vref
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> true
 #endif
         | _ -> false
@@ -1086,7 +1086,7 @@ type MethInfo =
         | ILMeth(g, _, _) -> g
         | FSMeth(g, _, _, _) -> g
         | DefaultStructCtor (g, _) -> g
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(amap, _, _, _) -> amap.g
 #endif
 
@@ -1101,7 +1101,7 @@ type MethInfo =
             let _, memberMethodTypars, _, _ = AnalyzeTypeOfMemberVal x.IsCSharpStyleExtensionMember g (ty, vref)
             memberMethodTypars
         | DefaultStructCtor _ -> []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> [] // There will already have been an error if there are generic parameters here.
 #endif
 
@@ -1116,7 +1116,7 @@ type MethInfo =
         | ILMeth _ -> XmlDoc.Empty
         | FSMeth(_, _, vref, _) -> vref.XmlDoc
         | DefaultStructCtor _ -> XmlDoc.Empty
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m)->
             let lines = mi.PUntaint((fun mix -> (mix :> IProvidedCustomAttributeProvider).GetXmlDocAttributes(mi.TypeProvider.PUntaintNoFailure id)), m)
             XmlDoc (lines, m)
@@ -1136,7 +1136,7 @@ type MethInfo =
         | ILMeth(_, ilminfo, _) -> [ilminfo.NumParams]
         | FSMeth(g, _, vref, _) -> GetArgInfosOfMember x.IsCSharpStyleExtensionMember g vref |> List.map List.length
         | DefaultStructCtor _ -> [0]
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> [mi.PUntaint((fun mi -> mi.GetParameters().Length), m)] // Why is this a list? Answer: because the method might be curried
 #endif
 
@@ -1148,7 +1148,7 @@ type MethInfo =
         | ILMeth(_, ilmeth, _) -> ilmeth.IsInstance
         | FSMeth(_, _, vref, _) -> vref.IsInstanceMember || x.IsCSharpStyleExtensionMember
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> not mi.IsConstructor && not mi.IsStatic), m)
 #endif
 
@@ -1161,7 +1161,7 @@ type MethInfo =
         | ILMeth(_, ilmeth, _) -> ilmeth.IsProtectedAccessibility
         | FSMeth _ -> false
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsFamily), m)
 #endif
 
@@ -1170,7 +1170,7 @@ type MethInfo =
         | ILMeth(_, ilmeth, _) -> ilmeth.IsVirtual
         | FSMeth(_, _, vref, _) -> vref.IsVirtualMember
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsVirtual), m)
 #endif
 
@@ -1179,7 +1179,7 @@ type MethInfo =
         | ILMeth(_, ilmeth, _) -> ilmeth.IsConstructor
         | FSMeth(_g, _, vref, _) -> (vref.MemberInfo.Value.MemberFlags.MemberKind = SynMemberKind.Constructor)
         | DefaultStructCtor _ -> true
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsConstructor), m)
 #endif
 
@@ -1191,7 +1191,7 @@ type MethInfo =
              | ValueSome x -> x.IsClassConstructor
              | _ -> false
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsConstructor && mi.IsStatic), m) // Note: these are never public anyway
 #endif
 
@@ -1202,7 +1202,7 @@ type MethInfo =
             isInterfaceTy g x.ApparentEnclosingType  ||
             vref.MemberInfo.Value.MemberFlags.IsDispatchSlot
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> x.IsVirtual // Note: follow same implementation as ILMeth
 #endif
 
@@ -1213,7 +1213,7 @@ type MethInfo =
         | ILMeth(_, ilmeth, _) -> ilmeth.IsFinal
         | FSMeth(_g, _, _vref, _) -> false
         | DefaultStructCtor _ -> true
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsFinal), m)
 #endif
 
@@ -1228,7 +1228,7 @@ type MethInfo =
         | ILMeth(_, ilmeth, _) -> ilmeth.IsAbstract
         | FSMeth(g, _, vref, _)  -> isInterfaceTy g minfo.ApparentEnclosingType  || vref.IsDispatchSlotMember
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsAbstract), m)
 #endif
 
@@ -1237,7 +1237,7 @@ type MethInfo =
           (match x with
            | ILMeth(_, x, _) -> x.IsNewSlot || (isInterfaceTy x.TcGlobals x.ApparentEnclosingType && not x.IsFinal)
            | FSMeth(_, _, vref, _) -> vref.IsDispatchSlotMember
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
            | ProvidedMeth(_, mi, _, m) -> mi.PUntaint((fun mi -> mi.IsHideBySig), m) // REVIEW: Check this is correct
 #endif
            | DefaultStructCtor _ -> false))
@@ -1254,7 +1254,7 @@ type MethInfo =
         | ILMeth _ -> false
         | FSMeth(g, _, vref, _) -> vref.IsFSharpExplicitInterfaceImplementation g
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> false
 #endif
 
@@ -1264,7 +1264,7 @@ type MethInfo =
         | ILMeth _ -> false
         | FSMeth(_, _, vref, _) -> vref.IsDefiniteFSharpOverrideMember
         | DefaultStructCtor _ -> false
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> false
 #endif
 
@@ -1316,7 +1316,7 @@ type MethInfo =
     member x.IsFSharpEventPropertyMethod =
         match x with
         | FSMeth(g, _, vref, _)  -> vref.IsFSharpEventProperty g
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ -> false
 #endif
         | _ -> false
@@ -1369,7 +1369,7 @@ type MethInfo =
         | ILMeth(_, x1, _), ILMeth(_, x2, _) -> (x1.RawMetadata ===  x2.RawMetadata)
         | FSMeth(g, _, vref1, _), FSMeth(_, _, vref2, _)  -> valRefEq g vref1 vref2
         | DefaultStructCtor _, DefaultStructCtor _ -> tyconRefEq x1.TcGlobals x1.DeclaringTyconRef x2.DeclaringTyconRef
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi1, _, _), ProvidedMeth(_, mi2, _, _)  -> ProvidedMethodBase.TaintedEquals (mi1, mi2)
 #endif
         | _ -> false
@@ -1381,7 +1381,7 @@ type MethInfo =
         | FSMeth(_, _, vref, _) -> hash vref.LogicalName
         | DefaultStructCtor(_, _ty) -> 34892 // "ty" doesn't support hashing. We could use "hash (tcrefOfAppTy g ty).CompiledName" or
                                            // something but we don't have a "g" parameter here yet. But this hash need only be very approximate anyway
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(_, mi, _, _) -> ProvidedMethodInfo.TaintedGetHashCode mi
 #endif
 
@@ -1394,7 +1394,7 @@ type MethInfo =
             | ILMethInfo(_, ty, Some declaringTyconRef, md, _) -> MethInfo.CreateILExtensionMeth(amap, m, instType inst ty, declaringTyconRef, pri, md)
         | FSMeth(g, ty, vref, pri) -> FSMeth(g, instType inst ty, vref, pri)
         | DefaultStructCtor(g, ty) -> DefaultStructCtor(g, instType inst ty)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth _ ->
             match inst with
             | [] -> x
@@ -1412,7 +1412,7 @@ type MethInfo =
             let _, _, retTy, _ = AnalyzeTypeOfMemberVal x.IsCSharpStyleExtensionMember g (ty, vref)
             retTy |> Option.map (instType inst)
         | DefaultStructCtor _ -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(amap, mi, _, m) ->
             GetCompiledReturnTyOfProvidedMethodInfo amap m mi
 #endif
@@ -1432,7 +1432,7 @@ type MethInfo =
             let inst = GetInstantiationForMemberVal g x.IsCSharpStyleExtensionMember (ty, vref, minst)
             paramTypes |> List.mapSquared (fun (ParamNameAndType(_, ty)) -> instType inst ty)
         | DefaultStructCtor _ -> []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(amap, mi, _, m) ->
             // A single group of tupled arguments
             [ [ for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do
@@ -1456,7 +1456,7 @@ type MethInfo =
                     [ ty ]
             else []
         | DefaultStructCtor _ -> []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(amap, mi, _, m) -> 
             if x.IsInstance then [ Import.ImportProvidedType amap m (mi.PApply((fun mi -> nonNull mi.DeclaringType), m)) ] // find the type of the 'this' argument
             else []
@@ -1563,7 +1563,7 @@ type MethInfo =
         | DefaultStructCtor _ ->
             [[]]
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedMeth(amap, mi, _, _) ->
             // A single group of tupled arguments
             [ [for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do
@@ -1628,7 +1628,7 @@ type MethInfo =
                                 let paramType = ImportILTypeFromMetadataWithAttributes amap m ftinfo.ILScopeRef ftinfo.TypeInstOfRawMetadata formalMethTyparTys p.Type p.CustomAttrs
                                 yield TSlotParam(p.Name, paramType, p.IsIn, p.IsOut, p.IsOptional, []) ] ]
                     formalRetTy, formalParams
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 | ProvidedMeth (_, mi, _, _) ->
                     // GENERIC TYPE PROVIDERS: for generics, formal types should be  generated here, not the actual types
                     // For non-generic type providers there is no difference
@@ -1660,7 +1660,7 @@ type MethInfo =
                 items |> ParamNameAndType.InstantiateCurried inst
             | DefaultStructCtor _ ->
                 [[]]
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedMeth(amap, mi, _, _) ->
                 // A single set of tupled parameters
                 [ [for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do
@@ -1713,7 +1713,7 @@ type MethInfo =
 type ILFieldInfo =
      /// Represents a single use of a field backed by Abstract IL metadata
     | ILFieldInfo of ilTypeInfo: ILTypeInfo * ilFieldDef: ILFieldDef
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
      /// Represents a single use of a field backed by provided metadata
     | ProvidedField of amap: Import.ImportMap * providedField: Tainted * range: range
 #endif
@@ -1722,7 +1722,7 @@ type ILFieldInfo =
     member x.ApparentEnclosingType =
         match x with
         | ILFieldInfo(tinfo, _) -> tinfo.ToType
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(amap, fi, m) -> (Import.ImportProvidedType amap m (fi.PApply((fun fi -> nonNull fi.DeclaringType), m)))
 #endif
 
@@ -1735,7 +1735,7 @@ type ILFieldInfo =
     member x.TcGlobals =
         match x with
         | ILFieldInfo(tinfo, _) -> tinfo.TcGlobals
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(amap, _, _) -> amap.g
 #endif
 
@@ -1743,7 +1743,7 @@ type ILFieldInfo =
     member x.ILTypeRef =
         match x with
         | ILFieldInfo(tinfo, _) -> tinfo.ILTypeRef
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(amap, fi, m) -> (Import.ImportProvidedTypeAsILType amap m (fi.PApply((fun fi -> nonNull fi.DeclaringType), m))).TypeRef
 #endif
 
@@ -1754,7 +1754,7 @@ type ILFieldInfo =
     member x.TypeInst =
         match x with
         | ILFieldInfo(tinfo, _) -> tinfo.TypeInstOfRawMetadata
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField _ -> [] /// GENERIC TYPE PROVIDERS
 #endif
 
@@ -1762,7 +1762,7 @@ type ILFieldInfo =
     member x.FieldName =
         match x with
         | ILFieldInfo(_, pd) -> pd.Name
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(_, fi, m) -> fi.PUntaint((fun fi -> fi.Name), m)
 #endif
 
@@ -1770,7 +1770,7 @@ type ILFieldInfo =
     member x.IsInitOnly =
         match x with
         | ILFieldInfo(_, pd) -> pd.IsInitOnly
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(_, fi, m) -> fi.PUntaint((fun fi -> fi.IsInitOnly), m)
 #endif
 
@@ -1778,7 +1778,7 @@ type ILFieldInfo =
     member x.IsValueType =
         match x with
         | ILFieldInfo(tinfo, _) -> tinfo.IsValueType
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(amap, _, _) -> isStructTy amap.g x.ApparentEnclosingType
 #endif
 
@@ -1786,7 +1786,7 @@ type ILFieldInfo =
     member x.IsStatic =
         match x with
         | ILFieldInfo(_, pd) -> pd.IsStatic
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(_, fi, m) -> fi.PUntaint((fun fi -> fi.IsStatic), m)
 #endif
 
@@ -1794,7 +1794,7 @@ type ILFieldInfo =
     member x.IsSpecialName =
         match x with
         | ILFieldInfo(_, pd) -> pd.IsSpecialName
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(_, fi, m) -> fi.PUntaint((fun fi -> fi.IsSpecialName), m)
 #endif
 
@@ -1802,7 +1802,7 @@ type ILFieldInfo =
     member x.LiteralValue =
         match x with
         | ILFieldInfo(_, pd) -> if pd.IsLiteral then pd.LiteralValue else None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(_, fi, m) ->
             if fi.PUntaint((fun fi -> fi.IsLiteral), m) then
                 Some (ILFieldInit.FromProvidedObj m (fi.PUntaint((fun fi -> fi.GetRawConstantValue()), m)))
@@ -1814,7 +1814,7 @@ type ILFieldInfo =
     member x.ILFieldType =
         match x with
         | ILFieldInfo (_, fdef) -> fdef.FieldType
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(amap, fi, m) -> Import.ImportProvidedTypeAsILType amap m (fi.PApply((fun fi -> fi.FieldType), m))
 #endif
 
@@ -1822,7 +1822,7 @@ type ILFieldInfo =
     member x.FieldType(amap, m) =
         match x with
         | ILFieldInfo (tinfo, fdef) -> ImportILTypeFromMetadata amap m tinfo.ILScopeRef tinfo.TypeInstOfRawMetadata [] fdef.FieldType
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(amap, fi, m) -> Import.ImportProvidedType amap m (fi.PApply((fun fi -> fi.FieldType), m))
 #endif
 
@@ -1831,7 +1831,7 @@ type ILFieldInfo =
     static member ILFieldInfosUseIdenticalDefinitions x1 x2 =
         match x1, x2 with
         | ILFieldInfo(_, x1), ILFieldInfo(_, x2) -> (x1 === x2)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedField(_, fi1, _), ProvidedField(_, fi2, _)-> ProvidedFieldInfo.TaintedEquals (fi1, fi2)
         | _ -> false
 #endif
@@ -2015,7 +2015,7 @@ type PropInfo =
     /// An F# use of a property backed by Abstract IL metadata
     | ILProp of ilPropInfo: ILPropInfo
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// An F# use of a property backed by provided metadata
     | ProvidedProp of amap: Import.ImportMap * providedProp: Tainted * range: range
 #endif
@@ -2027,7 +2027,7 @@ type PropInfo =
         match x with
         | ILProp ilpinfo -> ilpinfo.ILTypeInfo.ToType
         | FSProp(_, ty, _, _) -> ty
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(amap, pi, m) -> 
             Import.ImportProvidedType amap m (pi.PApply((fun pi -> nonNull pi.DeclaringType), m)) 
 #endif
@@ -2062,7 +2062,7 @@ type PropInfo =
         match x with
         | FSProp(g, _, Some vref, _)
         | FSProp(g, _, _, Some vref) -> valRefInThisAssembly g.compilingFslib vref
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp _ -> true
 #endif
         | _ -> false
@@ -2073,7 +2073,7 @@ type PropInfo =
         | ILProp ilpinfo -> ilpinfo.PropertyName
         | FSProp(_, _, Some vref, _)
         | FSProp(_, _, _, Some vref) -> vref.PropertyName
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) -> pi.PUntaint((fun pi -> pi.Name), m)
 #endif
         | FSProp _ -> failwith "unreachable"
@@ -2083,7 +2083,7 @@ type PropInfo =
         match x with
         | ILProp ilpinfo-> ilpinfo.HasGetter
         | FSProp(_, _, x, _) -> Option.isSome x
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) -> pi.PUntaint((fun pi -> pi.CanRead), m)
 #endif
 
@@ -2092,7 +2092,7 @@ type PropInfo =
         match x with
         | ILProp ilpinfo -> ilpinfo.HasSetter
         | FSProp(_, _, _, x) -> Option.isSome x
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) -> pi.PUntaint((fun pi -> pi.CanWrite), m)
 #endif
 
@@ -2110,7 +2110,7 @@ type PropInfo =
         | FSProp(_, _, Some vref, _)
         | FSProp(_, _, _, Some vref) -> vref.IsVirtualMember
         | FSProp _-> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             let mi = ArbitraryMethodInfoOfPropertyInfo pi m
             mi.PUntaint((fun mi -> mi.IsVirtual), m)
@@ -2123,7 +2123,7 @@ type PropInfo =
         | FSProp(_, _, Some vref, _)
         | FSProp(_, _, _, Some vref) -> vref.IsDispatchSlotMember
         | FSProp(_, _, None, None) -> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             let mi = ArbitraryMethodInfoOfPropertyInfo pi m
             mi.PUntaint((fun mi -> mi.IsHideBySig), m)
@@ -2138,7 +2138,7 @@ type PropInfo =
         | FSProp(g, ty, _, Some vref) ->
             isInterfaceTy g ty  || vref.MemberInfo.Value.MemberFlags.IsDispatchSlot
         | FSProp _ -> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             let mi = ArbitraryMethodInfoOfPropertyInfo pi m
             mi.PUntaint((fun mi -> mi.IsVirtual), m)
@@ -2151,7 +2151,7 @@ type PropInfo =
         | FSProp(_, _, Some vref, _)
         | FSProp(_, _, _, Some vref) -> not vref.IsInstanceMember
         | FSProp(_, _, None, None) -> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             (ArbitraryMethodInfoOfPropertyInfo pi m).PUntaint((fun mi -> mi.IsStatic), m)
 #endif
@@ -2186,7 +2186,7 @@ type PropInfo =
             arginfos.Length = 1 && arginfos.Head.Length >= 2
         | FSProp(_, _, None, None) ->
             failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             pi.PUntaint((fun pi -> pi.GetIndexParameters().Length), m)>0
 #endif
@@ -2195,7 +2195,7 @@ type PropInfo =
     member x.IsFSharpEventProperty =
         match x with
         | FSProp(g, _, Some vref, None)  -> vref.IsFSharpEventProperty g
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp _ -> false
 #endif
         | _ -> false
@@ -2222,7 +2222,7 @@ type PropInfo =
         | FSProp(_, _, Some vref, _)
         | FSProp(_, _, _, Some vref) -> vref.XmlDoc
         | FSProp(_, _, None, None) -> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             let lines = pi.PUntaint((fun pix -> (pix :> IProvidedCustomAttributeProvider).GetXmlDocAttributes(pi.TypeProvider.PUntaintNoFailure id)), m)
             XmlDoc (lines, m)
@@ -2233,7 +2233,7 @@ type PropInfo =
         match x with
         | ILProp ilpinfo -> ilpinfo.TcGlobals
         | FSProp(g, _, _, _) -> g
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(amap, _, _) -> amap.g
 #endif
 
@@ -2253,7 +2253,7 @@ type PropInfo =
             ReturnTypeOfPropertyVal g vref.Deref |> instType inst
 
         | FSProp _ -> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, m) ->
             Import.ImportProvidedType amap m (pi.PApply((fun pi -> pi.PropertyType), m))
 #endif
@@ -2269,7 +2269,7 @@ type PropInfo =
             let inst = GetInstantiationForPropertyVal g (ty, vref)
             ArgInfosOfPropertyVal g vref.Deref |> List.map (ParamNameAndType.FromArgInfo >> ParamNameAndType.Instantiate inst)
         | FSProp _ -> failwith "unreachable"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp (_, pi, m) ->
             [ for p in pi.PApplyArray((fun pi -> pi.GetIndexParameters()), "GetIndexParameters", m) do
                 let paramName = p.PUntaint((fun p -> match p.Name with "" -> None | s -> Some (mkSynId m s)), m)
@@ -2291,7 +2291,7 @@ type PropInfo =
         match x with
         | ILProp ilpinfo -> ILMeth(x.TcGlobals, ilpinfo.GetterMethod, None)
         | FSProp(g, ty, Some vref, _) -> FSMeth(g, ty, vref, None)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(amap, pi, m) ->
             let meth = GetAndSanityCheckProviderMethod m pi (fun pi -> pi.GetGetMethod()) FSComp.SR.etPropertyCanReadButHasNoGetter
             ProvidedMeth(amap, meth, None, m)
@@ -2304,7 +2304,7 @@ type PropInfo =
         match x with
         | ILProp ilpinfo -> ILMeth(x.TcGlobals, ilpinfo.SetterMethod, None)
         | FSProp(g, ty, _, Some vref) -> FSMeth(g, ty, vref, None)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(amap, pi, m) ->
             let meth = GetAndSanityCheckProviderMethod m pi (fun pi -> pi.GetSetMethod()) FSComp.SR.etPropertyCanWriteButHasNoSetter
             ProvidedMeth(amap, meth, None, m)
@@ -2323,7 +2323,7 @@ type PropInfo =
         | ILProp ilpinfo1, ILProp ilpinfo2 -> (ilpinfo1.RawMetadata === ilpinfo2.RawMetadata)
         | FSProp(g, _, vrefa1, vrefb1), FSProp(_, _, vrefa2, vrefb2) ->
             (optVrefEq g (vrefa1, vrefa2)) && (optVrefEq g (vrefb1, vrefb2))
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi1, _), ProvidedProp(_, pi2, _) -> ProvidedPropertyInfo.TaintedEquals (pi1, pi2)
 #endif
         | _ -> false
@@ -2336,7 +2336,7 @@ type PropInfo =
             // Hash on option*option
             let vth = (vrefOpt1 |> Option.map (fun vr -> vr.LogicalName), (vrefOpt2 |> Option.map (fun vr -> vr.LogicalName)))
             hash vth
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedProp(_, pi, _) -> ProvidedPropertyInfo.TaintedGetHashCode pi
 #endif
 
@@ -2431,7 +2431,7 @@ type EventInfo =
     /// An F# use of an event backed by .NET metadata
     | ILEvent of ilEventInfo: ILEventInfo
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// An F# use of an event backed by provided metadata
     | ProvidedEvent of amap: Import.ImportMap * providedEvent: Tainted * range: range
 #endif
@@ -2443,7 +2443,7 @@ type EventInfo =
         match x with
         | ILEvent ileinfo -> ileinfo.ApparentEnclosingType
         | FSEvent (_, p, _, _) -> p.ApparentEnclosingType
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (amap, ei, m) -> Import.ImportProvidedType amap m (ei.PApply((fun ei -> nonNull ei.DeclaringType), m)) 
 #endif
     /// Get the enclosing type of the method info, using a nominal type for tuple types
@@ -2467,7 +2467,7 @@ type EventInfo =
     member x.HasDirectXmlComment =
         match x with
         | FSEvent (_, p, _, _) -> p.HasDirectXmlComment
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent _ -> true
 #endif
         | _ -> false
@@ -2477,7 +2477,7 @@ type EventInfo =
         match x with
         | ILEvent _ -> XmlDoc.Empty
         | FSEvent (_, p, _, _) -> p.XmlDoc
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (_, ei, m) ->
             let lines = ei.PUntaint((fun eix -> (eix :> IProvidedCustomAttributeProvider).GetXmlDocAttributes(ei.TypeProvider.PUntaintNoFailure id)), m)
             XmlDoc (lines, m)
@@ -2488,7 +2488,7 @@ type EventInfo =
         match x with
         | ILEvent ileinfo -> ileinfo.EventName
         | FSEvent (_, p, _, _) -> p.PropertyName
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (_, ei, m) -> ei.PUntaint((fun ei -> ei.Name), m)
 #endif
 
@@ -2497,7 +2497,7 @@ type EventInfo =
         match x with
         | ILEvent ileinfo -> ileinfo.IsStatic
         | FSEvent (_, p, _, _) -> p.IsStatic
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (_, ei, m) ->
             let meth = GetAndSanityCheckProviderMethod m ei (fun ei -> ei.GetAddMethod()) FSComp.SR.etEventNoAdd
             meth.PUntaint((fun mi -> mi.IsStatic), m)
@@ -2508,7 +2508,7 @@ type EventInfo =
         match x with
         | ILEvent _ -> false
         | FSEvent (_, p, _, _) -> p.IsExtensionMember
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent _ -> false
 #endif
 
@@ -2517,7 +2517,7 @@ type EventInfo =
         match x with
         | ILEvent ileinfo -> ileinfo.TcGlobals
         | FSEvent(g, _, _, _) -> g
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (amap, _, _) -> amap.g
 #endif
 
@@ -2531,7 +2531,7 @@ type EventInfo =
         match x with
         | ILEvent ileinfo -> ILMeth(ileinfo.TcGlobals, ileinfo.AddMethod, None)
         | FSEvent(g, p, addValRef, _) -> FSMeth(g, p.ApparentEnclosingType, addValRef, None)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (amap, ei, m) ->
             let meth = GetAndSanityCheckProviderMethod m ei (fun ei -> ei.GetAddMethod()) FSComp.SR.etEventNoAdd
             ProvidedMeth(amap, meth, None, m)
@@ -2542,7 +2542,7 @@ type EventInfo =
         match x with
         | ILEvent ileinfo -> ILMeth(x.TcGlobals, ileinfo.RemoveMethod, None)
         | FSEvent(g, p, _, removeValRef) -> FSMeth(g, p.ApparentEnclosingType, removeValRef, None)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (amap, ei, m) ->
             let meth = GetAndSanityCheckProviderMethod m ei (fun ei -> ei.GetRemoveMethod()) FSComp.SR.etEventNoRemove
             ProvidedMeth(amap, meth, None, m)
@@ -2565,7 +2565,7 @@ type EventInfo =
 
         | FSEvent(g, p, _, _) ->
             FindDelegateTypeOfPropertyEvent g amap x.EventName m (p.GetPropertyType(amap, m))
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (_, ei, _) ->
             Import.ImportProvidedType amap m (ei.PApply((fun ei -> ei.EventHandlerType), m))
 #endif
@@ -2577,7 +2577,7 @@ type EventInfo =
         | FSEvent(g, pi1, vrefa1, vrefb1), FSEvent(_, pi2, vrefa2, vrefb2) ->
             PropInfo.PropInfosUseIdenticalDefinitions pi1 pi2 && valRefEq g vrefa1 vrefa2 && valRefEq g vrefb1 vrefb2
         | ILEvent ileinfo1, ILEvent ileinfo2 -> (ileinfo1.RawMetadata === ileinfo2.RawMetadata)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (_, ei1, _), ProvidedEvent (_, ei2, _) -> ProvidedEventInfo.TaintedEquals (ei1, ei2)
 #endif
         | _ -> false
@@ -2588,7 +2588,7 @@ type EventInfo =
         match ei with
         | ILEvent ileinfo -> hash ileinfo.RawMetadata.Name
         | FSEvent(_, pi, vref1, vref2) -> hash ( pi.ComputeHashCode(), vref1.LogicalName, vref2.LogicalName)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedEvent (_, ei, _) -> ProvidedEventInfo.TaintedGetHashCode ei
 #endif
     override x.ToString() = "event " + x.EventName
diff --git a/src/fsharp/infos.fsi b/src/fsharp/infos.fsi
index 44e9bff3053..648587d0cd1 100644
--- a/src/fsharp/infos.fsi
+++ b/src/fsharp/infos.fsi
@@ -12,7 +12,7 @@ open FSharp.Compiler.Xml
 open FSharp.Compiler.TypedTree
 open FSharp.Compiler.TypedTreeOps
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 open FSharp.Compiler.ExtensionTyping
 #endif
 
@@ -122,7 +122,7 @@ type ValRef with
 
     member ImplementedSlotSignatures: SlotSig list
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// Get the return type of a provided method, where 'void' is returned as 'None'
 val GetCompiledReturnTyOfProvidedMethodInfo: amap:ImportMap ->m:range -> mi:Tainted -> TType option
 #endif
@@ -366,7 +366,7 @@ type MethInfo =
     /// Describes a use of a pseudo-method corresponding to the default constructor for a .NET struct type
     | DefaultStructCtor of tcGlobals: TcGlobals * structTy: TType
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Describes a use of a method backed by provided metadata
     | ProvidedMeth of amap: ImportMap * methodBase: Tainted * extensionMethodPriority: ExtensionMethodPriority option * m: range
 #endif
@@ -502,7 +502,7 @@ type MethInfo =
     member NumArgs: int list
 
 /// Get the information about provided static parameters, if any
-#if NO_EXTENSIONTYPING
+#if NO_TYPEPROVIDERS
     member ProvidedStaticParameterInfo: obj option
 #else
     member ProvidedStaticParameterInfo: (Tainted * Tainted []) option
@@ -583,7 +583,7 @@ type ILFieldInfo =
      /// Represents a single use of a field backed by Abstract IL metadata
     | ILFieldInfo of ilTypeInfo: ILTypeInfo * ilFieldDef: ILFieldDef
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
      /// Represents a single use of a field backed by provided metadata
     | ProvidedField of amap: ImportMap * providedField: Tainted * range: range
 #endif
@@ -795,7 +795,7 @@ type PropInfo =
     /// An F# use of a property backed by Abstract IL metadata
     | ILProp of ilPropInfo: ILPropInfo
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// An F# use of a property backed by provided metadata
     | ProvidedProp of amap: ImportMap * providedProp: Tainted * range: range
 #endif
@@ -955,7 +955,7 @@ type EventInfo =
     /// An F# use of an event backed by .NET metadata
     | ILEvent of ilEventInfo: ILEventInfo
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// An F# use of an event backed by provided metadata
     | ProvidedEvent of amap: ImportMap * providedEvent: Tainted * range: range
 #endif
diff --git a/src/fsharp/service/FSharpCheckerResults.fs b/src/fsharp/service/FSharpCheckerResults.fs
index d945fc786a6..2f0159c5254 100644
--- a/src/fsharp/service/FSharpCheckerResults.fs
+++ b/src/fsharp/service/FSharpCheckerResults.fs
@@ -674,7 +674,7 @@ type internal TypeCheckInfo
                 nameMatchesResidue n1 ||
                 meths |> List.exists (fun meth ->
                     let tcref = meth.ApparentEnclosingTyconRef
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                     tcref.IsProvided ||
 #endif
                     nameMatchesResidue tcref.DisplayName)
@@ -1463,7 +1463,7 @@ type internal TypeCheckInfo
                     |> FindDeclResult.DeclFound
                 | None ->
                     match item.Item with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 // provided items may have TypeProviderDefinitionLocationAttribute that binds them to some location
                     | Item.CtorGroup  (name, ProvidedMeth _::_   )
                     | Item.MethodGroup(name, ProvidedMeth _::_, _)
@@ -1614,7 +1614,7 @@ module internal ParseAndCheckFile =
                             errorCount <- errorCount + 1
 
                 match exn with
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 | { Exception = :? TypeProviderError as tpe } -> tpe.Iter(fun e -> report { exn with Exception = e })
 #endif
                 | e -> report e
diff --git a/src/fsharp/service/IncrementalBuild.fs b/src/fsharp/service/IncrementalBuild.fs
index d039c61c5c5..8e6630ef80d 100644
--- a/src/fsharp/service/IncrementalBuild.fs
+++ b/src/fsharp/service/IncrementalBuild.fs
@@ -760,7 +760,7 @@ module IncrementalBuilderHelpers =
           node {
             try
                 let! tcImports = TcImports.BuildNonFrameworkTcImports(tcConfigP, frameworkTcImports, nonFrameworkResolutions, unresolvedReferences, dependencyProvider)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 tcImports.GetCcusExcludingBase() |> Seq.iter (fun ccu ->
                     // When a CCU reports an invalidation, merge them together and just report a
                     // general "imports invalidated". This triggers a rebuild.
@@ -951,7 +951,7 @@ type IncrementalBuilderInitialState =
         fileChecked: Event
         fileParsed: Event
         projectChecked: Event
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         importsInvalidatedByTypeProvider: Event
 #endif
         allDependencies: string []
@@ -971,7 +971,7 @@ type IncrementalBuilderInitialState =
                             enablePartialTypeChecking,
                             beforeFileChecked: Event,
                             fileChecked: Event,
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                             importsInvalidatedByTypeProvider: Event,
 #endif
                             allDependencies,
@@ -992,14 +992,14 @@ type IncrementalBuilderInitialState =
                 fileChecked = fileChecked
                 fileParsed = Event()
                 projectChecked = Event()
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                 importsInvalidatedByTypeProvider = importsInvalidatedByTypeProvider
 #endif
                 allDependencies = allDependencies
                 defaultTimeStamp = defaultTimeStamp
                 isImportsInvalidated = false
             }
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         importsInvalidatedByTypeProvider.Publish.Add(fun () -> initialState.isImportsInvalidated <- true)
 #endif
         initialState
@@ -1164,7 +1164,7 @@ type IncrementalBuilder(initialState: IncrementalBuilderInitialState, state: Inc
     let fileNames = initialState.fileNames
     let beforeFileChecked = initialState.beforeFileChecked
     let fileChecked = initialState.fileChecked
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let importsInvalidatedByTypeProvider = initialState.importsInvalidatedByTypeProvider
 #endif
     let allDependencies = initialState.allDependencies
@@ -1236,7 +1236,7 @@ type IncrementalBuilder(initialState: IncrementalBuilderInitialState, state: Inc
 
     member _.ProjectChecked = projectChecked.Publish
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member _.ImportsInvalidatedByTypeProvider = importsInvalidatedByTypeProvider.Publish
 #endif
 
@@ -1546,7 +1546,7 @@ type IncrementalBuilder(initialState: IncrementalBuilderInitialState, state: Inc
             let beforeFileChecked = Event()
             let fileChecked = Event()
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             let importsInvalidatedByTypeProvider = Event()
 #endif
 
@@ -1624,7 +1624,7 @@ type IncrementalBuilder(initialState: IncrementalBuilderInitialState, state: Inc
                     enablePartialTypeChecking,
                     beforeFileChecked,
                     fileChecked,
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                     importsInvalidatedByTypeProvider,
 #endif
                     allDependencies,
diff --git a/src/fsharp/service/IncrementalBuild.fsi b/src/fsharp/service/IncrementalBuild.fsi
index 015c88db66d..7896197ba95 100755
--- a/src/fsharp/service/IncrementalBuild.fsi
+++ b/src/fsharp/service/IncrementalBuild.fsi
@@ -152,7 +152,7 @@ type internal IncrementalBuilder =
       /// overall analysis results for the project will be quick.
       member ProjectChecked : IEvent
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
       /// Raised when the build is invalidated.
       member ImportsInvalidatedByTypeProvider : IEvent
 #endif
diff --git a/src/fsharp/service/SemanticClassification.fs b/src/fsharp/service/SemanticClassification.fs
index de290aec655..c998e556cd2 100644
--- a/src/fsharp/service/SemanticClassification.fs
+++ b/src/fsharp/service/SemanticClassification.fs
@@ -283,7 +283,7 @@ module TcResolutionsExtensions =
                                     SemanticClassificationType.Delegate
                             | TAsmRepr _ -> SemanticClassificationType.TypeDef
                             | TMeasureableRepr _-> SemanticClassificationType.TypeDef 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                             | TProvidedTypeRepr _-> SemanticClassificationType.TypeDef 
                             | TProvidedNamespaceRepr  _-> SemanticClassificationType.TypeDef  
 #endif
diff --git a/src/fsharp/service/ServiceAssemblyContent.fs b/src/fsharp/service/ServiceAssemblyContent.fs
index 52387f071e3..9e3e25b743f 100644
--- a/src/fsharp/service/ServiceAssemblyContent.fs
+++ b/src/fsharp/service/ServiceAssemblyContent.fs
@@ -190,7 +190,7 @@ module AssemblyContent =
     let rec traverseEntity contentType (parent: Parent) (entity: FSharpEntity) = 
 
         seq { 
-#if !NO_EXTENSIONTYPING 
+#if !NO_TYPEPROVIDERS 
               if not entity.IsProvided then
 #endif
                 match contentType, entity.Accessibility.IsPublic with
@@ -267,7 +267,7 @@ module AssemblyContent =
         // on-demand.  However a more compete review may be warranted.
         use _ignoreAllDiagnostics = new ErrorScope()  
 
-#if !NO_EXTENSIONTYPING 
+#if !NO_TYPEPROVIDERS 
         match assemblies |> List.filter (fun x -> not x.IsProviderGenerated), fileName with
 #else
         match assemblies, fileName with
diff --git a/src/fsharp/service/ServiceDeclarationLists.fs b/src/fsharp/service/ServiceDeclarationLists.fs
index 39b566be2ec..47ce6b6a8de 100644
--- a/src/fsharp/service/ServiceDeclarationLists.fs
+++ b/src/fsharp/service/ServiceDeclarationLists.fs
@@ -593,7 +593,7 @@ module internal DescriptionListsImpl =
         prettyTyparInst, parameters, prettyRetTyL, prettyConstraintsL
                           
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
     /// Get the set of static parameters associated with an item
     let StaticParamsOfItem (infoReader:InfoReader) m denv item = 
@@ -804,7 +804,7 @@ module internal DescriptionListsImpl =
                 else                      FSharpGlyph.Delegate
             | TAsmRepr _ -> FSharpGlyph.Typedef
             | TMeasureableRepr _-> FSharpGlyph.Typedef 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | TProvidedTypeRepr _-> FSharpGlyph.Typedef 
             | TProvidedNamespaceRepr  _-> FSharpGlyph.Typedef  
 #endif
@@ -894,7 +894,7 @@ module internal DescriptionListsImpl =
         | Item.Property(_, pinfos) -> 
             let pinfo = List.head pinfos 
             if pinfo.IsIndexer then [item] else []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ItemIsWithStaticArguments m g _ -> 
             // we pretend that provided-types-with-static-args are method-like in order to get ParamInfo for them
             [item] 
@@ -1183,7 +1183,7 @@ type MethodGroup( name: string, unsortedMethods: MethodGroupItem[] ) =
 
                         let hasStaticParameters = 
                             match flatItem with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                             | ItemIsProvidedTypeWithStaticArguments m g _ -> false 
 #endif
                             | _ -> true
@@ -1196,7 +1196,7 @@ type MethodGroup( name: string, unsortedMethods: MethodGroupItem[] ) =
                           parameters = (prettyParams |> Array.ofList),
                           hasParameters = hasStaticParameters,
                           hasParamArrayArg = hasParamArrayArg,
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
                           staticParameters = StaticParamsOfItem infoReader m denv flatItem
 #else
                           staticParameters = [| |]
diff --git a/src/fsharp/service/service.fs b/src/fsharp/service/service.fs
index c18c9486bc1..e009bc23c61 100644
--- a/src/fsharp/service/service.fs
+++ b/src/fsharp/service/service.fs
@@ -316,7 +316,7 @@ type BackgroundCompiler(
         | None -> ()
         | Some builder -> 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             // Register the behaviour that responds to CCUs being invalidated because of type
             // provider Invalidate events. This invalidates the configuration in the build.
             builder.ImportsInvalidatedByTypeProvider.Add(fun () -> self.InvalidateConfiguration(options, userOpName))
diff --git a/src/fsharp/symbols/SymbolHelpers.fs b/src/fsharp/symbols/SymbolHelpers.fs
index 29e067df910..b870534c39d 100644
--- a/src/fsharp/symbols/SymbolHelpers.fs
+++ b/src/fsharp/symbols/SymbolHelpers.fs
@@ -259,14 +259,14 @@ module internal SymbolHelpers =
    
     let rangeOfPropInfo preferFlag (pinfo: PropInfo) =
         match pinfo with
-#if !NO_EXTENSIONTYPING 
+#if !NO_TYPEPROVIDERS 
         |   ProvidedProp(_, pi, _) -> Construct.ComputeDefinitionLocationOfProvidedItem pi
 #endif
         |   _ -> pinfo.ArbitraryValRef |> Option.map (rangeOfValRef preferFlag)
 
     let rangeOfMethInfo (g: TcGlobals) preferFlag (minfo: MethInfo) = 
         match minfo with
-#if !NO_EXTENSIONTYPING 
+#if !NO_TYPEPROVIDERS 
         |   ProvidedMeth(_, mi, _, _) -> Construct.ComputeDefinitionLocationOfProvidedItem mi
 #endif
         |   DefaultStructCtor(_, AppTy g (tcref, _)) -> Some(rangeOfEntityRef preferFlag tcref)
@@ -274,7 +274,7 @@ module internal SymbolHelpers =
 
     let rangeOfEventInfo preferFlag (einfo: EventInfo) = 
         match einfo with
-#if !NO_EXTENSIONTYPING 
+#if !NO_TYPEPROVIDERS 
         | ProvidedEvent (_, ei, _) -> Construct.ComputeDefinitionLocationOfProvidedItem ei
 #endif
         | _ -> einfo.ArbitraryValRef |> Option.map (rangeOfValRef preferFlag)
@@ -325,7 +325,7 @@ module internal SymbolHelpers =
 
     // Provided type definitions do not have a useful F# CCU for the purposes of goto-definition.
     let computeCcuOfTyconRef (tcref: TyconRef) = 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         if tcref.IsProvided then None else 
 #endif
         ccuOfTyconRef tcref
@@ -778,7 +778,7 @@ module internal SymbolHelpers =
             | _ -> false
         with _ -> false
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
     /// Determine if an item is a provided type 
     let (|ItemIsProvidedType|_|) g item =
@@ -853,7 +853,7 @@ module internal SymbolHelpers =
                 sprintf "%s.%s%s" typeString minfo.RawMetadata.Name paramString |> Some
 
             | DefaultStructCtor _  -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedMeth _ -> None
 #endif
              
@@ -886,7 +886,7 @@ module internal SymbolHelpers =
              match finfo with 
              | ILFieldInfo(tinfo, fdef) -> 
                  (tinfo.TyconRefOfRawMetadata |> ticksAndArgCountTextOfTyconRef) + "." + fdef.Name |> Some
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
              | ProvidedField _ -> None
 #endif
         | Item.Types(_, AppTy g (tcref, _) :: _) 
@@ -912,7 +912,7 @@ module internal SymbolHelpers =
                 // namespaces from type providers need to be handled separately because they don't have compiled representation
                 // otherwise we'll fail at tast.fs
                 match modref.Deref.TypeReprInfo with
-#if !NO_EXTENSIONTYPING                
+#if !NO_TYPEPROVIDERS                
                 | TProvidedNamespaceRepr _ -> 
                     modref.CompilationPathOpt
                     |> Option.bind (fun path ->
@@ -940,7 +940,7 @@ module internal SymbolHelpers =
                 let tcref = tinfo.TyconRefOfRawMetadata
                 (tcref |> ticksAndArgCountTextOfTyconRef)+"."+pdef.Name |> Some
             | FSProp _ -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedProp _ -> None
 #endif
         | Item.Property(_, []) -> None // Pathological case of the above
@@ -958,7 +958,7 @@ module internal SymbolHelpers =
                    | Parent tcref -> (tcref |> ticksAndArgCountTextOfTyconRef)+"."+vref.PropertyName|> Some                     
                    | ParentNone -> None
                 | None -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedEvent _ -> None 
 #endif
         | Item.CtorGroup(_, minfos) ->
@@ -968,7 +968,7 @@ module internal SymbolHelpers =
                    match vref.DeclaringEntity with
                    | Parent tcref -> (tcref |> ticksAndArgCountTextOfTyconRef) + ".#ctor"|> Some
                    | ParentNone -> None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             | ProvidedMeth _ :: _ -> None
 #endif
             | minfo :: _ ->
@@ -1008,7 +1008,7 @@ module internal SymbolHelpers =
         | Item.Property(_, pinfos) -> 
             let pinfo = List.head pinfos 
             if pinfo.IsIndexer then [item] else []
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ItemIsWithStaticArguments m g _ -> [item] // we pretend that provided-types-with-static-args are method-like in order to get ParamInfo for them
 #endif
         | Item.CustomOperation(_name, _helpText, _minfo) -> [item]
diff --git a/src/fsharp/symbols/SymbolHelpers.fsi b/src/fsharp/symbols/SymbolHelpers.fsi
index a900aac4dbb..d31bc529493 100755
--- a/src/fsharp/symbols/SymbolHelpers.fsi
+++ b/src/fsharp/symbols/SymbolHelpers.fsi
@@ -151,7 +151,7 @@ namespace FSharp.Compiler.Symbols
 
         val FlattenItems : TcGlobals -> range -> ItemWithInst -> ItemWithInst list
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         val (|ItemIsProvidedType|_|) : TcGlobals -> Item -> TyconRef option
 
         val (|ItemIsWithStaticArguments|_|): range -> TcGlobals -> Item -> Tainted[] option
diff --git a/src/fsharp/symbols/SymbolPatterns.fs b/src/fsharp/symbols/SymbolPatterns.fs
index bd24f85c4e6..bddfe60e135 100644
--- a/src/fsharp/symbols/SymbolPatterns.fs
+++ b/src/fsharp/symbols/SymbolPatterns.fs
@@ -68,7 +68,7 @@ module FSharpSymbolPatterns =
         if e.IsEnum || e.IsValueType || e.HasAttribute() then Some()
         else None
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let (|Class|_|) (original: FSharpEntity, abbreviated: FSharpEntity, _) = 
         if abbreviated.IsClass 
            && (not abbreviated.IsStaticInstantiation || original.IsFSharpAbbreviation) then Some()
@@ -98,7 +98,7 @@ module FSharpSymbolPatterns =
             || (e.IsFSharp && e.IsOpaque && not e.IsFSharpModule && not e.IsNamespace) then Some() 
         else None
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     let (|ProvidedType|_|) (e: FSharpEntity) =
         if (e.IsProvided || e.IsProvidedAndErased || e.IsProvidedAndGenerated) && e.CompiledName = e.DisplayName then
             Some()
@@ -113,7 +113,7 @@ module FSharpSymbolPatterns =
 
     let (|Namespace|_|) (entity: FSharpEntity) = if entity.IsNamespace then Some() else None
 
-#if !NO_EXTENSIONTYPING    
+#if !NO_TYPEPROVIDERS    
     let (|ProvidedAndErasedType|_|) (entity: FSharpEntity) = if entity.IsProvidedAndErased then Some() else None
 #endif
 
diff --git a/src/fsharp/symbols/SymbolPatterns.fsi b/src/fsharp/symbols/SymbolPatterns.fsi
index 2687ff47eef..0a6de8f9ee5 100644
--- a/src/fsharp/symbols/SymbolPatterns.fsi
+++ b/src/fsharp/symbols/SymbolPatterns.fsi
@@ -30,7 +30,7 @@ module public FSharpSymbolPatterns =
 
     val (|FSharpType|_|): FSharpEntity -> unit option
 
-#if !NO_EXTENSIONTYPING    
+#if !NO_TYPEPROVIDERS    
     val (|ProvidedType|_|): FSharpEntity -> unit option
 #endif    
 
@@ -42,7 +42,7 @@ module public FSharpSymbolPatterns =
 
     val (|Namespace|_|): FSharpEntity -> unit option
 
-#if !NO_EXTENSIONTYPING    
+#if !NO_TYPEPROVIDERS    
     val (|ProvidedAndErasedType|_|): FSharpEntity -> unit option
 #endif
 
diff --git a/src/fsharp/symbols/Symbols.fs b/src/fsharp/symbols/Symbols.fs
index 51e2a33fee1..cffc90e6d2a 100644
--- a/src/fsharp/symbols/Symbols.fs
+++ b/src/fsharp/symbols/Symbols.fs
@@ -155,7 +155,7 @@ module Impl =
     /// Convert an IL type definition accessibility into an F# accessibility
     let getApproxFSharpAccessibilityOfEntity (entity: EntityRef) = 
         match metadataOfTycon entity.Deref with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedTypeMetadata _info -> 
             // This is an approximation - for generative type providers some type definitions can be private.
             taccessPublic
@@ -429,7 +429,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
     member x.QualifiedName = 
         checkIsResolved()
         let fail() = invalidOp (sprintf "the type '%s' does not have a qualified name" x.LogicalName)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         if entity.IsTypeAbbrev || entity.IsProvidedErasedTycon || entity.IsNamespace then fail()
         #else
         if entity.IsTypeAbbrev || entity.IsNamespace then fail()
@@ -446,7 +446,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
     
     member _.TryFullName = 
         if isUnresolved() then None
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         elif entity.IsTypeAbbrev || entity.IsProvidedErasedTycon then None
         #else
         elif entity.IsTypeAbbrev then None
@@ -494,7 +494,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
         else
             0
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member _.IsProvided  = 
         isResolved() &&
         entity.IsProvided
@@ -514,7 +514,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
     member _.IsClass = 
         isResolved() &&
         match metadataOfTycon entity.Deref with
-#if !NO_EXTENSIONTYPING 
+#if !NO_TYPEPROVIDERS 
         | ProvidedTypeMetadata info -> info.IsClass
 #endif
         | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsClass
@@ -535,7 +535,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
     member _.IsDelegate = 
         isResolved() &&
         match metadataOfTycon entity.Deref with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | ProvidedTypeMetadata info -> info.IsDelegate ()
 #endif
         | ILTypeMetadata (TILObjectReprData(_, _, td)) -> td.IsDelegate
@@ -683,7 +683,7 @@ type FSharpEntity(cenv: SymbolEnv, entity:EntityRef) =
 
     member x.StaticParameters = 
         match entity.TypeReprInfo with 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
         | TProvidedTypeRepr info -> 
             let m = x.DeclarationLocation
             let typeBeforeArguments = info.ProvidedType 
@@ -2584,7 +2584,7 @@ type FSharpAttribute(cenv: SymbolEnv, attrib: AttribInfo) =
         // CompiledName throws exception on DataContractAttribute generated by SQLProvider
         try attr.AttributeType.CompiledName = typeof<'T>.Name with _ -> false
 
-#if !NO_EXTENSIONTYPING    
+#if !NO_TYPEPROVIDERS    
 type FSharpStaticParameter(cenv, sp: Tainted< ExtensionTyping.ProvidedParameterInfo >, m) = 
     inherit FSharpSymbol(cenv, 
                          (fun () -> 
@@ -2766,7 +2766,7 @@ type FSharpAssembly internal (cenv, ccu: CcuThunk) =
 
     member _.SimpleName = ccu.AssemblyName 
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     member _.IsProviderGenerated = ccu.IsProviderGenerated
 #endif
 
diff --git a/src/fsharp/symbols/Symbols.fsi b/src/fsharp/symbols/Symbols.fsi
index 25a9183ec9f..0de5f88b5d6 100644
--- a/src/fsharp/symbols/Symbols.fsi
+++ b/src/fsharp/symbols/Symbols.fsi
@@ -147,7 +147,7 @@ type FSharpAssembly =
 
     /// The simple name for the assembly
     member SimpleName: string 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Indicates if the assembly was generated by a type provider and is due for static linking
     member IsProviderGenerated: bool
 #endif
@@ -225,7 +225,7 @@ type FSharpEntity =
 
     /// Get the rank of an array type
     member ArrayRank: int
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Indicates if the entity is a 'fake' symbol related to a static instantiation of a type provider
     member IsStaticInstantiation: bool
 
@@ -243,7 +243,7 @@ type FSharpEntity =
 
     /// Get the generic parameters, possibly including unit-of-measure parameters
     member GenericParameters: IList
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
     /// Get the static parameters for a provided type
     member StaticParameters: IList
 #endif
@@ -587,7 +587,7 @@ type FSharpGenericParameter =
 
     member internal TypeParameter: Typar
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 /// A subtype of FSharpSymbol that represents a static parameter to an F# type provider
 []
 type FSharpStaticParameter = 
diff --git a/src/fsharp/tainted.fs b/src/fsharp/tainted.fs
index 87728a9fdea..8470f0eaa2a 100644
--- a/src/fsharp/tainted.fs
+++ b/src/fsharp/tainted.fs
@@ -2,7 +2,7 @@
 
 namespace FSharp.Compiler
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 open System
 open Internal.Utilities.Library 
diff --git a/src/fsharp/tainted.fsi b/src/fsharp/tainted.fsi
index f93efc0ebd0..008b0277aa0 100644
--- a/src/fsharp/tainted.fsi
+++ b/src/fsharp/tainted.fsi
@@ -2,7 +2,7 @@
 
 namespace FSharp.Compiler
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 
 open Internal.Utilities.Library
 open FSharp.Core.CompilerServices
diff --git a/tests/service/Common.fs b/tests/service/Common.fs
index cd1b9e80048..90bcfa4b532 100644
--- a/tests/service/Common.fs
+++ b/tests/service/Common.fs
@@ -272,7 +272,7 @@ let attribsOfSymbol (s:FSharpSymbol) =
             if v.IsFSharpUnion then yield "union"
             if v.IsInterface then yield "interface"
             if v.IsMeasure then yield "measure"
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
             if v.IsProvided then yield "provided"
             if v.IsStaticInstantiation then yield "staticinst"
             if v.IsProvidedAndErased then yield "erased"
diff --git a/tests/service/ProjectAnalysisTests.fs b/tests/service/ProjectAnalysisTests.fs
index 878b5455f75..d4253072fe0 100644
--- a/tests/service/ProjectAnalysisTests.fs
+++ b/tests/service/ProjectAnalysisTests.fs
@@ -133,7 +133,7 @@ let ``Test project1 and make sure TcImports gets cleaned up`` () =
 let ``Test Project1 should have protected FullName and TryFullName return same results`` () =
     let wholeProjectResults = checker.ParseAndCheckProject(Project1.options) |> Async.RunImmediate
     let rec getFullNameComparisons (entity: FSharpEntity) =
-        #if !NO_EXTENSIONTYPING
+        #if !NO_TYPEPROVIDERS
         seq { if not entity.IsProvided && entity.Accessibility.IsPublic then
         #else
         seq { if entity.Accessibility.IsPublic then
@@ -550,7 +550,7 @@ let ``Test project1 all uses of all symbols`` () =
     set expected - set allUsesOfAllSymbols |> shouldEqual Set.empty
     (set expected = set allUsesOfAllSymbols) |> shouldEqual true
 
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 []
 let ``Test file explicit parse symbols`` () =
 
@@ -3957,7 +3957,7 @@ type Use() =
     let fileNames = [fileName1]
     let args = mkProjectCommandLineArgs (dllName, fileNames)
     let options =  checker.GetProjectOptionsFromCommandLineArgs (projFileName, args)
-#if !NO_EXTENSIONTYPING
+#if !NO_TYPEPROVIDERS
 []
 let ``Test project28 all symbols in signature`` () =
     let wholeProjectResults = checker.ParseAndCheckProject(Project28.options) |> Async.RunImmediate
@@ -3967,7 +3967,7 @@ let ``Test project28 all symbols in signature`` () =
         |> Seq.map (fun s ->
                         let typeName = s.GetType().Name
                         match s with
-                        #if !NO_EXTENSIONTYPING
+                        #if !NO_TYPEPROVIDERS
                         | :? FSharpEntity as fse -> typeName, fse.DisplayName, fse.XmlDocSig
                         #endif
                         | :? FSharpField as fsf -> typeName, fsf.DisplayName, fsf.XmlDocSig
@@ -3976,7 +3976,7 @@ let ``Test project28 all symbols in signature`` () =
                         | :? FSharpActivePatternCase as ap -> typeName, ap.DisplayName, ap.XmlDocSig
                         | :? FSharpGenericParameter as fsg -> typeName, fsg.DisplayName, ""
                         | :? FSharpParameter as fsp -> typeName, fsp.DisplayName, ""
-                        #if !NO_EXTENSIONTYPING
+                        #if !NO_TYPEPROVIDERS
                         | :? FSharpStaticParameter as fss -> typeName, fss.DisplayName, ""
                         #endif
                         | _ -> typeName, s.DisplayName, "unknown")

From 5aaad63c1cceab14e35cf367fc6a6a6635fbdf48 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 7 May 2022 15:34:07 +0100
Subject: [PATCH 095/112] rname and align to track diffs

---
 src/fsharp/ExtensionTyping.fs  | 1508 --------------------------------
 src/fsharp/ExtensionTyping.fsi |  394 ---------
 src/fsharp/TypeProviders.fs    | 1506 +++++++++++++++++++++++++++++++
 src/fsharp/TypeProviders.fsi   |  392 +++++++++
 4 files changed, 1898 insertions(+), 1902 deletions(-)
 delete mode 100644 src/fsharp/ExtensionTyping.fs
 delete mode 100755 src/fsharp/ExtensionTyping.fsi
 create mode 100644 src/fsharp/TypeProviders.fs
 create mode 100755 src/fsharp/TypeProviders.fsi

diff --git a/src/fsharp/ExtensionTyping.fs b/src/fsharp/ExtensionTyping.fs
deleted file mode 100644
index d92da8f60cd..00000000000
--- a/src/fsharp/ExtensionTyping.fs
+++ /dev/null
@@ -1,1508 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-// Type providers, validation of provided types, etc.
-
-namespace FSharp.Compiler
-
-#if !NO_TYPEPROVIDERS
-
-open System
-open System.Collections.Concurrent
-open System.IO
-open System.Collections.Generic
-open System.Reflection
-open Internal.Utilities.Library
-open Internal.Utilities.FSharpEnvironment  
-open FSharp.Core.CompilerServices
-open FSharp.Compiler.AbstractIL.IL
-open FSharp.Compiler.ErrorLogger
-open FSharp.Compiler.Syntax
-open FSharp.Compiler.Text
-open FSharp.Compiler.Text.Range
-
-module internal ExtensionTyping =
-
-    type TypeProviderDesignation = TypeProviderDesignation of string
-
-    exception ProvidedTypeResolution of range * System.Exception
-    exception ProvidedTypeResolutionNoRange of System.Exception
-
-    let toolingCompatiblePaths() = toolingCompatiblePaths ()
-
-    /// Represents some of the configuration parameters passed to type provider components 
-    type ResolutionEnvironment =
-        { resolutionFolder: string
-          outputFile: string option
-          showResolutionMessages: bool
-          referencedAssemblies: string[]
-          temporaryFolder: string }
-
-    /// Load a the design-time part of a type-provider into the host process, and look for types
-    /// marked with the TypeProviderAttribute attribute.
-    let GetTypeProviderImplementationTypes (
-            runTimeAssemblyFileName,
-            designTimeAssemblyNameString,
-            m:range,
-            compilerToolPaths:string list
-        ) =
-
-        // Report an error, blaming the particular type provider component
-        let raiseError designTimeAssemblyPathOpt (e: exn) =
-            let attrName = typeof.Name
-            let exnTypeName = e.GetType().FullName
-            let exnMsg = e.Message
-            match designTimeAssemblyPathOpt with 
-            | None -> 
-                let msg = FSComp.SR.etProviderHasWrongDesignerAssemblyNoPath(attrName, designTimeAssemblyNameString, exnTypeName, exnMsg)
-                raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
-            | Some designTimeAssemblyPath -> 
-                let msg = FSComp.SR.etProviderHasWrongDesignerAssembly(attrName, designTimeAssemblyNameString, designTimeAssemblyPath, exnTypeName, exnMsg)
-                raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
-
-        let designTimeAssemblyOpt = getTypeProviderAssembly (runTimeAssemblyFileName, designTimeAssemblyNameString, compilerToolPaths, raiseError)
-
-        match designTimeAssemblyOpt with
-        | Some loadedDesignTimeAssembly ->
-            try
-                let exportedTypes = loadedDesignTimeAssembly.GetExportedTypes() 
-                let filtered = 
-                    [ for t in exportedTypes do 
-                          let ca = t.GetCustomAttributes(typeof, true)
-                          match ca with 
-                          | Null -> ()
-                          | NonNull ca -> 
-                              if ca.Length > 0 then 
-                                  yield t ]
-                filtered
-            with e ->
-                let folder = Path.GetDirectoryName loadedDesignTimeAssembly.Location
-                let exnTypeName = e.GetType().FullName
-                let exnMsg = e.Message
-                match e with 
-                | :? FileLoadException -> 
-                    let msg = FSComp.SR.etProviderHasDesignerAssemblyDependency(designTimeAssemblyNameString, folder, exnTypeName, exnMsg)
-                    raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
-                
-                | _ -> 
-                    let msg = FSComp.SR.etProviderHasDesignerAssemblyException(designTimeAssemblyNameString, folder, exnTypeName, exnMsg)
-                    raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
-        | None -> []
-
-    let StripException (e: exn) =
-        match e with
-        | :? TargetInvocationException as e -> e.InnerException
-        | :? TypeInitializationException as e -> e.InnerException
-        | _ -> e
-
-    /// Create an instance of a type provider from the implementation type for the type provider in the
-    /// design-time assembly by using reflection-invoke on a constructor for the type provider.
-    let CreateTypeProvider (
-            typeProviderImplementationType: Type, 
-            runtimeAssemblyPath, 
-            resolutionEnvironment: ResolutionEnvironment, 
-            isInvalidationSupported: bool, 
-            isInteractive: bool, 
-            systemRuntimeContainsType, 
-            systemRuntimeAssemblyVersion, 
-            m
-        ) =
-
-        // Protect a .NET reflection call as we load the type provider component into the host process, 
-        // reporting errors.
-        let protect f =
-            try 
-                f ()
-            with err ->
-                let e = StripException (StripException err)
-                raise (TypeProviderError(FSComp.SR.etTypeProviderConstructorException(e.Message), typeProviderImplementationType.FullName, m))
-
-        if typeProviderImplementationType.GetConstructor([| typeof |]) <> null then
-
-            // Create the TypeProviderConfig to pass to the type provider constructor
-            let e =
-                TypeProviderConfig(systemRuntimeContainsType, 
-                    ResolutionFolder=resolutionEnvironment.resolutionFolder, 
-                    RuntimeAssembly=runtimeAssemblyPath, 
-                    ReferencedAssemblies=Array.copy resolutionEnvironment.referencedAssemblies, 
-                    TemporaryFolder=resolutionEnvironment.temporaryFolder, 
-                    IsInvalidationSupported=isInvalidationSupported, 
-                    IsHostedExecution= isInteractive, 
-                    SystemRuntimeAssemblyVersion = systemRuntimeAssemblyVersion)
-
-            protect (fun () -> Activator.CreateInstance(typeProviderImplementationType, [| box e|]) :?> ITypeProvider )
-
-        elif typeProviderImplementationType.GetConstructor [| |] <> null then 
-            protect (fun () -> Activator.CreateInstance typeProviderImplementationType :?> ITypeProvider )
-
-        else
-            // No appropriate constructor found
-            raise (TypeProviderError(FSComp.SR.etProviderDoesNotHaveValidConstructor(), typeProviderImplementationType.FullName, m))
-
-    let GetTypeProvidersOfAssembly (
-            runtimeAssemblyFilename: string, 
-            ilScopeRefOfRuntimeAssembly: ILScopeRef, 
-            designTimeName: string, 
-            resolutionEnvironment: ResolutionEnvironment, 
-            isInvalidationSupported: bool, 
-            isInteractive: bool, 
-            systemRuntimeContainsType: string -> bool, 
-            systemRuntimeAssemblyVersion: Version, 
-            compilerToolPaths: string list,
-            m:range
-        ) =
-
-        let providerSpecs = 
-                try
-                    let designTimeAssemblyName = 
-                        try
-                            if designTimeName.EndsWith(".dll", StringComparison.OrdinalIgnoreCase) then
-                                Some (AssemblyName (Path.GetFileNameWithoutExtension designTimeName))
-                            else
-                                Some (AssemblyName designTimeName)
-                        with :? ArgumentException ->
-                            errorR(Error(FSComp.SR.etInvalidTypeProviderAssemblyName(runtimeAssemblyFilename, designTimeName), m))
-                            None
-
-                    [ match designTimeAssemblyName, resolutionEnvironment.outputFile with
-                      // Check if the attribute is pointing to the file being compiled, in which case ignore it
-                      // This checks seems like legacy but is included for compat.
-                      | Some designTimeAssemblyName, Some path 
-                         when String.Compare(designTimeAssemblyName.Name, Path.GetFileNameWithoutExtension path, StringComparison.OrdinalIgnoreCase) = 0 ->
-                          ()
-
-                      | Some _, _ ->
-                          let provImplTypes = GetTypeProviderImplementationTypes (runtimeAssemblyFilename, designTimeName, m, compilerToolPaths)
-                          for t in provImplTypes do
-                            let resolver =
-                                CreateTypeProvider (t, runtimeAssemblyFilename, resolutionEnvironment, isInvalidationSupported,
-                                    isInteractive, systemRuntimeContainsType, systemRuntimeAssemblyVersion, m)
-                            match box resolver with 
-                            | Null -> ()
-                            | _ -> yield (resolver, ilScopeRefOfRuntimeAssembly)
-
-                      | None, _ -> 
-                          () ]
-
-                with :? TypeProviderError as tpe ->
-                    tpe.Iter(fun e -> errorR(Error((e.Number, e.ContextualErrorMessage), m)) )
-                    []
-
-        let providers = Tainted<_>.CreateAll(providerSpecs)
-
-        providers
-
-    let unmarshal (t: Tainted<_>) = t.PUntaintNoFailure id
-
-    /// Try to access a member on a provided type, catching and reporting errors
-    let TryTypeMember<'T,'U>(st: Tainted<'T>, fullName, memberName, m, recover, f: 'T -> 'U) : Tainted<'U> =
-        try
-            st.PApply (f, m)
-        with :? TypeProviderError as tpe -> 
-            tpe.Iter (fun e -> errorR(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m)))
-            st.PApplyNoFailure(fun _ -> recover)
-
-    /// Try to access a member on a provided type, where the result is an array of values, catching and reporting errors
-    let TryTypeMemberArray (st: Tainted<_>, fullName, memberName, m, f) =
-        try
-            st.PApplyArray(f, memberName, m)
-        with :? TypeProviderError as tpe ->
-            tpe.Iter (fun e -> error(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m)))
-            [||]
-
-    /// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
-#if NO_CHECKNULLS
-    let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
-        match TryTypeMember(st, fullName, memberName, m, recover, f) with 
-#else
-    let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U?)) : Tainted<'U> =
-        match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
-#endif
-        | Tainted.Null -> 
-            errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m))
-            st.PApplyNoFailure(fun _ -> recover)
-        | Tainted.NonNull r ->
-            r
-
-    /// Try to access a property or method on a provided member, catching and reporting errors
-    let TryMemberMember (mi: Tainted<_>, typeName, memberName, memberMemberName, m, recover, f) = 
-        try
-            mi.PApply (f, m)
-        with :? TypeProviderError as tpe ->
-            tpe.Iter (fun e -> errorR(Error(FSComp.SR.etUnexpectedExceptionFromProvidedMemberMember(memberMemberName, typeName, memberName, e.ContextualErrorMessage), m)))
-            mi.PApplyNoFailure(fun _ -> recover)
-
-    /// Get the string to show for the name of a type provider
-    let DisplayNameOfTypeProvider(resolver: Tainted, m: range) =
-        resolver.PUntaint((fun tp -> tp.GetType().Name), m)
-
-    /// Validate a provided namespace name
-    let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string MaybeNull) =
-        match nsp with 
-        | Null -> ()
-        | NonNull nsp -> 
-            if String.IsNullOrWhiteSpace nsp then
-                // Empty namespace is not allowed
-                errorR(Error(FSComp.SR.etEmptyNamespaceOfTypeNotAllowed(name, typeProvider.PUntaint((fun tp -> tp.GetType().Name), m)), m))
-            else
-                for s in nsp.Split('.') do
-                    match s.IndexOfAny(PrettyNaming.IllegalCharactersInTypeAndNamespaceNames) with
-                    | -1 -> ()
-                    | n -> errorR(Error(FSComp.SR.etIllegalCharactersInNamespaceName(string s[n], s), m))  
-
-    let bindingFlags =
-        BindingFlags.DeclaredOnly |||
-        BindingFlags.Static |||
-        BindingFlags.Instance |||
-        BindingFlags.Public
-
-    type CustomAttributeData = System.Reflection.CustomAttributeData
-
-    type CustomAttributeNamedArgument = System.Reflection.CustomAttributeNamedArgument
-
-    type CustomAttributeTypedArgument = System.Reflection.CustomAttributeTypedArgument
-
-    // NOTE: for the purposes of remapping the closure of generated types, the FullName is sufficient.
-    // We do _not_ rely on object identity or any other notion of equivalence provided by System.Type
-    // itself. The mscorlib implementations of System.Type equality relations are not suitable: for
-    // example RuntimeType overrides the equality relation to be reference equality for the Equals(object)
-    // override, but the other subtypes of System.Type do not, making the relation non-reflective.
-    //
-    // Further, avoiding reliance on canonicalization (UnderlyingSystemType) or System.Type object identity means that 
-    // providers can implement wrap-and-filter "views" over existing System.Type clusters without needing
-    // to preserve object identity when presenting the types to the F# compiler.
-
-    type ProvidedTypeComparer() = 
-        let key (ty: ProvidedType) =
-            match ty.Assembly with
-            | Null -> ("", ty.FullName)
-            | NonNull a -> (a.FullName, ty.FullName)
-
-        static member val Instance = ProvidedTypeComparer()
-
-        interface IEqualityComparer with
-            member _.GetHashCode(ty: ProvidedType) = hash (key ty)
-            member _.Equals(ty1: ProvidedType, ty2: ProvidedType) = (key ty1 = key ty2)
-
-    /// The context used to interpret information in the closure of System.Type, System.MethodInfo and other 
-    /// info objects coming from the type provider.
-    ///
-    /// This is the "Type --> Tycon" remapping context of the type. This is only present for generated provided types, and contains
-    /// all the entries in the remappings for the generative declaration.
-    ///
-    /// Laziness is used "to prevent needless computation for every type during remapping". However it
-    /// appears that the laziness likely serves no purpose and could be safely removed.
-    and ProvidedTypeContext = 
-        | NoEntries
-        // The dictionaries are safe because the ProvidedType with the ProvidedTypeContext are only accessed one thread at a time during type-checking.
-        | Entries of ConcurrentDictionary * Lazy>
-
-        static member Empty = NoEntries
-
-        static member Create(d1, d2) = Entries(d1, notlazy d2)
-
-        member ctxt.GetDictionaries()  = 
-            match ctxt with
-            | NoEntries -> 
-                ConcurrentDictionary(ProvidedTypeComparer.Instance), ConcurrentDictionary(ProvidedTypeComparer.Instance)
-            | Entries (lookupILTR, lookupILTCR) ->
-                lookupILTR, lookupILTCR.Force()
-
-        member ctxt.TryGetILTypeRef st = 
-            match ctxt with 
-            | NoEntries -> None 
-            | Entries(d, _) -> 
-                match d.TryGetValue st with
-                | true, res -> Some res
-                | _ -> None
-
-        member ctxt.TryGetTyconRef st = 
-            match ctxt with 
-            | NoEntries -> None 
-            | Entries(_, d) -> 
-                let d = d.Force()
-                match d.TryGetValue st with
-                | true, res -> Some res
-                | _ -> None
-
-        member ctxt.RemapTyconRefs (f: obj->obj) = 
-            match ctxt with 
-            | NoEntries -> NoEntries
-            | Entries(d1, d2) ->
-                Entries(d1, lazy (let dict = ConcurrentDictionary(ProvidedTypeComparer.Instance)
-                                  for KeyValue (st, tcref) in d2.Force() do dict.TryAdd(st, f tcref) |> ignore
-                                  dict))
-
-    and
-      []
-#if NO_CHECKNULLS
-      []
-#endif
-      ProvidedType (x: Type, ctxt: ProvidedTypeContext) =
-        inherit ProvidedMemberInfo(x, ctxt)
-
-        let isMeasure = 
-            lazy
-                x.CustomAttributes 
-                |> Seq.exists (fun a -> a.Constructor.DeclaringType.FullName = typeof.FullName)
-
-        let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
-
-        interface IProvidedCustomAttributeProvider with 
-            member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
-            member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
-            member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
-        
-        // The type provider spec distinguishes between 
-        //   - calls that can be made on provided types (i.e. types given by ReturnType, ParameterType, and generic argument types)
-        //   - calls that can be made on provided type definitions (types returned by ResolveTypeName, GetTypes etc.)
-        // Ideally we would enforce this decision structurally by having both ProvidedType and ProvidedTypeDefinition.
-        // Alternatively we could use assertions to enforce this.
-
-        // Suppress relocation of generated types
-        member _.IsSuppressRelocate = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.SuppressRelocate)) <> enum 0  
-
-        member _.IsErased = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.IsErased)) <> enum 0  
-
-        member _.IsGenericType = x.IsGenericType
-
-        member _.Namespace : string MaybeNull = x.Namespace
-
-        member _.FullName = x.FullName
-
-        member _.IsArray = x.IsArray
-
-        member _.Assembly: ProvidedAssembly MaybeNull = x.Assembly |> ProvidedAssembly.Create
-
-        member _.GetInterfaces() = x.GetInterfaces() |> ProvidedType.CreateArray ctxt
-
-        member _.GetMethods() = x.GetMethods bindingFlags |> ProvidedMethodInfo.CreateArray ctxt
-
-        member _.GetEvents() = x.GetEvents bindingFlags |> ProvidedEventInfo.CreateArray ctxt
-
-        member _.GetEvent nm = x.GetEvent(nm, bindingFlags) |> ProvidedEventInfo.Create ctxt
-
-        member _.GetProperties() = x.GetProperties bindingFlags |> ProvidedPropertyInfo.CreateArray ctxt
-
-        member _.GetProperty nm = x.GetProperty(nm, bindingFlags) |> ProvidedPropertyInfo.Create ctxt
-
-        member _.GetConstructors() = x.GetConstructors bindingFlags |> ProvidedConstructorInfo.CreateArray ctxt
-
-        member _.GetFields() = x.GetFields bindingFlags |> ProvidedFieldInfo.CreateArray ctxt
-
-        member _.GetField nm = x.GetField(nm, bindingFlags) |> ProvidedFieldInfo.Create ctxt
-
-        member _.GetAllNestedTypes() = x.GetNestedTypes(bindingFlags ||| BindingFlags.NonPublic) |> ProvidedType.CreateArray ctxt
-
-        member _.GetNestedTypes() = x.GetNestedTypes bindingFlags |> ProvidedType.CreateArray ctxt
-
-        /// Type.GetNestedType(string) can return null if there is no nested type with given name
-        member _.GetNestedType nm = x.GetNestedType (nm, bindingFlags) |> ProvidedType.Create ctxt
-
-        /// Type.GetGenericTypeDefinition() either returns type or throws exception, null is not permitted
-        member _.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
-
-        /// Type.BaseType can be null when Type is interface or object
-        member _.BaseType = x.BaseType |> ProvidedType.Create ctxt
-
-        member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[] MaybeNull = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
-
-        /// Type.GetElementType can be null if i.e. Type is not array\pointer\byref type
-        member _.GetElementType() = x.GetElementType() |> ProvidedType.Create ctxt
-
-        member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
-
-        member _.ApplyStaticArguments(provider: ITypeProvider, fullTypePathAfterArguments, staticArgs: obj[]) = 
-            provider.ApplyStaticArguments(x, fullTypePathAfterArguments,  staticArgs) |> ProvidedType.Create ctxt
-
-        member _.IsVoid = (typeof.Equals x || (x.Namespace = "System" && x.Name = "Void"))
-
-        member _.IsGenericParameter = x.IsGenericParameter
-
-        member _.IsValueType = x.IsValueType
-
-        member _.IsByRef = x.IsByRef
-
-        member _.IsPointer = x.IsPointer
-
-        member _.IsPublic = x.IsPublic
-
-        member _.IsNestedPublic = x.IsNestedPublic
-
-        member _.IsEnum = x.IsEnum
-
-        member _.IsClass = x.IsClass
-
-        member _.IsMeasure = isMeasure.Value
-
-        member _.IsSealed = x.IsSealed
-
-        member _.IsAbstract = x.IsAbstract
-
-        member _.IsInterface = x.IsInterface
-
-        member _.GetArrayRank() = x.GetArrayRank()
-
-        member _.GenericParameterPosition = x.GenericParameterPosition
-
-        member _.RawSystemType = x
-
-        /// Type.GetEnumUnderlyingType either returns type or raises exception, null is not permitted
-        member _.GetEnumUnderlyingType() = 
-            x.GetEnumUnderlyingType() 
-            |> ProvidedType.CreateWithNullCheck ctxt "EnumUnderlyingType"    
-
-        member _.MakePointerType() = ProvidedType.CreateNoContext(x.MakePointerType())
-
-        member _.MakeByRefType() = ProvidedType.CreateNoContext(x.MakeByRefType())
-
-        member _.MakeArrayType() = ProvidedType.CreateNoContext(x.MakeArrayType())
-
-        member _.MakeArrayType rank = ProvidedType.CreateNoContext(x.MakeArrayType(rank))
-
-        member _.MakeGenericType (args: ProvidedType[]) =
-            let argTypes = args |> Array.map (fun arg -> arg.RawSystemType)
-            ProvidedType.CreateNoContext(x.MakeGenericType(argTypes))
-
-        member _.AsProvidedVar name = ProvidedVar.CreateNonNull ctxt (Quotations.Var(name, x))
-
-        static member Create ctxt x : ProvidedType MaybeNull = 
-            match x with 
-            | Null -> null 
-            | NonNull t -> ProvidedType (t, ctxt)
-
-        static member CreateNonNull ctxt x = ProvidedType (x, ctxt)
-
-        static member CreateWithNullCheck ctxt name x = 
-            match x with
-            | Null -> nullArg name 
-            | t -> ProvidedType (t, ctxt)
-
-        static member CreateArray ctxt (xs: Type[] MaybeNull) : ProvidedType[] MaybeNull = 
-            match xs with
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedType.CreateNonNull ctxt)
-
-        static member CreateNoContext (x:Type) = ProvidedType.Create ProvidedTypeContext.Empty x
-
-        static member Void = ProvidedType.CreateNoContext typeof
-
-        member _.Handle = x
-
-        override _.Equals y = assert false; match y with :? ProvidedType as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-        member _.Context = ctxt
-
-        member this.TryGetILTypeRef() = this.Context.TryGetILTypeRef this
-
-        member this.TryGetTyconRef() = this.Context.TryGetTyconRef this
-
-        static member ApplyContext (pt: ProvidedType, ctxt) = ProvidedType(pt.Handle, ctxt)
-
-        static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
-           Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
-
-    and 
-#if NO_CHECKNULLS
-        []
-#endif
-        IProvidedCustomAttributeProvider =
-        abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string MaybeNull * int * int) option 
-
-        abstract GetXmlDocAttributes : provider: ITypeProvider -> string[]
-
-        abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool
-
-        abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
-
-    and ProvidedCustomAttributeProvider =
-        static member Create (attributes :ITypeProvider -> seq): IProvidedCustomAttributeProvider = 
-            let (|Member|_|) (s: string) (x: CustomAttributeNamedArgument) = if x.MemberName = s then Some x.TypedValue else None
-            let (|Arg|_|) (x: CustomAttributeTypedArgument) = match x.Value with null -> None | v -> Some v
-            let findAttribByName tyFullName (a: CustomAttributeData) = (a.Constructor.DeclaringType.FullName = tyFullName)  
-            let findAttrib (ty: Type) a = findAttribByName ty.FullName a
-            { new IProvidedCustomAttributeProvider with 
-                  member _.GetAttributeConstructorArgs (provider, attribName) = 
-                      attributes provider 
-                        |> Seq.tryFind (findAttribByName  attribName)  
-                        |> Option.map (fun a -> 
-                            let ctorArgs = 
-                                a.ConstructorArguments 
-                                |> Seq.toList 
-                                |> List.map (function Arg null -> None | Arg obj -> Some obj | _ -> None)
-                            let namedArgs = 
-                                a.NamedArguments 
-                                |> Seq.toList 
-                                |> List.map (fun arg -> arg.MemberName, match arg.TypedValue with Arg null -> None | Arg obj -> Some obj | _ -> None)
-                            ctorArgs, namedArgs)
-
-                  member _.GetHasTypeProviderEditorHideMethodsAttribute provider = 
-                      attributes provider 
-                        |> Seq.exists (findAttrib typeof) 
-
-                  member _.GetDefinitionLocationAttribute provider = 
-                      attributes provider 
-                        |> Seq.tryFind (findAttrib  typeof)  
-                        |> Option.map (fun a -> 
-                               (defaultArg (a.NamedArguments |> Seq.tryPick (function Member "FilePath" (Arg (:? string as v)) -> Some v | _ -> None)) null, 
-                                defaultArg (a.NamedArguments |> Seq.tryPick (function Member "Line" (Arg (:? int as v)) -> Some v | _ -> None)) 0, 
-                                defaultArg (a.NamedArguments |> Seq.tryPick (function Member "Column" (Arg (:? int as v)) -> Some v | _ -> None)) 0))
-
-                  member _.GetXmlDocAttributes provider = 
-                      attributes provider 
-                        |> Seq.choose (fun a -> 
-                             if findAttrib  typeof a then 
-                                match a.ConstructorArguments |> Seq.toList with 
-                                | [ Arg(:? string as s) ] -> Some s
-                                | _ -> None
-                             else 
-                                None) 
-                        |> Seq.toArray  }
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedMemberInfo (x: MemberInfo, ctxt) = 
-        let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
-
-        member _.Name = x.Name
-
-        /// DeclaringType can be null if MemberInfo belongs to Module, not to Type
-        member _.DeclaringType = ProvidedType.Create ctxt x.DeclaringType
-
-        interface IProvidedCustomAttributeProvider with 
-            member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
-            member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
-            member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
-            member _.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName)
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedParameterInfo (x: ParameterInfo, ctxt) = 
-        let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
-
-        member _.Name = let nm = x.Name in match box nm with null -> "" | _ -> nm
-
-        member _.IsOut = x.IsOut
-
-        member _.IsIn = x.IsIn
-
-        member _.IsOptional = x.IsOptional
-
-        member _.RawDefaultValue = x.RawDefaultValue
-
-        member _.HasDefaultValue = x.Attributes.HasFlag(ParameterAttributes.HasDefault)
-
-        /// ParameterInfo.ParameterType cannot be null
-        member _.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType
-        
-        static member Create ctxt (x: ParameterInfo MaybeNull) : ProvidedParameterInfo MaybeNull = 
-            match x with 
-            | Null -> null 
-            | NonNull x -> ProvidedParameterInfo (x, ctxt)
-
-        static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
-        
-        static member CreateArray ctxt (xs: ParameterInfo[] MaybeNull) : ProvidedParameterInfo[] MaybeNull = 
-            match xs with 
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
-        
-        static member CreateArrayNonNull ctxt xs : ProvidedParameterInfo[] = 
-            match box xs with 
-            | Null -> [| |]
-            | _  -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
-        
-        interface IProvidedCustomAttributeProvider with 
-            member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
-            member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
-            member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
-            member _.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName)
-
-        member _.Handle = x
-
-        override _.Equals y = assert false; match y with :? ProvidedParameterInfo as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedAssembly (x: Assembly) = 
-
-        member _.GetName() = x.GetName()
-
-        member _.FullName = x.FullName
-
-        member _.GetManifestModuleContents(provider: ITypeProvider) = provider.GetGeneratedAssemblyContents x
-
-        static member Create x : ProvidedAssembly MaybeNull = match x with null -> null | t -> ProvidedAssembly (t)
-
-        member _.Handle = x
-
-        override _.Equals y = assert false; match y with :? ProvidedAssembly as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedMethodBase (x: MethodBase, ctxt) = 
-        inherit ProvidedMemberInfo(x, ctxt)
-
-        member _.Context = ctxt
-
-        member _.IsGenericMethod = x.IsGenericMethod
-
-        member _.IsStatic  = x.IsStatic
-
-        member _.IsFamily  = x.IsFamily
-
-        member _.IsFamilyOrAssembly = x.IsFamilyOrAssembly
-
-        member _.IsFamilyAndAssembly = x.IsFamilyAndAssembly
-
-        member _.IsVirtual  = x.IsVirtual
-
-        member _.IsFinal = x.IsFinal
-
-        member _.IsPublic = x.IsPublic
-
-        member _.IsAbstract  = x.IsAbstract
-
-        member _.IsHideBySig = x.IsHideBySig
-
-        member _.IsConstructor  = x.IsConstructor
-
-        member _.GetParameters() = x.GetParameters() |> ProvidedParameterInfo.CreateArray ctxt 
-
-        member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
-
-        member _.Handle = x
-
-        static member TaintedGetHashCode (x: Tainted) =            
-           Tainted.GetHashCodeTainted 
-               (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, 
-                                                      (nonNull st.DeclaringType).FullName))) 
-
-        static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
-           Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
-
-        member _.GetStaticParametersForMethod(provider: ITypeProvider) : ProvidedParameterInfo[] = 
-            let bindingFlags = BindingFlags.Instance ||| BindingFlags.NonPublic ||| BindingFlags.Public 
-
-            let staticParams = 
-                match provider with 
-                | :? ITypeProvider2 as itp2 -> 
-                    itp2.GetStaticParametersForMethod x  
-                | _ -> 
-                    // To allow a type provider to depend only on FSharp.Core 4.3.0.0, it can alternatively
-                    // implement an appropriate method called GetStaticParametersForMethod
-                    let meth =
-                        provider.GetType().GetMethod( "GetStaticParametersForMethod", bindingFlags, null,
-                            [| typeof |], null)  
-                    if isNull meth then [| |] else
-                    let paramsAsObj = 
-                        try meth.Invoke(provider, bindingFlags ||| BindingFlags.InvokeMethod, null, [| box x |], null) 
-                        with err -> raise (StripException (StripException err))
-                    paramsAsObj :?> ParameterInfo[] 
-
-            staticParams |> ProvidedParameterInfo.CreateArrayNonNull ctxt
-
-        member _.ApplyStaticArgumentsForMethod(provider: ITypeProvider, fullNameAfterArguments: string, staticArgs: obj[]) = 
-            let bindingFlags = BindingFlags.Instance ||| BindingFlags.Public ||| BindingFlags.InvokeMethod
-
-            let mb = 
-                match provider with 
-                | :? ITypeProvider2 as itp2 -> 
-                    itp2.ApplyStaticArgumentsForMethod(x, fullNameAfterArguments, staticArgs)  
-                | _ -> 
-
-                    // To allow a type provider to depend only on FSharp.Core 4.3.0.0, it can alternatively implement a method called GetStaticParametersForMethod
-                    let meth =
-                        provider.GetType().GetMethod( "ApplyStaticArgumentsForMethod", bindingFlags, null,
-                            [| typeof; typeof; typeof |], null)  
-
-                    match meth with 
-                    | Null -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
-                    | _ -> 
-                    let mbAsObj = 
-                       try meth.Invoke(provider, bindingFlags ||| BindingFlags.InvokeMethod, null, [| box x; box fullNameAfterArguments; box staticArgs  |], null) 
-                       with err -> raise (StripException (StripException err))
-
-                    match mbAsObj with 
-                    | :? MethodBase as mb -> mb
-                    | _ -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
-            match mb with 
-            | :? MethodInfo as mi -> (mi |> ProvidedMethodInfo.CreateNonNull ctxt : ProvidedMethodInfo) :> ProvidedMethodBase
-            | :? ConstructorInfo as ci -> (ci |> ProvidedConstructorInfo.CreateNonNull ctxt : ProvidedConstructorInfo) :> ProvidedMethodBase
-            | _ -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
-
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedFieldInfo (x: FieldInfo, ctxt) = 
-        inherit ProvidedMemberInfo(x, ctxt)
-
-        static member CreateNonNull ctxt x = ProvidedFieldInfo (x, ctxt)
-
-        static member Create ctxt x : ProvidedFieldInfo MaybeNull = 
-            match x with 
-            | Null -> null 
-            | NonNull x -> ProvidedFieldInfo (x, ctxt)
-
-        static member CreateArray ctxt (xs: FieldInfo[] MaybeNull) : ProvidedFieldInfo[] MaybeNull = 
-            match xs with 
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt)
-
-        member _.IsInitOnly = x.IsInitOnly
-
-        member _.IsStatic = x.IsStatic
-
-        member _.IsSpecialName = x.IsSpecialName
-
-        member _.IsLiteral = x.IsLiteral
-
-        member _.GetRawConstantValue() = x.GetRawConstantValue()
-
-        /// FieldInfo.FieldType cannot be null
-
-        member _.FieldType = x.FieldType |> ProvidedType.CreateWithNullCheck ctxt "FieldType" 
-
-        member _.Handle = x
-
-        member _.IsPublic = x.IsPublic
-
-        member _.IsFamily = x.IsFamily
-
-        member _.IsPrivate = x.IsPrivate
-
-        member _.IsFamilyOrAssembly = x.IsFamilyOrAssembly
-
-        member _.IsFamilyAndAssembly = x.IsFamilyAndAssembly
-
-        override _.Equals y = assert false; match y with :? ProvidedFieldInfo as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-        static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
-           Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedMethodInfo (x: MethodInfo, ctxt) = 
-        inherit ProvidedMethodBase(x, ctxt)
-
-        member _.ReturnType = x.ReturnType |> ProvidedType.CreateWithNullCheck ctxt "ReturnType"
-
-        static member CreateNonNull ctxt (x: MethodInfo) : ProvidedMethodInfo = 
-            ProvidedMethodInfo (x, ctxt)
-
-        static member Create ctxt (x: MethodInfo MaybeNull) : ProvidedMethodInfo MaybeNull = 
-            match x with 
-            | Null -> null
-            | NonNull x -> ProvidedMethodInfo (x, ctxt)
-
-        static member CreateArray ctxt (xs: MethodInfo[] MaybeNull) : ProvidedMethodInfo[] MaybeNull = 
-            match xs with 
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt)
-
-        member _.Handle = x
-
-        member _.MetadataToken = x.MetadataToken
-
-        override _.Equals y = assert false; match y with :? ProvidedMethodInfo as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedPropertyInfo (x: PropertyInfo, ctxt) = 
-        inherit ProvidedMemberInfo(x, ctxt)
-
-        member _.GetGetMethod() = x.GetGetMethod() |> ProvidedMethodInfo.Create ctxt
-
-        member _.GetSetMethod() = x.GetSetMethod() |> ProvidedMethodInfo.Create ctxt
-
-        member _.CanRead = x.CanRead
-
-        member _.CanWrite = x.CanWrite
-
-        member _.GetIndexParameters() = x.GetIndexParameters() |> ProvidedParameterInfo.CreateArray ctxt
-
-        /// PropertyInfo.PropertyType cannot be null
-        member _.PropertyType = x.PropertyType |> ProvidedType.CreateWithNullCheck ctxt "PropertyType"
-
-        static member CreateNonNull ctxt x = ProvidedPropertyInfo (x, ctxt)
-
-        static member Create ctxt x : ProvidedPropertyInfo MaybeNull =
-            match x with 
-            | Null -> null 
-            | NonNull x -> ProvidedPropertyInfo (x, ctxt)
-
-        static member CreateArray ctxt (xs: PropertyInfo[] MaybeNull) : ProvidedPropertyInfo[] MaybeNull = 
-            match xs with
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt)
-
-        member _.Handle = x
-
-        override _.Equals y = assert false; match y with :? ProvidedPropertyInfo as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-        static member TaintedGetHashCode (x: Tainted) = 
-           Tainted.GetHashCodeTainted
-               (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, 
-                                                      (nonNull st.DeclaringType).FullName))) 
-
-        static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
-           Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedEventInfo (x: EventInfo, ctxt) = 
-        inherit ProvidedMemberInfo(x, ctxt)
-
-        member _.GetAddMethod() = x.GetAddMethod() |> ProvidedMethodInfo.Create  ctxt
-
-        member _.GetRemoveMethod() = x.GetRemoveMethod() |> ProvidedMethodInfo.Create ctxt
-
-        /// EventInfo.EventHandlerType cannot be null
-        member _.EventHandlerType = x.EventHandlerType |> ProvidedType.CreateWithNullCheck ctxt "EventHandlerType"
-        
-        static member CreateNonNull ctxt x = ProvidedEventInfo (x, ctxt)
-        
-        static member Create ctxt x : ProvidedEventInfo MaybeNull = 
-            match x with 
-            | Null -> null 
-            | NonNull x -> ProvidedEventInfo (x, ctxt)
-        
-        static member CreateArray ctxt (xs: EventInfo[] MaybeNull) : ProvidedEventInfo[] MaybeNull = 
-            match xs with 
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt)
-        
-        member _.Handle = x
-
-        override _.Equals y = assert false; match y with :? ProvidedEventInfo as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-        static member TaintedGetHashCode (x: Tainted) = 
-           Tainted.GetHashCodeTainted 
-               (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, 
-                                                      (nonNull st.DeclaringType).FullName))) 
-
-        static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
-           Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
-
-    and [] 
-#if NO_CHECKNULLS
-        []
-#endif
-        ProvidedConstructorInfo (x: ConstructorInfo, ctxt) = 
-        inherit ProvidedMethodBase(x, ctxt)
-
-        static member CreateNonNull ctxt x = ProvidedConstructorInfo (x, ctxt)
-
-        static member Create ctxt (x: ConstructorInfo MaybeNull) : ProvidedConstructorInfo MaybeNull = 
-            match x with 
-            | Null -> null 
-            | NonNull x -> ProvidedConstructorInfo (x, ctxt)
-
-        static member CreateArray ctxt (xs: ConstructorInfo[] MaybeNull) : ProvidedConstructorInfo[] MaybeNull = 
-            match xs with 
-            | Null -> null
-            | NonNull xs -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt)
-
-        member _.Handle = x
-
-        override _.Equals y = assert false; match y with :? ProvidedConstructorInfo as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = assert false; x.GetHashCode()
-
-    and ProvidedExprType =
-        | ProvidedNewArrayExpr of ProvidedType * ProvidedExpr[]
-#if PROVIDED_ADDRESS_OF
-        | ProvidedAddressOfExpr of ProvidedExpr
-#endif
-        | ProvidedNewObjectExpr of ProvidedConstructorInfo * ProvidedExpr[]
-        | ProvidedWhileLoopExpr of ProvidedExpr * ProvidedExpr
-        | ProvidedNewDelegateExpr of ProvidedType * ProvidedVar[] * ProvidedExpr
-        | ProvidedForIntegerRangeLoopExpr of ProvidedVar * ProvidedExpr * ProvidedExpr * ProvidedExpr
-        | ProvidedSequentialExpr of ProvidedExpr * ProvidedExpr
-        | ProvidedTryWithExpr of ProvidedExpr * ProvidedVar * ProvidedExpr * ProvidedVar * ProvidedExpr
-        | ProvidedTryFinallyExpr of ProvidedExpr * ProvidedExpr
-        | ProvidedLambdaExpr of ProvidedVar * ProvidedExpr
-        | ProvidedCallExpr of ProvidedExpr option * ProvidedMethodInfo * ProvidedExpr[] 
-        | ProvidedConstantExpr of obj * ProvidedType
-        | ProvidedDefaultExpr of ProvidedType
-        | ProvidedNewTupleExpr of ProvidedExpr[]
-        | ProvidedTupleGetExpr of ProvidedExpr * int
-        | ProvidedTypeAsExpr of ProvidedExpr * ProvidedType
-        | ProvidedTypeTestExpr of ProvidedExpr * ProvidedType
-        | ProvidedLetExpr of ProvidedVar * ProvidedExpr * ProvidedExpr
-        | ProvidedVarSetExpr of ProvidedVar * ProvidedExpr
-        | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
-        | ProvidedVarExpr of ProvidedVar
-
-#if NO_CHECKNULLS
-    and []
-#else
-    and []
-#endif
-        ProvidedExpr (x: Quotations.Expr, ctxt) =
-
-        member _.Type = x.Type |> ProvidedType.Create ctxt
-
-        member _.Handle = x
-
-        member _.Context = ctxt
-
-        member _.UnderlyingExpressionString = x.ToString()
-
-        member _.GetExprType() =
-            match x with
-            | Quotations.Patterns.NewObject(ctor, args) ->
-                Some (ProvidedNewObjectExpr (ProvidedConstructorInfo.CreateNonNull ctxt ctor, [| for a in args -> ProvidedExpr.CreateNonNull ctxt a |]))
-            | Quotations.Patterns.WhileLoop(guardExpr, bodyExpr) ->
-                Some (ProvidedWhileLoopExpr (ProvidedExpr.CreateNonNull ctxt guardExpr, ProvidedExpr.CreateNonNull ctxt bodyExpr))
-            | Quotations.Patterns.NewDelegate(ty, vs, expr) ->
-                Some (ProvidedNewDelegateExpr(ProvidedType.CreateNonNull ctxt ty, ProvidedVar.CreateArray ctxt (List.toArray vs), ProvidedExpr.CreateNonNull ctxt expr))
-            | Quotations.Patterns.Call(objOpt, meth, args) ->
-                Some (ProvidedCallExpr((match objOpt with None -> None | Some obj -> Some (ProvidedExpr.CreateNonNull ctxt obj)), 
-                        ProvidedMethodInfo.CreateNonNull ctxt meth, [| for a in args -> ProvidedExpr.CreateNonNull ctxt a |]))
-            | Quotations.Patterns.DefaultValue ty ->
-                Some (ProvidedDefaultExpr (ProvidedType.CreateNonNull ctxt ty))
-            | Quotations.Patterns.Value(obj, ty) ->
-                Some (ProvidedConstantExpr (obj, ProvidedType.CreateNonNull ctxt ty))
-            | Quotations.Patterns.Coerce(arg, ty) ->
-                Some (ProvidedTypeAsExpr (ProvidedExpr.CreateNonNull ctxt arg, ProvidedType.CreateNonNull ctxt ty))
-            | Quotations.Patterns.NewTuple args ->
-                Some (ProvidedNewTupleExpr(ProvidedExpr.CreateArray ctxt (Array.ofList args)))
-            | Quotations.Patterns.TupleGet(arg, n) ->
-                Some (ProvidedTupleGetExpr (ProvidedExpr.CreateNonNull ctxt arg, n))
-            | Quotations.Patterns.NewArray(ty, args) ->
-                Some (ProvidedNewArrayExpr(ProvidedType.CreateNonNull ctxt ty, ProvidedExpr.CreateArray ctxt (Array.ofList args)))
-            | Quotations.Patterns.Sequential(e1, e2) ->
-                Some (ProvidedSequentialExpr(ProvidedExpr.CreateNonNull ctxt e1, ProvidedExpr.CreateNonNull ctxt e2))
-            | Quotations.Patterns.Lambda(v, body) ->
-                Some (ProvidedLambdaExpr (ProvidedVar.CreateNonNull ctxt v,  ProvidedExpr.CreateNonNull ctxt body))
-            | Quotations.Patterns.TryFinally(b1, b2) ->
-                Some (ProvidedTryFinallyExpr (ProvidedExpr.CreateNonNull ctxt b1, ProvidedExpr.CreateNonNull ctxt b2))
-            | Quotations.Patterns.TryWith(b, v1, e1, v2, e2) ->
-                Some (ProvidedTryWithExpr (ProvidedExpr.CreateNonNull ctxt b, ProvidedVar.CreateNonNull ctxt v1, ProvidedExpr.CreateNonNull ctxt e1, ProvidedVar.CreateNonNull ctxt v2, ProvidedExpr.CreateNonNull ctxt e2))
-#if PROVIDED_ADDRESS_OF
-            | Quotations.Patterns.AddressOf e -> Some (ProvidedAddressOfExpr (ProvidedExpr.CreateNonNull ctxt e))
-#endif
-            | Quotations.Patterns.TypeTest(e, ty) ->
-                Some (ProvidedTypeTestExpr(ProvidedExpr.CreateNonNull ctxt e, ProvidedType.CreateNonNull ctxt ty))
-            | Quotations.Patterns.Let(v, e, b) ->
-                Some (ProvidedLetExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e, ProvidedExpr.CreateNonNull ctxt b))
-            | Quotations.Patterns.ForIntegerRangeLoop (v, e1, e2, e3) ->
-                Some (ProvidedForIntegerRangeLoopExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e1, ProvidedExpr.CreateNonNull ctxt e2, ProvidedExpr.CreateNonNull ctxt e3))
-            | Quotations.Patterns.VarSet(v, e) ->
-                Some (ProvidedVarSetExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e))
-            | Quotations.Patterns.IfThenElse(g, t, e) ->
-                Some (ProvidedIfThenElseExpr (ProvidedExpr.CreateNonNull ctxt g, ProvidedExpr.CreateNonNull ctxt t, ProvidedExpr.CreateNonNull ctxt e))
-            | Quotations.Patterns.Var v ->
-                Some (ProvidedVarExpr (ProvidedVar.CreateNonNull ctxt v))
-            | _ -> None
-        static member Create ctxt t : ProvidedExpr MaybeNull = 
-            match box t with 
-            | Null -> null 
-            | _ -> ProvidedExpr (t, ctxt)
-
-        static member CreateNonNull ctxt t : ProvidedExpr = 
-            ProvidedExpr (t, ctxt)
-
-        static member CreateArray ctxt xs : ProvidedExpr[] = 
-            match box xs with 
-            | Null -> [| |]
-            | _ -> xs |> Array.map (ProvidedExpr.CreateNonNull ctxt)
-
-        override _.Equals y = match y with :? ProvidedExpr as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = x.GetHashCode()
-
-#if NO_CHECKNULLS
-    and []
-#else
-    and []
-#endif
-        ProvidedVar (x: Quotations.Var, ctxt) =
-        member _.Type = x.Type |> ProvidedType.Create ctxt
-        member _.Name = x.Name
-        member _.IsMutable = x.IsMutable
-        member _.Handle = x
-        member _.Context = ctxt
-
-        static member CreateNonNull ctxt t = 
-            ProvidedVar (t, ctxt)
-
-        static member CreateArray ctxt xs : ProvidedVar[] = 
-            match box xs with 
-            | Null -> [| |]
-            | _ -> xs |> Array.map (ProvidedVar.CreateNonNull ctxt)
-
-        override _.Equals y = match y with :? ProvidedVar as y -> x.Equals y.Handle | _ -> false
-
-        override _.GetHashCode() = x.GetHashCode()
-
-    /// Get the provided invoker expression for a particular use of a method.
-    let GetInvokerExpression (provider: ITypeProvider, methodBase: ProvidedMethodBase, paramExprs: ProvidedVar[]) = 
-        provider.GetInvokerExpression(methodBase.Handle, [| for p in paramExprs -> Quotations.Expr.Var p.Handle |]) |> ProvidedExpr.Create methodBase.Context
-
-    /// Compute the Name or FullName property of a provided type, reporting appropriate errors
-    let CheckAndComputeProvidedNameProperty(m, st: Tainted, proj, propertyString) =
-        let name = 
-            try st.PUntaint(proj, m) 
-            with :? TypeProviderError as tpe -> 
-                let newError = tpe.MapText((fun msg -> FSComp.SR.etProvidedTypeWithNameException(propertyString, msg)), st.TypeProviderDesignation, m)
-                raise newError
-        if String.IsNullOrEmpty name then
-            raise (TypeProviderError(FSComp.SR.etProvidedTypeWithNullOrEmptyName propertyString, st.TypeProviderDesignation, m))
-        name
-
-    /// Verify that this type provider has supported attributes
-    let ValidateAttributesOfProvidedType (m, st: Tainted) =         
-        let fullName = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.FullName), "FullName")
-        if TryTypeMember(st, fullName, "IsGenericType", m, false, fun st->st.IsGenericType) |> unmarshal then  
-            errorR(Error(FSComp.SR.etMustNotBeGeneric fullName, m))  
-        if TryTypeMember(st, fullName, "IsArray", m, false, fun st->st.IsArray) |> unmarshal then 
-            errorR(Error(FSComp.SR.etMustNotBeAnArray fullName, m))  
-        TryTypeMemberNonNull(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore
-
-    /// Verify that a provided type has the expected name
-    let ValidateExpectedName m expectedPath expectedName (st: Tainted) =
-        let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
-        if name <> expectedName then
-            raise (TypeProviderError(FSComp.SR.etProvidedTypeHasUnexpectedName(expectedName, name), st.TypeProviderDesignation, m))
-
-#if NO_CHECKNULLS
-        let namespaceName = TryTypeMember(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal
-#else
-        let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal // TODO NULLNESS: why is this explicit instantiation needed?
-#endif
-
-        let rec declaringTypes (st: Tainted) accu =
-            match TryTypeMember(st, name, "DeclaringType", m, null, fun st -> st.DeclaringType) with
-            | Tainted.Null -> accu
-            | Tainted.NonNull dt -> declaringTypes dt (CheckAndComputeProvidedNameProperty(m, dt, (fun dt -> dt.Name), "Name") :: accu)
-
-        let path = 
-            [|  match namespaceName with 
-                | Null -> ()
-                | NonNull namespaceName -> yield! namespaceName.Split([|'.'|])
-                yield! declaringTypes st [] |]
-        
-        if path <> expectedPath then
-            let expectedPath = String.Join(".", expectedPath)
-            let path = String.Join(".", path)
-            errorR(Error(FSComp.SR.etProvidedTypeHasUnexpectedPath(expectedPath, path), m))
-
-    /// Eagerly validate a range of conditions on a provided type, after static instantiation (if any) has occurred
-    let ValidateProvidedTypeAfterStaticInstantiation(m, st: Tainted, expectedPath: string[], expectedName: string) = 
-        // Do all the calling into st up front with recovery
-        let fullName, namespaceName, usedMembers =
-            let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
-#if NO_CHECKNULLS
-            let namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
-#else
-            let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
-#endif
-            let fullName = TryTypeMemberNonNull(st, name, "FullName", m, FSComp.SR.invalidFullNameForProvidedType(), fun st -> st.FullName) |> unmarshal
-            ValidateExpectedName m expectedPath expectedName st
-            // Must be able to call (GetMethods|GetEvents|GetProperties|GetNestedTypes|GetConstructors)(bindingFlags).
-            let usedMembers: Tainted[] = 
-                // These are the members the compiler will actually use
-                [| for x in TryTypeMemberArray(st, fullName, "GetMethods", m, fun st -> st.GetMethods()) -> x.Coerce m
-                   for x in TryTypeMemberArray(st, fullName, "GetEvents", m, fun st -> st.GetEvents()) -> x.Coerce m
-                   for x in TryTypeMemberArray(st, fullName, "GetFields", m, fun st -> st.GetFields()) -> x.Coerce m
-                   for x in TryTypeMemberArray(st, fullName, "GetProperties", m, fun st -> st.GetProperties()) -> x.Coerce m
-                   // These will be validated on-demand
-                   //for x in TryTypeMemberArray(st, fullName, "GetNestedTypes", m, fun st -> st.GetNestedTypes bindingFlags) -> x.Coerce()
-                   for x in TryTypeMemberArray(st, fullName, "GetConstructors", m, fun st -> st.GetConstructors()) -> x.Coerce m |]
-            fullName, namespaceName, usedMembers       
-
-        // We scrutinize namespaces for invalid characters on open, but this provides better diagnostics
-        ValidateNamespaceName(fullName, st.TypeProvider, m, namespaceName)
-
-        ValidateAttributesOfProvidedType(m, st)
-
-        // Those members must have this type.
-        // This needs to be a *shallow* exploration. Otherwise, as in Freebase sample the entire database could be explored.
-        for mi in usedMembers do
-            match mi with 
-            | Tainted.Null -> errorR(Error(FSComp.SR.etNullMember fullName, m))  
-            | Tainted.NonNull _ -> 
-                let memberName = TryMemberMember(mi, fullName, "Name", "Name", m, "invalid provided type member name", fun mi -> mi.Name) |> unmarshal
-                if String.IsNullOrEmpty memberName then 
-                    errorR(Error(FSComp.SR.etNullOrEmptyMemberName fullName, m))  
-                else 
-                    let miDeclaringType = TryMemberMember(mi, fullName, memberName, "DeclaringType", m, ProvidedType.CreateNoContext(typeof), fun mi -> mi.DeclaringType)
-                    match miDeclaringType with 
-                        // Generated nested types may have null DeclaringType
-                    | Tainted.Null when mi.OfType().IsSome -> ()
-                    | Tainted.Null -> 
-                        errorR(Error(FSComp.SR.etNullMemberDeclaringType(fullName, memberName), m))   
-                    | Tainted.NonNull miDeclaringType  ->     
-                        let miDeclaringTypeFullName = 
-                            TryMemberMember (miDeclaringType, fullName, memberName, "FullName", m,
-                                "invalid declaring type full name",
-                                fun miDeclaringType -> miDeclaringType.FullName)
-                            |> unmarshal
-
-                        if not (ProvidedType.TaintedEquals (st, miDeclaringType)) then 
-                            errorR(Error(FSComp.SR.etNullMemberDeclaringTypeDifferentFromProvidedType(fullName, memberName, miDeclaringTypeFullName), m))   
-
-                    match mi.OfType() with
-                    | Some mi ->
-                        let isPublic = TryMemberMember(mi, fullName, memberName, "IsPublic", m, true, fun mi->mi.IsPublic) |> unmarshal
-                        let isGenericMethod = TryMemberMember(mi, fullName, memberName, "IsGenericMethod", m, true, fun mi->mi.IsGenericMethod) |> unmarshal
-                        if not isPublic || isGenericMethod then
-                            errorR(Error(FSComp.SR.etMethodHasRequirements(fullName, memberName), m))   
-                    | None ->
-                    match mi.OfType() with
-                    | Some subType -> ValidateAttributesOfProvidedType(m, subType)
-                    | None ->
-                    match mi.OfType() with
-                    | Some pi ->
-                        // Property must have a getter or setter
-                        // TODO: Property must be public etc.
-                        let expectRead =
-                             match TryMemberMember(pi, fullName, memberName, "GetGetMethod", m, null, fun pi -> pi.GetGetMethod()) with 
-                             | Tainted.Null -> false 
-                             | _ -> true
-                        let expectWrite = 
-                            match TryMemberMember(pi, fullName, memberName, "GetSetMethod", m, null, fun pi-> pi.GetSetMethod()) with 
-                            | Tainted.Null -> false 
-                            | _ -> true
-                        let canRead = TryMemberMember(pi, fullName, memberName, "CanRead", m, expectRead, fun pi-> pi.CanRead) |> unmarshal
-                        let canWrite = TryMemberMember(pi, fullName, memberName, "CanWrite", m, expectWrite, fun pi-> pi.CanWrite) |> unmarshal
-                        match expectRead, canRead with
-                        | false, false | true, true-> ()
-                        | false, true -> errorR(Error(FSComp.SR.etPropertyCanReadButHasNoGetter(memberName, fullName), m))   
-                        | true, false -> errorR(Error(FSComp.SR.etPropertyHasGetterButNoCanRead(memberName, fullName), m))   
-                        match expectWrite, canWrite with
-                        | false, false | true, true-> ()
-                        | false, true -> errorR(Error(FSComp.SR.etPropertyCanWriteButHasNoSetter(memberName, fullName), m))   
-                        | true, false -> errorR(Error(FSComp.SR.etPropertyHasSetterButNoCanWrite(memberName, fullName), m))   
-                        if not canRead && not canWrite then 
-                            errorR(Error(FSComp.SR.etPropertyNeedsCanWriteOrCanRead(memberName, fullName), m))   
-
-                    | None ->
-                    match mi.OfType() with 
-                    | Some ei ->
-                        // Event must have adder and remover
-                        // TODO: Event must be public etc.
-                        let adder = TryMemberMember(ei, fullName, memberName, "GetAddMethod", m, null, fun ei-> ei.GetAddMethod())
-                        let remover = TryMemberMember(ei, fullName, memberName, "GetRemoveMethod", m, null, fun ei-> ei.GetRemoveMethod())
-                        match adder, remover with
-                        | Tainted.Null, _ -> errorR(Error(FSComp.SR.etEventNoAdd(memberName, fullName), m))   
-                        | _, Tainted.Null -> errorR(Error(FSComp.SR.etEventNoRemove(memberName, fullName), m))   
-                        | _, _ -> ()
-                    | None ->
-                    match mi.OfType() with
-                    | Some _  -> () // TODO: Constructors must be public etc.
-                    | None ->
-                    match mi.OfType() with
-                    | Some _ -> () // TODO: Fields must be public, literals must have a value etc.
-                    | None ->
-                        errorR(Error(FSComp.SR.etUnsupportedMemberKind(memberName, fullName), m))   
-
-    let ValidateProvidedTypeDefinition(m, st: Tainted, expectedPath: string[], expectedName: string) = 
-
-        // Validate the Name, Namespace and FullName properties
-        let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
-#if NO_CHECKNULLS
-        let _namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
-#else
-        let _namespaceName = TryTypeMember<_, (string?)>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
-#endif
-        let _fullname = TryTypeMemberNonNull(st, name, "FullName", m, FSComp.SR.invalidFullNameForProvidedType(), fun st -> st.FullName)  |> unmarshal
-        ValidateExpectedName m expectedPath expectedName st
-
-        ValidateAttributesOfProvidedType(m, st)
-
-        // This excludes, for example, types with '.' in them which would not be resolvable during name resolution.
-        match expectedName.IndexOfAny(PrettyNaming.IllegalCharactersInTypeAndNamespaceNames) with
-        | -1 -> ()
-        | n -> errorR(Error(FSComp.SR.etIllegalCharactersInTypeName(string expectedName[n], expectedName), m))  
-
-        let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
-        if staticParameters.PUntaint((fun a -> (nonNull a).Length), m)  = 0 then 
-            ValidateProvidedTypeAfterStaticInstantiation(m, st, expectedPath, expectedName)
-
-
-    /// Resolve a (non-nested) provided type given a full namespace name and a type name. 
-    /// May throw an exception which will be turned into an error message by one of the 'Try' function below.
-    /// If resolution is successful the type is then validated.
-    let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
-        let displayName = String.Join(".", moduleOrNamespace)
-
-        // Try to find the type in the given provided namespace
-        let rec tryNamespace (providedNamespace: Tainted) = 
-
-            // Get the provided namespace name
-            let providedNamespaceName = providedNamespace.PUntaint((fun providedNamespace -> providedNamespace.NamespaceName), range=m)
-
-            // Check if the provided namespace name is an exact match of the required namespace name
-            if displayName = providedNamespaceName then
-                let resolvedType = providedNamespace.PApply((fun providedNamespace -> ProvidedType.CreateNoContext(providedNamespace.ResolveTypeName typeName)), range=m) 
-                match resolvedType with
-                | Tainted.Null -> None
-                | Tainted.NonNull result -> 
-                    ValidateProvidedTypeDefinition(m, result, moduleOrNamespace, typeName)
-                    Some result
-            else
-                // Note: This eagerly explores all provided namespaces even if there is no match of even a prefix in the
-                // namespace names. 
-                let providedNamespaces = providedNamespace.PApplyArray((fun providedNamespace -> providedNamespace.GetNestedNamespaces()), "GetNestedNamespaces", range=m)
-                tryNamespaces providedNamespaces
-
-        and tryNamespaces (providedNamespaces: Tainted[]) = 
-            providedNamespaces |> Array.tryPick tryNamespace
-
-        let providedNamespaces = resolver.PApplyArray((fun resolver -> resolver.GetNamespaces()), "GetNamespaces", range=m)
-        match tryNamespaces providedNamespaces with 
-        | None -> resolver.PApply((fun _ -> null), m)
-        | Some res -> res
-                    
-    /// Try to resolve a type against the given host with the given resolution environment.
-    let TryResolveProvidedType(resolver: Tainted, m, moduleOrNamespace, typeName) =
-        try 
-            match ResolveProvidedType(resolver, m, moduleOrNamespace, typeName) with
-            | Tainted.Null -> None
-            | Tainted.NonNull ty -> Some ty
-        with e -> 
-            errorRecovery e m
-            None
-
-    let ILPathToProvidedType  (st: Tainted, m) = 
-        let nameContrib (st: Tainted) = 
-            let typeName = st.PUntaint((fun st -> st.Name), m)
-            match st.PApply((fun st -> st.DeclaringType), m) with 
-            | Tainted.Null -> 
-               match st.PUntaint((fun st -> st.Namespace), m) with 
-               | Null -> typeName
-               | NonNull ns -> ns + "." + typeName
-            | _ -> typeName
-
-        let rec encContrib (st: Tainted) = 
-            match st.PApply((fun st ->st.DeclaringType), m) with 
-            | Tainted.Null -> []
-            | Tainted.NonNull enc -> encContrib enc @ [ nameContrib enc ]
-
-        encContrib st, nameContrib st
-
-    let ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams: Tainted, m) =
-        let defaultArgValues = 
-            staticParams.PApply((fun ps ->  ps |> Array.map (fun sp -> sp.Name, (if sp.IsOptional then Some (string sp.RawDefaultValue) else None ))), range=m)
-
-        let defaultArgValues = defaultArgValues.PUntaint(id, m)
-        PrettyNaming.computeMangledNameWithoutDefaultArgValues(nm, staticArgs, defaultArgValues)
-
-    /// Apply the given provided method to the given static arguments (the arguments are assumed to have been sorted into application order)
-    let TryApplyProvidedMethod(methBeforeArgs: Tainted, staticArgs: obj[], m: range) =
-        if staticArgs.Length = 0 then 
-            Some methBeforeArgs
-        else
-            let mangledName = 
-                let nm = methBeforeArgs.PUntaint((fun x -> x.Name), m)
-                let staticParams = methBeforeArgs.PApplyWithProvider((fun (mb, resolver) -> mb.GetStaticParametersForMethod resolver), range=m) 
-                let mangledName = ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams, m)
-                mangledName
- 
-            match methBeforeArgs.PApplyWithProvider((fun (mb, provider) -> mb.ApplyStaticArgumentsForMethod(provider, mangledName, staticArgs)), range=m) with 
-            | Tainted.Null -> None
-            | Tainted.NonNull methWithArguments -> 
-                let actualName = methWithArguments.PUntaint((fun x -> x.Name), m)
-                if actualName <> mangledName then 
-                    error(Error(FSComp.SR.etProvidedAppliedMethodHadWrongName(methWithArguments.TypeProviderDesignation, mangledName, actualName), m))
-                Some methWithArguments
-
-
-    /// Apply the given provided type to the given static arguments (the arguments are assumed to have been sorted into application order
-    let TryApplyProvidedType(typeBeforeArguments: Tainted, optGeneratedTypePath: string list option, staticArgs: obj[], m: range) =
-        if staticArgs.Length = 0 then 
-            Some (typeBeforeArguments, (fun () -> ()))
-        else 
-            
-            let fullTypePathAfterArguments = 
-                // If there is a generated type name, then use that
-                match optGeneratedTypePath with 
-                | Some path -> path
-                | None -> 
-                    // Otherwise, use the full path of the erased type, including mangled arguments
-                    let nm = typeBeforeArguments.PUntaint((fun x -> x.Name), m)
-                    let enc, _ = ILPathToProvidedType (typeBeforeArguments, m)
-                    let staticParams : Tainted = typeBeforeArguments.PApplyWithProvider((fun (st, resolver) -> st.GetStaticParameters resolver |> nonNull), range=m) 
-                    let mangledName = ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams, m)
-                    enc @ [ mangledName ]
- 
-            match typeBeforeArguments.PApplyWithProvider((fun (typeBeforeArguments, provider) -> typeBeforeArguments.ApplyStaticArguments(provider, Array.ofList fullTypePathAfterArguments, staticArgs)), range=m) with 
-            | Tainted.Null -> None
-            | Tainted.NonNull typeWithArguments -> 
-                let actualName = typeWithArguments.PUntaint((fun x -> x.Name), m)
-                let checkTypeName() = 
-                    let expectedTypeNameAfterArguments = fullTypePathAfterArguments[fullTypePathAfterArguments.Length-1]
-                    if actualName <> expectedTypeNameAfterArguments then 
-                        error(Error(FSComp.SR.etProvidedAppliedTypeHadWrongName(typeWithArguments.TypeProviderDesignation, expectedTypeNameAfterArguments, actualName), m))
-                Some (typeWithArguments, checkTypeName)
-
-    /// Given a mangled name reference to a non-nested provided type, resolve it.
-    /// If necessary, demangle its static arguments before applying them.
-    let TryLinkProvidedType(resolver: Tainted, moduleOrNamespace: string[], typeLogicalName: string, range: range) =
-        
-        // Demangle the static parameters
-        let typeName, argNamesAndValues = 
-            try 
-                PrettyNaming.demangleProvidedTypeName typeLogicalName 
-            with PrettyNaming.InvalidMangledStaticArg piece -> 
-                error(Error(FSComp.SR.etProvidedTypeReferenceInvalidText piece, range0)) 
-
-        let argSpecsTable = dict argNamesAndValues
-        let typeBeforeArguments = ResolveProvidedType(resolver, range0, moduleOrNamespace, typeName) 
-
-        match typeBeforeArguments with 
-        | Tainted.Null -> None
-        | Tainted.NonNull typeBeforeArguments -> 
-            // Take the static arguments (as strings, taken from the text in the reference we're relinking), 
-            // and convert them to objects of the appropriate type, based on the expected kind.
-            let staticParameters =
-                typeBeforeArguments.PApplyWithProvider((fun (typeBeforeArguments, resolver) ->
-                    typeBeforeArguments.GetStaticParameters resolver),range=range0)
-
-            let staticParameters = staticParameters.PApplyArray(id, "", range)
-            
-            let staticArgs = 
-                staticParameters |> Array.map (fun sp -> 
-                      let typeBeforeArgumentsName = typeBeforeArguments.PUntaint ((fun st -> st.Name), range)
-                      let spName = sp.PUntaint ((fun sp -> sp.Name), range)
-                      match argSpecsTable.TryGetValue spName with
-                      | true, arg ->
-                          /// Find the name of the representation type for the static parameter
-                          let spReprTypeName = 
-                              sp.PUntaint((fun sp -> 
-                                  let pt = sp.ParameterType
-                                  let uet = if pt.IsEnum then pt.GetEnumUnderlyingType() else pt
-                                  uet.FullName), range)
-
-                          match spReprTypeName with 
-                          | "System.SByte" -> box (sbyte arg)
-                          | "System.Int16" -> box (int16 arg)
-                          | "System.Int32" -> box (int32 arg)
-                          | "System.Int64" -> box (int64 arg)
-                          | "System.Byte" -> box (byte arg)
-                          | "System.UInt16" -> box (uint16 arg)
-                          | "System.UInt32" -> box (uint32 arg)
-                          | "System.UInt64" -> box (uint64 arg)
-                          | "System.Decimal" -> box (decimal arg)
-                          | "System.Single" -> box (single arg)
-                          | "System.Double" -> box (double arg)
-                          | "System.Char" -> box (char arg)
-                          | "System.Boolean" -> box (arg = "True")
-                          | "System.String" -> box (string arg)
-                          | s -> error(Error(FSComp.SR.etUnknownStaticArgumentKind(s, typeLogicalName), range0))
-
-                      | _ ->
-                          if sp.PUntaint ((fun sp -> sp.IsOptional), range) then 
-                              match sp.PUntaint((fun sp -> sp.RawDefaultValue), range) with
-                              | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
-                              | NonNull v -> v
-                          else
-                              error(Error(FSComp.SR.etProvidedTypeReferenceMissingArgument spName, range0)))
-                    
-
-            match TryApplyProvidedType(typeBeforeArguments, None, staticArgs, range0) with 
-            | Some (typeWithArguments, checkTypeName) -> 
-                checkTypeName() 
-                Some typeWithArguments
-            | None -> None
-
-    /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-    let GetPartsOfNamespaceRecover(namespaceName: string MaybeNull) = 
-        match namespaceName with 
-        | Null -> [] 
-        | NonNull namespaceName -> 
-            if namespaceName.Length = 0 then [""]
-            else splitNamespace (nonNull namespaceName)
-
-    /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-    let GetProvidedNamespaceAsPath (m, resolver: Tainted, namespaceName:string MaybeNull) =
-        match namespaceName with 
-        | Null -> [] 
-        | NonNull namespaceName -> 
-            if namespaceName.Length = 0 then
-                errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m))  
-            GetPartsOfNamespaceRecover namespaceName
-
-    /// Get the parts of the name that encloses the .NET type including nested types. 
-    let GetFSharpPathToProvidedType (st: Tainted, range) = 
-        // Can't use st.Fullname because it may be like IEnumerable
-        // We want [System;Collections;Generic]
-        let namespaceParts = GetPartsOfNamespaceRecover(st.PUntaint((fun st -> st.Namespace), range))
-        let rec walkUpNestedClasses(st: Tainted, soFar) =
-            match st with
-            | Tainted.Null -> soFar
-            | Tainted.NonNull st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), soFar) @ [st.PUntaint((fun st -> st.Name), range)]
-
-        walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), namespaceParts)
-
-
-    /// Get the ILAssemblyRef for a provided assembly. Do not take into account
-    /// any type relocations or static linking for generated types.
-    let GetOriginalILAssemblyRefOfProvidedAssembly (assembly: Tainted, m) =
-        let aname = assembly.PUntaint((fun assembly -> assembly.GetName()), m)
-        ILAssemblyRef.FromAssemblyName aname
-
-    /// Get the ILTypeRef for the provided type (including for nested types). Do not take into account
-    /// any type relocations or static linking for generated types.
-    let GetOriginalILTypeRefOfProvidedType (st: Tainted, range) = 
-        
-        let aref = GetOriginalILAssemblyRefOfProvidedAssembly (st.PApply((fun st -> nonNull st.Assembly), range), range) // NULLNESS TODO: why is explicit instantiation needed here
-        let scoperef = ILScopeRef.Assembly aref
-        let enc, nm = ILPathToProvidedType (st, range)
-        let tref = ILTypeRef.Create(scoperef, enc, nm)
-        tref
-
-    /// Get the ILTypeRef for the provided type (including for nested types). Take into account
-    /// any type relocations or static linking for generated types.
-    let GetILTypeRefOfProvidedType (st: Tainted, range) = 
-        match st.PUntaint((fun st -> st.TryGetILTypeRef()), range) with 
-        | Some ilTypeRef -> ilTypeRef
-        | None -> GetOriginalILTypeRefOfProvidedType (st, range)
-
-    type ProviderGeneratedType = ProviderGeneratedType of ilOrigTyRef: ILTypeRef * ilRenamedTyRef: ILTypeRef * ProviderGeneratedType list
-
-    /// The table of information recording remappings from type names in the provided assembly to type
-    /// names in the statically linked, embedded assembly, plus what types are nested in side what types.
-    type ProvidedAssemblyStaticLinkingMap = 
-        { ILTypeMap: Dictionary }
-        static member CreateNew() = 
-            { ILTypeMap = Dictionary() }
-
-    /// Check if this is a direct reference to a non-embedded generated type. This is not permitted at any name resolution.
-    /// We check by seeing if the type is absent from the remapping context.
-    let IsGeneratedTypeDirectReference (st: Tainted, m) =
-        st.PUntaint((fun st -> st.TryGetTyconRef() |> Option.isNone), m)
-
-#endif
diff --git a/src/fsharp/ExtensionTyping.fsi b/src/fsharp/ExtensionTyping.fsi
deleted file mode 100755
index dac781231e9..00000000000
--- a/src/fsharp/ExtensionTyping.fsi
+++ /dev/null
@@ -1,394 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-// Extension typing, validation of extension types, etc.
-
-namespace rec FSharp.Compiler
-
-#if !NO_TYPEPROVIDERS
-
-open System
-open System.Collections.Concurrent
-open System.Collections.Generic
-open Internal.Utilities.Library
-open FSharp.Core.CompilerServices
-open FSharp.Compiler.AbstractIL.IL
-open FSharp.Compiler.Text
-
-module internal ExtensionTyping =
-
-    type TypeProviderDesignation = TypeProviderDesignation of string
-
-    /// Raised when a type provider has thrown an exception.
-    exception ProvidedTypeResolution of range * exn
-
-    /// Raised when an type provider has thrown an exception.
-    exception ProvidedTypeResolutionNoRange of exn
-
-    /// Get the list of relative paths searched for type provider design-time components
-    val toolingCompatiblePaths: unit -> string list
-
-    /// Carries information about the type provider resolution environment.
-    type ResolutionEnvironment =
-        { /// The folder from which an extension provider is resolving from. This is typically the project folder.
-          resolutionFolder: string
-
-          /// Output file name
-          outputFile: string option
-
-          /// Whether or not the --showextensionresolution flag was supplied to the compiler.
-          showResolutionMessages: bool
-
-          /// All referenced assemblies, including the type provider itself, and possibly other type providers.
-          referencedAssemblies: string []
-
-          /// The folder for temporary files
-          temporaryFolder: string }
-
-    /// Find and instantiate the set of ITypeProvider components for the given assembly reference
-    val GetTypeProvidersOfAssembly:
-        runtimeAssemblyFilename: string *
-        ilScopeRefOfRuntimeAssembly: ILScopeRef *
-        designTimeName: string *
-        resolutionEnvironment: ResolutionEnvironment *
-        isInvalidationSupported: bool *
-        isInteractive: bool *
-        systemRuntimeContainsType: (string -> bool) *
-        systemRuntimeAssemblyVersion: Version *
-        compilerToolPaths: string list *
-        range ->
-            Tainted list
-
-    /// Given an extension type resolver, supply a human-readable name suitable for error messages.
-    val DisplayNameOfTypeProvider: Tainted * range -> string
-
-    /// The context used to interpret information in the closure of System.Type, System.MethodInfo and other
-    /// info objects coming from the type provider.
-    ///
-    /// At the moment this is the "Type --> ILTypeRef" and "Type --> Tycon" remapping
-    /// context for generated types (it is empty for erased types). This is computed from
-    /// while processing the [] declaration related to the type.
-    ///
-    /// Immutable (after type generation for a [] declaration populates the dictionaries).
-    ///
-    /// The 'obj' values are all TyconRef, but obj is used due to a forward reference being required. Not particularly
-    /// pleasant, but better than intertwining the whole "ProvidedType" with the TAST structure.
-    []
-    type ProvidedTypeContext =
-
-        member TryGetILTypeRef: ProvidedType -> ILTypeRef option
-
-        member TryGetTyconRef: ProvidedType -> obj option
-
-        static member Empty: ProvidedTypeContext
-
-        static member Create:
-            ConcurrentDictionary * ConcurrentDictionary ->
-                ProvidedTypeContext
-
-        member GetDictionaries:
-            unit ->
-                ConcurrentDictionary * ConcurrentDictionary
-
-        /// Map the TyconRef objects, if any
-        member RemapTyconRefs: (obj -> obj) -> ProvidedTypeContext
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedType =
-        inherit ProvidedMemberInfo
-        member IsSuppressRelocate: bool
-        member IsErased: bool
-        member IsGenericType: bool
-        member Namespace: string
-        member FullName: string
-        member IsArray: bool
-        member GetInterfaces: unit -> ProvidedType []
-        member Assembly: ProvidedAssembly
-        member BaseType: ProvidedType MaybeNull
-        member GetNestedType: string -> ProvidedType
-        member GetNestedTypes: unit -> ProvidedType []
-        member GetAllNestedTypes: unit -> ProvidedType []
-        member GetMethods: unit -> ProvidedMethodInfo []
-        member GetFields: unit -> ProvidedFieldInfo []
-        member GetField: string -> ProvidedFieldInfo
-        member GetProperties: unit -> ProvidedPropertyInfo []
-        member GetProperty: string -> ProvidedPropertyInfo
-        member GetEvents: unit -> ProvidedEventInfo []
-        member GetEvent: string -> ProvidedEventInfo
-        member GetConstructors: unit -> ProvidedConstructorInfo []
-        member GetStaticParameters: ITypeProvider -> ProvidedParameterInfo []
-        member GetGenericTypeDefinition: unit -> ProvidedType
-        member IsVoid: bool
-        member IsGenericParameter: bool
-        member IsValueType: bool
-        member IsByRef: bool
-        member IsPointer: bool
-        member IsEnum: bool
-        member IsInterface: bool
-        member IsClass: bool
-        member IsMeasure: bool
-        member IsSealed: bool
-        member IsAbstract: bool
-        member IsPublic: bool
-        member IsNestedPublic: bool
-        member GenericParameterPosition: int
-        member GetElementType: unit -> ProvidedType
-        member GetGenericArguments: unit -> ProvidedType []
-        member GetArrayRank: unit -> int
-        member RawSystemType: Type
-        member GetEnumUnderlyingType: unit -> ProvidedType
-        member MakePointerType: unit -> ProvidedType
-        member MakeByRefType: unit -> ProvidedType
-        member MakeArrayType: unit -> ProvidedType
-        member MakeArrayType: rank: int -> ProvidedType
-        member MakeGenericType: args: ProvidedType [] -> ProvidedType
-        member AsProvidedVar: name: string -> ProvidedVar
-        static member Void: ProvidedType
-        static member CreateNoContext: Type -> ProvidedType
-        member TryGetILTypeRef: unit -> ILTypeRef option
-        member TryGetTyconRef: unit -> obj option
-        static member ApplyContext: ProvidedType * ProvidedTypeContext -> ProvidedType
-        member Context: ProvidedTypeContext
-        interface IProvidedCustomAttributeProvider
-        static member TaintedEquals: Tainted * Tainted -> bool
-
-#if NO_CHECKNULLS
-    []
-#endif
-    type IProvidedCustomAttributeProvider =
-        abstract GetHasTypeProviderEditorHideMethodsAttribute: provider:ITypeProvider -> bool
-        abstract GetDefinitionLocationAttribute: provider:ITypeProvider -> (string * int * int) option 
-        abstract GetXmlDocAttributes: provider:ITypeProvider -> string[]
-        abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
-        
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedAssembly = 
-        member GetName: unit -> System.Reflection.AssemblyName
-        member FullName: string
-        member GetManifestModuleContents: ITypeProvider -> byte []
-        member Handle: System.Reflection.Assembly
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedMemberInfo = 
-        member Name: string
-        member DeclaringType: ProvidedType MaybeNull
-        interface IProvidedCustomAttributeProvider 
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedMethodBase = 
-        inherit ProvidedMemberInfo
-        member IsGenericMethod: bool
-        member IsStatic: bool
-        member IsFamily: bool
-        member IsFamilyAndAssembly: bool
-        member IsFamilyOrAssembly: bool
-        member IsVirtual: bool
-        member IsFinal: bool
-        member IsPublic: bool
-        member IsAbstract: bool
-        member IsHideBySig: bool
-        member IsConstructor: bool
-        member GetParameters: unit -> ProvidedParameterInfo []
-        member GetGenericArguments: unit -> ProvidedType []
-        member GetStaticParametersForMethod: ITypeProvider -> ProvidedParameterInfo []
-        static member TaintedGetHashCode: Tainted -> int
-        static member TaintedEquals: Tainted * Tainted -> bool
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedMethodInfo = 
-        inherit ProvidedMethodBase
-        member ReturnType: ProvidedType
-        member MetadataToken: int
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedParameterInfo = 
-        member Name: string
-        member ParameterType: ProvidedType
-        member IsIn: bool
-        member IsOut: bool
-        member IsOptional: bool
-        member RawDefaultValue: obj
-        member HasDefaultValue: bool
-        interface IProvidedCustomAttributeProvider
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedFieldInfo = 
-        inherit ProvidedMemberInfo
-        member IsInitOnly: bool
-        member IsStatic: bool
-        member IsSpecialName: bool
-        member IsLiteral: bool
-        member GetRawConstantValue: unit -> obj
-        member FieldType: ProvidedType
-        member IsPublic: bool
-        member IsFamily: bool
-        member IsFamilyAndAssembly: bool
-        member IsFamilyOrAssembly: bool
-        member IsPrivate: bool
-        static member TaintedEquals: Tainted * Tainted -> bool
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedPropertyInfo = 
-        inherit ProvidedMemberInfo
-        member GetGetMethod: unit -> ProvidedMethodInfo
-        member GetSetMethod: unit -> ProvidedMethodInfo
-        member GetIndexParameters: unit -> ProvidedParameterInfo []
-        member CanRead: bool
-        member CanWrite: bool
-        member PropertyType: ProvidedType
-        static member TaintedGetHashCode: Tainted -> int
-        static member TaintedEquals: Tainted * Tainted -> bool
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedEventInfo = 
-        inherit ProvidedMemberInfo
-        member GetAddMethod: unit -> ProvidedMethodInfo
-        member GetRemoveMethod: unit -> ProvidedMethodInfo
-        member EventHandlerType: ProvidedType
-        static member TaintedGetHashCode: Tainted -> int
-        static member TaintedEquals: Tainted * Tainted -> bool
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedConstructorInfo = 
-        inherit ProvidedMethodBase
-
-    type ProvidedExprType =
-        | ProvidedNewArrayExpr of ProvidedType * ProvidedExpr []
-#if PROVIDED_ADDRESS_OF
-        | ProvidedAddressOfExpr of ProvidedExpr
-#endif
-        | ProvidedNewObjectExpr of ProvidedConstructorInfo * ProvidedExpr []
-        | ProvidedWhileLoopExpr of ProvidedExpr * ProvidedExpr
-        | ProvidedNewDelegateExpr of ProvidedType * ProvidedVar [] * ProvidedExpr
-        | ProvidedForIntegerRangeLoopExpr of ProvidedVar * ProvidedExpr * ProvidedExpr * ProvidedExpr
-        | ProvidedSequentialExpr of ProvidedExpr * ProvidedExpr
-        | ProvidedTryWithExpr of ProvidedExpr * ProvidedVar * ProvidedExpr * ProvidedVar * ProvidedExpr
-        | ProvidedTryFinallyExpr of ProvidedExpr * ProvidedExpr
-        | ProvidedLambdaExpr of ProvidedVar * ProvidedExpr
-        | ProvidedCallExpr of ProvidedExpr option * ProvidedMethodInfo * ProvidedExpr []
-        | ProvidedConstantExpr of obj * ProvidedType
-        | ProvidedDefaultExpr of ProvidedType
-        | ProvidedNewTupleExpr of ProvidedExpr []
-        | ProvidedTupleGetExpr of ProvidedExpr * int
-        | ProvidedTypeAsExpr of ProvidedExpr * ProvidedType
-        | ProvidedTypeTestExpr of ProvidedExpr * ProvidedType
-        | ProvidedLetExpr of ProvidedVar * ProvidedExpr * ProvidedExpr
-        | ProvidedVarSetExpr of ProvidedVar * ProvidedExpr
-        | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
-        | ProvidedVarExpr of ProvidedVar
-        
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedExpr =
-        member Type: ProvidedType
-        /// Convert the expression to a string for diagnostics
-        member UnderlyingExpressionString: string
-        member GetExprType: unit -> ProvidedExprType option
-
-    [] 
-#if NO_CHECKNULLS
-    []
-#endif
-    type ProvidedVar =
-        member Type: ProvidedType
-        member Name: string
-        member IsMutable: bool
-        override Equals: obj -> bool
-        override GetHashCode: unit -> int
-
-    /// Get the provided expression for a particular use of a method.
-    val GetInvokerExpression: ITypeProvider * ProvidedMethodBase * ProvidedVar [] -> ProvidedExpr
-
-    /// Validate that the given provided type meets some of the rules for F# provided types
-    val ValidateProvidedTypeAfterStaticInstantiation:
-        range * Tainted * expectedPath: string [] * expectedName: string -> unit
-
-    /// Try to apply a provided type to the given static arguments. If successful also return a function
-    /// to check the type name is as expected (this function is called by the caller of TryApplyProvidedType
-    /// after other checks are made).
-    val TryApplyProvidedType:
-        typeBeforeArguments: Tainted *
-        optGeneratedTypePath: string list option *
-        staticArgs: obj [] *
-        range ->
-            (Tainted * (unit -> unit)) option
-
-    /// Try to apply a provided method to the given static arguments.
-    val TryApplyProvidedMethod:
-        methBeforeArgs: Tainted * staticArgs: obj [] * range -> Tainted option
-
-    /// Try to resolve a type in the given extension type resolver
-    val TryResolveProvidedType:
-        Tainted * range * string [] * typeName: string -> Tainted option
-
-    /// Try to resolve a type in the given extension type resolver
-    val TryLinkProvidedType:
-        Tainted * string [] * typeLogicalName: string * range: range -> Tainted option
-
-    /// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
-    val GetProvidedNamespaceAsPath: range * Tainted * string -> string list
-
-    /// Decompose the enclosing name of a type (including any class nestings) into a list of parts.
-    /// e.g. System.Object -> ["System"; "Object"]
-    val GetFSharpPathToProvidedType: Tainted * range: range -> string list
-
-    /// Get the ILTypeRef for the provided type (including for nested types). Take into account
-    /// any type relocations or static linking for generated types.
-    val GetILTypeRefOfProvidedType: Tainted * range: range -> ILTypeRef
-
-    /// Get the ILTypeRef for the provided type (including for nested types). Do not take into account
-    /// any type relocations or static linking for generated types.
-    val GetOriginalILTypeRefOfProvidedType: Tainted * range: range -> ILTypeRef
-
-    /// Represents the remapping information for a generated provided type and its nested types.
-    ///
-    /// There is one overall tree for each root 'type X = ... type generation expr...' specification.
-    type ProviderGeneratedType =
-        | ProviderGeneratedType of ilOrigTyRef: ILTypeRef * ilRenamedTyRef: ILTypeRef * ProviderGeneratedType list
-
-    /// The table of information recording remappings from type names in the provided assembly to type
-    /// names in the statically linked, embedded assembly, plus what types are nested in side what types.
-    type ProvidedAssemblyStaticLinkingMap =
-        { /// The table of remappings from type names in the provided assembly to type
-          /// names in the statically linked, embedded assembly.
-          ILTypeMap: Dictionary }
-
-        /// Create a new static linking map, ready to populate with data.
-        static member CreateNew: unit -> ProvidedAssemblyStaticLinkingMap
-
-    /// Check if this is a direct reference to a non-embedded generated type. This is not permitted at any name resolution.
-    /// We check by seeing if the type is absent from the remapping context.
-    val IsGeneratedTypeDirectReference: Tainted * range -> bool
-
-#endif
diff --git a/src/fsharp/TypeProviders.fs b/src/fsharp/TypeProviders.fs
new file mode 100644
index 00000000000..8e911d20de7
--- /dev/null
+++ b/src/fsharp/TypeProviders.fs
@@ -0,0 +1,1506 @@
+// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
+
+// Type providers, validation of provided types, etc.
+
+module rec FSharp.Compiler.TypeProviders
+
+#if !NO_TYPEPROVIDERS
+
+open System
+open System.Collections.Concurrent
+open System.IO
+open System.Collections.Generic
+open System.Reflection
+open Internal.Utilities.Library
+open Internal.Utilities.FSharpEnvironment  
+open FSharp.Core.CompilerServices
+open FSharp.Compiler.AbstractIL.IL
+open FSharp.Compiler.ErrorLogger
+open FSharp.Compiler.Syntax
+open FSharp.Compiler.Text
+open FSharp.Compiler.Text.Range
+
+type TypeProviderDesignation = TypeProviderDesignation of string
+
+exception ProvidedTypeResolution of range * System.Exception
+exception ProvidedTypeResolutionNoRange of System.Exception
+
+let toolingCompatiblePaths() = toolingCompatiblePaths ()
+
+/// Represents some of the configuration parameters passed to type provider components 
+type ResolutionEnvironment =
+    { resolutionFolder: string
+      outputFile: string option
+      showResolutionMessages: bool
+      referencedAssemblies: string[]
+      temporaryFolder: string }
+
+/// Load a the design-time part of a type-provider into the host process, and look for types
+/// marked with the TypeProviderAttribute attribute.
+let GetTypeProviderImplementationTypes (
+        runTimeAssemblyFileName,
+        designTimeAssemblyNameString,
+        m:range,
+        compilerToolPaths:string list
+    ) =
+
+    // Report an error, blaming the particular type provider component
+    let raiseError designTimeAssemblyPathOpt (e: exn) =
+        let attrName = typeof.Name
+        let exnTypeName = e.GetType().FullName
+        let exnMsg = e.Message
+        match designTimeAssemblyPathOpt with 
+        | None -> 
+            let msg = FSComp.SR.etProviderHasWrongDesignerAssemblyNoPath(attrName, designTimeAssemblyNameString, exnTypeName, exnMsg)
+            raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
+        | Some designTimeAssemblyPath -> 
+            let msg = FSComp.SR.etProviderHasWrongDesignerAssembly(attrName, designTimeAssemblyNameString, designTimeAssemblyPath, exnTypeName, exnMsg)
+            raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
+
+    let designTimeAssemblyOpt = getTypeProviderAssembly (runTimeAssemblyFileName, designTimeAssemblyNameString, compilerToolPaths, raiseError)
+
+    match designTimeAssemblyOpt with
+    | Some loadedDesignTimeAssembly ->
+        try
+            let exportedTypes = loadedDesignTimeAssembly.GetExportedTypes() 
+            let filtered = 
+                [ for t in exportedTypes do 
+                        let ca = t.GetCustomAttributes(typeof, true)
+                        match ca with 
+                        | Null -> ()
+                        | NonNull ca -> 
+                            if ca.Length > 0 then 
+                                yield t ]
+            filtered
+        with e ->
+            let folder = Path.GetDirectoryName loadedDesignTimeAssembly.Location
+            let exnTypeName = e.GetType().FullName
+            let exnMsg = e.Message
+            match e with 
+            | :? FileLoadException -> 
+                let msg = FSComp.SR.etProviderHasDesignerAssemblyDependency(designTimeAssemblyNameString, folder, exnTypeName, exnMsg)
+                raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
+            
+            | _ -> 
+                let msg = FSComp.SR.etProviderHasDesignerAssemblyException(designTimeAssemblyNameString, folder, exnTypeName, exnMsg)
+                raise (TypeProviderError(msg, runTimeAssemblyFileName, m))
+    | None -> []
+
+let StripException (e: exn) =
+    match e with
+    | :? TargetInvocationException as e -> e.InnerException
+    | :? TypeInitializationException as e -> e.InnerException
+    | _ -> e
+
+/// Create an instance of a type provider from the implementation type for the type provider in the
+/// design-time assembly by using reflection-invoke on a constructor for the type provider.
+let CreateTypeProvider (
+        typeProviderImplementationType: Type, 
+        runtimeAssemblyPath, 
+        resolutionEnvironment: ResolutionEnvironment, 
+        isInvalidationSupported: bool, 
+        isInteractive: bool, 
+        systemRuntimeContainsType, 
+        systemRuntimeAssemblyVersion, 
+        m
+    ) =
+
+    // Protect a .NET reflection call as we load the type provider component into the host process, 
+    // reporting errors.
+    let protect f =
+        try 
+            f ()
+        with err ->
+            let e = StripException (StripException err)
+            raise (TypeProviderError(FSComp.SR.etTypeProviderConstructorException(e.Message), typeProviderImplementationType.FullName, m))
+
+    if typeProviderImplementationType.GetConstructor([| typeof |]) <> null then
+
+        // Create the TypeProviderConfig to pass to the type provider constructor
+        let e =
+            TypeProviderConfig(systemRuntimeContainsType, 
+                ResolutionFolder=resolutionEnvironment.resolutionFolder, 
+                RuntimeAssembly=runtimeAssemblyPath, 
+                ReferencedAssemblies=Array.copy resolutionEnvironment.referencedAssemblies, 
+                TemporaryFolder=resolutionEnvironment.temporaryFolder, 
+                IsInvalidationSupported=isInvalidationSupported, 
+                IsHostedExecution= isInteractive, 
+                SystemRuntimeAssemblyVersion = systemRuntimeAssemblyVersion)
+
+        protect (fun () -> Activator.CreateInstance(typeProviderImplementationType, [| box e|]) :?> ITypeProvider )
+
+    elif typeProviderImplementationType.GetConstructor [| |] <> null then 
+        protect (fun () -> Activator.CreateInstance typeProviderImplementationType :?> ITypeProvider )
+
+    else
+        // No appropriate constructor found
+        raise (TypeProviderError(FSComp.SR.etProviderDoesNotHaveValidConstructor(), typeProviderImplementationType.FullName, m))
+
+let GetTypeProvidersOfAssembly (
+        runtimeAssemblyFilename: string, 
+        ilScopeRefOfRuntimeAssembly: ILScopeRef, 
+        designTimeName: string, 
+        resolutionEnvironment: ResolutionEnvironment, 
+        isInvalidationSupported: bool, 
+        isInteractive: bool, 
+        systemRuntimeContainsType: string -> bool, 
+        systemRuntimeAssemblyVersion: Version, 
+        compilerToolPaths: string list,
+        m:range
+    ) =
+
+    let providerSpecs = 
+            try
+                let designTimeAssemblyName = 
+                    try
+                        if designTimeName.EndsWith(".dll", StringComparison.OrdinalIgnoreCase) then
+                            Some (AssemblyName (Path.GetFileNameWithoutExtension designTimeName))
+                        else
+                            Some (AssemblyName designTimeName)
+                    with :? ArgumentException ->
+                        errorR(Error(FSComp.SR.etInvalidTypeProviderAssemblyName(runtimeAssemblyFilename, designTimeName), m))
+                        None
+
+                [ match designTimeAssemblyName, resolutionEnvironment.outputFile with
+                    // Check if the attribute is pointing to the file being compiled, in which case ignore it
+                    // This checks seems like legacy but is included for compat.
+                    | Some designTimeAssemblyName, Some path 
+                        when String.Compare(designTimeAssemblyName.Name, Path.GetFileNameWithoutExtension path, StringComparison.OrdinalIgnoreCase) = 0 ->
+                        ()
+
+                    | Some _, _ ->
+                        let provImplTypes = GetTypeProviderImplementationTypes (runtimeAssemblyFilename, designTimeName, m, compilerToolPaths)
+                        for t in provImplTypes do
+                        let resolver =
+                            CreateTypeProvider (t, runtimeAssemblyFilename, resolutionEnvironment, isInvalidationSupported,
+                                isInteractive, systemRuntimeContainsType, systemRuntimeAssemblyVersion, m)
+                        match box resolver with 
+                        | Null -> ()
+                        | _ -> yield (resolver, ilScopeRefOfRuntimeAssembly)
+
+                    | None, _ -> 
+                        () ]
+
+            with :? TypeProviderError as tpe ->
+                tpe.Iter(fun e -> errorR(Error((e.Number, e.ContextualErrorMessage), m)) )
+                []
+
+    let providers = Tainted<_>.CreateAll(providerSpecs)
+
+    providers
+
+let unmarshal (t: Tainted<_>) = t.PUntaintNoFailure id
+
+/// Try to access a member on a provided type, catching and reporting errors
+let TryTypeMember<'T,'U>(st: Tainted<'T>, fullName, memberName, m, recover, f: 'T -> 'U) : Tainted<'U> =
+    try
+        st.PApply (f, m)
+    with :? TypeProviderError as tpe -> 
+        tpe.Iter (fun e -> errorR(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m)))
+        st.PApplyNoFailure(fun _ -> recover)
+
+/// Try to access a member on a provided type, where the result is an array of values, catching and reporting errors
+let TryTypeMemberArray (st: Tainted<_>, fullName, memberName, m, f) =
+    try
+        st.PApplyArray(f, memberName, m)
+    with :? TypeProviderError as tpe ->
+        tpe.Iter (fun e -> error(Error(FSComp.SR.etUnexpectedExceptionFromProvidedTypeMember(fullName, memberName, e.ContextualErrorMessage), m)))
+        [||]
+
+/// Try to access a member on a provided type, catching and reporting errors and checking the result is non-null, 
+#if NO_CHECKNULLS
+let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
+    match TryTypeMember(st, fullName, memberName, m, recover, f) with 
+#else
+let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U?)) : Tainted<'U> =
+    match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
+#endif
+    | Tainted.Null -> 
+        errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m))
+        st.PApplyNoFailure(fun _ -> recover)
+    | Tainted.NonNull r ->
+        r
+
+/// Try to access a property or method on a provided member, catching and reporting errors
+let TryMemberMember (mi: Tainted<_>, typeName, memberName, memberMemberName, m, recover, f) = 
+    try
+        mi.PApply (f, m)
+    with :? TypeProviderError as tpe ->
+        tpe.Iter (fun e -> errorR(Error(FSComp.SR.etUnexpectedExceptionFromProvidedMemberMember(memberMemberName, typeName, memberName, e.ContextualErrorMessage), m)))
+        mi.PApplyNoFailure(fun _ -> recover)
+
+/// Get the string to show for the name of a type provider
+let DisplayNameOfTypeProvider(resolver: Tainted, m: range) =
+    resolver.PUntaint((fun tp -> tp.GetType().Name), m)
+
+/// Validate a provided namespace name
+let ValidateNamespaceName(name, typeProvider: Tainted, m, nsp: string MaybeNull) =
+    match nsp with 
+    | Null -> ()
+    | NonNull nsp -> 
+        if String.IsNullOrWhiteSpace nsp then
+            // Empty namespace is not allowed
+            errorR(Error(FSComp.SR.etEmptyNamespaceOfTypeNotAllowed(name, typeProvider.PUntaint((fun tp -> tp.GetType().Name), m)), m))
+        else
+            for s in nsp.Split('.') do
+                match s.IndexOfAny(PrettyNaming.IllegalCharactersInTypeAndNamespaceNames) with
+                | -1 -> ()
+                | n -> errorR(Error(FSComp.SR.etIllegalCharactersInNamespaceName(string s[n], s), m))  
+
+let bindingFlags =
+    BindingFlags.DeclaredOnly |||
+    BindingFlags.Static |||
+    BindingFlags.Instance |||
+    BindingFlags.Public
+
+type CustomAttributeData = System.Reflection.CustomAttributeData
+
+type CustomAttributeNamedArgument = System.Reflection.CustomAttributeNamedArgument
+
+type CustomAttributeTypedArgument = System.Reflection.CustomAttributeTypedArgument
+
+// NOTE: for the purposes of remapping the closure of generated types, the FullName is sufficient.
+// We do _not_ rely on object identity or any other notion of equivalence provided by System.Type
+// itself. The mscorlib implementations of System.Type equality relations are not suitable: for
+// example RuntimeType overrides the equality relation to be reference equality for the Equals(object)
+// override, but the other subtypes of System.Type do not, making the relation non-reflective.
+//
+// Further, avoiding reliance on canonicalization (UnderlyingSystemType) or System.Type object identity means that 
+// providers can implement wrap-and-filter "views" over existing System.Type clusters without needing
+// to preserve object identity when presenting the types to the F# compiler.
+
+type ProvidedTypeComparer() = 
+    let key (ty: ProvidedType) =
+        match ty.Assembly with
+        | Null -> ("", ty.FullName)
+        | NonNull a -> (a.FullName, ty.FullName)
+
+    static member val Instance = ProvidedTypeComparer()
+
+    interface IEqualityComparer with
+        member _.GetHashCode(ty: ProvidedType) = hash (key ty)
+        member _.Equals(ty1: ProvidedType, ty2: ProvidedType) = (key ty1 = key ty2)
+
+/// The context used to interpret information in the closure of System.Type, System.MethodInfo and other 
+/// info objects coming from the type provider.
+///
+/// This is the "Type --> Tycon" remapping context of the type. This is only present for generated provided types, and contains
+/// all the entries in the remappings for the generative declaration.
+///
+/// Laziness is used "to prevent needless computation for every type during remapping". However it
+/// appears that the laziness likely serves no purpose and could be safely removed.
+and ProvidedTypeContext = 
+    | NoEntries
+    // The dictionaries are safe because the ProvidedType with the ProvidedTypeContext are only accessed one thread at a time during type-checking.
+    | Entries of ConcurrentDictionary * Lazy>
+
+    static member Empty = NoEntries
+
+    static member Create(d1, d2) = Entries(d1, notlazy d2)
+
+    member ctxt.GetDictionaries()  = 
+        match ctxt with
+        | NoEntries -> 
+            ConcurrentDictionary(ProvidedTypeComparer.Instance), ConcurrentDictionary(ProvidedTypeComparer.Instance)
+        | Entries (lookupILTR, lookupILTCR) ->
+            lookupILTR, lookupILTCR.Force()
+
+    member ctxt.TryGetILTypeRef st = 
+        match ctxt with 
+        | NoEntries -> None 
+        | Entries(d, _) -> 
+            match d.TryGetValue st with
+            | true, res -> Some res
+            | _ -> None
+
+    member ctxt.TryGetTyconRef st = 
+        match ctxt with 
+        | NoEntries -> None 
+        | Entries(_, d) -> 
+            let d = d.Force()
+            match d.TryGetValue st with
+            | true, res -> Some res
+            | _ -> None
+
+    member ctxt.RemapTyconRefs (f: obj->obj) = 
+        match ctxt with 
+        | NoEntries -> NoEntries
+        | Entries(d1, d2) ->
+            Entries(d1, lazy (let dict = ConcurrentDictionary(ProvidedTypeComparer.Instance)
+                                for KeyValue (st, tcref) in d2.Force() do dict.TryAdd(st, f tcref) |> ignore
+                                dict))
+
+and
+    []
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedType (x: Type, ctxt: ProvidedTypeContext) =
+    inherit ProvidedMemberInfo(x, ctxt)
+
+    let isMeasure = 
+        lazy
+            x.CustomAttributes 
+            |> Seq.exists (fun a -> a.Constructor.DeclaringType.FullName = typeof.FullName)
+
+    let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+
+    interface IProvidedCustomAttributeProvider with 
+        member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
+        member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
+        member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
+    
+    // The type provider spec distinguishes between 
+    //   - calls that can be made on provided types (i.e. types given by ReturnType, ParameterType, and generic argument types)
+    //   - calls that can be made on provided type definitions (types returned by ResolveTypeName, GetTypes etc.)
+    // Ideally we would enforce this decision structurally by having both ProvidedType and ProvidedTypeDefinition.
+    // Alternatively we could use assertions to enforce this.
+
+    // Suppress relocation of generated types
+    member _.IsSuppressRelocate = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.SuppressRelocate)) <> enum 0  
+
+    member _.IsErased = (x.Attributes &&& enum (int32 TypeProviderTypeAttributes.IsErased)) <> enum 0  
+
+    member _.IsGenericType = x.IsGenericType
+
+    member _.Namespace : string MaybeNull = x.Namespace
+
+    member _.FullName = x.FullName
+
+    member _.IsArray = x.IsArray
+
+    member _.Assembly: ProvidedAssembly MaybeNull = x.Assembly |> ProvidedAssembly.Create
+
+    member _.GetInterfaces() = x.GetInterfaces() |> ProvidedType.CreateArray ctxt
+
+    member _.GetMethods() = x.GetMethods bindingFlags |> ProvidedMethodInfo.CreateArray ctxt
+
+    member _.GetEvents() = x.GetEvents bindingFlags |> ProvidedEventInfo.CreateArray ctxt
+
+    member _.GetEvent nm = x.GetEvent(nm, bindingFlags) |> ProvidedEventInfo.Create ctxt
+
+    member _.GetProperties() = x.GetProperties bindingFlags |> ProvidedPropertyInfo.CreateArray ctxt
+
+    member _.GetProperty nm = x.GetProperty(nm, bindingFlags) |> ProvidedPropertyInfo.Create ctxt
+
+    member _.GetConstructors() = x.GetConstructors bindingFlags |> ProvidedConstructorInfo.CreateArray ctxt
+
+    member _.GetFields() = x.GetFields bindingFlags |> ProvidedFieldInfo.CreateArray ctxt
+
+    member _.GetField nm = x.GetField(nm, bindingFlags) |> ProvidedFieldInfo.Create ctxt
+
+    member _.GetAllNestedTypes() = x.GetNestedTypes(bindingFlags ||| BindingFlags.NonPublic) |> ProvidedType.CreateArray ctxt
+
+    member _.GetNestedTypes() = x.GetNestedTypes bindingFlags |> ProvidedType.CreateArray ctxt
+
+    /// Type.GetNestedType(string) can return null if there is no nested type with given name
+    member _.GetNestedType nm = x.GetNestedType (nm, bindingFlags) |> ProvidedType.Create ctxt
+
+    /// Type.GetGenericTypeDefinition() either returns type or throws exception, null is not permitted
+    member _.GetGenericTypeDefinition() = x.GetGenericTypeDefinition() |> ProvidedType.CreateWithNullCheck ctxt "GenericTypeDefinition"
+
+    /// Type.BaseType can be null when Type is interface or object
+    member _.BaseType = x.BaseType |> ProvidedType.Create ctxt
+
+    member _.GetStaticParameters(provider: ITypeProvider) : ProvidedParameterInfo[] MaybeNull = provider.GetStaticParameters x |> ProvidedParameterInfo.CreateArray ctxt
+
+    /// Type.GetElementType can be null if i.e. Type is not array\pointer\byref type
+    member _.GetElementType() = x.GetElementType() |> ProvidedType.Create ctxt
+
+    member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
+
+    member _.ApplyStaticArguments(provider: ITypeProvider, fullTypePathAfterArguments, staticArgs: obj[]) = 
+        provider.ApplyStaticArguments(x, fullTypePathAfterArguments,  staticArgs) |> ProvidedType.Create ctxt
+
+    member _.IsVoid = (typeof.Equals x || (x.Namespace = "System" && x.Name = "Void"))
+
+    member _.IsGenericParameter = x.IsGenericParameter
+
+    member _.IsValueType = x.IsValueType
+
+    member _.IsByRef = x.IsByRef
+
+    member _.IsPointer = x.IsPointer
+
+    member _.IsPublic = x.IsPublic
+
+    member _.IsNestedPublic = x.IsNestedPublic
+
+    member _.IsEnum = x.IsEnum
+
+    member _.IsClass = x.IsClass
+
+    member _.IsMeasure = isMeasure.Value
+
+    member _.IsSealed = x.IsSealed
+
+    member _.IsAbstract = x.IsAbstract
+
+    member _.IsInterface = x.IsInterface
+
+    member _.GetArrayRank() = x.GetArrayRank()
+
+    member _.GenericParameterPosition = x.GenericParameterPosition
+
+    member _.RawSystemType = x
+
+    /// Type.GetEnumUnderlyingType either returns type or raises exception, null is not permitted
+    member _.GetEnumUnderlyingType() = 
+        x.GetEnumUnderlyingType() 
+        |> ProvidedType.CreateWithNullCheck ctxt "EnumUnderlyingType"    
+
+    member _.MakePointerType() = ProvidedType.CreateNoContext(x.MakePointerType())
+
+    member _.MakeByRefType() = ProvidedType.CreateNoContext(x.MakeByRefType())
+
+    member _.MakeArrayType() = ProvidedType.CreateNoContext(x.MakeArrayType())
+
+    member _.MakeArrayType rank = ProvidedType.CreateNoContext(x.MakeArrayType(rank))
+
+    member _.MakeGenericType (args: ProvidedType[]) =
+        let argTypes = args |> Array.map (fun arg -> arg.RawSystemType)
+        ProvidedType.CreateNoContext(x.MakeGenericType(argTypes))
+
+    member _.AsProvidedVar name = ProvidedVar.CreateNonNull ctxt (Quotations.Var(name, x))
+
+    static member Create ctxt x : ProvidedType MaybeNull = 
+        match x with 
+        | Null -> null 
+        | NonNull t -> ProvidedType (t, ctxt)
+
+    static member CreateNonNull ctxt x = ProvidedType (x, ctxt)
+
+    static member CreateWithNullCheck ctxt name x = 
+        match x with
+        | Null -> nullArg name 
+        | t -> ProvidedType (t, ctxt)
+
+    static member CreateArray ctxt (xs: Type[] MaybeNull) : ProvidedType[] MaybeNull = 
+        match xs with
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedType.CreateNonNull ctxt)
+
+    static member CreateNoContext (x:Type) = ProvidedType.Create ProvidedTypeContext.Empty x
+
+    static member Void = ProvidedType.CreateNoContext typeof
+
+    member _.Handle = x
+
+    override _.Equals y = assert false; match y with :? ProvidedType as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+    member _.Context = ctxt
+
+    member this.TryGetILTypeRef() = this.Context.TryGetILTypeRef this
+
+    member this.TryGetTyconRef() = this.Context.TryGetTyconRef this
+
+    static member ApplyContext (pt: ProvidedType, ctxt) = ProvidedType(pt.Handle, ctxt)
+
+    static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
+        Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
+
+and 
+#if NO_CHECKNULLS
+    []
+#endif
+    IProvidedCustomAttributeProvider =
+    abstract GetDefinitionLocationAttribute : provider: ITypeProvider -> (string MaybeNull * int * int) option 
+
+    abstract GetXmlDocAttributes : provider: ITypeProvider -> string[]
+
+    abstract GetHasTypeProviderEditorHideMethodsAttribute : provider:ITypeProvider -> bool
+
+    abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
+
+and ProvidedCustomAttributeProvider =
+    static member Create (attributes :ITypeProvider -> seq): IProvidedCustomAttributeProvider = 
+        let (|Member|_|) (s: string) (x: CustomAttributeNamedArgument) = if x.MemberName = s then Some x.TypedValue else None
+        let (|Arg|_|) (x: CustomAttributeTypedArgument) = match x.Value with null -> None | v -> Some v
+        let findAttribByName tyFullName (a: CustomAttributeData) = (a.Constructor.DeclaringType.FullName = tyFullName)  
+        let findAttrib (ty: Type) a = findAttribByName ty.FullName a
+        { new IProvidedCustomAttributeProvider with 
+                member _.GetAttributeConstructorArgs (provider, attribName) = 
+                    attributes provider 
+                    |> Seq.tryFind (findAttribByName  attribName)  
+                    |> Option.map (fun a -> 
+                        let ctorArgs = 
+                            a.ConstructorArguments 
+                            |> Seq.toList 
+                            |> List.map (function Arg null -> None | Arg obj -> Some obj | _ -> None)
+                        let namedArgs = 
+                            a.NamedArguments 
+                            |> Seq.toList 
+                            |> List.map (fun arg -> arg.MemberName, match arg.TypedValue with Arg null -> None | Arg obj -> Some obj | _ -> None)
+                        ctorArgs, namedArgs)
+
+                member _.GetHasTypeProviderEditorHideMethodsAttribute provider = 
+                    attributes provider 
+                    |> Seq.exists (findAttrib typeof) 
+
+                member _.GetDefinitionLocationAttribute provider = 
+                    attributes provider 
+                    |> Seq.tryFind (findAttrib  typeof)  
+                    |> Option.map (fun a -> 
+                            (defaultArg (a.NamedArguments |> Seq.tryPick (function Member "FilePath" (Arg (:? string as v)) -> Some v | _ -> None)) null, 
+                            defaultArg (a.NamedArguments |> Seq.tryPick (function Member "Line" (Arg (:? int as v)) -> Some v | _ -> None)) 0, 
+                            defaultArg (a.NamedArguments |> Seq.tryPick (function Member "Column" (Arg (:? int as v)) -> Some v | _ -> None)) 0))
+
+                member _.GetXmlDocAttributes provider = 
+                    attributes provider 
+                    |> Seq.choose (fun a -> 
+                            if findAttrib  typeof a then 
+                            match a.ConstructorArguments |> Seq.toList with 
+                            | [ Arg(:? string as s) ] -> Some s
+                            | _ -> None
+                            else 
+                            None) 
+                    |> Seq.toArray  }
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedMemberInfo (x: MemberInfo, ctxt) = 
+    let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+
+    member _.Name = x.Name
+
+    /// DeclaringType can be null if MemberInfo belongs to Module, not to Type
+    member _.DeclaringType = ProvidedType.Create ctxt x.DeclaringType
+
+    interface IProvidedCustomAttributeProvider with 
+        member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
+        member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
+        member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
+        member _.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName)
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedParameterInfo (x: ParameterInfo, ctxt) = 
+    let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+
+    member _.Name = let nm = x.Name in match box nm with null -> "" | _ -> nm
+
+    member _.IsOut = x.IsOut
+
+    member _.IsIn = x.IsIn
+
+    member _.IsOptional = x.IsOptional
+
+    member _.RawDefaultValue = x.RawDefaultValue
+
+    member _.HasDefaultValue = x.Attributes.HasFlag(ParameterAttributes.HasDefault)
+
+    /// ParameterInfo.ParameterType cannot be null
+    member _.ParameterType = ProvidedType.CreateWithNullCheck ctxt "ParameterType" x.ParameterType
+    
+    static member Create ctxt (x: ParameterInfo MaybeNull) : ProvidedParameterInfo MaybeNull = 
+        match x with 
+        | Null -> null 
+        | NonNull x -> ProvidedParameterInfo (x, ctxt)
+
+    static member CreateNonNull ctxt x = ProvidedParameterInfo (x, ctxt)
+    
+    static member CreateArray ctxt (xs: ParameterInfo[] MaybeNull) : ProvidedParameterInfo[] MaybeNull = 
+        match xs with 
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
+    
+    static member CreateArrayNonNull ctxt xs : ProvidedParameterInfo[] = 
+        match box xs with 
+        | Null -> [| |]
+        | _  -> xs |> Array.map (ProvidedParameterInfo.CreateNonNull ctxt)
+    
+    interface IProvidedCustomAttributeProvider with 
+        member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
+        member _.GetDefinitionLocationAttribute provider = provide().GetDefinitionLocationAttribute provider
+        member _.GetXmlDocAttributes provider = provide().GetXmlDocAttributes provider
+        member _.GetAttributeConstructorArgs (provider, attribName) = provide().GetAttributeConstructorArgs (provider, attribName)
+
+    member _.Handle = x
+
+    override _.Equals y = assert false; match y with :? ProvidedParameterInfo as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedAssembly (x: Assembly) = 
+
+    member _.GetName() = x.GetName()
+
+    member _.FullName = x.FullName
+
+    member _.GetManifestModuleContents(provider: ITypeProvider) = provider.GetGeneratedAssemblyContents x
+
+    static member Create x : ProvidedAssembly MaybeNull = match x with null -> null | t -> ProvidedAssembly (t)
+
+    member _.Handle = x
+
+    override _.Equals y = assert false; match y with :? ProvidedAssembly as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedMethodBase (x: MethodBase, ctxt) = 
+    inherit ProvidedMemberInfo(x, ctxt)
+
+    member _.Context = ctxt
+
+    member _.IsGenericMethod = x.IsGenericMethod
+
+    member _.IsStatic  = x.IsStatic
+
+    member _.IsFamily  = x.IsFamily
+
+    member _.IsFamilyOrAssembly = x.IsFamilyOrAssembly
+
+    member _.IsFamilyAndAssembly = x.IsFamilyAndAssembly
+
+    member _.IsVirtual  = x.IsVirtual
+
+    member _.IsFinal = x.IsFinal
+
+    member _.IsPublic = x.IsPublic
+
+    member _.IsAbstract  = x.IsAbstract
+
+    member _.IsHideBySig = x.IsHideBySig
+
+    member _.IsConstructor  = x.IsConstructor
+
+    member _.GetParameters() = x.GetParameters() |> ProvidedParameterInfo.CreateArray ctxt 
+
+    member _.GetGenericArguments() = x.GetGenericArguments() |> ProvidedType.CreateArray ctxt
+
+    member _.Handle = x
+
+    static member TaintedGetHashCode (x: Tainted) =            
+        Tainted.GetHashCodeTainted 
+            (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, 
+                                                    (nonNull st.DeclaringType).FullName))) 
+
+    static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
+        Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
+
+    member _.GetStaticParametersForMethod(provider: ITypeProvider) : ProvidedParameterInfo[] = 
+        let bindingFlags = BindingFlags.Instance ||| BindingFlags.NonPublic ||| BindingFlags.Public 
+
+        let staticParams = 
+            match provider with 
+            | :? ITypeProvider2 as itp2 -> 
+                itp2.GetStaticParametersForMethod x  
+            | _ -> 
+                // To allow a type provider to depend only on FSharp.Core 4.3.0.0, it can alternatively
+                // implement an appropriate method called GetStaticParametersForMethod
+                let meth =
+                    provider.GetType().GetMethod( "GetStaticParametersForMethod", bindingFlags, null,
+                        [| typeof |], null)  
+                if isNull meth then [| |] else
+                let paramsAsObj = 
+                    try meth.Invoke(provider, bindingFlags ||| BindingFlags.InvokeMethod, null, [| box x |], null) 
+                    with err -> raise (StripException (StripException err))
+                paramsAsObj :?> ParameterInfo[] 
+
+        staticParams |> ProvidedParameterInfo.CreateArrayNonNull ctxt
+
+    member _.ApplyStaticArgumentsForMethod(provider: ITypeProvider, fullNameAfterArguments: string, staticArgs: obj[]) = 
+        let bindingFlags = BindingFlags.Instance ||| BindingFlags.Public ||| BindingFlags.InvokeMethod
+
+        let mb = 
+            match provider with 
+            | :? ITypeProvider2 as itp2 -> 
+                itp2.ApplyStaticArgumentsForMethod(x, fullNameAfterArguments, staticArgs)  
+            | _ -> 
+
+                // To allow a type provider to depend only on FSharp.Core 4.3.0.0, it can alternatively implement a method called GetStaticParametersForMethod
+                let meth =
+                    provider.GetType().GetMethod( "ApplyStaticArgumentsForMethod", bindingFlags, null,
+                        [| typeof; typeof; typeof |], null)  
+
+                match meth with 
+                | Null -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
+                | _ -> 
+                let mbAsObj = 
+                    try meth.Invoke(provider, bindingFlags ||| BindingFlags.InvokeMethod, null, [| box x; box fullNameAfterArguments; box staticArgs  |], null) 
+                    with err -> raise (StripException (StripException err))
+
+                match mbAsObj with 
+                | :? MethodBase as mb -> mb
+                | _ -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
+        match mb with 
+        | :? MethodInfo as mi -> (mi |> ProvidedMethodInfo.CreateNonNull ctxt : ProvidedMethodInfo) :> ProvidedMethodBase
+        | :? ConstructorInfo as ci -> (ci |> ProvidedConstructorInfo.CreateNonNull ctxt : ProvidedConstructorInfo) :> ProvidedMethodBase
+        | _ -> failwith (FSComp.SR.estApplyStaticArgumentsForMethodNotImplemented())
+
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedFieldInfo (x: FieldInfo, ctxt) = 
+    inherit ProvidedMemberInfo(x, ctxt)
+
+    static member CreateNonNull ctxt x = ProvidedFieldInfo (x, ctxt)
+
+    static member Create ctxt x : ProvidedFieldInfo MaybeNull = 
+        match x with 
+        | Null -> null 
+        | NonNull x -> ProvidedFieldInfo (x, ctxt)
+
+    static member CreateArray ctxt (xs: FieldInfo[] MaybeNull) : ProvidedFieldInfo[] MaybeNull = 
+        match xs with 
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedFieldInfo.CreateNonNull ctxt)
+
+    member _.IsInitOnly = x.IsInitOnly
+
+    member _.IsStatic = x.IsStatic
+
+    member _.IsSpecialName = x.IsSpecialName
+
+    member _.IsLiteral = x.IsLiteral
+
+    member _.GetRawConstantValue() = x.GetRawConstantValue()
+
+    /// FieldInfo.FieldType cannot be null
+
+    member _.FieldType = x.FieldType |> ProvidedType.CreateWithNullCheck ctxt "FieldType" 
+
+    member _.Handle = x
+
+    member _.IsPublic = x.IsPublic
+
+    member _.IsFamily = x.IsFamily
+
+    member _.IsPrivate = x.IsPrivate
+
+    member _.IsFamilyOrAssembly = x.IsFamilyOrAssembly
+
+    member _.IsFamilyAndAssembly = x.IsFamilyAndAssembly
+
+    override _.Equals y = assert false; match y with :? ProvidedFieldInfo as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+    static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
+        Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedMethodInfo (x: MethodInfo, ctxt) = 
+    inherit ProvidedMethodBase(x, ctxt)
+
+    member _.ReturnType = x.ReturnType |> ProvidedType.CreateWithNullCheck ctxt "ReturnType"
+
+    static member CreateNonNull ctxt (x: MethodInfo) : ProvidedMethodInfo = 
+        ProvidedMethodInfo (x, ctxt)
+
+    static member Create ctxt (x: MethodInfo MaybeNull) : ProvidedMethodInfo MaybeNull = 
+        match x with 
+        | Null -> null
+        | NonNull x -> ProvidedMethodInfo (x, ctxt)
+
+    static member CreateArray ctxt (xs: MethodInfo[] MaybeNull) : ProvidedMethodInfo[] MaybeNull = 
+        match xs with 
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedMethodInfo.CreateNonNull ctxt)
+
+    member _.Handle = x
+
+    member _.MetadataToken = x.MetadataToken
+
+    override _.Equals y = assert false; match y with :? ProvidedMethodInfo as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedPropertyInfo (x: PropertyInfo, ctxt) = 
+    inherit ProvidedMemberInfo(x, ctxt)
+
+    member _.GetGetMethod() = x.GetGetMethod() |> ProvidedMethodInfo.Create ctxt
+
+    member _.GetSetMethod() = x.GetSetMethod() |> ProvidedMethodInfo.Create ctxt
+
+    member _.CanRead = x.CanRead
+
+    member _.CanWrite = x.CanWrite
+
+    member _.GetIndexParameters() = x.GetIndexParameters() |> ProvidedParameterInfo.CreateArray ctxt
+
+    /// PropertyInfo.PropertyType cannot be null
+    member _.PropertyType = x.PropertyType |> ProvidedType.CreateWithNullCheck ctxt "PropertyType"
+
+    static member CreateNonNull ctxt x = ProvidedPropertyInfo (x, ctxt)
+
+    static member Create ctxt x : ProvidedPropertyInfo MaybeNull =
+        match x with 
+        | Null -> null 
+        | NonNull x -> ProvidedPropertyInfo (x, ctxt)
+
+    static member CreateArray ctxt (xs: PropertyInfo[] MaybeNull) : ProvidedPropertyInfo[] MaybeNull = 
+        match xs with
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedPropertyInfo.CreateNonNull ctxt)
+
+    member _.Handle = x
+
+    override _.Equals y = assert false; match y with :? ProvidedPropertyInfo as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+    static member TaintedGetHashCode (x: Tainted) = 
+        Tainted.GetHashCodeTainted
+            (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, 
+                                                    (nonNull st.DeclaringType).FullName))) 
+
+    static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
+        Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedEventInfo (x: EventInfo, ctxt) = 
+    inherit ProvidedMemberInfo(x, ctxt)
+
+    member _.GetAddMethod() = x.GetAddMethod() |> ProvidedMethodInfo.Create  ctxt
+
+    member _.GetRemoveMethod() = x.GetRemoveMethod() |> ProvidedMethodInfo.Create ctxt
+
+    /// EventInfo.EventHandlerType cannot be null
+    member _.EventHandlerType = x.EventHandlerType |> ProvidedType.CreateWithNullCheck ctxt "EventHandlerType"
+    
+    static member CreateNonNull ctxt x = ProvidedEventInfo (x, ctxt)
+    
+    static member Create ctxt x : ProvidedEventInfo MaybeNull = 
+        match x with 
+        | Null -> null 
+        | NonNull x -> ProvidedEventInfo (x, ctxt)
+    
+    static member CreateArray ctxt (xs: EventInfo[] MaybeNull) : ProvidedEventInfo[] MaybeNull = 
+        match xs with 
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedEventInfo.CreateNonNull ctxt)
+    
+    member _.Handle = x
+
+    override _.Equals y = assert false; match y with :? ProvidedEventInfo as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+    static member TaintedGetHashCode (x: Tainted) = 
+        Tainted.GetHashCodeTainted 
+            (x.PApplyNoFailure(fun st -> (st.Name, (nonNull (nonNull st.DeclaringType).Assembly).FullName, 
+                                                    (nonNull st.DeclaringType).FullName))) 
+
+    static member TaintedEquals (pt1: Tainted, pt2: Tainted) = 
+        Tainted.EqTainted (pt1.PApplyNoFailure(fun st -> st.Handle)) (pt2.PApplyNoFailure(fun st -> st.Handle))
+
+and [] 
+#if NO_CHECKNULLS
+    []
+#endif
+    ProvidedConstructorInfo (x: ConstructorInfo, ctxt) = 
+    inherit ProvidedMethodBase(x, ctxt)
+
+    static member CreateNonNull ctxt x = ProvidedConstructorInfo (x, ctxt)
+
+    static member Create ctxt (x: ConstructorInfo MaybeNull) : ProvidedConstructorInfo MaybeNull = 
+        match x with 
+        | Null -> null 
+        | NonNull x -> ProvidedConstructorInfo (x, ctxt)
+
+    static member CreateArray ctxt (xs: ConstructorInfo[] MaybeNull) : ProvidedConstructorInfo[] MaybeNull = 
+        match xs with 
+        | Null -> null
+        | NonNull xs -> xs |> Array.map (ProvidedConstructorInfo.CreateNonNull ctxt)
+
+    member _.Handle = x
+
+    override _.Equals y = assert false; match y with :? ProvidedConstructorInfo as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = assert false; x.GetHashCode()
+
+and ProvidedExprType =
+    | ProvidedNewArrayExpr of ProvidedType * ProvidedExpr[]
+#if PROVIDED_ADDRESS_OF
+    | ProvidedAddressOfExpr of ProvidedExpr
+#endif
+    | ProvidedNewObjectExpr of ProvidedConstructorInfo * ProvidedExpr[]
+    | ProvidedWhileLoopExpr of ProvidedExpr * ProvidedExpr
+    | ProvidedNewDelegateExpr of ProvidedType * ProvidedVar[] * ProvidedExpr
+    | ProvidedForIntegerRangeLoopExpr of ProvidedVar * ProvidedExpr * ProvidedExpr * ProvidedExpr
+    | ProvidedSequentialExpr of ProvidedExpr * ProvidedExpr
+    | ProvidedTryWithExpr of ProvidedExpr * ProvidedVar * ProvidedExpr * ProvidedVar * ProvidedExpr
+    | ProvidedTryFinallyExpr of ProvidedExpr * ProvidedExpr
+    | ProvidedLambdaExpr of ProvidedVar * ProvidedExpr
+    | ProvidedCallExpr of ProvidedExpr option * ProvidedMethodInfo * ProvidedExpr[] 
+    | ProvidedConstantExpr of obj * ProvidedType
+    | ProvidedDefaultExpr of ProvidedType
+    | ProvidedNewTupleExpr of ProvidedExpr[]
+    | ProvidedTupleGetExpr of ProvidedExpr * int
+    | ProvidedTypeAsExpr of ProvidedExpr * ProvidedType
+    | ProvidedTypeTestExpr of ProvidedExpr * ProvidedType
+    | ProvidedLetExpr of ProvidedVar * ProvidedExpr * ProvidedExpr
+    | ProvidedVarSetExpr of ProvidedVar * ProvidedExpr
+    | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
+    | ProvidedVarExpr of ProvidedVar
+
+#if NO_CHECKNULLS
+and []
+#else
+and []
+#endif
+    ProvidedExpr (x: Quotations.Expr, ctxt) =
+
+    member _.Type = x.Type |> ProvidedType.Create ctxt
+
+    member _.Handle = x
+
+    member _.Context = ctxt
+
+    member _.UnderlyingExpressionString = x.ToString()
+
+    member _.GetExprType() =
+        match x with
+        | Quotations.Patterns.NewObject(ctor, args) ->
+            Some (ProvidedNewObjectExpr (ProvidedConstructorInfo.CreateNonNull ctxt ctor, [| for a in args -> ProvidedExpr.CreateNonNull ctxt a |]))
+        | Quotations.Patterns.WhileLoop(guardExpr, bodyExpr) ->
+            Some (ProvidedWhileLoopExpr (ProvidedExpr.CreateNonNull ctxt guardExpr, ProvidedExpr.CreateNonNull ctxt bodyExpr))
+        | Quotations.Patterns.NewDelegate(ty, vs, expr) ->
+            Some (ProvidedNewDelegateExpr(ProvidedType.CreateNonNull ctxt ty, ProvidedVar.CreateArray ctxt (List.toArray vs), ProvidedExpr.CreateNonNull ctxt expr))
+        | Quotations.Patterns.Call(objOpt, meth, args) ->
+            Some (ProvidedCallExpr((match objOpt with None -> None | Some obj -> Some (ProvidedExpr.CreateNonNull ctxt obj)), 
+                    ProvidedMethodInfo.CreateNonNull ctxt meth, [| for a in args -> ProvidedExpr.CreateNonNull ctxt a |]))
+        | Quotations.Patterns.DefaultValue ty ->
+            Some (ProvidedDefaultExpr (ProvidedType.CreateNonNull ctxt ty))
+        | Quotations.Patterns.Value(obj, ty) ->
+            Some (ProvidedConstantExpr (obj, ProvidedType.CreateNonNull ctxt ty))
+        | Quotations.Patterns.Coerce(arg, ty) ->
+            Some (ProvidedTypeAsExpr (ProvidedExpr.CreateNonNull ctxt arg, ProvidedType.CreateNonNull ctxt ty))
+        | Quotations.Patterns.NewTuple args ->
+            Some (ProvidedNewTupleExpr(ProvidedExpr.CreateArray ctxt (Array.ofList args)))
+        | Quotations.Patterns.TupleGet(arg, n) ->
+            Some (ProvidedTupleGetExpr (ProvidedExpr.CreateNonNull ctxt arg, n))
+        | Quotations.Patterns.NewArray(ty, args) ->
+            Some (ProvidedNewArrayExpr(ProvidedType.CreateNonNull ctxt ty, ProvidedExpr.CreateArray ctxt (Array.ofList args)))
+        | Quotations.Patterns.Sequential(e1, e2) ->
+            Some (ProvidedSequentialExpr(ProvidedExpr.CreateNonNull ctxt e1, ProvidedExpr.CreateNonNull ctxt e2))
+        | Quotations.Patterns.Lambda(v, body) ->
+            Some (ProvidedLambdaExpr (ProvidedVar.CreateNonNull ctxt v,  ProvidedExpr.CreateNonNull ctxt body))
+        | Quotations.Patterns.TryFinally(b1, b2) ->
+            Some (ProvidedTryFinallyExpr (ProvidedExpr.CreateNonNull ctxt b1, ProvidedExpr.CreateNonNull ctxt b2))
+        | Quotations.Patterns.TryWith(b, v1, e1, v2, e2) ->
+            Some (ProvidedTryWithExpr (ProvidedExpr.CreateNonNull ctxt b, ProvidedVar.CreateNonNull ctxt v1, ProvidedExpr.CreateNonNull ctxt e1, ProvidedVar.CreateNonNull ctxt v2, ProvidedExpr.CreateNonNull ctxt e2))
+#if PROVIDED_ADDRESS_OF
+        | Quotations.Patterns.AddressOf e -> Some (ProvidedAddressOfExpr (ProvidedExpr.CreateNonNull ctxt e))
+#endif
+        | Quotations.Patterns.TypeTest(e, ty) ->
+            Some (ProvidedTypeTestExpr(ProvidedExpr.CreateNonNull ctxt e, ProvidedType.CreateNonNull ctxt ty))
+        | Quotations.Patterns.Let(v, e, b) ->
+            Some (ProvidedLetExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e, ProvidedExpr.CreateNonNull ctxt b))
+        | Quotations.Patterns.ForIntegerRangeLoop (v, e1, e2, e3) ->
+            Some (ProvidedForIntegerRangeLoopExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e1, ProvidedExpr.CreateNonNull ctxt e2, ProvidedExpr.CreateNonNull ctxt e3))
+        | Quotations.Patterns.VarSet(v, e) ->
+            Some (ProvidedVarSetExpr (ProvidedVar.CreateNonNull ctxt v, ProvidedExpr.CreateNonNull ctxt e))
+        | Quotations.Patterns.IfThenElse(g, t, e) ->
+            Some (ProvidedIfThenElseExpr (ProvidedExpr.CreateNonNull ctxt g, ProvidedExpr.CreateNonNull ctxt t, ProvidedExpr.CreateNonNull ctxt e))
+        | Quotations.Patterns.Var v ->
+            Some (ProvidedVarExpr (ProvidedVar.CreateNonNull ctxt v))
+        | _ -> None
+    static member Create ctxt t : ProvidedExpr MaybeNull = 
+        match box t with 
+        | Null -> null 
+        | _ -> ProvidedExpr (t, ctxt)
+
+    static member CreateNonNull ctxt t : ProvidedExpr = 
+        ProvidedExpr (t, ctxt)
+
+    static member CreateArray ctxt xs : ProvidedExpr[] = 
+        match box xs with 
+        | Null -> [| |]
+        | _ -> xs |> Array.map (ProvidedExpr.CreateNonNull ctxt)
+
+    override _.Equals y = match y with :? ProvidedExpr as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = x.GetHashCode()
+
+#if NO_CHECKNULLS
+and []
+#else
+and []
+#endif
+    ProvidedVar (x: Quotations.Var, ctxt) =
+    member _.Type = x.Type |> ProvidedType.Create ctxt
+    member _.Name = x.Name
+    member _.IsMutable = x.IsMutable
+    member _.Handle = x
+    member _.Context = ctxt
+
+    static member CreateNonNull ctxt t = 
+        ProvidedVar (t, ctxt)
+
+    static member CreateArray ctxt xs : ProvidedVar[] = 
+        match box xs with 
+        | Null -> [| |]
+        | _ -> xs |> Array.map (ProvidedVar.CreateNonNull ctxt)
+
+    override _.Equals y = match y with :? ProvidedVar as y -> x.Equals y.Handle | _ -> false
+
+    override _.GetHashCode() = x.GetHashCode()
+
+/// Get the provided invoker expression for a particular use of a method.
+let GetInvokerExpression (provider: ITypeProvider, methodBase: ProvidedMethodBase, paramExprs: ProvidedVar[]) = 
+    provider.GetInvokerExpression(methodBase.Handle, [| for p in paramExprs -> Quotations.Expr.Var p.Handle |]) |> ProvidedExpr.Create methodBase.Context
+
+/// Compute the Name or FullName property of a provided type, reporting appropriate errors
+let CheckAndComputeProvidedNameProperty(m, st: Tainted, proj, propertyString) =
+    let name = 
+        try st.PUntaint(proj, m) 
+        with :? TypeProviderError as tpe -> 
+            let newError = tpe.MapText((fun msg -> FSComp.SR.etProvidedTypeWithNameException(propertyString, msg)), st.TypeProviderDesignation, m)
+            raise newError
+    if String.IsNullOrEmpty name then
+        raise (TypeProviderError(FSComp.SR.etProvidedTypeWithNullOrEmptyName propertyString, st.TypeProviderDesignation, m))
+    name
+
+/// Verify that this type provider has supported attributes
+let ValidateAttributesOfProvidedType (m, st: Tainted) =         
+    let fullName = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.FullName), "FullName")
+    if TryTypeMember(st, fullName, "IsGenericType", m, false, fun st->st.IsGenericType) |> unmarshal then  
+        errorR(Error(FSComp.SR.etMustNotBeGeneric fullName, m))  
+    if TryTypeMember(st, fullName, "IsArray", m, false, fun st->st.IsArray) |> unmarshal then 
+        errorR(Error(FSComp.SR.etMustNotBeAnArray fullName, m))  
+    TryTypeMemberNonNull(st, fullName, "GetInterfaces", m, [||], fun st -> st.GetInterfaces()) |> ignore
+
+/// Verify that a provided type has the expected name
+let ValidateExpectedName m expectedPath expectedName (st: Tainted) =
+    let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
+    if name <> expectedName then
+        raise (TypeProviderError(FSComp.SR.etProvidedTypeHasUnexpectedName(expectedName, name), st.TypeProviderDesignation, m))
+
+#if NO_CHECKNULLS
+    let namespaceName = TryTypeMember(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal
+#else
+    let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, "", fun st -> st.Namespace) |> unmarshal // TODO NULLNESS: why is this explicit instantiation needed?
+#endif
+
+    let rec declaringTypes (st: Tainted) accu =
+        match TryTypeMember(st, name, "DeclaringType", m, null, fun st -> st.DeclaringType) with
+        | Tainted.Null -> accu
+        | Tainted.NonNull dt -> declaringTypes dt (CheckAndComputeProvidedNameProperty(m, dt, (fun dt -> dt.Name), "Name") :: accu)
+
+    let path = 
+        [|  match namespaceName with 
+            | Null -> ()
+            | NonNull namespaceName -> yield! namespaceName.Split([|'.'|])
+            yield! declaringTypes st [] |]
+    
+    if path <> expectedPath then
+        let expectedPath = String.Join(".", expectedPath)
+        let path = String.Join(".", path)
+        errorR(Error(FSComp.SR.etProvidedTypeHasUnexpectedPath(expectedPath, path), m))
+
+/// Eagerly validate a range of conditions on a provided type, after static instantiation (if any) has occurred
+let ValidateProvidedTypeAfterStaticInstantiation(m, st: Tainted, expectedPath: string[], expectedName: string) = 
+    // Do all the calling into st up front with recovery
+    let fullName, namespaceName, usedMembers =
+        let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
+#if NO_CHECKNULLS
+        let namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
+#else
+        let namespaceName = TryTypeMember<_, string?>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
+#endif
+        let fullName = TryTypeMemberNonNull(st, name, "FullName", m, FSComp.SR.invalidFullNameForProvidedType(), fun st -> st.FullName) |> unmarshal
+        ValidateExpectedName m expectedPath expectedName st
+        // Must be able to call (GetMethods|GetEvents|GetProperties|GetNestedTypes|GetConstructors)(bindingFlags).
+        let usedMembers: Tainted[] = 
+            // These are the members the compiler will actually use
+            [| for x in TryTypeMemberArray(st, fullName, "GetMethods", m, fun st -> st.GetMethods()) -> x.Coerce m
+                for x in TryTypeMemberArray(st, fullName, "GetEvents", m, fun st -> st.GetEvents()) -> x.Coerce m
+                for x in TryTypeMemberArray(st, fullName, "GetFields", m, fun st -> st.GetFields()) -> x.Coerce m
+                for x in TryTypeMemberArray(st, fullName, "GetProperties", m, fun st -> st.GetProperties()) -> x.Coerce m
+                // These will be validated on-demand
+                //for x in TryTypeMemberArray(st, fullName, "GetNestedTypes", m, fun st -> st.GetNestedTypes bindingFlags) -> x.Coerce()
+                for x in TryTypeMemberArray(st, fullName, "GetConstructors", m, fun st -> st.GetConstructors()) -> x.Coerce m |]
+        fullName, namespaceName, usedMembers       
+
+    // We scrutinize namespaces for invalid characters on open, but this provides better diagnostics
+    ValidateNamespaceName(fullName, st.TypeProvider, m, namespaceName)
+
+    ValidateAttributesOfProvidedType(m, st)
+
+    // Those members must have this type.
+    // This needs to be a *shallow* exploration. Otherwise, as in Freebase sample the entire database could be explored.
+    for mi in usedMembers do
+        match mi with 
+        | Tainted.Null -> errorR(Error(FSComp.SR.etNullMember fullName, m))  
+        | Tainted.NonNull _ -> 
+            let memberName = TryMemberMember(mi, fullName, "Name", "Name", m, "invalid provided type member name", fun mi -> mi.Name) |> unmarshal
+            if String.IsNullOrEmpty memberName then 
+                errorR(Error(FSComp.SR.etNullOrEmptyMemberName fullName, m))  
+            else 
+                let miDeclaringType = TryMemberMember(mi, fullName, memberName, "DeclaringType", m, ProvidedType.CreateNoContext(typeof), fun mi -> mi.DeclaringType)
+                match miDeclaringType with 
+                    // Generated nested types may have null DeclaringType
+                | Tainted.Null when mi.OfType().IsSome -> ()
+                | Tainted.Null -> 
+                    errorR(Error(FSComp.SR.etNullMemberDeclaringType(fullName, memberName), m))   
+                | Tainted.NonNull miDeclaringType  ->     
+                    let miDeclaringTypeFullName = 
+                        TryMemberMember (miDeclaringType, fullName, memberName, "FullName", m,
+                            "invalid declaring type full name",
+                            fun miDeclaringType -> miDeclaringType.FullName)
+                        |> unmarshal
+
+                    if not (ProvidedType.TaintedEquals (st, miDeclaringType)) then 
+                        errorR(Error(FSComp.SR.etNullMemberDeclaringTypeDifferentFromProvidedType(fullName, memberName, miDeclaringTypeFullName), m))   
+
+                match mi.OfType() with
+                | Some mi ->
+                    let isPublic = TryMemberMember(mi, fullName, memberName, "IsPublic", m, true, fun mi->mi.IsPublic) |> unmarshal
+                    let isGenericMethod = TryMemberMember(mi, fullName, memberName, "IsGenericMethod", m, true, fun mi->mi.IsGenericMethod) |> unmarshal
+                    if not isPublic || isGenericMethod then
+                        errorR(Error(FSComp.SR.etMethodHasRequirements(fullName, memberName), m))   
+                | None ->
+                match mi.OfType() with
+                | Some subType -> ValidateAttributesOfProvidedType(m, subType)
+                | None ->
+                match mi.OfType() with
+                | Some pi ->
+                    // Property must have a getter or setter
+                    // TODO: Property must be public etc.
+                    let expectRead =
+                            match TryMemberMember(pi, fullName, memberName, "GetGetMethod", m, null, fun pi -> pi.GetGetMethod()) with 
+                            | Tainted.Null -> false 
+                            | _ -> true
+                    let expectWrite = 
+                        match TryMemberMember(pi, fullName, memberName, "GetSetMethod", m, null, fun pi-> pi.GetSetMethod()) with 
+                        | Tainted.Null -> false 
+                        | _ -> true
+                    let canRead = TryMemberMember(pi, fullName, memberName, "CanRead", m, expectRead, fun pi-> pi.CanRead) |> unmarshal
+                    let canWrite = TryMemberMember(pi, fullName, memberName, "CanWrite", m, expectWrite, fun pi-> pi.CanWrite) |> unmarshal
+                    match expectRead, canRead with
+                    | false, false | true, true-> ()
+                    | false, true -> errorR(Error(FSComp.SR.etPropertyCanReadButHasNoGetter(memberName, fullName), m))   
+                    | true, false -> errorR(Error(FSComp.SR.etPropertyHasGetterButNoCanRead(memberName, fullName), m))   
+                    match expectWrite, canWrite with
+                    | false, false | true, true-> ()
+                    | false, true -> errorR(Error(FSComp.SR.etPropertyCanWriteButHasNoSetter(memberName, fullName), m))   
+                    | true, false -> errorR(Error(FSComp.SR.etPropertyHasSetterButNoCanWrite(memberName, fullName), m))   
+                    if not canRead && not canWrite then 
+                        errorR(Error(FSComp.SR.etPropertyNeedsCanWriteOrCanRead(memberName, fullName), m))   
+
+                | None ->
+                match mi.OfType() with 
+                | Some ei ->
+                    // Event must have adder and remover
+                    // TODO: Event must be public etc.
+                    let adder = TryMemberMember(ei, fullName, memberName, "GetAddMethod", m, null, fun ei-> ei.GetAddMethod())
+                    let remover = TryMemberMember(ei, fullName, memberName, "GetRemoveMethod", m, null, fun ei-> ei.GetRemoveMethod())
+                    match adder, remover with
+                    | Tainted.Null, _ -> errorR(Error(FSComp.SR.etEventNoAdd(memberName, fullName), m))   
+                    | _, Tainted.Null -> errorR(Error(FSComp.SR.etEventNoRemove(memberName, fullName), m))   
+                    | _, _ -> ()
+                | None ->
+                match mi.OfType() with
+                | Some _  -> () // TODO: Constructors must be public etc.
+                | None ->
+                match mi.OfType() with
+                | Some _ -> () // TODO: Fields must be public, literals must have a value etc.
+                | None ->
+                    errorR(Error(FSComp.SR.etUnsupportedMemberKind(memberName, fullName), m))   
+
+let ValidateProvidedTypeDefinition(m, st: Tainted, expectedPath: string[], expectedName: string) = 
+
+    // Validate the Name, Namespace and FullName properties
+    let name = CheckAndComputeProvidedNameProperty(m, st, (fun st -> st.Name), "Name")
+#if NO_CHECKNULLS
+    let _namespaceName = TryTypeMember(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
+#else
+    let _namespaceName = TryTypeMember<_, (string?)>(st, name, "Namespace", m, FSComp.SR.invalidNamespaceForProvidedType(), fun st -> st.Namespace) |> unmarshal
+#endif
+    let _fullname = TryTypeMemberNonNull(st, name, "FullName", m, FSComp.SR.invalidFullNameForProvidedType(), fun st -> st.FullName)  |> unmarshal
+    ValidateExpectedName m expectedPath expectedName st
+
+    ValidateAttributesOfProvidedType(m, st)
+
+    // This excludes, for example, types with '.' in them which would not be resolvable during name resolution.
+    match expectedName.IndexOfAny(PrettyNaming.IllegalCharactersInTypeAndNamespaceNames) with
+    | -1 -> ()
+    | n -> errorR(Error(FSComp.SR.etIllegalCharactersInTypeName(string expectedName[n], expectedName), m))  
+
+    let staticParameters : Tainted = st.PApplyWithProvider((fun (st, provider) -> st.GetStaticParameters provider), range=m) 
+    if staticParameters.PUntaint((fun a -> (nonNull a).Length), m)  = 0 then 
+        ValidateProvidedTypeAfterStaticInstantiation(m, st, expectedPath, expectedName)
+
+
+/// Resolve a (non-nested) provided type given a full namespace name and a type name. 
+/// May throw an exception which will be turned into an error message by one of the 'Try' function below.
+/// If resolution is successful the type is then validated.
+let ResolveProvidedType (resolver: Tainted, m, moduleOrNamespace: string[], typeName) : Tainted =
+    let displayName = String.Join(".", moduleOrNamespace)
+
+    // Try to find the type in the given provided namespace
+    let rec tryNamespace (providedNamespace: Tainted) = 
+
+        // Get the provided namespace name
+        let providedNamespaceName = providedNamespace.PUntaint((fun providedNamespace -> providedNamespace.NamespaceName), range=m)
+
+        // Check if the provided namespace name is an exact match of the required namespace name
+        if displayName = providedNamespaceName then
+            let resolvedType = providedNamespace.PApply((fun providedNamespace -> ProvidedType.CreateNoContext(providedNamespace.ResolveTypeName typeName)), range=m) 
+            match resolvedType with
+            | Tainted.Null -> None
+            | Tainted.NonNull result -> 
+                ValidateProvidedTypeDefinition(m, result, moduleOrNamespace, typeName)
+                Some result
+        else
+            // Note: This eagerly explores all provided namespaces even if there is no match of even a prefix in the
+            // namespace names. 
+            let providedNamespaces = providedNamespace.PApplyArray((fun providedNamespace -> providedNamespace.GetNestedNamespaces()), "GetNestedNamespaces", range=m)
+            tryNamespaces providedNamespaces
+
+    and tryNamespaces (providedNamespaces: Tainted[]) = 
+        providedNamespaces |> Array.tryPick tryNamespace
+
+    let providedNamespaces = resolver.PApplyArray((fun resolver -> resolver.GetNamespaces()), "GetNamespaces", range=m)
+    match tryNamespaces providedNamespaces with 
+    | None -> resolver.PApply((fun _ -> null), m)
+    | Some res -> res
+                
+/// Try to resolve a type against the given host with the given resolution environment.
+let TryResolveProvidedType(resolver: Tainted, m, moduleOrNamespace, typeName) =
+    try 
+        match ResolveProvidedType(resolver, m, moduleOrNamespace, typeName) with
+        | Tainted.Null -> None
+        | Tainted.NonNull ty -> Some ty
+    with e -> 
+        errorRecovery e m
+        None
+
+let ILPathToProvidedType  (st: Tainted, m) = 
+    let nameContrib (st: Tainted) = 
+        let typeName = st.PUntaint((fun st -> st.Name), m)
+        match st.PApply((fun st -> st.DeclaringType), m) with 
+        | Tainted.Null -> 
+            match st.PUntaint((fun st -> st.Namespace), m) with 
+            | Null -> typeName
+            | NonNull ns -> ns + "." + typeName
+        | _ -> typeName
+
+    let rec encContrib (st: Tainted) = 
+        match st.PApply((fun st ->st.DeclaringType), m) with 
+        | Tainted.Null -> []
+        | Tainted.NonNull enc -> encContrib enc @ [ nameContrib enc ]
+
+    encContrib st, nameContrib st
+
+let ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams: Tainted, m) =
+    let defaultArgValues = 
+        staticParams.PApply((fun ps ->  ps |> Array.map (fun sp -> sp.Name, (if sp.IsOptional then Some (string sp.RawDefaultValue) else None ))), range=m)
+
+    let defaultArgValues = defaultArgValues.PUntaint(id, m)
+    PrettyNaming.computeMangledNameWithoutDefaultArgValues(nm, staticArgs, defaultArgValues)
+
+/// Apply the given provided method to the given static arguments (the arguments are assumed to have been sorted into application order)
+let TryApplyProvidedMethod(methBeforeArgs: Tainted, staticArgs: obj[], m: range) =
+    if staticArgs.Length = 0 then 
+        Some methBeforeArgs
+    else
+        let mangledName = 
+            let nm = methBeforeArgs.PUntaint((fun x -> x.Name), m)
+            let staticParams = methBeforeArgs.PApplyWithProvider((fun (mb, resolver) -> mb.GetStaticParametersForMethod resolver), range=m) 
+            let mangledName = ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams, m)
+            mangledName
+
+        match methBeforeArgs.PApplyWithProvider((fun (mb, provider) -> mb.ApplyStaticArgumentsForMethod(provider, mangledName, staticArgs)), range=m) with 
+        | Tainted.Null -> None
+        | Tainted.NonNull methWithArguments -> 
+            let actualName = methWithArguments.PUntaint((fun x -> x.Name), m)
+            if actualName <> mangledName then 
+                error(Error(FSComp.SR.etProvidedAppliedMethodHadWrongName(methWithArguments.TypeProviderDesignation, mangledName, actualName), m))
+            Some methWithArguments
+
+
+/// Apply the given provided type to the given static arguments (the arguments are assumed to have been sorted into application order
+let TryApplyProvidedType(typeBeforeArguments: Tainted, optGeneratedTypePath: string list option, staticArgs: obj[], m: range) =
+    if staticArgs.Length = 0 then 
+        Some (typeBeforeArguments, (fun () -> ()))
+    else 
+        
+        let fullTypePathAfterArguments = 
+            // If there is a generated type name, then use that
+            match optGeneratedTypePath with 
+            | Some path -> path
+            | None -> 
+                // Otherwise, use the full path of the erased type, including mangled arguments
+                let nm = typeBeforeArguments.PUntaint((fun x -> x.Name), m)
+                let enc, _ = ILPathToProvidedType (typeBeforeArguments, m)
+                let staticParams : Tainted = typeBeforeArguments.PApplyWithProvider((fun (st, resolver) -> st.GetStaticParameters resolver |> nonNull), range=m) 
+                let mangledName = ComputeMangledNameForApplyStaticParameters(nm, staticArgs, staticParams, m)
+                enc @ [ mangledName ]
+
+        match typeBeforeArguments.PApplyWithProvider((fun (typeBeforeArguments, provider) -> typeBeforeArguments.ApplyStaticArguments(provider, Array.ofList fullTypePathAfterArguments, staticArgs)), range=m) with 
+        | Tainted.Null -> None
+        | Tainted.NonNull typeWithArguments -> 
+            let actualName = typeWithArguments.PUntaint((fun x -> x.Name), m)
+            let checkTypeName() = 
+                let expectedTypeNameAfterArguments = fullTypePathAfterArguments[fullTypePathAfterArguments.Length-1]
+                if actualName <> expectedTypeNameAfterArguments then 
+                    error(Error(FSComp.SR.etProvidedAppliedTypeHadWrongName(typeWithArguments.TypeProviderDesignation, expectedTypeNameAfterArguments, actualName), m))
+            Some (typeWithArguments, checkTypeName)
+
+/// Given a mangled name reference to a non-nested provided type, resolve it.
+/// If necessary, demangle its static arguments before applying them.
+let TryLinkProvidedType(resolver: Tainted, moduleOrNamespace: string[], typeLogicalName: string, range: range) =
+    
+    // Demangle the static parameters
+    let typeName, argNamesAndValues = 
+        try 
+            PrettyNaming.demangleProvidedTypeName typeLogicalName 
+        with PrettyNaming.InvalidMangledStaticArg piece -> 
+            error(Error(FSComp.SR.etProvidedTypeReferenceInvalidText piece, range0)) 
+
+    let argSpecsTable = dict argNamesAndValues
+    let typeBeforeArguments = ResolveProvidedType(resolver, range0, moduleOrNamespace, typeName) 
+
+    match typeBeforeArguments with 
+    | Tainted.Null -> None
+    | Tainted.NonNull typeBeforeArguments -> 
+        // Take the static arguments (as strings, taken from the text in the reference we're relinking), 
+        // and convert them to objects of the appropriate type, based on the expected kind.
+        let staticParameters =
+            typeBeforeArguments.PApplyWithProvider((fun (typeBeforeArguments, resolver) ->
+                typeBeforeArguments.GetStaticParameters resolver),range=range0)
+
+        let staticParameters = staticParameters.PApplyArray(id, "", range)
+        
+        let staticArgs = 
+            staticParameters |> Array.map (fun sp -> 
+                    let typeBeforeArgumentsName = typeBeforeArguments.PUntaint ((fun st -> st.Name), range)
+                    let spName = sp.PUntaint ((fun sp -> sp.Name), range)
+                    match argSpecsTable.TryGetValue spName with
+                    | true, arg ->
+                        /// Find the name of the representation type for the static parameter
+                        let spReprTypeName = 
+                            sp.PUntaint((fun sp -> 
+                                let pt = sp.ParameterType
+                                let uet = if pt.IsEnum then pt.GetEnumUnderlyingType() else pt
+                                uet.FullName), range)
+
+                        match spReprTypeName with 
+                        | "System.SByte" -> box (sbyte arg)
+                        | "System.Int16" -> box (int16 arg)
+                        | "System.Int32" -> box (int32 arg)
+                        | "System.Int64" -> box (int64 arg)
+                        | "System.Byte" -> box (byte arg)
+                        | "System.UInt16" -> box (uint16 arg)
+                        | "System.UInt32" -> box (uint32 arg)
+                        | "System.UInt64" -> box (uint64 arg)
+                        | "System.Decimal" -> box (decimal arg)
+                        | "System.Single" -> box (single arg)
+                        | "System.Double" -> box (double arg)
+                        | "System.Char" -> box (char arg)
+                        | "System.Boolean" -> box (arg = "True")
+                        | "System.String" -> box (string arg)
+                        | s -> error(Error(FSComp.SR.etUnknownStaticArgumentKind(s, typeLogicalName), range0))
+
+                    | _ ->
+                        if sp.PUntaint ((fun sp -> sp.IsOptional), range) then 
+                            match sp.PUntaint((fun sp -> sp.RawDefaultValue), range) with
+                            | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
+                            | NonNull v -> v
+                        else
+                            error(Error(FSComp.SR.etProvidedTypeReferenceMissingArgument spName, range0)))
+                
+
+        match TryApplyProvidedType(typeBeforeArguments, None, staticArgs, range0) with 
+        | Some (typeWithArguments, checkTypeName) -> 
+            checkTypeName() 
+            Some typeWithArguments
+        | None -> None
+
+/// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
+let GetPartsOfNamespaceRecover(namespaceName: string MaybeNull) = 
+    match namespaceName with 
+    | Null -> [] 
+    | NonNull namespaceName -> 
+        if namespaceName.Length = 0 then [""]
+        else splitNamespace (nonNull namespaceName)
+
+/// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
+let GetProvidedNamespaceAsPath (m, resolver: Tainted, namespaceName:string MaybeNull) =
+    match namespaceName with 
+    | Null -> [] 
+    | NonNull namespaceName -> 
+        if namespaceName.Length = 0 then
+            errorR(Error(FSComp.SR.etEmptyNamespaceNotAllowed(DisplayNameOfTypeProvider(resolver.TypeProvider, m)), m))  
+        GetPartsOfNamespaceRecover namespaceName
+
+/// Get the parts of the name that encloses the .NET type including nested types. 
+let GetFSharpPathToProvidedType (st: Tainted, range) = 
+    // Can't use st.Fullname because it may be like IEnumerable
+    // We want [System;Collections;Generic]
+    let namespaceParts = GetPartsOfNamespaceRecover(st.PUntaint((fun st -> st.Namespace), range))
+    let rec walkUpNestedClasses(st: Tainted, soFar) =
+        match st with
+        | Tainted.Null -> soFar
+        | Tainted.NonNull st -> walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), soFar) @ [st.PUntaint((fun st -> st.Name), range)]
+
+    walkUpNestedClasses(st.PApply((fun st ->st.DeclaringType), range), namespaceParts)
+
+
+/// Get the ILAssemblyRef for a provided assembly. Do not take into account
+/// any type relocations or static linking for generated types.
+let GetOriginalILAssemblyRefOfProvidedAssembly (assembly: Tainted, m) =
+    let aname = assembly.PUntaint((fun assembly -> assembly.GetName()), m)
+    ILAssemblyRef.FromAssemblyName aname
+
+/// Get the ILTypeRef for the provided type (including for nested types). Do not take into account
+/// any type relocations or static linking for generated types.
+let GetOriginalILTypeRefOfProvidedType (st: Tainted, range) = 
+    
+    let aref = GetOriginalILAssemblyRefOfProvidedAssembly (st.PApply((fun st -> nonNull st.Assembly), range), range) // NULLNESS TODO: why is explicit instantiation needed here
+    let scoperef = ILScopeRef.Assembly aref
+    let enc, nm = ILPathToProvidedType (st, range)
+    let tref = ILTypeRef.Create(scoperef, enc, nm)
+    tref
+
+/// Get the ILTypeRef for the provided type (including for nested types). Take into account
+/// any type relocations or static linking for generated types.
+let GetILTypeRefOfProvidedType (st: Tainted, range) = 
+    match st.PUntaint((fun st -> st.TryGetILTypeRef()), range) with 
+    | Some ilTypeRef -> ilTypeRef
+    | None -> GetOriginalILTypeRefOfProvidedType (st, range)
+
+type ProviderGeneratedType = ProviderGeneratedType of ilOrigTyRef: ILTypeRef * ilRenamedTyRef: ILTypeRef * ProviderGeneratedType list
+
+/// The table of information recording remappings from type names in the provided assembly to type
+/// names in the statically linked, embedded assembly, plus what types are nested in side what types.
+type ProvidedAssemblyStaticLinkingMap = 
+    { ILTypeMap: Dictionary }
+    static member CreateNew() = 
+        { ILTypeMap = Dictionary() }
+
+/// Check if this is a direct reference to a non-embedded generated type. This is not permitted at any name resolution.
+/// We check by seeing if the type is absent from the remapping context.
+let IsGeneratedTypeDirectReference (st: Tainted, m) =
+    st.PUntaint((fun st -> st.TryGetTyconRef() |> Option.isNone), m)
+
+#endif
diff --git a/src/fsharp/TypeProviders.fsi b/src/fsharp/TypeProviders.fsi
new file mode 100755
index 00000000000..24b70970af1
--- /dev/null
+++ b/src/fsharp/TypeProviders.fsi
@@ -0,0 +1,392 @@
+// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
+
+// Extension typing, validation of extension types, etc.
+
+module rec FSharp.Compiler.TypeProviders
+
+#if !NO_TYPEPROVIDERS
+
+open System
+open System.Collections.Concurrent
+open System.Collections.Generic
+open Internal.Utilities.Library
+open FSharp.Core.CompilerServices
+open FSharp.Compiler.AbstractIL.IL
+open FSharp.Compiler.Text
+
+type TypeProviderDesignation = TypeProviderDesignation of string
+
+/// Raised when a type provider has thrown an exception.
+exception ProvidedTypeResolution of range * exn
+
+/// Raised when an type provider has thrown an exception.
+exception ProvidedTypeResolutionNoRange of exn
+
+/// Get the list of relative paths searched for type provider design-time components
+val toolingCompatiblePaths: unit -> string list
+
+/// Carries information about the type provider resolution environment.
+type ResolutionEnvironment =
+    { /// The folder from which an extension provider is resolving from. This is typically the project folder.
+        resolutionFolder: string
+
+        /// Output file name
+        outputFile: string option
+
+        /// Whether or not the --showextensionresolution flag was supplied to the compiler.
+        showResolutionMessages: bool
+
+        /// All referenced assemblies, including the type provider itself, and possibly other type providers.
+        referencedAssemblies: string []
+
+        /// The folder for temporary files
+        temporaryFolder: string }
+
+/// Find and instantiate the set of ITypeProvider components for the given assembly reference
+val GetTypeProvidersOfAssembly:
+    runtimeAssemblyFilename: string *
+    ilScopeRefOfRuntimeAssembly: ILScopeRef *
+    designTimeName: string *
+    resolutionEnvironment: ResolutionEnvironment *
+    isInvalidationSupported: bool *
+    isInteractive: bool *
+    systemRuntimeContainsType: (string -> bool) *
+    systemRuntimeAssemblyVersion: Version *
+    compilerToolPaths: string list *
+    range ->
+        Tainted list
+
+/// Given an extension type resolver, supply a human-readable name suitable for error messages.
+val DisplayNameOfTypeProvider: Tainted * range -> string
+
+/// The context used to interpret information in the closure of System.Type, System.MethodInfo and other
+/// info objects coming from the type provider.
+///
+/// At the moment this is the "Type --> ILTypeRef" and "Type --> Tycon" remapping
+/// context for generated types (it is empty for erased types). This is computed from
+/// while processing the [] declaration related to the type.
+///
+/// Immutable (after type generation for a [] declaration populates the dictionaries).
+///
+/// The 'obj' values are all TyconRef, but obj is used due to a forward reference being required. Not particularly
+/// pleasant, but better than intertwining the whole "ProvidedType" with the TAST structure.
+[]
+type ProvidedTypeContext =
+
+    member TryGetILTypeRef: ProvidedType -> ILTypeRef option
+
+    member TryGetTyconRef: ProvidedType -> obj option
+
+    static member Empty: ProvidedTypeContext
+
+    static member Create:
+        ConcurrentDictionary * ConcurrentDictionary ->
+            ProvidedTypeContext
+
+    member GetDictionaries:
+        unit ->
+            ConcurrentDictionary * ConcurrentDictionary
+
+    /// Map the TyconRef objects, if any
+    member RemapTyconRefs: (obj -> obj) -> ProvidedTypeContext
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedType =
+    inherit ProvidedMemberInfo
+    member IsSuppressRelocate: bool
+    member IsErased: bool
+    member IsGenericType: bool
+    member Namespace: string
+    member FullName: string
+    member IsArray: bool
+    member GetInterfaces: unit -> ProvidedType []
+    member Assembly: ProvidedAssembly
+    member BaseType: ProvidedType MaybeNull
+    member GetNestedType: string -> ProvidedType
+    member GetNestedTypes: unit -> ProvidedType []
+    member GetAllNestedTypes: unit -> ProvidedType []
+    member GetMethods: unit -> ProvidedMethodInfo []
+    member GetFields: unit -> ProvidedFieldInfo []
+    member GetField: string -> ProvidedFieldInfo
+    member GetProperties: unit -> ProvidedPropertyInfo []
+    member GetProperty: string -> ProvidedPropertyInfo
+    member GetEvents: unit -> ProvidedEventInfo []
+    member GetEvent: string -> ProvidedEventInfo
+    member GetConstructors: unit -> ProvidedConstructorInfo []
+    member GetStaticParameters: ITypeProvider -> ProvidedParameterInfo []
+    member GetGenericTypeDefinition: unit -> ProvidedType
+    member IsVoid: bool
+    member IsGenericParameter: bool
+    member IsValueType: bool
+    member IsByRef: bool
+    member IsPointer: bool
+    member IsEnum: bool
+    member IsInterface: bool
+    member IsClass: bool
+    member IsMeasure: bool
+    member IsSealed: bool
+    member IsAbstract: bool
+    member IsPublic: bool
+    member IsNestedPublic: bool
+    member GenericParameterPosition: int
+    member GetElementType: unit -> ProvidedType
+    member GetGenericArguments: unit -> ProvidedType []
+    member GetArrayRank: unit -> int
+    member RawSystemType: Type
+    member GetEnumUnderlyingType: unit -> ProvidedType
+    member MakePointerType: unit -> ProvidedType
+    member MakeByRefType: unit -> ProvidedType
+    member MakeArrayType: unit -> ProvidedType
+    member MakeArrayType: rank: int -> ProvidedType
+    member MakeGenericType: args: ProvidedType [] -> ProvidedType
+    member AsProvidedVar: name: string -> ProvidedVar
+    static member Void: ProvidedType
+    static member CreateNoContext: Type -> ProvidedType
+    member TryGetILTypeRef: unit -> ILTypeRef option
+    member TryGetTyconRef: unit -> obj option
+    static member ApplyContext: ProvidedType * ProvidedTypeContext -> ProvidedType
+    member Context: ProvidedTypeContext
+    interface IProvidedCustomAttributeProvider
+    static member TaintedEquals: Tainted * Tainted -> bool
+
+#if NO_CHECKNULLS
+[]
+#endif
+type IProvidedCustomAttributeProvider =
+    abstract GetHasTypeProviderEditorHideMethodsAttribute: provider:ITypeProvider -> bool
+    abstract GetDefinitionLocationAttribute: provider:ITypeProvider -> (string * int * int) option 
+    abstract GetXmlDocAttributes: provider:ITypeProvider -> string[]
+    abstract GetAttributeConstructorArgs: provider:ITypeProvider * attribName:string -> (obj option list * (string * obj option) list) option
+    
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedAssembly = 
+    member GetName: unit -> System.Reflection.AssemblyName
+    member FullName: string
+    member GetManifestModuleContents: ITypeProvider -> byte []
+    member Handle: System.Reflection.Assembly
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedMemberInfo = 
+    member Name: string
+    member DeclaringType: ProvidedType MaybeNull
+    interface IProvidedCustomAttributeProvider 
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedMethodBase = 
+    inherit ProvidedMemberInfo
+    member IsGenericMethod: bool
+    member IsStatic: bool
+    member IsFamily: bool
+    member IsFamilyAndAssembly: bool
+    member IsFamilyOrAssembly: bool
+    member IsVirtual: bool
+    member IsFinal: bool
+    member IsPublic: bool
+    member IsAbstract: bool
+    member IsHideBySig: bool
+    member IsConstructor: bool
+    member GetParameters: unit -> ProvidedParameterInfo []
+    member GetGenericArguments: unit -> ProvidedType []
+    member GetStaticParametersForMethod: ITypeProvider -> ProvidedParameterInfo []
+    static member TaintedGetHashCode: Tainted -> int
+    static member TaintedEquals: Tainted * Tainted -> bool
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedMethodInfo = 
+    inherit ProvidedMethodBase
+    member ReturnType: ProvidedType
+    member MetadataToken: int
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedParameterInfo = 
+    member Name: string
+    member ParameterType: ProvidedType
+    member IsIn: bool
+    member IsOut: bool
+    member IsOptional: bool
+    member RawDefaultValue: obj
+    member HasDefaultValue: bool
+    interface IProvidedCustomAttributeProvider
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedFieldInfo = 
+    inherit ProvidedMemberInfo
+    member IsInitOnly: bool
+    member IsStatic: bool
+    member IsSpecialName: bool
+    member IsLiteral: bool
+    member GetRawConstantValue: unit -> obj
+    member FieldType: ProvidedType
+    member IsPublic: bool
+    member IsFamily: bool
+    member IsFamilyAndAssembly: bool
+    member IsFamilyOrAssembly: bool
+    member IsPrivate: bool
+    static member TaintedEquals: Tainted * Tainted -> bool
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedPropertyInfo = 
+    inherit ProvidedMemberInfo
+    member GetGetMethod: unit -> ProvidedMethodInfo
+    member GetSetMethod: unit -> ProvidedMethodInfo
+    member GetIndexParameters: unit -> ProvidedParameterInfo []
+    member CanRead: bool
+    member CanWrite: bool
+    member PropertyType: ProvidedType
+    static member TaintedGetHashCode: Tainted -> int
+    static member TaintedEquals: Tainted * Tainted -> bool
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedEventInfo = 
+    inherit ProvidedMemberInfo
+    member GetAddMethod: unit -> ProvidedMethodInfo
+    member GetRemoveMethod: unit -> ProvidedMethodInfo
+    member EventHandlerType: ProvidedType
+    static member TaintedGetHashCode: Tainted -> int
+    static member TaintedEquals: Tainted * Tainted -> bool
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedConstructorInfo = 
+    inherit ProvidedMethodBase
+
+type ProvidedExprType =
+    | ProvidedNewArrayExpr of ProvidedType * ProvidedExpr []
+#if PROVIDED_ADDRESS_OF
+    | ProvidedAddressOfExpr of ProvidedExpr
+#endif
+    | ProvidedNewObjectExpr of ProvidedConstructorInfo * ProvidedExpr []
+    | ProvidedWhileLoopExpr of ProvidedExpr * ProvidedExpr
+    | ProvidedNewDelegateExpr of ProvidedType * ProvidedVar [] * ProvidedExpr
+    | ProvidedForIntegerRangeLoopExpr of ProvidedVar * ProvidedExpr * ProvidedExpr * ProvidedExpr
+    | ProvidedSequentialExpr of ProvidedExpr * ProvidedExpr
+    | ProvidedTryWithExpr of ProvidedExpr * ProvidedVar * ProvidedExpr * ProvidedVar * ProvidedExpr
+    | ProvidedTryFinallyExpr of ProvidedExpr * ProvidedExpr
+    | ProvidedLambdaExpr of ProvidedVar * ProvidedExpr
+    | ProvidedCallExpr of ProvidedExpr option * ProvidedMethodInfo * ProvidedExpr []
+    | ProvidedConstantExpr of obj * ProvidedType
+    | ProvidedDefaultExpr of ProvidedType
+    | ProvidedNewTupleExpr of ProvidedExpr []
+    | ProvidedTupleGetExpr of ProvidedExpr * int
+    | ProvidedTypeAsExpr of ProvidedExpr * ProvidedType
+    | ProvidedTypeTestExpr of ProvidedExpr * ProvidedType
+    | ProvidedLetExpr of ProvidedVar * ProvidedExpr * ProvidedExpr
+    | ProvidedVarSetExpr of ProvidedVar * ProvidedExpr
+    | ProvidedIfThenElseExpr of ProvidedExpr * ProvidedExpr * ProvidedExpr
+    | ProvidedVarExpr of ProvidedVar
+    
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedExpr =
+    member Type: ProvidedType
+    /// Convert the expression to a string for diagnostics
+    member UnderlyingExpressionString: string
+    member GetExprType: unit -> ProvidedExprType option
+
+[] 
+#if NO_CHECKNULLS
+[]
+#endif
+type ProvidedVar =
+    member Type: ProvidedType
+    member Name: string
+    member IsMutable: bool
+    override Equals: obj -> bool
+    override GetHashCode: unit -> int
+
+/// Get the provided expression for a particular use of a method.
+val GetInvokerExpression: ITypeProvider * ProvidedMethodBase * ProvidedVar [] -> ProvidedExpr
+
+/// Validate that the given provided type meets some of the rules for F# provided types
+val ValidateProvidedTypeAfterStaticInstantiation:
+    range * Tainted * expectedPath: string [] * expectedName: string -> unit
+
+/// Try to apply a provided type to the given static arguments. If successful also return a function
+/// to check the type name is as expected (this function is called by the caller of TryApplyProvidedType
+/// after other checks are made).
+val TryApplyProvidedType:
+    typeBeforeArguments: Tainted *
+    optGeneratedTypePath: string list option *
+    staticArgs: obj [] *
+    range ->
+        (Tainted * (unit -> unit)) option
+
+/// Try to apply a provided method to the given static arguments.
+val TryApplyProvidedMethod:
+    methBeforeArgs: Tainted * staticArgs: obj [] * range -> Tainted option
+
+/// Try to resolve a type in the given extension type resolver
+val TryResolveProvidedType:
+    Tainted * range * string [] * typeName: string -> Tainted option
+
+/// Try to resolve a type in the given extension type resolver
+val TryLinkProvidedType:
+    Tainted * string [] * typeLogicalName: string * range: range -> Tainted option
+
+/// Get the parts of a .NET namespace. Special rules: null means global, empty is not allowed.
+val GetProvidedNamespaceAsPath: range * Tainted * string -> string list
+
+/// Decompose the enclosing name of a type (including any class nestings) into a list of parts.
+/// e.g. System.Object -> ["System"; "Object"]
+val GetFSharpPathToProvidedType: Tainted * range: range -> string list
+
+/// Get the ILTypeRef for the provided type (including for nested types). Take into account
+/// any type relocations or static linking for generated types.
+val GetILTypeRefOfProvidedType: Tainted * range: range -> ILTypeRef
+
+/// Get the ILTypeRef for the provided type (including for nested types). Do not take into account
+/// any type relocations or static linking for generated types.
+val GetOriginalILTypeRefOfProvidedType: Tainted * range: range -> ILTypeRef
+
+/// Represents the remapping information for a generated provided type and its nested types.
+///
+/// There is one overall tree for each root 'type X = ... type generation expr...' specification.
+type ProviderGeneratedType =
+    | ProviderGeneratedType of ilOrigTyRef: ILTypeRef * ilRenamedTyRef: ILTypeRef * ProviderGeneratedType list
+
+/// The table of information recording remappings from type names in the provided assembly to type
+/// names in the statically linked, embedded assembly, plus what types are nested in side what types.
+type ProvidedAssemblyStaticLinkingMap =
+    { /// The table of remappings from type names in the provided assembly to type
+      /// names in the statically linked, embedded assembly.
+      ILTypeMap: Dictionary }
+
+    /// Create a new static linking map, ready to populate with data.
+    static member CreateNew: unit -> ProvidedAssemblyStaticLinkingMap
+
+/// Check if this is a direct reference to a non-embedded generated type. This is not permitted at any name resolution.
+/// We check by seeing if the type is absent from the remapping context.
+val IsGeneratedTypeDirectReference: Tainted * range -> bool
+
+#endif

From 6f02d61d704d2a587b91ef36315303642e048daf Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 7 May 2022 16:08:21 +0100
Subject: [PATCH 096/112] merge main

---
 src/fsharp/CheckExpressions.fs |  2 +-
 src/fsharp/CompilerImports.fs  |  2 +-
 src/fsharp/ConstraintSolver.fs |  2 +-
 src/fsharp/InfoReader.fs       |  2 +-
 src/fsharp/TypeProviders.fs    | 20 ++++++++++----------
 src/fsharp/TypeProviders.fsi   |  1 +
 6 files changed, 15 insertions(+), 14 deletions(-)

diff --git a/src/fsharp/CheckExpressions.fs b/src/fsharp/CheckExpressions.fs
index faff598cff0..c27218fc05a 100755
--- a/src/fsharp/CheckExpressions.fs
+++ b/src/fsharp/CheckExpressions.fs
@@ -4490,7 +4490,7 @@ and TcTypeOrMeasure optKind cenv newOk checkCxs occ env (tpenv: UnscopedTyparEnv
                 // wihout implying 'T is not null.  This is because it is legitimate to use this
                 // function to "collapse" null and obj-null-coming-from-option using such a function.
 
-                if g.compilingFslib && not (isTyparTy g innerTyC) then 
+                if g.compilingFSharpCore && not (isTyparTy g innerTyC) then 
                     AddCxTypeDefnNotSupportsNull env.DisplayEnv cenv.css m NoTrace innerTyC
 
                 innerTyCWithNull, tpenv
diff --git a/src/fsharp/CompilerImports.fs b/src/fsharp/CompilerImports.fs
index 6ea934d27d6..e07d4f3dc8e 100644
--- a/src/fsharp/CompilerImports.fs
+++ b/src/fsharp/CompilerImports.fs
@@ -1617,7 +1617,7 @@ and [] TcImports(tcConfigP: TcConfigProvider, initialResolutions: TcAsse
         let ccuRawDataAndInfos =
             ilModule.GetRawFSharpSignatureData(m, ilShortAssemName, fileName)
             |> List.map (fun (ccuName, (sigDataReader, sigDataReaderB)) ->
-                let data = GetSignatureData (filename, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB)
+                let data = GetSignatureData (fileName, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB)
 
                 let optDatas = Map.ofList optDataReaders
 
diff --git a/src/fsharp/ConstraintSolver.fs b/src/fsharp/ConstraintSolver.fs
index 1f2dba080f0..9f70a273d00 100644
--- a/src/fsharp/ConstraintSolver.fs
+++ b/src/fsharp/ConstraintSolver.fs
@@ -69,7 +69,7 @@ open FSharp.Compiler.TypedTreeOps
 open FSharp.Compiler.TypeRelations
 
 #if !NO_TYPEPROVIDERS
-open FSharp.Compiler.ExtensionTyping
+open FSharp.Compiler.TypeProviders
 #endif
 
 //-------------------------------------------------------------------------
diff --git a/src/fsharp/InfoReader.fs b/src/fsharp/InfoReader.fs
index a9244c986ea..0ff593171ee 100644
--- a/src/fsharp/InfoReader.fs
+++ b/src/fsharp/InfoReader.fs
@@ -23,7 +23,7 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypeRelations
 
 #if !NO_TYPEPROVIDERS
-open FSharp.Compiler.ExtensionTyping
+open FSharp.Compiler.TypeProviders
 #endif
 
 /// Use the given function to select some of the member values from the members of an F# type
diff --git a/src/fsharp/TypeProviders.fs b/src/fsharp/TypeProviders.fs
index 4b862719d4f..629a7f2c72a 100644
--- a/src/fsharp/TypeProviders.fs
+++ b/src/fsharp/TypeProviders.fs
@@ -342,7 +342,7 @@ type ProvidedType (x: Type, ctxt: ProvidedTypeContext) =
             x.CustomAttributes 
             |> Seq.exists (fun a -> a.Constructor.DeclaringType.FullName = typeof.FullName)
 
-    let provide () = ProvidedCustomAttributeProvider (fun _provider -> x.CustomAttributes) :> IProvidedCustomAttributeProvider
+    let provide () = ProvidedCustomAttributeProvider (fun _ -> x.CustomAttributes) :> IProvidedCustomAttributeProvider
 
     interface IProvidedCustomAttributeProvider with 
         member _.GetHasTypeProviderEditorHideMethodsAttribute provider = provide().GetHasTypeProviderEditorHideMethodsAttribute provider
@@ -540,7 +540,7 @@ type ProvidedCustomAttributeProvider (attributes :ITypeProvider -> seq Seq.tryFind (findAttrib  typeof)  
             |> Option.map (fun a -> 
-                let filePath = defaultArg (a.NamedArguments |> Seq.tryPick (function Member "FilePath" (Arg (:? string as v)) -> Some v | _ -> None)) null
+                let filePath : string MaybeNull = defaultArg (a.NamedArguments |> Seq.tryPick (function Member "FilePath" (Arg (:? string as v)) -> Some v | _ -> None)) null
                 let line = defaultArg (a.NamedArguments |> Seq.tryPick (function Member "Line" (Arg (:? int as v)) -> Some v | _ -> None)) 0
                 let column = defaultArg (a.NamedArguments |> Seq.tryPick (function Member "Column" (Arg (:? int as v)) -> Some v | _ -> None)) 0
                 (filePath, line, column))
@@ -561,7 +561,7 @@ type ProvidedCustomAttributeProvider (attributes :ITypeProvider -> seq]
 #endif
 type ProvidedMemberInfo (x: MemberInfo, ctxt) = 
-    let provide () = ProvidedCustomAttributeProvider.Create (fun _provider -> x.CustomAttributes)
+    let provide () = ProvidedCustomAttributeProvider (fun _ -> x.CustomAttributes) :> IProvidedCustomAttributeProvider
 
     member _.Name = x.Name
 
@@ -586,7 +586,7 @@ type ProvidedMemberInfo (x: MemberInfo, ctxt) =
 []
 #endif
 type ProvidedParameterInfo (x: ParameterInfo, ctxt) = 
-    let provide () = ProvidedCustomAttributeProvider (fun _provider -> x.CustomAttributes) :> IProvidedCustomAttributeProvider
+    let provide () = ProvidedCustomAttributeProvider (fun _ -> x.CustomAttributes) :> IProvidedCustomAttributeProvider
 
     member _.Name = let nm = x.Name in match box nm with null -> "" | _ -> nm
 
@@ -1144,12 +1144,12 @@ let ValidateProvidedTypeAfterStaticInstantiation(m, st: Tainted, e
         let usedMembers: Tainted[] = 
             // These are the members the compiler will actually use
             [| for x in TryTypeMemberArray(st, fullName, "GetMethods", m, fun st -> st.GetMethods()) -> x.Coerce m
-                for x in TryTypeMemberArray(st, fullName, "GetEvents", m, fun st -> st.GetEvents()) -> x.Coerce m
-                for x in TryTypeMemberArray(st, fullName, "GetFields", m, fun st -> st.GetFields()) -> x.Coerce m
-                for x in TryTypeMemberArray(st, fullName, "GetProperties", m, fun st -> st.GetProperties()) -> x.Coerce m
-                // These will be validated on-demand
-                //for x in TryTypeMemberArray(st, fullName, "GetNestedTypes", m, fun st -> st.GetNestedTypes bindingFlags) -> x.Coerce()
-                for x in TryTypeMemberArray(st, fullName, "GetConstructors", m, fun st -> st.GetConstructors()) -> x.Coerce m |]
+               for x in TryTypeMemberArray(st, fullName, "GetEvents", m, fun st -> st.GetEvents()) -> x.Coerce m
+               for x in TryTypeMemberArray(st, fullName, "GetFields", m, fun st -> st.GetFields()) -> x.Coerce m
+               for x in TryTypeMemberArray(st, fullName, "GetProperties", m, fun st -> st.GetProperties()) -> x.Coerce m
+               // These will be validated on-demand
+               //for x in TryTypeMemberArray(st, fullName, "GetNestedTypes", m, fun st -> st.GetNestedTypes bindingFlags) -> x.Coerce()
+               for x in TryTypeMemberArray(st, fullName, "GetConstructors", m, fun st -> st.GetConstructors()) -> x.Coerce m |]
         fullName, namespaceName, usedMembers       
 
     // We scrutinize namespaces for invalid characters on open, but this provides better diagnostics
diff --git a/src/fsharp/TypeProviders.fsi b/src/fsharp/TypeProviders.fsi
index c33dc72a4a2..f1c3f5a32bf 100755
--- a/src/fsharp/TypeProviders.fsi
+++ b/src/fsharp/TypeProviders.fsi
@@ -9,6 +9,7 @@ module internal rec FSharp.Compiler.TypeProviders
 open System
 open System.Collections.Concurrent
 open System.Collections.Generic
+open Internal.Utilities.Library
 open FSharp.Core.CompilerServices
 open FSharp.Compiler.AbstractIL.IL
 open FSharp.Compiler.Text

From 70d827af66ec098ddf8fd70bc24c6de13eb569a7 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Thu, 12 May 2022 00:29:15 +0100
Subject: [PATCH 097/112] options

---
 src/Compiler/Checking/CheckExpressions.fs |  4 ++--
 src/Compiler/TypedTree/TcGlobals.fs       | 29 ++++++++++++++---------
 src/FSharp.Core/option.fs                 | 28 ++++++++++++++++++++++
 3 files changed, 48 insertions(+), 13 deletions(-)

diff --git a/src/Compiler/Checking/CheckExpressions.fs b/src/Compiler/Checking/CheckExpressions.fs
index d39be86584a..aa80bd0dada 100755
--- a/src/Compiler/Checking/CheckExpressions.fs
+++ b/src/Compiler/Checking/CheckExpressions.fs
@@ -4551,7 +4551,7 @@ and TcTypeOrMeasure kindOpt cenv newOk checkConstraints occ env (tpenv: Unscoped
         NewErrorType (), tpenv
 
     | SynType.WithNull(innerTy, ambivalent, m) -> 
-        let innerTyC, tpenv = TcTypeAndRecover cenv newOk checkCxs occ env tpenv innerTy
+        let innerTyC, tpenv = TcTypeAndRecover cenv newOk checkConstraints occ env tpenv innerTy
         if g.langFeatureNullness then 
             if TypeNullNever g innerTyC then
                 let tyString = NicePrint.minimalStringOfType env.DisplayEnv innerTyC
@@ -4705,7 +4705,7 @@ and TcFunctionType cenv newOk checkConstraints occ env tpenv domainTy resultTy =
 and TcArrayType cenv newOk checkConstraints occ env tpenv rank elemTy m =
     let g = cenv.g
     let elemTy, tpenv = TcTypeAndRecover cenv newOk checkConstraints occ env tpenv elemTy
-    let tyR = mkArrayTy g n g.knownWithoutNull elemTy m
+    let tyR = mkArrayTy g rank g.knownWithoutNull elemTy m
     tyR, tpenv
 
 and TcTypeParameter kindOpt cenv env newOk tpenv tp =
diff --git a/src/Compiler/TypedTree/TcGlobals.fs b/src/Compiler/TypedTree/TcGlobals.fs
index 60cc07e1eff..27e5acaf972 100755
--- a/src/Compiler/TypedTree/TcGlobals.fs
+++ b/src/Compiler/TypedTree/TcGlobals.fs
@@ -83,17 +83,6 @@ module FSharpLib =
 // Access the initial environment: helpers to build references
 //-------------------------------------------------------------------------
 
-let mkNonLocalTyconRef2 ccu path n = mkNonLocalTyconRef (mkNonLocalEntityRef ccu path) n
-
-let mk_MFCore_tcref             ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CorePathArray n
-let mk_MFQuotations_tcref       ccu n = mkNonLocalTyconRef2 ccu FSharpLib.QuotationsPath n
-let mk_MFLinq_tcref             ccu n = mkNonLocalTyconRef2 ccu LinqPathArray n
-let mk_MFCollections_tcref      ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CollectionsPathArray n
-let mk_MFCompilerServices_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CompilerServicesPath n
-let mk_MFRuntimeHelpers_tcref   ccu n = mkNonLocalTyconRef2 ccu FSharpLib.RuntimeHelpersPath n
-let mk_MFControl_tcref          ccu n = mkNonLocalTyconRef2 ccu FSharpLib.ControlPathArray n
-
-
 type
     []
     BuiltinAttribInfo =
@@ -194,6 +183,24 @@ type TcGlobals(
     pathMap: PathMap,
     langVersion: LanguageVersion) =
 
+  let v_langFeatureNullness = langVersion.SupportsFeature LanguageFeature.NullnessChecking
+
+  let v_knownWithoutNull =
+      if v_langFeatureNullness then KnownWithoutNull else KnownAmbivalentToNull
+
+  let mkNonGenericTy tcref = TType_app(tcref, [], v_knownWithoutNull)
+
+  let mkNonGenericTyWithNullness tcref nullness = TType_app(tcref, [], nullness)
+
+  let mkNonLocalTyconRef2 ccu path n = mkNonLocalTyconRef (mkNonLocalEntityRef ccu path) n 
+
+  let mk_MFCore_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CorePathArray n 
+  let mk_MFQuotations_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.QuotationsPath n 
+  let mk_MFLinq_tcref ccu n = mkNonLocalTyconRef2 ccu LinqPathArray n 
+  let mk_MFCollections_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CollectionsPathArray n 
+  let mk_MFCompilerServices_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.CompilerServicesPath n 
+  let mk_MFControl_tcref ccu n = mkNonLocalTyconRef2 ccu FSharpLib.ControlPathArray n 
+
   let vara = Construct.NewRigidTypar "a" envRange
   let varb = Construct.NewRigidTypar "b" envRange
   let varc = Construct.NewRigidTypar "c" envRange
diff --git a/src/FSharp.Core/option.fs b/src/FSharp.Core/option.fs
index 8b28af7531d..b3075de4f3e 100644
--- a/src/FSharp.Core/option.fs
+++ b/src/FSharp.Core/option.fs
@@ -152,6 +152,7 @@ module Option =
         else
             None
 
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     []
     let ofObj value =
         match value with
@@ -163,6 +164,19 @@ module Option =
         match value with
         | None -> null
         | Some x -> x
+#else
+    []
+    let ofObj (value: 'T?) : 'T option when 'T: not struct and 'T : not null = 
+        match value with
+        | null -> None
+        | _ -> Some value
+
+    []
+    let toObj (value: 'T option) : 'T? when 'T: not struct (* and 'T : not null *)  =
+        match value with
+        | None -> null
+        | Some x -> x
+#endif
 
 module ValueOption =
 
@@ -311,6 +325,7 @@ module ValueOption =
         else
             ValueNone
 
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
     []
     let ofObj value =
         match value with
@@ -322,3 +337,16 @@ module ValueOption =
         match value with
         | ValueNone -> null
         | ValueSome x -> x
+#else
+    []
+    let ofObj (value: 'T?) : 'T voption when 'T: not struct and 'T : not null  = 
+        match value with
+        | null -> ValueNone
+        | _ -> ValueSome value
+
+    []
+    let toObj (value : 'T voption) : 'T? when 'T: not struct (* and 'T : not null *) = 
+        match value with
+        | ValueNone -> null
+        | ValueSome x -> x
+#endif

From 99dfa1722a75df138c4f6852fb63be80fd3c77c4 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Tue, 12 Jul 2022 00:59:14 +0100
Subject: [PATCH 098/112] format code

---
 .fantomasignore                               |  10 +-
 src/Compiler/AbstractIL/ilread.fs             |   6 +-
 src/Compiler/AbstractIL/ilreflect.fs          |  12 +-
 src/Compiler/Driver/CompilerConfig.fs         |   7 +-
 src/Compiler/Driver/CompilerDiagnostics.fs    |  53 +++--
 src/Compiler/Driver/CompilerImports.fs        | 202 ++++++++++++------
 src/Compiler/Driver/CompilerOptions.fs        |   4 +-
 src/Compiler/Service/QuickParse.fs            |  32 +--
 .../Service/ServiceParamInfoLocations.fs      |   6 +-
 src/Compiler/SyntaxTree/LexHelpers.fs         |   2 +-
 src/Compiler/SyntaxTree/SyntaxTree.fs         |   8 +-
 src/Compiler/TypedTree/TypedTree.fsi          |   7 +-
 src/Compiler/Utilities/InternalCollections.fs |   5 +-
 src/FSharp.Build/Fsc.fs                       |   7 +-
 src/FSharp.Build/SubstituteText.fs            |  93 ++++----
 15 files changed, 282 insertions(+), 172 deletions(-)

diff --git a/.fantomasignore b/.fantomasignore
index 54076971e3b..ae03e9c6496 100644
--- a/.fantomasignore
+++ b/.fantomasignore
@@ -49,9 +49,15 @@ src/FSharp.Core/SI.fs
 
 # uses nullness features
 
-**/illib.fsi
 **/DependencyProvider.fsi
-**/option.fsi
+src/FSharp.Core/array.fs
+src/FSharp.Core/option.fsi
+src/FSharp.Core/option.fs
+src/fsi/console.fs
+src/FSharp.Build/FSharpCommandLineBuilder.fs
+src/Compiler/Utilities/sformat.fs
+src/Compiler/Utilities/illib.fsi
+src/Compiler/Utilities/illib.fs
 
 # Fantomas limitations on implementation files  (to investigate)
 
diff --git a/src/Compiler/AbstractIL/ilread.fs b/src/Compiler/AbstractIL/ilread.fs
index 14672f7b451..42512c879e3 100644
--- a/src/Compiler/AbstractIL/ilread.fs
+++ b/src/Compiler/AbstractIL/ilread.fs
@@ -230,7 +230,7 @@ type WeakByteFile(fileName: string, chunk: (int * int) option) =
     let fileStamp = FileSystem.GetLastWriteTimeShim fileName
 
     /// The weak handle to the bytes for the file
-    let weakBytes = WeakReference< byte[] MaybeNull>(null)
+    let weakBytes = WeakReference(null)
 
     member _.FileName = fileName
 
@@ -935,7 +935,7 @@ let mkCacheInt32 lowMem _inbase _nm _sz =
     if lowMem then
         (fun f x -> f x)
     else
-        let mutable cache : ConcurrentDictionary MaybeNull = null // TODO NULLNESS: this explicit annotation should not be needed
+        let mutable cache: ConcurrentDictionary MaybeNull = null // TODO NULLNESS: this explicit annotation should not be needed
         let mutable count = 0
 #if STATISTICS
         addReport (fun oc ->
@@ -964,7 +964,7 @@ let mkCacheGeneric lowMem _inbase _nm _sz =
     if lowMem then
         (fun f x -> f x)
     else
-        let mutable cache : ConcurrentDictionary<_, _> MaybeNull = null // TODO NULLNESS: this explicit annotation should not be needed
+        let mutable cache: ConcurrentDictionary<_, _> MaybeNull = null // TODO NULLNESS: this explicit annotation should not be needed
         let mutable count = 0
 #if STATISTICS
         addReport (fun oc ->
diff --git a/src/Compiler/AbstractIL/ilreflect.fs b/src/Compiler/AbstractIL/ilreflect.fs
index 8f072416222..a6dc1aa9093 100644
--- a/src/Compiler/AbstractIL/ilreflect.fs
+++ b/src/Compiler/AbstractIL/ilreflect.fs
@@ -1200,10 +1200,16 @@ let queryableTypeGetConstructor cenv emEnv (parentT: Type) (mref: ILMethodRef) =
         parentT.GetConstructor(BindingFlags.Public ||| BindingFlags.NonPublic ||| BindingFlags.Instance, null, reqArgTs, null)
 
     match res with
-    | Null -> error(Error(FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName), range0))
+    | Null ->
+        error (
+            Error(
+                FSComp.SR.itemNotFoundInTypeDuringDynamicCodeGen ("constructor", mref.Name, parentT.FullName, parentT.Assembly.FullName),
+                range0
+            )
+        )
     | NonNull res -> res
 
-let nonQueryableTypeGetConstructor (parentTI:Type) (consInfo : ConstructorInfo) : ConstructorInfo MaybeNull =
+let nonQueryableTypeGetConstructor (parentTI: Type) (consInfo: ConstructorInfo) : ConstructorInfo MaybeNull =
     if parentTI.IsGenericType then
         TypeBuilder.GetConstructor(parentTI, consInfo)
     else
@@ -1326,7 +1332,7 @@ let setArrayMethInfo n ty =
     | 2 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray2D Unchecked.defaultof<_> 0 0 0 @@> ty
     | 3 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray3D Unchecked.defaultof<_> 0 0 0 0 @@> ty
     | 4 -> getGenericMethodDefinition <@@ LanguagePrimitives.IntrinsicFunctions.SetArray4D Unchecked.defaultof<_> 0 0 0 0 0 @@> ty
-    | _ -> invalidArg "n"  "not expecting array dimension > 4"
+    | _ -> invalidArg "n" "not expecting array dimension > 4"
 
 //----------------------------------------------------------------------------
 // emitInstr cenv
diff --git a/src/Compiler/Driver/CompilerConfig.fs b/src/Compiler/Driver/CompilerConfig.fs
index e6b1d417a21..4b674099902 100644
--- a/src/Compiler/Driver/CompilerConfig.fs
+++ b/src/Compiler/Driver/CompilerConfig.fs
@@ -188,11 +188,14 @@ type IRawFSharpAssemblyData =
     abstract TryGetILModuleDef: unit -> ILModuleDef option
 
     ///  The raw F# signature data in the assembly, if any
-    abstract GetRawFSharpSignatureData: range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
+    abstract GetRawFSharpSignatureData:
+        range * ilShortAssemName: string * fileName: string ->
+            (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
     ///  The raw F# optimization data in the assembly, if any
     abstract GetRawFSharpOptimizationData:
-        range * ilShortAssemName: string * fileName: string -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
+        range * ilShortAssemName: string * fileName: string ->
+            (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
     ///  The table of type forwarders in the assembly
     abstract GetRawTypeForwarders: unit -> ILExportedTypesAndForwarders
diff --git a/src/Compiler/Driver/CompilerDiagnostics.fs b/src/Compiler/Driver/CompilerDiagnostics.fs
index 95c76e3268f..17794a188d6 100644
--- a/src/Compiler/Driver/CompilerDiagnostics.fs
+++ b/src/Compiler/Driver/CompilerDiagnostics.fs
@@ -174,10 +174,10 @@ let GetRangeOfDiagnostic (diagnostic: PhasedDiagnostic) =
         | ConstraintSolverTupleDiffLengths (_, _, _, m, _)
         | ConstraintSolverInfiniteTypes (_, _, _, _, m, _)
         | ConstraintSolverMissingConstraint (_, _, _, m, _)
-        | ConstraintSolverNullnessWarningEquivWithTypes(_, _, _, _, _, m, _)
-        | ConstraintSolverNullnessWarningWithTypes(_, _, _, _, _, m, _)
-        | ConstraintSolverNullnessWarningWithType(_, _, _, m, _)
-        | ConstraintSolverNonNullnessWarningWithType(_, _, _, m, _)
+        | ConstraintSolverNullnessWarningEquivWithTypes (_, _, _, _, _, m, _)
+        | ConstraintSolverNullnessWarningWithTypes (_, _, _, _, _, m, _)
+        | ConstraintSolverNullnessWarningWithType (_, _, _, m, _)
+        | ConstraintSolverNonNullnessWarningWithType (_, _, _, m, _)
         | ConstraintSolverTypesNotInEqualityRelation (_, _, _, m, _, _)
         | ConstraintSolverError (_, m, _)
         | ConstraintSolverTypesNotInSubsumptionRelation (_, _, _, m, _)
@@ -435,10 +435,19 @@ let SeeAlsoE () = Message("SeeAlso", "%s")
 let ConstraintSolverTupleDiffLengthsE () = Message("ConstraintSolverTupleDiffLengths", "%d%d")
 let ConstraintSolverInfiniteTypesE () = Message("ConstraintSolverInfiniteTypes", "%s%s")
 let ConstraintSolverMissingConstraintE () = Message("ConstraintSolverMissingConstraint", "%s")
-let ConstraintSolverNullnessWarningEquivWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningEquivWithTypes", "%s%s%s%s")
-let ConstraintSolverNullnessWarningWithTypesE() = DeclareResourceString("ConstraintSolverNullnessWarningWithTypes", "%s%s%s%s")
-let ConstraintSolverNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNullnessWarningWithType", "%s")
-let ConstraintSolverNonNullnessWarningWithTypeE() = DeclareResourceString("ConstraintSolverNonNullnessWarningWithType", "%s")
+
+let ConstraintSolverNullnessWarningEquivWithTypesE () =
+    DeclareResourceString("ConstraintSolverNullnessWarningEquivWithTypes", "%s%s%s%s")
+
+let ConstraintSolverNullnessWarningWithTypesE () =
+    DeclareResourceString("ConstraintSolverNullnessWarningWithTypes", "%s%s%s%s")
+
+let ConstraintSolverNullnessWarningWithTypeE () =
+    DeclareResourceString("ConstraintSolverNullnessWarningWithType", "%s")
+
+let ConstraintSolverNonNullnessWarningWithTypeE () =
+    DeclareResourceString("ConstraintSolverNonNullnessWarningWithType", "%s")
+
 let ConstraintSolverTypesNotInEqualityRelation1E () = Message("ConstraintSolverTypesNotInEqualityRelation1", "%s%s")
 let ConstraintSolverTypesNotInEqualityRelation2E () = Message("ConstraintSolverTypesNotInEqualityRelation2", "%s%s")
 let ConstraintSolverTypesNotInSubsumptionRelationE () = Message("ConstraintSolverTypesNotInSubsumptionRelation", "%s%s%s")
@@ -646,39 +655,41 @@ let OutputPhasedErrorR (os: StringBuilder) (diagnostic: PhasedDiagnostic) (canSu
             if m.StartLine <> m2.StartLine then
                 os.AppendString(SeeAlsoE().Format(stringOfRange m))
 
-        | ConstraintSolverNullnessWarningEquivWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) ->
+        | ConstraintSolverNullnessWarningEquivWithTypes (denv, ty1, ty2, nullness1, nullness2, m, m2) ->
 
             let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
 
-            os.Append(ConstraintSolverNullnessWarningEquivWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore
+            os.Append(ConstraintSolverNullnessWarningEquivWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString()))
+            |> ignore
 
             if m.StartLine <> m2.StartLine then
-                os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+                os.Append(SeeAlsoE().Format(stringOfRange m)) |> ignore
 
-        | ConstraintSolverNullnessWarningWithTypes(denv, ty1, ty2, nullness1, nullness2, m, m2) ->
+        | ConstraintSolverNullnessWarningWithTypes (denv, ty1, ty2, nullness1, nullness2, m, m2) ->
 
             let t1, t2, _cxs = NicePrint.minimalStringsOfTwoTypes denv ty1 ty2
 
-            os.Append(ConstraintSolverNullnessWarningWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString())) |> ignore
+            os.Append(ConstraintSolverNullnessWarningWithTypesE().Format t1 t2 (nullness1.ToString()) (nullness2.ToString()))
+            |> ignore
 
             if m.StartLine <> m2.StartLine then
-                os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+                os.Append(SeeAlsoE().Format(stringOfRange m)) |> ignore
 
-        | ConstraintSolverNullnessWarningWithType(denv, ty, _, m, m2) ->
+        | ConstraintSolverNullnessWarningWithType (denv, ty, _, m, m2) ->
 
             let t = NicePrint.minimalStringOfType denv ty
-            os.Append(ConstraintSolverNullnessWarningWithTypeE().Format (t)) |> ignore
+            os.Append(ConstraintSolverNullnessWarningWithTypeE().Format(t)) |> ignore
 
             if m.StartLine <> m2.StartLine then
-                os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+                os.Append(SeeAlsoE().Format(stringOfRange m)) |> ignore
 
-        | ConstraintSolverNonNullnessWarningWithType(denv, ty, _, m, m2) ->
+        | ConstraintSolverNonNullnessWarningWithType (denv, ty, _, m, m2) ->
 
             let t = NicePrint.minimalStringOfType denv ty
-            os.Append(ConstraintSolverNonNullnessWarningWithTypeE().Format (t)) |> ignore
+            os.Append(ConstraintSolverNonNullnessWarningWithTypeE().Format(t)) |> ignore
 
             if m.StartLine <> m2.StartLine then
-                os.Append(SeeAlsoE().Format (stringOfRange m)) |> ignore
+                os.Append(SeeAlsoE().Format(stringOfRange m)) |> ignore
 
         | ConstraintSolverMissingConstraint (denv, tpr, tpc, m, m2) ->
             os.AppendString(
@@ -847,7 +858,7 @@ let OutputPhasedErrorR (os: StringBuilder) (diagnostic: PhasedDiagnostic) (canSu
 
                 let retTy =
                     knownReturnType
-                    |> Option.defaultValue (TType.TType_var (Typar.NewUnlinked(), KnownAmbivalentToNull))
+                    |> Option.defaultValue (TType.TType_var(Typar.NewUnlinked(), KnownAmbivalentToNull))
 
                 let argRepr =
                     callerArgs.ArgumentNamesAndTypes
diff --git a/src/Compiler/Driver/CompilerImports.fs b/src/Compiler/Driver/CompilerImports.fs
index d45601e0c28..3649e7fa293 100644
--- a/src/Compiler/Driver/CompilerImports.fs
+++ b/src/Compiler/Driver/CompilerImports.fs
@@ -97,7 +97,7 @@ let MakeILResource rName bytes =
         MetadataIndex = NoMetadataIdx
     }
 
-let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x = 
+let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
     let file = PathMap.apply g.pathMap file
 
     let bytes, bytesB = pickleObjWithDanglingCcus inMem file g scope p x
@@ -125,25 +125,31 @@ let PickleToResource inMem file (g: TcGlobals) scope rName rNameB p x =
             MetadataIndex = NoMetadataIdx
         }
 
-    let resourceB = 
-        if bytesB.AsMemory().Length > 0 then 
-            Some 
-              { Name = rNameB
-                Location = ILResourceLocation.Local(byteStorageB)
-                Access = ILResourceAccess.Public
-                CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
-                MetadataIndex = NoMetadataIdx 
-              }
+    let resourceB =
+        if bytesB.AsMemory().Length > 0 then
+            Some
+                {
+                    Name = rNameB
+                    Location = ILResourceLocation.Local(byteStorageB)
+                    Access = ILResourceAccess.Public
+                    CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
+                    MetadataIndex = NoMetadataIdx
+                }
         else
             None
 
     (bytesB :> IDisposable).Dispose()
 
     resource, resourceB
-          
+
 let GetSignatureData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) : PickledDataWithReferences =
-    let memA = byteReaderA()
-    let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br())
+    let memA = byteReaderA ()
+
+    let memB =
+        (match byteReaderB with
+         | None -> ByteMemory.Empty.AsReadOnly()
+         | Some br -> br ())
+
     unpickleObjWithDanglingCcus file ilScopeRef ilModule unpickleCcuInfo memA memB
 
 let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: CcuThunk, fileName, inMem) =
@@ -156,6 +162,7 @@ let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: Ccu
             FSharpSignatureDataResourceName2
         else
             FSharpSignatureDataResourceName
+
     let rNameB = FSharpSignatureDataResourceNameB
 
     let includeDir =
@@ -172,17 +179,22 @@ let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: Ccu
         tcGlobals
         ccu
         (rName + ccu.AssemblyName)
-        (rNameB+ccu.AssemblyName)
+        (rNameB + ccu.AssemblyName)
         pickleCcuInfo
         {
-            mspec=mspec
-            compileTimeWorkingDir=includeDir
+            mspec = mspec
+            compileTimeWorkingDir = includeDir
             usesQuotations = ccu.UsesFSharp20PlusQuotations
         }
 
 let GetOptimizationData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) =
-    let memA = byteReaderA()
-    let memB = (match byteReaderB with None -> ByteMemory.Empty.AsReadOnly() | Some br -> br())
+    let memA = byteReaderA ()
+
+    let memB =
+        (match byteReaderB with
+         | None -> ByteMemory.Empty.AsReadOnly()
+         | Some br -> br ())
+
     unpickleObjWithDanglingCcus file ilScopeRef ilModule Optimizer.u_CcuOptimizationInfo memA memB
 
 let WriteOptimizationData (tcGlobals, fileName, inMem, ccu: CcuThunk, modulInfo) =
@@ -196,11 +208,19 @@ let WriteOptimizationData (tcGlobals, fileName, inMem, ccu: CcuThunk, modulInfo)
 
     let rNameB = FSharpOptimizationDataResourceNameB
 
-    PickleToResource inMem fileName tcGlobals ccu (rName + ccu.AssemblyName) (rNameB+ccu.AssemblyName) Optimizer.p_CcuOptimizationInfo modulInfo
+    PickleToResource
+        inMem
+        fileName
+        tcGlobals
+        ccu
+        (rName + ccu.AssemblyName)
+        (rNameB + ccu.AssemblyName)
+        Optimizer.p_CcuOptimizationInfo
+        modulInfo
 
 let EncodeSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, isIncrementalBuild) =
     if tcConfig.GenerateSignatureData then
-        let resource1, resource2 = 
+        let resource1, resource2 =
             WriteSignatureData(tcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, isIncrementalBuild)
         // The resource gets written to a file for FSharp.Core
         let useDataFiles =
@@ -216,7 +236,13 @@ let EncodeSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, generat
 
             bytes.CopyTo fileStream
 
-        let resources = [ yield resource1; match resource2 with None -> () | Some r -> yield r ]
+        let resources =
+            [
+                yield resource1
+                match resource2 with
+                | None -> ()
+                | Some r -> yield r
+            ]
 
         let sigAttr =
             mkSignatureDataVersionAttr tcGlobals (parseILVersion FSharpBinaryMetadataFormatRevision)
@@ -251,8 +277,18 @@ let EncodeOptimizationData (tcGlobals, tcConfig: TcConfig, outfile, exportRemapp
                 map2Of2 Optimizer.AbstractOptimizationInfoToEssentials data
             else
                 data
-        let r1, r2 = WriteOptimizationData (tcGlobals, outfile, isIncrementalBuild, ccu, optData)
-        let resources = [ yield r1; match r2 with None -> () | Some r -> yield r ]
+
+        let r1, r2 =
+            WriteOptimizationData(tcGlobals, outfile, isIncrementalBuild, ccu, optData)
+
+        let resources =
+            [
+                yield r1
+                match r2 with
+                | None -> ()
+                | Some r -> yield r
+            ]
+
         resources
     else
         []
@@ -910,14 +946,20 @@ type RawFSharpAssemblyDataBackedByFileOnDisk(ilModule: ILModuleDef, ilAssemblyRe
                         if IsSignatureDataResource iresource then
                             let ccuName = GetSignatureDataResourceName iresource
                             let readerA = fun () -> iresource.GetBytes()
+
                             let readerB =
-                                resources |> List.tryPick (fun iresourceB ->
+                                resources
+                                |> List.tryPick (fun iresourceB ->
                                     if IsSignatureDataResourceB iresourceB then
                                         let ccuNameB = GetSignatureDataResourceName iresourceB
+
                                         if ccuName = ccuNameB then
-                                            Some (fun () -> iresourceB.GetBytes() )
-                                        else None
-                                    else None)
+                                            Some(fun () -> iresourceB.GetBytes())
+                                        else
+                                            None
+                                    else
+                                        None)
+
                             (ccuName, (readerA, readerB))
                 ]
 
@@ -927,11 +969,13 @@ type RawFSharpAssemblyDataBackedByFileOnDisk(ilModule: ILModuleDef, ilAssemblyRe
 
                     if not (FileSystem.FileExistsShim sigFileName) then
                         error (Error(FSComp.SR.buildExpectedSigdataFile (FileSystem.GetFullPathShim sigFileName), m))
+
                     let readerA () =
                         FileSystem
                             .OpenFileForReadShim(sigFileName, useMemoryMappedFile = true, shouldShadowCopy = true)
                             .AsByteMemory()
                             .AsReadOnly()
+
                     [ (ilShortAssemName, (readerA, None)) ]
                 else
                     sigDataReaders
@@ -940,21 +984,28 @@ type RawFSharpAssemblyDataBackedByFileOnDisk(ilModule: ILModuleDef, ilAssemblyRe
 
         member _.GetRawFSharpOptimizationData(m, ilShortAssemName, fileName) =
             let resources = ilModule.Resources.AsList()
+
             let optDataReaders =
                 [
                     for r in resources do
                         if IsOptimizationDataResource r then
                             let ccuName = GetOptimizationDataResourceName r
                             let readerA = (fun () -> r.GetBytes())
+
                             let readerB =
-                                resources |> List.tryPick (fun iresourceB ->
+                                resources
+                                |> List.tryPick (fun iresourceB ->
                                     if IsOptimizationDataResourceB iresourceB then
                                         let ccuNameB = GetOptimizationDataResourceName iresourceB
+
                                         if ccuName = ccuNameB then
-                                            Some (fun () -> iresourceB.GetBytes() )
-                                        else None
-                                    else None)
-                            (ccuName, (readerA, readerB)) 
+                                            Some(fun () -> iresourceB.GetBytes())
+                                        else
+                                            None
+                                    else
+                                        None)
+
+                            (ccuName, (readerA, readerB))
                 ]
 
             // Look for optimization data in a file
@@ -963,13 +1014,17 @@ type RawFSharpAssemblyDataBackedByFileOnDisk(ilModule: ILModuleDef, ilAssemblyRe
                     let optDataFile = Path.ChangeExtension(fileName, "optdata")
 
                     if not (FileSystem.FileExistsShim optDataFile) then
-                        error (Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore (optDataFile, FileSystem.GetFullPathShim optDataFile), m))
+                        error (
+                            Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore (optDataFile, FileSystem.GetFullPathShim optDataFile), m)
+                        )
+
                     let readerA () =
                         FileSystem
                             .OpenFileForReadShim(optDataFile, useMemoryMappedFile = true, shouldShadowCopy = true)
                             .AsByteMemory()
                             .AsReadOnly()
-                    [ (ilShortAssemName, (readerA, None))]
+
+                    [ (ilShortAssemName, (readerA, None)) ]
                 else
                     optDataReaders
 
@@ -1008,38 +1063,57 @@ type RawFSharpAssemblyData(ilModule: ILModuleDef, ilAssemblyRefs) =
 
         member _.GetRawFSharpSignatureData(_, _, _) =
             let resources = ilModule.Resources.AsList()
+
             let sigDataReaders =
-                [ for iresource in resources do
-                    if IsSignatureDataResource iresource then
-                        let ccuName = GetSignatureDataResourceName iresource
-                        let readerA = fun () -> iresource.GetBytes()
-                        let readerB =
-                            resources |> List.tryPick (fun iresourceB ->
-                                if IsSignatureDataResourceB iresourceB then
-                                    let ccuNameB = GetSignatureDataResourceName iresourceB
-                                    if ccuName = ccuNameB then
-                                        Some (fun () -> iresourceB.GetBytes() )
-                                    else None
-                                else None)
-                        (ccuName, (readerA, readerB)) ]
+                [
+                    for iresource in resources do
+                        if IsSignatureDataResource iresource then
+                            let ccuName = GetSignatureDataResourceName iresource
+                            let readerA = fun () -> iresource.GetBytes()
+
+                            let readerB =
+                                resources
+                                |> List.tryPick (fun iresourceB ->
+                                    if IsSignatureDataResourceB iresourceB then
+                                        let ccuNameB = GetSignatureDataResourceName iresourceB
+
+                                        if ccuName = ccuNameB then
+                                            Some(fun () -> iresourceB.GetBytes())
+                                        else
+                                            None
+                                    else
+                                        None)
+
+                            (ccuName, (readerA, readerB))
+                ]
+
             sigDataReaders
 
-         member _.GetRawFSharpOptimizationData(_, _, _) =
+        member _.GetRawFSharpOptimizationData(_, _, _) =
             let resources = ilModule.Resources.AsList()
+
             let optDataReaders =
-                [ for iresource in resources do
-                    if IsOptimizationDataResource iresource then
-                        let ccuName = GetOptimizationDataResourceName iresource
-                        let readerA = (fun () -> iresource.GetBytes())
-                        let readerB =
-                            resources |> List.tryPick (fun iresourceB ->
-                                if IsOptimizationDataResourceB iresourceB then
-                                    let ccuNameB = GetOptimizationDataResourceName iresourceB
-                                    if ccuName = ccuNameB then
-                                        Some (fun () -> iresourceB.GetBytes() )
-                                    else None
-                                else None)
-                        (ccuName, (readerA, readerB)) ]
+                [
+                    for iresource in resources do
+                        if IsOptimizationDataResource iresource then
+                            let ccuName = GetOptimizationDataResourceName iresource
+                            let readerA = (fun () -> iresource.GetBytes())
+
+                            let readerB =
+                                resources
+                                |> List.tryPick (fun iresourceB ->
+                                    if IsOptimizationDataResourceB iresourceB then
+                                        let ccuNameB = GetOptimizationDataResourceName iresourceB
+
+                                        if ccuName = ccuNameB then
+                                            Some(fun () -> iresourceB.GetBytes())
+                                        else
+                                            None
+                                    else
+                                        None)
+
+                            (ccuName, (readerA, readerB))
+                ]
 
             optDataReaders
 
@@ -2023,7 +2097,7 @@ and [] TcImports
             ilModule.GetRawFSharpSignatureData(m, ilShortAssemName, fileName)
             |> List.map (fun (ccuName, (sigDataReader, sigDataReaderB)) ->
                 let data =
-                    GetSignatureData (fileName, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB)
+                    GetSignatureData(fileName, ilScopeRef, ilModule.TryGetILModuleDef(), sigDataReader, sigDataReaderB)
 
                 let optDatas = Map.ofList optDataReaders
 
@@ -2067,9 +2141,9 @@ and [] TcImports
                     lazy
                         (match Map.tryFind ccuName optDatas with
                          | None -> None
-                         | Some (readerA, readerB) -> 
+                         | Some (readerA, readerB) ->
                              let data =
-                                 GetOptimizationData (fileName, ilScopeRef, ilModule.TryGetILModuleDef(), readerA, readerB)
+                                 GetOptimizationData(fileName, ilScopeRef, ilModule.TryGetILModuleDef(), readerA, readerB)
 
                              let fixupThunk () =
                                  data.OptionalFixup(fun nm -> availableToOptionalCcu (tcImports.FindCcu(ctok, m, nm, lookupOnly = false)))
diff --git a/src/Compiler/Driver/CompilerOptions.fs b/src/Compiler/Driver/CompilerOptions.fs
index 677ce328ede..2a5400ec01b 100644
--- a/src/Compiler/Driver/CompilerOptions.fs
+++ b/src/Compiler/Driver/CompilerOptions.fs
@@ -883,9 +883,9 @@ let errorsAndWarningsFlags (tcConfigB: TcConfigBuilder) =
         CompilerOption(
             "checknulls",
             tagNone,
-            OptionSwitch (fun switch -> tcConfigB.checkNullness <- switch = OptionSwitch.On),
+            OptionSwitch(fun switch -> tcConfigB.checkNullness <- switch = OptionSwitch.On),
             None,
-            Some (FSComp.SR.optsCheckNulls())
+            Some(FSComp.SR.optsCheckNulls ())
         )
 
         CompilerOption(
diff --git a/src/Compiler/Service/QuickParse.fs b/src/Compiler/Service/QuickParse.fs
index 4e2b240d79d..c6ac7af1de9 100644
--- a/src/Compiler/Service/QuickParse.fs
+++ b/src/Compiler/Service/QuickParse.fs
@@ -77,11 +77,8 @@ module QuickParse =
         | true, true, _ when name.Length > 4 -> isValidStrippedName (name.AsSpan(1, name.Length - 4)) 0
         | true, _, true when name.Length > 2 -> isValidStrippedName (name.AsSpan(1, name.Length - 2)) 0
         | _ -> false
-    
-    let GetCompleteIdentifierIslandImpl (lineStr: string MaybeNull) (index: int) : (string * int * bool) option =
-        match lineStr with 
-        | Null -> None
-        | NonNull lineStr -> 
+
+    let GetCompleteIdentifierIslandImplAux (lineStr: string) (index: int) : (string * int * bool) option =
         if index < 0 || index >= lineStr.Length then
             None
         else
@@ -175,6 +172,11 @@ module QuickParse =
                         let pos = r + MagicalAdjustmentConstant
                         Some(ident, pos, false))
 
+    let GetCompleteIdentifierIslandImpl (lineStr: string MaybeNull) (index: int) : (string * int * bool) option =
+        match lineStr with
+        | Null -> None
+        | NonNull lineStr -> GetCompleteIdentifierIslandImplAux lineStr index
+
     /// Given a string and a position in that string, find an identifier as
     /// expected by `GotoDefinition`. This will work when the cursor is
     /// immediately before the identifier, within the identifier, or immediately
@@ -212,10 +214,7 @@ module QuickParse =
     let private defaultName = [], ""
 
     /// Get the partial long name of the identifier to the left of index.
-    let GetPartialLongName (lineStr: string MaybeNull, index: int) =
-        match lineStr with
-        | Null -> defaultName
-        | NonNull lineStr ->
+    let GetPartialLongNameAux (lineStr: string, index: int) =
         if index < 0 then
             defaultName
         elif index >= lineStr.Length then
@@ -267,16 +266,18 @@ module QuickParse =
             let result = InResidue(index, index)
             result
 
+    let GetPartialLongName (lineStr: string MaybeNull, index: int) =
+        match lineStr with
+        | Null -> defaultName
+        | NonNull lineStr -> GetPartialLongNameAux(lineStr, index)
+
     type private EatCommentCallContext =
         | SkipWhiteSpaces of ident: string * current: string list * throwAwayNext: bool
         | StartIdentifier of current: string list * throwAway: bool
 
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-    let GetPartialLongNameEx (lineStr: string MaybeNull, index: int) : PartialLongName =
-        match lineStr with
-        | Null -> PartialLongName.Empty(index)
-        | NonNull lineStr ->
+    let GetPartialLongNameAux (lineStr: string, index: int) : PartialLongName =
         if index < 0 then
             PartialLongName.Empty(index)
         elif index >= lineStr.Length then
@@ -420,6 +421,11 @@ module QuickParse =
                     QualifyingIdents = plid
                 }
 
+    let GetPartialLongNameEx (lineStr: string MaybeNull, index: int) : PartialLongName =
+        match lineStr with
+        | Null -> PartialLongName.Empty(index)
+        | NonNull lineStr -> GetPartialLongNameAux(lineStr, index)
+
     let TokenNameEquals (tokenInfo: FSharpTokenInfo) (token2: string) =
         String.Compare(tokenInfo.TokenName, token2, StringComparison.OrdinalIgnoreCase) = 0
 
diff --git a/src/Compiler/Service/ServiceParamInfoLocations.fs b/src/Compiler/Service/ServiceParamInfoLocations.fs
index 0daed906f26..b9f4ddc412f 100755
--- a/src/Compiler/Service/ServiceParamInfoLocations.fs
+++ b/src/Compiler/Service/ServiceParamInfoLocations.fs
@@ -61,9 +61,9 @@ module internal ParameterLocationsImpl =
 
     let isStaticArg (StripParenTypes synType) =
         match synType with
-        | SynType.StaticConstant _ 
-        | SynType.StaticConstantNull _ 
-        | SynType.StaticConstantExpr _ 
+        | SynType.StaticConstant _
+        | SynType.StaticConstantNull _
+        | SynType.StaticConstantExpr _
         | SynType.StaticConstantNamed _ -> true
         | SynType.LongIdent _ -> true // NOTE: this is not a static constant, but it is a prefix of incomplete code, e.g. "TP<42, Arg3" is a prefix of "TP<42, Arg3=6>" and Arg3 shows up as a LongId
         | _ -> false
diff --git a/src/Compiler/SyntaxTree/LexHelpers.fs b/src/Compiler/SyntaxTree/LexHelpers.fs
index be52a5b2e58..dc277bef016 100644
--- a/src/Compiler/SyntaxTree/LexHelpers.fs
+++ b/src/Compiler/SyntaxTree/LexHelpers.fs
@@ -382,7 +382,7 @@ module Keywords =
             FSHARP, "__token_ODO", ODO
             FSHARP, "__token_OLET", OLET(true)
             FSHARP, "__token_constraint", CONSTRAINT
-            FSHARP, "__ambivalent",AMBIVALENT
+            FSHARP, "__ambivalent", AMBIVALENT
         ]
         (*------- reserved keywords which are ml-compatibility ids *)
         @ List.map
diff --git a/src/Compiler/SyntaxTree/SyntaxTree.fs b/src/Compiler/SyntaxTree/SyntaxTree.fs
index d6bd328c30d..f4d4d08634b 100644
--- a/src/Compiler/SyntaxTree/SyntaxTree.fs
+++ b/src/Compiler/SyntaxTree/SyntaxTree.fs
@@ -340,7 +340,7 @@ type SynTypeConstraint =
         | WhereTyparIsReferenceType (range = range)
         | WhereTyparIsUnmanaged (range = range)
         | WhereTyparSupportsNull (range = range)
-        | WhereTyparNotSupportsNull(range=range)
+        | WhereTyparNotSupportsNull (range = range)
         | WhereTyparIsComparable (range = range)
         | WhereTyparIsEquatable (range = range)
         | WhereTyparDefaultsToType (range = range)
@@ -423,7 +423,7 @@ type SynType =
 
     | StaticConstantNamed of ident: SynType * value: SynType * range: range
 
-    | WithNull of innerType: SynType * ambivalent: bool * range:range
+    | WithNull of innerType: SynType * ambivalent: bool * range: range
 
     | Paren of innerType: SynType * range: range
 
@@ -439,11 +439,11 @@ type SynType =
         | SynType.Anon (range = m)
         | SynType.WithGlobalConstraints (range = m)
         | SynType.StaticConstant (range = m)
-        | SynType.StaticConstantNull (range=m)
+        | SynType.StaticConstantNull (range = m)
         | SynType.StaticConstantExpr (range = m)
         | SynType.StaticConstantNamed (range = m)
         | SynType.HashConstraint (range = m)
-        | SynType.WithNull (range=m)
+        | SynType.WithNull (range = m)
         | SynType.MeasureDivide (range = m)
         | SynType.MeasurePower (range = m)
         | SynType.Paren (range = m) -> m
diff --git a/src/Compiler/TypedTree/TypedTree.fsi b/src/Compiler/TypedTree/TypedTree.fsi
index ab26f590bc2..6abb5707993 100644
--- a/src/Compiler/TypedTree/TypedTree.fsi
+++ b/src/Compiler/TypedTree/TypedTree.fsi
@@ -1593,7 +1593,7 @@ type TyparConstraint =
     | SupportsNull of range: range
 
     /// A constraint that a type doesn't support nullness
-    | NotSupportsNull of range 
+    | NotSupportsNull of range
 
     /// A constraint that a type has a member with the given signature
     | MayResolveMember of constraintInfo: TraitConstraintInfo * range: range
@@ -2910,7 +2910,7 @@ type RecdFieldRef =
     member TyconRef: TyconRef
 
 []
-type NullnessInfo = 
+type NullnessInfo =
 
     /// we know that there is an extra null value in the type
     | WithNull
@@ -2922,7 +2922,7 @@ type NullnessInfo =
     | AmbivalentToNull
 
 []
-type Nullness = 
+type Nullness =
     | Known of NullnessInfo
     | Variable of NullnessVar
 
@@ -2938,7 +2938,6 @@ type NullnessVar =
     member Set: Nullness -> unit
     member Unset: unit -> unit
     member Solution: Nullness
-    
 
 /// Represents a type in the typed abstract syntax
 []
diff --git a/src/Compiler/Utilities/InternalCollections.fs b/src/Compiler/Utilities/InternalCollections.fs
index 4ed206189d9..f10cd10e193 100755
--- a/src/Compiler/Utilities/InternalCollections.fs
+++ b/src/Compiler/Utilities/InternalCollections.fs
@@ -79,9 +79,10 @@ type internal AgedLookup<'Token, 'Key, 'Value when 'Value: not struct>(keepStron
                 | Strong (value) -> yield (key, value)
                 | Weak (weakReference) ->
 #if FX_NO_GENERIC_WEAKREFERENCE
-                    match weakReference.Target with 
+                    match weakReference.Target with
                     | Null -> ()
-                    | NonNull value -> yield key, (value:?>'Value) ]
+                    | NonNull value -> yield key, (value :?> 'Value)
+        ]
 #else
                     match weakReference.TryGetTarget() with
                     | false, _ -> ()
diff --git a/src/FSharp.Build/Fsc.fs b/src/FSharp.Build/Fsc.fs
index 93a475ca084..8809522d0e9 100644
--- a/src/FSharp.Build/Fsc.fs
+++ b/src/FSharp.Build/Fsc.fs
@@ -93,8 +93,11 @@ type public Fsc() as this =
 
     let mutable toolPath: string =
         let locationOfThisDll =
-            try Some(Path.GetDirectoryName(typeof.Assembly.Location))
-            with _ -> None
+            try
+                Some(Path.GetDirectoryName(typeof.Assembly.Location))
+            with _ ->
+                None
+
         match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with
         | Some s -> s
         | None -> ""
diff --git a/src/FSharp.Build/SubstituteText.fs b/src/FSharp.Build/SubstituteText.fs
index 3aea85bdca4..9960dfe99c8 100644
--- a/src/FSharp.Build/SubstituteText.fs
+++ b/src/FSharp.Build/SubstituteText.fs
@@ -33,61 +33,62 @@ type SubstituteText() =
 
         member _.Execute() =
             copiedFiles.Clear()
+
             for item in embeddedResources do
-                    // Update ITaskItem metadata to point to new location
-                    let sourcePath = item.GetMetadata("FullPath")
-
-                    let pattern1 = item.GetMetadata("Pattern1")
-                    let pattern2 = item.GetMetadata("Pattern2")
-
-                    // Is there any replacement to do?
-                    if not (String.IsNullOrWhiteSpace(pattern1) && String.IsNullOrWhiteSpace(pattern2)) then
-                        if not (String.IsNullOrWhiteSpace(sourcePath)) then
-                            try
-                                let getTargetPathFrom key =
-                                    let md = item.GetMetadata(key)
-                                    let path = Path.GetDirectoryName(md)
-                                    let fileName = Path.GetFileName(md)
-                                    let target = Path.Combine(path, @"..\resources", fileName)
+                // Update ITaskItem metadata to point to new location
+                let sourcePath = item.GetMetadata("FullPath")
+
+                let pattern1 = item.GetMetadata("Pattern1")
+                let pattern2 = item.GetMetadata("Pattern2")
+
+                // Is there any replacement to do?
+                if not (String.IsNullOrWhiteSpace(pattern1) && String.IsNullOrWhiteSpace(pattern2)) then
+                    if not (String.IsNullOrWhiteSpace(sourcePath)) then
+                        try
+                            let getTargetPathFrom key =
+                                let md = item.GetMetadata(key)
+                                let path = Path.GetDirectoryName(md)
+                                let fileName = Path.GetFileName(md)
+                                let target = Path.Combine(path, @"..\resources", fileName)
+                                target
+
+                            // Copy from the location specified in Identity
+                            let sourcePath = item.GetMetadata("Identity")
+
+                            // Copy to the location specified in TargetPath unless no TargetPath is provided, then use Identity
+                            let targetPath =
+                                let identityPath = getTargetPathFrom "Identity"
+                                let intermediateTargetPath = item.GetMetadata("IntermediateTargetPath")
+
+                                if not (String.IsNullOrWhiteSpace(intermediateTargetPath)) then
+                                    let fileName = Path.GetFileName(identityPath)
+                                    let target = Path.Combine(intermediateTargetPath, fileName)
                                     target
+                                else
+                                    identityPath
 
-                                // Copy from the location specified in Identity
-                                let sourcePath = item.GetMetadata("Identity")
-
-                                // Copy to the location specified in TargetPath unless no TargetPath is provided, then use Identity
-                                let targetPath =
-                                    let identityPath = getTargetPathFrom "Identity"
-                                    let intermediateTargetPath = item.GetMetadata("IntermediateTargetPath")
-
-                                    if not (String.IsNullOrWhiteSpace(intermediateTargetPath)) then
-                                        let fileName = Path.GetFileName(identityPath)
-                                        let target = Path.Combine(intermediateTargetPath, fileName)
-                                        target
-                                    else
-                                        identityPath
-
-                                item.ItemSpec <- targetPath
+                            item.ItemSpec <- targetPath
 
-                                // Transform file
-                                let mutable contents = File.ReadAllText(sourcePath)
+                            // Transform file
+                            let mutable contents = File.ReadAllText(sourcePath)
 
-                                if not (String.IsNullOrWhiteSpace(pattern1)) then
-                                    let replacement = item.GetMetadata("Replacement1")
-                                    contents <- contents.Replace(pattern1, replacement)
+                            if not (String.IsNullOrWhiteSpace(pattern1)) then
+                                let replacement = item.GetMetadata("Replacement1")
+                                contents <- contents.Replace(pattern1, replacement)
 
-                                if not (String.IsNullOrWhiteSpace(pattern2)) then
-                                    let replacement = item.GetMetadata("Replacement2")
-                                    contents <- contents.Replace(pattern2, replacement)
+                            if not (String.IsNullOrWhiteSpace(pattern2)) then
+                                let replacement = item.GetMetadata("Replacement2")
+                                contents <- contents.Replace(pattern2, replacement)
 
-                                let directory = Path.GetDirectoryName(targetPath)
+                            let directory = Path.GetDirectoryName(targetPath)
 
-                                if not (Directory.Exists(directory)) then
-                                    Directory.CreateDirectory(directory) |> ignore
+                            if not (Directory.Exists(directory)) then
+                                Directory.CreateDirectory(directory) |> ignore
 
-                                File.WriteAllText(targetPath, contents)
-                            with _ ->
-                                ()
+                            File.WriteAllText(targetPath, contents)
+                        with _ ->
+                            ()
 
-                    copiedFiles.Add(item)
+                copiedFiles.Add(item)
 
             true

From 1016d8528bd364d5a3fecdec6610f04432ae2638 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 26 Oct 2022 00:21:44 +0100
Subject: [PATCH 099/112] fix build

---
 src/Compiler/AbstractIL/ilreflect.fs          |   2 +-
 src/Compiler/Checking/CheckExpressions.fs     |   4 +-
 src/Compiler/Driver/CompilerImports.fs        | 115 +++++++++---------
 src/Compiler/Driver/CompilerImports.fsi       |   7 +-
 src/Compiler/Driver/fsc.fs                    |   2 +-
 src/Compiler/Facilities/LanguageFeatures.fs   |   3 -
 src/Compiler/Service/QuickParse.fs            |   4 +-
 src/Compiler/Service/ServiceParseTreeWalk.fs  |   2 +
 src/Compiler/Service/ServiceParsedInputOps.fs |   4 +
 src/Compiler/xlf/FSComp.txt.cs.xlf            |  11 +-
 src/FSharp.Build/SubstituteText.fs            |   2 +-
 .../FSharp.DependencyManager.Nuget.fsproj     |   1 +
 .../InlineRename/InlineRenameService.fs       |   4 +-
 .../FSharp.Editor/Lens/LensDisplayService.fs  |   6 +-
 14 files changed, 83 insertions(+), 84 deletions(-)

diff --git a/src/Compiler/AbstractIL/ilreflect.fs b/src/Compiler/AbstractIL/ilreflect.fs
index c8eca65326c..f5475a21178 100644
--- a/src/Compiler/AbstractIL/ilreflect.fs
+++ b/src/Compiler/AbstractIL/ilreflect.fs
@@ -265,7 +265,7 @@ type TypeBuilder with
         let t = typB.CreateTypeAndLog()
 
         let m =
-            if t <> null then
+            if box t <> null then
                 t.GetMethod(nm, (args |> Seq.map (fun x -> x.GetType()) |> Seq.toArray))
             else
                 null
diff --git a/src/Compiler/Checking/CheckExpressions.fs b/src/Compiler/Checking/CheckExpressions.fs
index 2a9d27e80ab..3da66bd20ce 100755
--- a/src/Compiler/Checking/CheckExpressions.fs
+++ b/src/Compiler/Checking/CheckExpressions.fs
@@ -4310,7 +4310,7 @@ and TcTypeOrMeasure kindOpt (cenv: cenv) newOk checkConstraints occ (iwsam: Warn
         TcLongIdentType kindOpt cenv newOk checkConstraints occ iwsam env tpenv synLongId
 
     | MultiDimensionArrayType (rank, elemTy, m) ->
-        TcElementType cenv newOk checkConstraints occ env tpenv rank elemTy m
+        TcArrayType cenv newOk checkConstraints occ env tpenv rank elemTy m
     
     | SynType.App (StripParenTypes (SynType.LongIdent longId), _, args, _, _, postfix, m) ->
         TcLongIdentAppType kindOpt cenv newOk checkConstraints occ iwsam env tpenv longId postfix args m
@@ -4355,7 +4355,7 @@ and TcTypeOrMeasure kindOpt (cenv: cenv) newOk checkConstraints occ (iwsam: Warn
         NewErrorType (), tpenv
 
     | SynType.WithNull(innerTy, ambivalent, m) -> 
-        let innerTyC, tpenv = TcTypeAndRecover cenv newOk checkConstraints occ env tpenv innerTy
+        let innerTyC, tpenv = TcTypeAndRecover cenv newOk checkConstraints occ WarnOnIWSAM.Yes env tpenv innerTy
         if g.langFeatureNullness then 
             if TypeNullNever g innerTyC then
                 let tyString = NicePrint.minimalStringOfType env.DisplayEnv innerTyC
diff --git a/src/Compiler/Driver/CompilerImports.fs b/src/Compiler/Driver/CompilerImports.fs
index 44cca2b772c..98f06aeba15 100644
--- a/src/Compiler/Driver/CompilerImports.fs
+++ b/src/Compiler/Driver/CompilerImports.fs
@@ -71,14 +71,6 @@ let IsOptimizationDataResourceB (r: ILResource) =
     r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB
     || r.Name.StartsWithOrdinal FSharpOptimizationCompressedDataResourceNameB
 
-let GetSignatureDataResourceName (r: ILResource) =
-    if r.Name.StartsWithOrdinal FSharpSignatureDataResourceName then
-        String.dropPrefix r.Name FSharpSignatureDataResourceName
-    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB then
-        String.dropPrefix r.Name FSharpSignatureDataResourceNameB
-    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 then
-        String.dropPrefix r.Name FSharpSignatureDataResourceName2
-
 let decompressResource (r: ILResource) =
     use raw = r.GetBytes().AsStream()
     use decompressed = new MemoryStream()
@@ -87,61 +79,61 @@ let decompressResource (r: ILResource) =
     deflator.Close()
     ByteStorage.FromByteArray(decompressed.ToArray()).GetByteMemory()
 
+let GetSignatureDataResourceName (r: ILResource) =
+    if r.Name.StartsWithOrdinal FSharpSignatureDataResourceName then
+        (fun () -> r.GetBytes()), String.dropPrefix r.Name FSharpSignatureDataResourceName
+    elif r.Name.StartsWithOrdinal FSharpSignatureCompressedDataResourceName then
+        (fun () -> decompressResource r), String.dropPrefix r.Name FSharpSignatureCompressedDataResourceName
+    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceNameB then
+        (fun () -> r.GetBytes()), String.dropPrefix r.Name FSharpSignatureDataResourceNameB
+    elif r.Name.StartsWithOrdinal FSharpSignatureCompressedDataResourceNameB then
+        (fun () -> decompressResource r), String.dropPrefix r.Name FSharpSignatureCompressedDataResourceNameB
+    elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 then
+        (fun () -> r.GetBytes()), String.dropPrefix r.Name FSharpSignatureDataResourceName2
+    else
+        failwith "unreachable"
+
 let GetResourceNameAndSignatureDataFuncs (resources: ILResource list) =
     [ for r in resources do
         if IsSignatureDataResource r then
-            let compressed, ccuName =
-                if r.Name.StartsWithOrdinal FSharpSignatureDataResourceName then
-                    FSharpSignatureDataResourceName, String.dropPrefix r.Name FSharpSignatureDataResourceName
-                elif r.Name.StartsWithOrdinal FSharpSignatureCompressedDataResourceName then
-                    true, String.dropPrefix r.Name FSharpSignatureCompressedDataResourceName
-                elif r.Name.StartsWithOrdinal FSharpSignatureDataResourceName2 then
-                    FSharpSignatureDataResourceName2, String.dropPrefix r.Name FSharpSignatureDataResourceName2
-                else
-                    failwith "GetSignatureDataResourceName"
-
-            let readerA = 
-                if compressed then
-                    (fun () -> decompressResource r)
-                else
-                    (fun () -> r.GetBytes())
+            let readerA, ccuName = GetSignatureDataResourceName r
 
             let readerB =
                 resources |> List.tryPick (fun rB -> 
                     if IsSignatureDataResourceB rB then 
-                        let ccuNameB = GetSignatureDataResourceName rB
+                        let readerB, ccuNameB = GetSignatureDataResourceName rB
                         if ccuName = ccuNameB then
-                            Some (fun () -> rB.GetBytes() )
+                            Some readerB
                         else None
                     else None)
 
             ccuName, (readerA, readerB) ]
 
+let GetOptimizationDataResourceName (r: ILResource) =
+    if r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName then
+        (fun () -> r.GetBytes()), String.dropPrefix r.Name FSharpOptimizationDataResourceName
+    elif r.Name.StartsWithOrdinal FSharpOptimizationCompressedDataResourceName then
+        (fun () -> decompressResource r), String.dropPrefix r.Name FSharpOptimizationCompressedDataResourceName
+    elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceNameB then
+        (fun () -> r.GetBytes()), String.dropPrefix r.Name FSharpOptimizationDataResourceNameB
+    elif r.Name.StartsWithOrdinal FSharpOptimizationCompressedDataResourceNameB then
+        (fun () -> decompressResource r), String.dropPrefix r.Name FSharpOptimizationCompressedDataResourceNameB
+    elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2 then
+        (fun () -> r.GetBytes()), String.dropPrefix r.Name FSharpOptimizationDataResourceName2
+    else
+        failwith $"GetOptimizationDataResourceName - {r.Name}"
+
 let GetResourceNameAndOptimizationDataFuncs (resources: ILResource list) =
     [ for r in resources do
         if IsOptimizationDataResource r then
-            let resourceType, ccuName =
-                if r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName then
-                    false, String.dropPrefix r.Name FSharpOptimizationDataResourceName
-                elif r.Name.StartsWithOrdinal FSharpOptimizationCompressedDataResourceName then
-                    true, String.dropPrefix r.Name FSharpOptimizationCompressedDataResourceName
-                elif r.Name.StartsWithOrdinal FSharpOptimizationDataResourceName2 then
-                    false, String.dropPrefix r.Name FSharpOptimizationDataResourceName2
-                else
-                    failwith "GetOptimizationDataResourceName"
-
-            let readerA = 
-                if compressed then
-                    (fun () -> decompressResource r)
-                else
-                    (fun () -> r.GetBytes())
+            let readerA, ccuName = GetOptimizationDataResourceName r
 
             let readerB =
                 resources |> List.tryPick (fun rB -> 
-                    if IsSignatureDataResourceB rB then 
-                        let ccuNameB = GetOptimizationDataResourceName rB
+                    if IsOptimizationDataResourceB rB then 
+                        let readerB, ccuNameB = GetOptimizationDataResourceName rB
                         if ccuName = ccuNameB then
-                            Some (fun () -> rB.GetBytes() )
+                            Some readerB
                         else None
                     else None)
             ccuName, (readerA, readerB) ]
@@ -224,15 +216,19 @@ let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: Ccu
 
     // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers
     // don't complain when they see the resource.
-    let rName, compress =
+    let rName =
         if tcConfig.compressMetadata then
-            FSharpSignatureCompressedDataResourceName, true
+            FSharpSignatureCompressedDataResourceName
         elif ccu.AssemblyName = getFSharpCoreLibraryName then
-            FSharpSignatureDataResourceName2, false
+            FSharpSignatureDataResourceName2
         else
-            FSharpSignatureDataResourceName, false
+            FSharpSignatureDataResourceName
 
-    let rNameB = FSharpSignatureDataResourceNameB
+    let rNameB =
+        if tcConfig.compressMetadata then
+            FSharpSignatureCompressedDataResourceNameB
+        else
+            FSharpSignatureDataResourceNameB
 
     let includeDir =
         if String.IsNullOrEmpty tcConfig.implicitIncludeDir then
@@ -246,7 +242,7 @@ let WriteSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, ccu: Ccu
         inMem
         fileName
         tcGlobals
-        compress
+        tcConfig.compressMetadata
         ccu
         (rName + ccu.AssemblyName)
         (rNameB + ccu.AssemblyName)
@@ -270,21 +266,25 @@ let GetOptimizationData (file, ilScopeRef, ilModule, byteReaderA, byteReaderB) =
 let WriteOptimizationData (tcConfig: TcConfig, tcGlobals, fileName, inMem, ccu: CcuThunk, modulInfo) =
     // For historical reasons, we use a different resource name for FSharp.Core, so older F# compilers
     // don't complain when they see the resource.
-    let rName, compress =
+    let rName =
         if tcConfig.compressMetadata then
-            FSharpOptimizationCompressedDataResourceName, true
+            FSharpOptimizationCompressedDataResourceName
         elif ccu.AssemblyName = getFSharpCoreLibraryName then
-            FSharpOptimizationDataResourceName2, false
+            FSharpOptimizationDataResourceName2
         else
-            FSharpOptimizationDataResourceName, false
+            FSharpOptimizationDataResourceName
 
-    let rNameB = FSharpOptimizationDataResourceNameB
+    let rNameB =
+        if tcConfig.compressMetadata then
+            FSharpOptimizationCompressedDataResourceNameB
+        else
+            FSharpOptimizationDataResourceNameB
 
     PickleToResource
         inMem
         fileName
         tcGlobals
-        compress
+        tcConfig.compressMetadata
         ccu
         (rName + ccu.AssemblyName)
         (rNameB + ccu.AssemblyName)
@@ -311,7 +311,7 @@ let EncodeSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, generat
     else
         [], []
 
-let EncodeOptimizationData (tcGlobals, tcConfig: TcConfig, outfile, exportRemapping, data, isIncrementalBuild) =
+let EncodeOptimizationData (tcConfig: TcConfig, tcGlobals, outfile, exportRemapping, data, isIncrementalBuild) =
     if tcConfig.GenerateOptimizationData then
         let data = map2Of2 (Optimizer.RemapOptimizationInfo tcGlobals exportRemapping) data
 
@@ -322,7 +322,7 @@ let EncodeOptimizationData (tcGlobals, tcConfig: TcConfig, outfile, exportRemapp
                 data
 
         let r1, r2 =
-            WriteOptimizationData(tcGlobals, outfile, isIncrementalBuild, ccu, optData)
+            WriteOptimizationData(tcConfig, tcGlobals, outfile, isIncrementalBuild, ccu, optData)
 
         let resources =
             [
@@ -1045,7 +1045,6 @@ type RawFSharpAssemblyData(ilModule: ILModuleDef, ilAssemblyRefs) =
 
         member _.GetRawFSharpSignatureData(_, _, _) =
             let resources = ilModule.Resources.AsList()
-
             GetResourceNameAndSignatureDataFuncs resources
 
         member _.GetRawFSharpOptimizationData(_, _, _) =
diff --git a/src/Compiler/Driver/CompilerImports.fsi b/src/Compiler/Driver/CompilerImports.fsi
index 29515657ecd..a1ce85c2a0b 100644
--- a/src/Compiler/Driver/CompilerImports.fsi
+++ b/src/Compiler/Driver/CompilerImports.fsi
@@ -43,10 +43,13 @@ val IsSignatureDataResourceB: ILResource -> bool
 /// Determine if an IL resource attached to an F# assembly is an F# optimization data resource
 val IsOptimizationDataResource: ILResource -> bool
 
+/// Determine if an IL resource attached to an F# assembly is an F# optimization data resource (data sream B)
+val IsOptimizationDataResourceB: ILResource -> bool
+
 /// Determine if an IL resource attached to an F# assembly is an F# quotation data resource for reflected definitions
 val IsReflectedDefinitionsResource: ILResource -> bool
 
-val GetResourceNameAndSignatureDataFunc: ILResource -> string * (unit -> ReadOnlyByteMemory)
+val GetResourceNameAndSignatureDataFuncs: ILResource list -> (string * ((unit -> ReadOnlyByteMemory) * (unit -> ReadOnlyByteMemory) option)) list
 
 /// Encode the F# interface data into a set of IL attributes and resources
 val EncodeSignatureData:
@@ -59,8 +62,8 @@ val EncodeSignatureData:
         ILAttribute list * ILResource list
 
 val EncodeOptimizationData:
-    tcGlobals: TcGlobals *
     tcConfig: TcConfig *
+    tcGlobals: TcGlobals *
     outfile: string *
     exportRemapping: Remap *
     (CcuThunk * #CcuOptimizationInfo) *
diff --git a/src/Compiler/Driver/fsc.fs b/src/Compiler/Driver/fsc.fs
index 270f6e948b9..603973ef04d 100644
--- a/src/Compiler/Driver/fsc.fs
+++ b/src/Compiler/Driver/fsc.fs
@@ -864,7 +864,7 @@ let main3
         // Encode the optimization data
         ReportTime tcConfig ("Encoding OptData")
 
-        optimizedImpls, EncodeOptimizationData(tcGlobals, tcConfig, outfile, exportRemapping, (generatedCcu, optimizationData), false)
+        optimizedImpls, EncodeOptimizationData(tcConfig, tcGlobals, outfile, exportRemapping, (generatedCcu, optimizationData), false)
 
     // Pass on only the minimum information required for the next phase
     Args(
diff --git a/src/Compiler/Facilities/LanguageFeatures.fs b/src/Compiler/Facilities/LanguageFeatures.fs
index 181271f7175..cc175df3026 100644
--- a/src/Compiler/Facilities/LanguageFeatures.fs
+++ b/src/Compiler/Facilities/LanguageFeatures.fs
@@ -126,11 +126,8 @@ type LanguageVersion(versionText) =
 
                 // F# preview
                 LanguageFeature.FromEndSlicing, previewVersion
-<<<<<<< HEAD
                 LanguageFeature.NullnessChecking, previewVersion
-=======
                 LanguageFeature.MatchNotAllowedForUnionCaseWithNoData, previewVersion
->>>>>>> 07b0a6bfcd5cb3ba9cff55bca415e0eb94d37626
             ]
 
     static let defaultLanguageVersion = LanguageVersion("default")
diff --git a/src/Compiler/Service/QuickParse.fs b/src/Compiler/Service/QuickParse.fs
index c6ac7af1de9..dbfcbcb2931 100644
--- a/src/Compiler/Service/QuickParse.fs
+++ b/src/Compiler/Service/QuickParse.fs
@@ -277,7 +277,7 @@ module QuickParse =
 
     /// Get the partial long name of the identifier to the left of index.
     /// For example, for `System.DateTime.Now` it returns PartialLongName ([|"System"; "DateTime"|], "Now", Some 32), where "32" pos of the last dot.
-    let GetPartialLongNameAux (lineStr: string, index: int) : PartialLongName =
+    let GetPartialLongNameExAux (lineStr: string, index: int) : PartialLongName =
         if index < 0 then
             PartialLongName.Empty(index)
         elif index >= lineStr.Length then
@@ -424,7 +424,7 @@ module QuickParse =
     let GetPartialLongNameEx (lineStr: string MaybeNull, index: int) : PartialLongName =
         match lineStr with
         | Null -> PartialLongName.Empty(index)
-        | NonNull lineStr -> GetPartialLongNameAux(lineStr, index)
+        | NonNull lineStr -> GetPartialLongNameExAux(lineStr, index)
 
     let TokenNameEquals (tokenInfo: FSharpTokenInfo) (token2: string) =
         String.Compare(tokenInfo.TokenName, token2, StringComparison.OrdinalIgnoreCase) = 0
diff --git a/src/Compiler/Service/ServiceParseTreeWalk.fs b/src/Compiler/Service/ServiceParseTreeWalk.fs
index 22a1bc6b784..9845a257efe 100644
--- a/src/Compiler/Service/ServiceParseTreeWalk.fs
+++ b/src/Compiler/Service/ServiceParseTreeWalk.fs
@@ -817,6 +817,7 @@ module SyntaxTraversal =
                 | SynType.Fun (argType = ty1; returnType = ty2) -> [ ty1; ty2 ] |> List.tryPick (traverseSynType path)
                 | SynType.MeasurePower (ty, _, _)
                 | SynType.HashConstraint (ty, _)
+                | SynType.WithNull (ty, _, _)
                 | SynType.WithGlobalConstraints (ty, _, _)
                 | SynType.Array (_, ty, _) -> traverseSynType path ty
                 | SynType.StaticConstantNamed (ty1, ty2, _)
@@ -826,6 +827,7 @@ module SyntaxTraversal =
                 | SynType.StaticConstantExpr (expr, _) -> traverseSynExpr [] expr
                 | SynType.Paren (innerType = t)
                 | SynType.SignatureParameter (usedType = t) -> traverseSynType path t
+                | SynType.StaticConstantNull _
                 | SynType.Anon _
                 | SynType.AnonRecd _
                 | SynType.LongIdent _
diff --git a/src/Compiler/Service/ServiceParsedInputOps.fs b/src/Compiler/Service/ServiceParsedInputOps.fs
index 2e69e88b496..af51f34c004 100644
--- a/src/Compiler/Service/ServiceParsedInputOps.fs
+++ b/src/Compiler/Service/ServiceParsedInputOps.fs
@@ -668,6 +668,7 @@ module ParsedInput =
             | SynType.Array (_, t, _) -> walkType t
             | SynType.Fun (argType = t1; returnType = t2) -> walkType t1 |> Option.orElseWith (fun () -> walkType t2)
             | SynType.WithGlobalConstraints (t, _, _) -> walkType t
+            | SynType.WithNull (t, _, _)
             | SynType.HashConstraint (t, _) -> walkType t
             | SynType.MeasureDivide (t1, t2, _)
             | SynType.Or (t1, t2, _, _) -> walkType t1 |> Option.orElseWith (fun () -> walkType t2)
@@ -676,6 +677,7 @@ module ParsedInput =
             | SynType.SignatureParameter (usedType = t) -> walkType t
             | SynType.StaticConstantExpr (e, _) -> walkExpr e
             | SynType.StaticConstantNamed (ident, value, _) -> List.tryPick walkType [ ident; value ]
+            | SynType.StaticConstantNull _
             | SynType.Anon _
             | SynType.AnonRecd _
             | SynType.LongIdent _
@@ -1675,6 +1677,7 @@ module ParsedInput =
             | SynType.Array (_, t, _)
             | SynType.HashConstraint (t, _)
             | SynType.MeasurePower (t, _, _)
+            | SynType.WithNull (t, _, _)
             | SynType.Paren (t, _)
             | SynType.SignatureParameter (usedType = t) -> walkType t
             | SynType.Fun (argType = t1; returnType = t2)
@@ -1695,6 +1698,7 @@ module ParsedInput =
             | SynType.StaticConstantNamed (ident, value, _) ->
                 walkType ident
                 walkType value
+            | SynType.StaticConstantNull _
             | SynType.Anon _
             | SynType.AnonRecd _
             | SynType.Var _
diff --git a/src/Compiler/xlf/FSComp.txt.cs.xlf b/src/Compiler/xlf/FSComp.txt.cs.xlf
index e16aff85aa9..5346660e4dc 100644
--- a/src/Compiler/xlf/FSComp.txt.cs.xlf
+++ b/src/Compiler/xlf/FSComp.txt.cs.xlf
@@ -127,7 +127,6 @@
         Argument {0} neodpovídá
         
       
-<<<<<<< HEAD
       
         The constraints 'struct' and 'null' are inconsistent
         The constraints 'struct' and 'null' are inconsistent
@@ -141,11 +140,11 @@
       
         The type '{0}' has 'null' as a true representation value but a constraint does not permit this
         The type '{0}' has 'null' as a true representation value but a constraint does not permit this
-=======
+        
+      
       
         All branches of an 'if' expression must return values implicitly convertible to the type of the first branch, which here is a tuple of length {0} of type\n    {1}    \nThis branch returns a tuple of length {2} of type\n    {3}    \n
         All branches of an 'if' expression must return values implicitly convertible to the type of the first branch, which here is a tuple of length {0} of type\n    {1}    \nThis branch returns a tuple of length {2} of type\n    {3}    \n
->>>>>>> 4ad56150efde1882f3b5879ad01840437eb2b334
         
       
       
@@ -1063,22 +1062,16 @@
         Tento výraz implicitně převede typ {0} na typ {1}. Přečtěte si téma https://aka.ms/fsharp-implicit-convs.
         
       
-<<<<<<< HEAD
-<<<<<<< HEAD
       
         The type '{0}' does not support a nullness qualitification.
         The type '{0}' does not support a nullness qualitification.
         
       
-=======
->>>>>>> f64e783b427d2e88b744fbb350cbb7d7c363e17e
-=======
       
         SynType.Or is not permitted in this declaration
         SynType.Or is not permitted in this declaration
         
       
->>>>>>> 80c3d34989a79dbde8fb797ac32a5a465d33ee51
       
         The trait '{0}' invoked by this call has multiple support types. This invocation syntax is not permitted for such traits. See https://aka.ms/fsharp-srtp for guidance.
         The trait '{0}' invoked by this call has multiple support types. This invocation syntax is not permitted for such traits. See https://aka.ms/fsharp-srtp for guidance.
diff --git a/src/FSharp.Build/SubstituteText.fs b/src/FSharp.Build/SubstituteText.fs
index 2e4950a62b3..9d451ba9764 100644
--- a/src/FSharp.Build/SubstituteText.fs
+++ b/src/FSharp.Build/SubstituteText.fs
@@ -24,7 +24,7 @@ type SubstituteText() =
     override _.Execute() =
         copiedFiles.Clear()
 
-        if not (isNull embeddedResources) then
+        if not (isNull (box embeddedResources)) then
             for item in embeddedResources do
                 // Update ITaskItem metadata to point to new location
                 let sourcePath = item.GetMetadata("FullPath")
diff --git a/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj b/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
index ca46dd230e2..e73025094bc 100644
--- a/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
+++ b/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
@@ -16,6 +16,7 @@
     
     false
     $(DefineConstants);NO_CHECKNULLS
+  
   
   
     true
diff --git a/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs b/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs
index dfc56faa5f4..9b3d15cdefd 100644
--- a/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs
+++ b/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs
@@ -152,9 +152,9 @@ type internal InlineRenameService
             return InlineRenameInfo(document, triggerSpan, symbol, symbolUse, declLoc, checkFileResults) :> FSharpInlineRenameInfo
         }
     
-    override _.GetRenameInfoAsync(document: Document, position: int, cancellationToken: CancellationToken) : Task =
+    override _.GetRenameInfoAsync(document: Document, position: int, cancellationToken: CancellationToken) : Task =
         asyncMaybe {
             return! InlineRenameService.GetInlineRenameInfo(document, position)
         }
-        |> Async.map (Option.defaultValue null)
+        |> Async.map Option.toObj
         |> RoslynHelpers.StartAsyncAsTask(cancellationToken)
diff --git a/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs b/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs
index 2e86cc9a052..f65719997bc 100644
--- a/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs
+++ b/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs
@@ -326,10 +326,10 @@ type LensDisplayService (view : IWpfTextView, buffer : ITextBuffer) as self =
                         |> Seq.map (fun trackingSpan ->
                                 let success, res = self.UiElements.TryGetValue trackingSpan
                                 if success then 
-                                    res 
-                                else null
+                                    Some res 
+                                else None
                             )
-                        |> Seq.filter (fun ui -> not(isNull ui) && not(self.AddedAdornments.Contains ui))
+                        |> Seq.choose (function Some ui when not (self.AddedAdornments.Contains ui) -> Some ui | _ ->  None)
                         |> Seq.iter(fun grid ->
                                 layer.AddAdornment(AdornmentPositioningBehavior.OwnerControlled, Nullable(), 
                                     self, grid, AdornmentRemovedCallback(fun _ _ -> self.AddedAdornments.Remove grid |> ignore)) |> ignore

From 05ad4affbe28ee8006f022e62e580dd738d27a49 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Wed, 26 Apr 2023 17:50:06 +0100
Subject: [PATCH 100/112] bring branch up-to-date

---
 FSharp.Profiles.props                                |  3 ++-
 src/Compiler/Driver/CompilerImports.fs               |  9 ---------
 .../Driver/GraphChecking/FileContentMapping.fs       |  3 +++
 src/Compiler/Symbols/SymbolHelpers.fs                |  4 ----
 src/Compiler/TypedTree/TypedTreeOps.fs               |  5 -----
 src/Compiler/TypedTree/TypedTreePickle.fs            | 12 ++----------
 src/FSharp.Core/async.fs                             |  7 ++++++-
 7 files changed, 13 insertions(+), 30 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index 761a6645321..a099edd26cc 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -2,8 +2,9 @@
 
 
   
+    
     true
-    
+    
     
   
 
diff --git a/src/Compiler/Driver/CompilerImports.fs b/src/Compiler/Driver/CompilerImports.fs
index d3b934f0659..7b9525842eb 100644
--- a/src/Compiler/Driver/CompilerImports.fs
+++ b/src/Compiler/Driver/CompilerImports.fs
@@ -141,15 +141,6 @@ let GetResourceNameAndOptimizationDataFuncs (resources: ILResource list) =
 let IsReflectedDefinitionsResource (r: ILResource) =
     r.Name.StartsWithOrdinal(QuotationPickler.SerializedReflectedDefinitionsResourceNameBase)
 
-let MakeILResource rName bytes =
-    {
-        Name = rName
-        Location = ILResourceLocation.Local(ByteStorage.FromByteArray(bytes))
-        Access = ILResourceAccess.Public
-        CustomAttrsStored = storeILCustomAttrs emptyILCustomAttrs
-        MetadataIndex = NoMetadataIdx
-    }
-
 let ByteBufferToBytes compress (bytes: ByteBuffer) =
     if compress then
         let raw = new MemoryStream(bytes.AsMemory().ToArray())
diff --git a/src/Compiler/Driver/GraphChecking/FileContentMapping.fs b/src/Compiler/Driver/GraphChecking/FileContentMapping.fs
index f20c95fa3d8..b80bef057b2 100644
--- a/src/Compiler/Driver/GraphChecking/FileContentMapping.fs
+++ b/src/Compiler/Driver/GraphChecking/FileContentMapping.fs
@@ -240,6 +240,7 @@ let visitSynType (t: SynType) : FileContentEntry list =
             let continuations = List.map (snd >> visit) fields
             Continuation.concatenate continuations continuation
         | SynType.Array (elementType = elementType) -> visit elementType continuation
+        | SynType.WithNull(innerType = innerType) ->  visit innerType continuation
         | SynType.Fun (argType, returnType, _, _) ->
             let continuations = List.map visit [ argType; returnType ]
             Continuation.concatenate continuations continuation
@@ -250,6 +251,7 @@ let visitSynType (t: SynType) : FileContentEntry list =
         | SynType.HashConstraint (innerType, _) -> visit innerType continuation
         | SynType.MeasurePower (baseMeasure = baseMeasure) -> visit baseMeasure continuation
         | SynType.StaticConstant _ -> continuation []
+        | SynType.StaticConstantNull _ -> continuation []
         | SynType.StaticConstantExpr (expr, _) -> continuation (visitSynExpr expr)
         | SynType.StaticConstantNamed (ident, value, _) ->
             let continuations = List.map visit [ ident; value ]
@@ -287,6 +289,7 @@ let visitSynTypeConstraint (tc: SynTypeConstraint) : FileContentEntry list =
         | SynTypeConstraint.WhereTyparIsReferenceType _
         | SynTypeConstraint.WhereTyparIsUnmanaged _
         | SynTypeConstraint.WhereTyparSupportsNull _
+        | SynTypeConstraint.WhereTyparNotSupportsNull _
         | SynTypeConstraint.WhereTyparIsComparable _
         | SynTypeConstraint.WhereTyparIsEquatable _ -> ()
         | SynTypeConstraint.WhereTyparDefaultsToType (typeName = typeName) -> yield! visitSynType typeName
diff --git a/src/Compiler/Symbols/SymbolHelpers.fs b/src/Compiler/Symbols/SymbolHelpers.fs
index d55c343b638..e9d6ead5e8f 100644
--- a/src/Compiler/Symbols/SymbolHelpers.fs
+++ b/src/Compiler/Symbols/SymbolHelpers.fs
@@ -242,10 +242,6 @@ module internal SymbolHelpers =
                   yield ParamNameAndType(argInfo.Name, ty) ]
         | _ -> []
 
-    // Find the name of the metadata file for this external definition
-    let metaInfoOfEntityRef (infoReader: InfoReader) m tcref =
-        InfoReader.TryFindMetadataInfoOfExternalEntityRef infoReader m tcref
-
     let mkXmlComment thing =
         match thing with
         | Some (Some fileName, xmlDocSig) -> FSharpXmlDoc.FromXmlFile(fileName, xmlDocSig)
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fs b/src/Compiler/TypedTree/TypedTreeOps.fs
index 29610ba9b0d..8b16005c6da 100644
--- a/src/Compiler/TypedTree/TypedTreeOps.fs
+++ b/src/Compiler/TypedTree/TypedTreeOps.fs
@@ -2781,11 +2781,6 @@ let generalizedTyconRef (g: TcGlobals) tcref =
     let tinst = generalTyconRefInst tcref
     TType_app(tcref, tinst, g.knownWithoutNull)
 
-let isTTyparSupportsStaticMethod tpc = 
-    match tpc with 
-    | TyparConstraint.MayResolveMember _ -> true
-    | _ -> false
-
 let isTTyparCoercesToType tpc = 
     match tpc with 
     | TyparConstraint.CoercesTo _  -> true
diff --git a/src/Compiler/TypedTree/TypedTreePickle.fs b/src/Compiler/TypedTree/TypedTreePickle.fs
index 2b81cccedc0..c6977b7993d 100644
--- a/src/Compiler/TypedTree/TypedTreePickle.fs
+++ b/src/Compiler/TypedTree/TypedTreePickle.fs
@@ -488,10 +488,6 @@ let p_array f (x: 'T[]) st =
     p_int x.Length st
     p_array_core f x st
 
-let p_arrayB f (x: 'T[]) st =
-    p_intB x.Length st
-    p_array_core f x st
-
 let p_list_core f (xs: 'T list) st =
     for x in xs do
         f x st
@@ -584,11 +580,6 @@ let u_array f st =
     let n = u_int st
     u_array_core f n st
 
-/// Unpickle an array from the B stream. The array is empty if the B stream is not present.
-let u_arrayB f st =
-    let n = u_intB st
-    u_array_core f n st
-
 let u_list_core f n st =
     List.init n (fun _ -> f st)
 
@@ -598,7 +589,8 @@ let u_list f st =
 
 /// Unpickle a list from the B stream. The resulting list is empty if the B stream is not present.
 let u_listB f st =
-    Array.toList (u_arrayB f st)
+    let n = u_intB st
+    u_list_core f n st
 
 let u_list_ext extra f st =
     let n = u_int st
diff --git a/src/FSharp.Core/async.fs b/src/FSharp.Core/async.fs
index f8a8d483c6d..6fe0b1ea5e2 100644
--- a/src/FSharp.Core/async.fs
+++ b/src/FSharp.Core/async.fs
@@ -868,9 +868,14 @@ module AsyncPrimitives =
 
     ///   - Initial cancellation check
     ///   - Call syncCtxt.Post with exception protection. THis may fail as it is arbitrary user code
-    let CreateSwitchToAsync (syncCtxt: SynchronizationContext MaybeNull) =
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+    let CreateSwitchToAsync (syncCtxt: SynchronizationContext) =
+#else
+    let CreateSwitchToAsync (syncCtxt: SynchronizationContext?) =
+#endif
         MakeAsyncWithCancelCheck(fun ctxt -> ctxt.PostWithTrampoline syncCtxt ctxt.cont)
 
+
     ///   - Initial cancellation check
     ///   - Create Thread and call Start() with exception protection. We don't expect this
     ///     to fail but protect nevertheless.

From 9a21a9ae6c93729e563bd29ebcd179bc238cbd57 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 12:00:48 +0100
Subject: [PATCH 101/112] use psuedo keywords until syntax is sorted out after
 merge

---
 FSharp.Profiles.props                         | 14 +++++------
 src/Compiler/Checking/CheckExpressions.fs     |  2 +-
 src/Compiler/Checking/ConstraintSolver.fs     |  4 ++--
 src/Compiler/Service/ServiceLexing.fs         |  4 +++-
 src/Compiler/SyntaxTree/LexFilter.fs          |  2 +-
 src/Compiler/SyntaxTree/LexHelpers.fs         |  7 ++++--
 src/Compiler/TypedTree/TypeProviders.fs       |  2 +-
 src/Compiler/TypedTree/tainted.fs             |  2 +-
 src/Compiler/TypedTree/tainted.fsi            |  2 +-
 src/Compiler/Utilities/illib.fs               |  2 +-
 src/Compiler/Utilities/illib.fsi              |  2 +-
 src/Compiler/pars.fsy                         | 23 ++++++++++++++-----
 src/FSharp.Build/FSharpCommandLineBuilder.fs  |  2 +-
 src/FSharp.Core/option.fs                     |  8 +++----
 src/FSharp.Core/option.fsi                    |  8 +++----
 src/FSharp.Core/prim-types.fs                 | 10 ++++----
 src/FSharp.Core/prim-types.fsi                | 12 +++++-----
 src/fsi/console.fs                            |  2 +-
 tests/FSharp.Test.Utilities/Compiler.fs       | 11 +++++----
 tests/fsharp/core/nullness/test.fsx           |  6 ++---
 .../BraceCompletionSessionProvider.fs         |  1 -
 .../src/FSharp.Editor/Common/Extensions.fs    |  2 +-
 vsintegration/src/FSharp.VS.FSI/fsiBasis.fs   |  2 +-
 23 files changed, 73 insertions(+), 57 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index a099edd26cc..5ab643dc530 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -2,20 +2,16 @@
 
 
   
-    
-    true
+    
+    false
     
-    
+    false
   
 
   
     BUILDING_WITH_LKG;NO_CHECKNULLS;$(DefineConstants)
   
 
-	
-		NO_NULLCHECKING_FEATURE;$(DefineConstants)
-	
-
 	
   	$(OtherFlags) /langversion:preview
 	  $(OtherFlags) /checknulls
@@ -28,6 +24,10 @@
     $(DefineConstants);NO_CHECKNULLS
   
 
+	
+		NO_NULLCHECKING_FEATURE;$(DefineConstants)
+	
+
   
     
     
diff --git a/src/Compiler/Checking/CheckExpressions.fs b/src/Compiler/Checking/CheckExpressions.fs
index a806222550c..b2f0ba5f73a 100755
--- a/src/Compiler/Checking/CheckExpressions.fs
+++ b/src/Compiler/Checking/CheckExpressions.fs
@@ -4400,7 +4400,7 @@ and TcTypeOrMeasure kindOpt (cenv: cenv) newOk checkConstraints occ (iwsam: Warn
                 // For example "int option?" is not allowed, not "string??".
                 //
                 // For variable types in FSharp.Core we make an exception because we must allow
-                //    val toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : not null *)
+                //    val toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : __notnull *)
                 // wihout implying 'T is not null.  This is because it is legitimate to use this
                 // function to "collapse" null and obj-null-coming-from-option using such a function.
 
diff --git a/src/Compiler/Checking/ConstraintSolver.fs b/src/Compiler/Checking/ConstraintSolver.fs
index 130905f4a83..6d0ba8d3639 100644
--- a/src/Compiler/Checking/ConstraintSolver.fs
+++ b/src/Compiler/Checking/ConstraintSolver.fs
@@ -2570,8 +2570,8 @@ and SolveTypeDefnNotSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 trace ty =
     let g = csenv.g
     let m = csenv.m
     //match stripTyparEqns ty with 
-    //// If you set a type variable constrained with a T: not null to U then you don't induce an inference constraint
-    //// of U: not null.
+    //// If you set a type variable constrained with a T: __notnull to U then you don't induce an inference constraint
+    //// of U: __notnull.
     //// TODO: what about Obsolete?
     //| TType_var(_, nullness) when nullness.TryEvaluate() = Some NullnessInfo.WithoutNull || nullness.TryEvaluate() = Some NullnessInfo.AmbivalentToNull -> CompleteD
     //| _ ->
diff --git a/src/Compiler/Service/ServiceLexing.fs b/src/Compiler/Service/ServiceLexing.fs
index 393b7089900..937e577e842 100644
--- a/src/Compiler/Service/ServiceLexing.fs
+++ b/src/Compiler/Service/ServiceLexing.fs
@@ -395,7 +395,9 @@ module internal TokenClassifications =
         | HIGH_PRECEDENCE_PAREN_APP
         | FIXED
         | HIGH_PRECEDENCE_BRACK_APP
-        | AMBIVALENT
+        | AMBIVALENT__
+        | NOTNULL__
+        | WITHNULL__
         | TYPE_COMING_SOON
         | TYPE_IS_HERE
         | MODULE_COMING_SOON
diff --git a/src/Compiler/SyntaxTree/LexFilter.fs b/src/Compiler/SyntaxTree/LexFilter.fs
index 264fd05debb..42491d78168 100644
--- a/src/Compiler/SyntaxTree/LexFilter.fs
+++ b/src/Compiler/SyntaxTree/LexFilter.fs
@@ -1107,7 +1107,7 @@ type LexFilterImpl (
                     //      fx
                     //      fx
                     | DEFAULT | COLON | COLON_GREATER | STRUCT | NULL | DELEGATE | AND | WHEN 
-                    | QMARK | AMBIVALENT
+                    | QMARK | AMBIVALENT__
                     | DOT_DOT
                     | NEW
                     | LBRACE_BAR
diff --git a/src/Compiler/SyntaxTree/LexHelpers.fs b/src/Compiler/SyntaxTree/LexHelpers.fs
index 393ca456380..b404dcabc1e 100644
--- a/src/Compiler/SyntaxTree/LexHelpers.fs
+++ b/src/Compiler/SyntaxTree/LexHelpers.fs
@@ -381,7 +381,7 @@ module Keywords =
             ALWAYS, "with", WITH
             FSHARP, "yield", YIELD(true)
             ALWAYS, "_", UNDERSCORE
-            (*------- for prototyping and explaining offside rule *)
+            (*------- for explaining offside rule *)
             FSHARP, "__token_OBLOCKSEP", OBLOCKSEP
             FSHARP, "__token_OWITH", OWITH
             FSHARP, "__token_ODECLEND", ODECLEND
@@ -391,7 +391,10 @@ module Keywords =
             FSHARP, "__token_ODO", ODO
             FSHARP, "__token_OLET", OLET(true)
             FSHARP, "__token_constraint", CONSTRAINT
-            FSHARP, "__ambivalent", AMBIVALENT
+            (*------- for prototyping *)
+            FSHARP, "__ambivalent", AMBIVALENT__
+            FSHARP, "__notnull", NOTNULL__
+            FSHARP, "__withnull", WITHNULL__
         ]
         (*------- reserved keywords which are ml-compatibility ids *)
         @ List.map
diff --git a/src/Compiler/TypedTree/TypeProviders.fs b/src/Compiler/TypedTree/TypeProviders.fs
index bf53369bba3..82382eb0ab0 100644
--- a/src/Compiler/TypedTree/TypeProviders.fs
+++ b/src/Compiler/TypedTree/TypeProviders.fs
@@ -231,7 +231,7 @@ let TryTypeMemberArray (st: Tainted<_>, fullName, memberName, m, f) =
 let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
     match TryTypeMember(st, fullName, memberName, m, recover, f) with 
 #else
-let TryTypeMemberNonNull<'T, 'U when 'U : not null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U?)) : Tainted<'U> =
+let TryTypeMemberNonNull<'T, 'U when 'U : __notnull and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U?)) : Tainted<'U> =
     match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
 #endif
     | Tainted.Null -> 
diff --git a/src/Compiler/TypedTree/tainted.fs b/src/Compiler/TypedTree/tainted.fs
index 7c54d135b7d..307a004e775 100644
--- a/src/Compiler/TypedTree/tainted.fs
+++ b/src/Compiler/TypedTree/tainted.fs
@@ -168,7 +168,7 @@ module internal Tainted =
     let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure id)
 #else
-    let (|Null|NonNull|) (p:Tainted<'T?>) : Choice> when 'T : not null =
+    let (|Null|NonNull|) (p:Tainted<'T?>) : Choice> when 'T : __notnull =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure nonNull)
 #endif
 
diff --git a/src/Compiler/TypedTree/tainted.fsi b/src/Compiler/TypedTree/tainted.fsi
index 1e9736ebdb5..b6fbccdb656 100644
--- a/src/Compiler/TypedTree/tainted.fsi
+++ b/src/Compiler/TypedTree/tainted.fsi
@@ -104,7 +104,7 @@ module internal Tainted =
 #if NO_CHECKNULLS
     val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice> when 'T : null and 'T : not struct
 #else
-    val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice> when 'T : not null
+    val (|Null|NonNull|) : Tainted<'T MaybeNull> -> Choice> when 'T : __notnull
 #endif
 
     /// Test whether the tainted value equals given value.
diff --git a/src/Compiler/Utilities/illib.fs b/src/Compiler/Utilities/illib.fs
index af9da55512d..43a6ae37f24 100644
--- a/src/Compiler/Utilities/illib.fs
+++ b/src/Compiler/Utilities/illib.fs
@@ -62,7 +62,7 @@ module internal PervasiveAutoOpens =
         | null -> raise (ArgumentNullException(paramName))
         | v -> v
 #else
-    type 'T MaybeNull when 'T: not null and 'T: not struct = 'T?
+    type 'T MaybeNull when 'T: __notnull and 'T: not struct = 'T?
 
 #endif
 
diff --git a/src/Compiler/Utilities/illib.fsi b/src/Compiler/Utilities/illib.fsi
index f529bb10cda..82e8b6c8cd0 100644
--- a/src/Compiler/Utilities/illib.fsi
+++ b/src/Compiler/Utilities/illib.fsi
@@ -45,7 +45,7 @@ module internal PervasiveAutoOpens =
 #else
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?'
-    type 'T MaybeNull when 'T: not null and 'T: not struct = 'T?
+    type 'T MaybeNull when 'T: __notnull and 'T: not struct = 'T?
 #endif
 
     val inline (===): x: 'a -> y: 'a -> bool when 'a: not struct
diff --git a/src/Compiler/pars.fsy b/src/Compiler/pars.fsy
index 6c846f1beff..133d464542d 100644
--- a/src/Compiler/pars.fsy
+++ b/src/Compiler/pars.fsy
@@ -91,7 +91,7 @@ let parse_error_rich = Some(fun (ctxt: ParseErrorContext<_>) ->
 %token GREATER_RBRACK STRUCT SIG
 %token STATIC MEMBER CLASS ABSTRACT OVERRIDE DEFAULT CONSTRUCTOR INHERIT
 %token EXTERN VOID PUBLIC PRIVATE INTERNAL GLOBAL
-%token AMBIVALENT
+%token AMBIVALENT__ NOTNULL__ WITHNULL__
 
 /* for parser 'escape hatch' out of expression context without consuming the 'recover' token */
 %token TYPE_COMING_SOON TYPE_IS_HERE MODULE_COMING_SOON MODULE_IS_HERE
@@ -2314,14 +2314,20 @@ typeConstraint:
      { SynTypeConstraint.WhereTyparIsValueType($1, lhs parseState) }
 
   | typar COLON IDENT STRUCT
-     { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3))
+     { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + "1"))
        SynTypeConstraint.WhereTyparIsReferenceType($1, lhs parseState) }
 
   | typar COLON NULL
      { SynTypeConstraint.WhereTyparSupportsNull($1, lhs parseState) }
+/*
+** TODO: This rule is not triggering, faking it with __notnull for now
 
   | typar COLON IDENT NULL
-      { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3))  
+      { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + "2"))  
+        SynTypeConstraint.WhereTyparNotSupportsNull($1, lhs parseState) }
+*/
+  | typar COLON NOTNULL__
+      { //if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + "2"))  
         SynTypeConstraint.WhereTyparNotSupportsNull($1, lhs parseState) }
 
   | typar COLON LPAREN classMemberSpfn rparen
@@ -2342,14 +2348,14 @@ typeConstraint:
        | "enum" ->
            let _ltm, _gtm, args, _commas, mWhole = $4
            SynTypeConstraint.WhereTyparIsEnum($1, args, unionRanges $1.Range mWhole)
-       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm)) }
+       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm + "3")) }
 
   | typar COLON IDENT
      { match $3 with
        | "comparison" -> SynTypeConstraint.WhereTyparIsComparable($1, lhs parseState)
        | "equality" -> SynTypeConstraint.WhereTyparIsEquatable($1, lhs parseState)
        | "unmanaged" -> SynTypeConstraint.WhereTyparIsUnmanaged($1, lhs parseState)
-       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm)) }
+       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm + "4")) }
 
   | appType
      { SynTypeConstraint.WhereSelfConstrained($1, lhs parseState) }
@@ -5486,11 +5492,16 @@ appTypeConPower:
     { $1 }
 
 appType:
-  | appType AMBIVALENT
+  | appType AMBIVALENT__
     { SynType.WithNull($1, true, lhs parseState) }
 
+  | appType WITHNULL__
+    { SynType.WithNull($1, false, lhs parseState) }
+
+/*
   | appType QMARK
     { SynType.WithNull($1, false, lhs parseState) }
+*/
 
   | appType arrayTypeSuffix
       {  SynType.Array($2, $1, lhs parseState) }
diff --git a/src/FSharp.Build/FSharpCommandLineBuilder.fs b/src/FSharp.Build/FSharpCommandLineBuilder.fs
index 77486d93262..8f2bf760013 100644
--- a/src/FSharp.Build/FSharpCommandLineBuilder.fs
+++ b/src/FSharp.Build/FSharpCommandLineBuilder.fs
@@ -28,7 +28,7 @@ module Utils =
 #else
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?' for example for future FS-1060.
-    type MaybeNull<'T when 'T : not null> = 'T?
+    type MaybeNull<'T when 'T : __notnull> = 'T?
 #endif
 
 type FSharpCommandLineBuilder() =
diff --git a/src/FSharp.Core/option.fs b/src/FSharp.Core/option.fs
index 75531ed379d..fe4740f248c 100644
--- a/src/FSharp.Core/option.fs
+++ b/src/FSharp.Core/option.fs
@@ -166,13 +166,13 @@ module Option =
         | Some x -> x
 #else
     []
-    let ofObj (value: 'T?) : 'T option when 'T: not struct and 'T : not null = 
+    let ofObj (value: 'T?) : 'T option when 'T: not struct and 'T : __notnull = 
         match value with
         | null -> None
         | _ -> Some value
 
     []
-    let toObj (value: 'T option) : 'T? when 'T: not struct (* and 'T : not null *)  =
+    let toObj (value: 'T option) : 'T? when 'T: not struct (* and 'T : __notnull *)  =
         match value with
         | None -> null
         | Some x -> x
@@ -343,13 +343,13 @@ module ValueOption =
         | ValueSome x -> x
 #else
     []
-    let ofObj (value: 'T?) : 'T voption when 'T: not struct and 'T : not null  = 
+    let ofObj (value: 'T?) : 'T voption when 'T: not struct and 'T : __notnull  = 
         match value with
         | null -> ValueNone
         | _ -> ValueSome value
 
     []
-    let toObj (value : 'T voption) : 'T? when 'T: not struct (* and 'T : not null *) = 
+    let toObj (value : 'T voption) : 'T? when 'T: not struct (* and 'T : __notnull *) = 
         match value with
         | ValueNone -> null
         | ValueSome x -> x
diff --git a/src/FSharp.Core/option.fsi b/src/FSharp.Core/option.fsi
index e16c3d3f909..c9c0c785743 100644
--- a/src/FSharp.Core/option.fsi
+++ b/src/FSharp.Core/option.fsi
@@ -444,7 +444,7 @@ module Option =
     val inline ofObj: value: 'T -> 'T option  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val inline ofObj: value: 'T? -> 'T option  when 'T : not struct and 'T : not null
+    val inline ofObj: value: 'T? -> 'T option  when 'T : not struct and 'T : __notnull
 #endif
 
     /// Convert an option to a potentially null value.
@@ -464,7 +464,7 @@ module Option =
     val inline toObj: value: 'T option -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val inline toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : not null *)
+    val inline toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : __notnull *)
 #endif
 
 /// Contains operations for working with value options.
@@ -902,7 +902,7 @@ module ValueOption =
     val ofObj: value: 'T -> 'T voption  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val ofObj: value: 'T? -> 'T voption  when 'T : not struct and 'T : not null
+    val ofObj: value: 'T? -> 'T voption  when 'T : not struct and 'T : __notnull
 #endif
 
     /// Convert an option to a potentially null value.
@@ -922,5 +922,5 @@ module ValueOption =
     val toObj: value: 'T voption -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val toObj: value: 'T voption -> 'T? when 'T : not struct (* and 'T : not null *)
+    val toObj: value: 'T voption -> 'T? when 'T : not struct (* and 'T : __notnull *)
 #endif
diff --git a/src/FSharp.Core/prim-types.fs b/src/FSharp.Core/prim-types.fs
index 774d262da7b..40a30829043 100644
--- a/src/FSharp.Core/prim-types.fs
+++ b/src/FSharp.Core/prim-types.fs
@@ -4239,7 +4239,7 @@ namespace Microsoft.FSharp.Core
         let inline isNullV (value : Nullable<'T>) = not value.HasValue
 
         []
-        let inline nonNull (value : 'T? when 'T : not struct and 'T : not null) = 
+        let inline nonNull (value : 'T? when 'T : not struct and 'T : __notnull) = 
             match box value with 
             | null -> raise (NullReferenceException()) 
             | _ -> (# "" value : 'T #)
@@ -4252,7 +4252,7 @@ namespace Microsoft.FSharp.Core
                 raise (NullReferenceException())
 
         []
-        let inline (|Null|NonNull|) (value : 'T? when 'T : not null) = 
+        let inline (|Null|NonNull|) (value : 'T? when 'T : __notnull) = 
             match value with 
             | null -> Null () 
             | _ -> NonNull (# "" value : 'T #)
@@ -4263,7 +4263,7 @@ namespace Microsoft.FSharp.Core
             else NullV ()
 
         []
-        let inline (|NonNullQuick|) (value : 'T? when 'T : not null) =
+        let inline (|NonNullQuick|) (value : 'T? when 'T : __notnull) =
             match box value with 
             | null -> raise (NullReferenceException()) 
             | _ -> (# "" value : 'T #)
@@ -4326,7 +4326,7 @@ namespace Microsoft.FSharp.Core
 
 #if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         []
-        let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : not null) = 
+        let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : __notnull) = 
             match value with 
             | null -> raise (new ArgumentNullException(argumentName))        
             | _ ->  (# "" value : 'T #)
@@ -4391,7 +4391,7 @@ namespace Microsoft.FSharp.Core
         
 #if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
         []
-        let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : not null) = 
+        let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : __notnull) = 
             match arg with null -> defaultValue | _ -> (# "" arg : 'T #)
         
         []
diff --git a/src/FSharp.Core/prim-types.fsi b/src/FSharp.Core/prim-types.fsi
index 35e02459ac5..d7e690d0554 100644
--- a/src/FSharp.Core/prim-types.fsi
+++ b/src/FSharp.Core/prim-types.fsi
@@ -3116,7 +3116,7 @@ namespace Microsoft.FSharp.Core
         /// The argument value. If it is null, the defaultValue is returned.
         []
         []
-        val inline defaultIfNull : defaultValue:'T -> arg:'T? -> 'T when 'T : not struct and 'T : not null
+        val inline defaultIfNull : defaultValue:'T -> arg:'T? -> 'T when 'T : not struct and 'T : __notnull
 
         /// Used to specify a default value for an nullable value argument in the implementation of a function
         /// The default value of the argument.
@@ -3430,7 +3430,7 @@ namespace Microsoft.FSharp.Core
         /// A choice indicating whether the value is null or not-null.
         []
         []
-        val inline (|Null|NonNull|) : value: 'T? -> Choice  when 'T : not null
+        val inline (|Null|NonNull|) : value: 'T? -> Choice  when 'T : __notnull
         
         /// Determines whether the given value is null.
         /// In a future revision of nullness support this may be unified with 'Null|NonNull'.
@@ -3445,7 +3445,7 @@ namespace Microsoft.FSharp.Core
         /// The non-null value.
         []
         []
-        val inline (|NonNullQuick|) : value: 'T? -> 'T when 'T : not null 
+        val inline (|NonNullQuick|) : value: 'T? -> 'T when 'T : __notnull 
         
         /// When used in a pattern checks the given value is not null.
         /// In a future revision of nullness support this may be unified with 'NonNullQuick'.
@@ -3485,7 +3485,7 @@ namespace Microsoft.FSharp.Core
         /// The value when it is not null. If the value is null an exception is raised.
         []
         []
-        val inline nonNull : value: 'T? -> 'T when 'T : not struct and 'T : not null
+        val inline nonNull : value: 'T? -> 'T when 'T : not struct and 'T : __notnull
 
         /// Asserts that the value is non-null.
         /// In a future revision of nullness support this may be unified with 'nonNull'.
@@ -3500,7 +3500,7 @@ namespace Microsoft.FSharp.Core
         /// True when value is null, false otherwise.
         []
         []
-        val inline withNull : value:'T -> 'T? when 'T : not struct (* and 'T : not null *)
+        val inline withNull : value:'T -> 'T? when 'T : not struct (* and 'T : __notnull *)
 
         /// Asserts that the value is non-null.
         /// In a future revision of nullness support this may be unified with 'withNull'.
@@ -3583,7 +3583,7 @@ namespace Microsoft.FSharp.Core
         /// The result value.
         []
         []
-        val inline nullArgCheck : argumentName:string -> 'T? -> 'T when 'T : not struct and 'T : not null
+        val inline nullArgCheck : argumentName:string -> 'T? -> 'T when 'T : not struct and 'T : __notnull
 #endif
 
         /// Throw a  exception
diff --git a/src/fsi/console.fs b/src/fsi/console.fs
index ea0d0ba2d1e..25fa8e53795 100644
--- a/src/fsi/console.fs
+++ b/src/fsi/console.fs
@@ -16,7 +16,7 @@ module internal ConsoleHelpers =
   // Shim to match nullness checking library support in preview
   let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #else
-  type MaybeNull<'T when 'T : not null> = 'T?
+  type MaybeNull<'T when 'T : __notnull> = 'T?
 #endif
 
 type internal Style =
diff --git a/tests/FSharp.Test.Utilities/Compiler.fs b/tests/FSharp.Test.Utilities/Compiler.fs
index c49e3f35a00..bb35b8995ac 100644
--- a/tests/FSharp.Test.Utilities/Compiler.fs
+++ b/tests/FSharp.Test.Utilities/Compiler.fs
@@ -260,11 +260,12 @@ module rec Compiler =
     let private getWarnings diagnostics = diagnostics |> List.filter (fun e -> match e.Error with Warning _ -> true | _ -> false)
 
     let private adjustRange (range: Range) (adjust: int) : Range =
-        { range with
-                StartLine   = range.StartLine   - adjust
-                StartColumn = range.StartColumn + 1
-                EndLine     = range.EndLine     - adjust
-                EndColumn   = range.EndColumn   + 1 }
+        {
+            StartLine   = range.StartLine   - adjust
+            StartColumn = range.StartColumn + 1
+            EndLine     = range.EndLine     - adjust
+            EndColumn   = range.EndColumn   + 1
+        }
 
     let FsxSourceCode source =
         SourceCodeFileKind.Fsx({FileName="test.fsx"; SourceText=Some source})
diff --git a/tests/fsharp/core/nullness/test.fsx b/tests/fsharp/core/nullness/test.fsx
index 2a544431d8e..5f22dfefebb 100644
--- a/tests/fsharp/core/nullness/test.fsx
+++ b/tests/fsharp/core/nullness/test.fsx
@@ -79,7 +79,7 @@ module Basics =
     check "ekjnceoiwey10" y10 false
 
 module NotNullConstraint =
-    let f3 (x: 'T when 'T : not null) = 1
+    let f3 (x: 'T when 'T : __notnull) = 1
     let v1 = f3 1 // Should not give an error
     check "ekjnceoiwev1" v1 1
     let v2 = f3 "a" // Should not give an error
@@ -272,8 +272,8 @@ let f3 (x: string?) = x
 let f5 x = (x: int)
 //let f4 x = (x: string nullable)
 
-//let f6<'T when 'T : not null> (x: 'T) = x
-//let f6<'T when 'T : not null> (x: 'T) = x
+//let f6<'T when 'T : __notnull> (x: 'T) = x
+//let f6<'T when 'T : __notnull> (x: 'T) = x
 
 //let f2 (x: string | null) = x;;
 
diff --git a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
index ef629aa2bec..5ad4b146176 100644
--- a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
@@ -589,7 +589,6 @@ type BraceCompletionSessionProvider []
 
                     let! session =
                         sessionFactory.TryCreateSession(document, openingPoint.Position, openingBrace, CancellationToken.None)
-                        |> Option.ofObj
 
                     let undoHistory =
                         undoManager.GetTextBufferUndoManager(textView.TextBuffer).TextBufferUndoHistory
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index a61a673caca..11909c0adea 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -31,7 +31,7 @@ let inline nullArgCheck (argumentName:string) (value: 'T when 'T : not struct) =
     | _ ->  value
 let inline withNull<'T when 'T: not struct> (value : 'T) = value
 #else
-type MaybeNull<'T when 'T : not null> = 'T?
+type MaybeNull<'T when 'T : __notnull> = 'T?
 #endif
 
 type private FSharpGlyph = FSharp.Compiler.EditorServices.FSharpGlyph
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
index 7d44d3f3abe..22bad230981 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
@@ -64,7 +64,7 @@ module internal Util =
     // Shim to match nullness checking library support in preview
     let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #else
-    type MaybeNull<'T when 'T : not null> = 'T?
+    type MaybeNull<'T when 'T : __notnull> = 'T?
 #endif
 
     /// Utility function to create an instance of a class from the local registry. [From Iron Python].

From 7f57cd1443bb11ce74fbf8ac4a4af2805bea2006 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 13:39:31 +0100
Subject: [PATCH 102/112] minimize diff

---
 FSharp.Profiles.props                         |   2 +-
 src/Compiler/Checking/ConstraintSolver.fs     |  10 +-
 src/Compiler/Checking/InfoReader.fs           |   4 -
 src/Compiler/Checking/MethodCalls.fs          |   2 +-
 src/Compiler/Checking/QuotationTranslator.fs  |   2 +-
 src/Compiler/Checking/import.fs               |  12 +-
 src/Compiler/Checking/infos.fs                |  16 +-
 src/Compiler/Driver/CompilerImports.fs        |   2 +-
 src/Compiler/Driver/CompilerImports.fsi       |   2 +-
 src/Compiler/Driver/fsc.fs                    |   2 +-
 src/Compiler/FSharp.Compiler.Service.fsproj   |   9 +-
 src/Compiler/Service/IncrementalBuild.fs      |   3 +-
 src/Compiler/Symbols/SymbolHelpers.fs         |   4 +-
 src/Compiler/SyntaxTree/LexFilter.fs          |  21 -
 src/Compiler/TypedTree/TypedTreeOps.fs        |  14 +-
 src/Compiler/TypedTree/TypedTreePickle.fs     |  45 +-
 src/Compiler/Utilities/lib.fs                 |   5 -
 src/Compiler/Utilities/sformat.fs             |  30 +-
 src/Compiler/pars.fsy                         |  18 +-
 src/FSharp.Build/Fsi.fs                       |   2 +-
 src/FSharp.Build/SubstituteText.fs            |   2 +-
 .../FSharp.Compiler.Server.Shared.fsproj      |  37 --
 src/FSharp.Core/FSharp.Core.fsproj            |   3 -
 src/FSharp.Core/array.fs                      |   8 +-
 src/FSharp.Core/async.fs                      |   4 +-
 src/FSharp.Core/local.fs                      |   4 +-
 src/FSharp.Core/option.fs                     |   4 +-
 src/FSharp.Core/option.fsi                    |   8 +-
 src/FSharp.Core/prim-types.fs                 |  58 ++-
 src/FSharp.Core/prim-types.fsi                |  19 +-
 src/fsiAnyCpu/fsiAnyCpu.fsproj                |  48 ---
 .../NullableOptionalRegressionTests.fs        |   2 +-
 tests/fsharp/core/syntax/test.fsx             |   2 +-
 .../literal-value-bug-1/test.il.bsl           |  10 -
 tests/fsharp/tests.fs                         |  19 +-
 tests/service/ExprTests.fs                    |   9 +-
 .../Completion/CompletionProvider.fs          |   1 -
 .../FSharp.Editor/Lens/LensDisplayService.fs  | 348 ---------------
 .../src/FSharp.Editor/Lens/LensProvider.fs    |  63 ---
 .../src/FSharp.Editor/Lens/LensService.fs     | 408 ------------------
 .../src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj    |   1 -
 .../tests/Salsa/VisualFSharp.Salsa.fsproj     |   1 -
 .../Tests.LanguageService.ErrorList.fs        |   4 -
 .../UnitTests/VisualFSharp.UnitTests.fsproj   |   1 -
 44 files changed, 158 insertions(+), 1111 deletions(-)
 delete mode 100644 src/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
 delete mode 100644 src/fsiAnyCpu/fsiAnyCpu.fsproj
 delete mode 100644 vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs
 delete mode 100644 vsintegration/src/FSharp.Editor/Lens/LensProvider.fs
 delete mode 100644 vsintegration/src/FSharp.Editor/Lens/LensService.fs

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index 5ab643dc530..0d6d0cc4158 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -25,7 +25,7 @@
   
 
 	
-		NO_NULLCHECKING_FEATURE;$(DefineConstants)
+		NO_NULLCHECKING_LIB_SUPPORT;$(DefineConstants)
 	
 
   
diff --git a/src/Compiler/Checking/ConstraintSolver.fs b/src/Compiler/Checking/ConstraintSolver.fs
index 6d0ba8d3639..5cd30a5d99c 100644
--- a/src/Compiler/Checking/ConstraintSolver.fs
+++ b/src/Compiler/Checking/ConstraintSolver.fs
@@ -906,7 +906,7 @@ let rec GetMeasureVarGcdInType v ty =
     match stripTyparEqns ty with 
     | TType_ucase(_, l)
     | TType_app (_, l, _) 
-    | TType_anon (_, l)
+    | TType_anon (_,l)
     | TType_tuple (_, l) -> GetMeasureVarGcdInTypes v l
 
     | TType_fun (domainTy, rangeTy, _) -> GcdRational (GetMeasureVarGcdInType v domainTy) (GetMeasureVarGcdInType v rangeTy)
@@ -1311,7 +1311,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
 
     | TType_app _, TType_app _ ->  localAbortD
 
-    | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2)      -> 
+    | TType_tuple (tupInfo1, l1), TType_tuple (tupInfo2, l2) -> 
         if evalTupInfoIsStruct tupInfo1 <> evalTupInfoIsStruct tupInfo2 then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m, m2)) else
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
 
@@ -1327,7 +1327,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
         SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> 
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2)
 
-    | TType_forall(tps1, bodyTy1), TType_forall(tps2, bodyTy2) ->
+    | TType_forall(tps1, bodyTy1), TType_forall(tps2, bodyTy2) -> 
         if tps1.Length <> tps2.Length then localAbortD else
         let aenv = aenv.BindEquivTypars tps1 tps2 
         let csenv = {csenv with EquivEnv = aenv }
@@ -1339,7 +1339,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
 
     | _  -> localAbortD
 
-and SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace ty1 ty2 = 
+and SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace ty1 ty2 =
     SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace None ty1 ty2
 
 and private SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln ty1 ty2 = 
@@ -1364,7 +1364,7 @@ and SolveTypeEqualsTypeEqns csenv ndeep m2 trace cxsln origl1 origl2 =
                ErrorD(ConstraintSolverTupleDiffLengths(csenv.DisplayEnv, csenv.eContextInfo, origl1, origl2, csenv.m, m2)) 
        loop origl1 origl2
 
-and SolveFunTypeEqn csenv ndeep m2 trace cxsln domainTy1 domainTy2 rangeTy1 rangeTy2= trackErrors {
+and SolveFunTypeEqn csenv ndeep m2 trace cxsln domainTy1 domainTy2 rangeTy1 rangeTy2 = trackErrors {
     // TODO NULLNESS: consider whether flipping the actual and expected in argument position
     // causes other problems, e.g. better/worse diagnostics
     do! SolveTypeEqualsTypeKeepAbbrevsWithCxsln csenv ndeep m2 trace cxsln domainTy2 domainTy1
diff --git a/src/Compiler/Checking/InfoReader.fs b/src/Compiler/Checking/InfoReader.fs
index 564b7c815e1..769e38d3227 100644
--- a/src/Compiler/Checking/InfoReader.fs
+++ b/src/Compiler/Checking/InfoReader.fs
@@ -24,10 +24,6 @@ open FSharp.Compiler.TypedTreeBasics
 open FSharp.Compiler.TypeHierarchy
 open FSharp.Compiler.TypeRelations
 
-#if !NO_TYPEPROVIDERS
-open FSharp.Compiler.TypeProviders
-#endif
-
 /// Use the given function to select some of the member values from the members of an F# type
 let SelectImmediateMemberVals g optFilter f (tcref: TyconRef) = 
     let chooser (vref: ValRef) = 
diff --git a/src/Compiler/Checking/MethodCalls.fs b/src/Compiler/Checking/MethodCalls.fs
index d7864c7e004..b4858e762c0 100644
--- a/src/Compiler/Checking/MethodCalls.fs
+++ b/src/Compiler/Checking/MethodCalls.fs
@@ -659,7 +659,7 @@ type CalledMeth<'T>
 
                             let pminst =
                                 match tyargsOpt with
-                                | Some (TType_app(_, types, _)) -> types
+                                | Some(TType_app(_, types, _)) -> types
                                 | _ -> pminst
 
                             let propStaticTyOpt = if isTyparTy g returnedObjTy then Some returnedObjTy else None
diff --git a/src/Compiler/Checking/QuotationTranslator.fs b/src/Compiler/Checking/QuotationTranslator.fs
index 60f54207bb4..063609d0232 100644
--- a/src/Compiler/Checking/QuotationTranslator.fs
+++ b/src/Compiler/Checking/QuotationTranslator.fs
@@ -994,7 +994,7 @@ and FilterMeasureTyargs tys =
 and ConvType cenv env m ty =
     let g = cenv.g
     match stripTyEqnsAndMeasureEqns g ty with
-    | TType_app(tcref, [tyarg],_) when isArrayTyconRef g tcref ->
+    | TType_app(tcref, [tyarg], _) when isArrayTyconRef g tcref ->
         QP.mkArrayTy(rankOfArrayTyconRef g tcref, ConvType cenv env m tyarg)
 
     | TType_ucase(UnionCaseRef(tcref, _), tyargs) // Note: we erase union case 'types' when converting to quotations
diff --git a/src/Compiler/Checking/import.fs b/src/Compiler/Checking/import.fs
index 8364010bbc1..65c987e188b 100644
--- a/src/Compiler/Checking/import.fs
+++ b/src/Compiler/Checking/import.fs
@@ -362,12 +362,12 @@ let rec ImportProvidedType (env: ImportMap) (m: range) (* (tinst: TypeInst) *) (
                 if tp.Kind = TyparKind.Measure then  
                     let rec conv ty = 
                         match ty with 
-                        | TType_app (tcref,[ty1;ty2], _) when tyconRefEq g tcref g.measureproduct_tcr -> Measure.Prod (conv ty1, conv ty2)
-                        | TType_app (tcref,[ty1], _) when tyconRefEq g tcref g.measureinverse_tcr -> Measure.Inv (conv ty1)
-                        | TType_app (tcref,[], _) when tyconRefEq g tcref g.measureone_tcr -> Measure.One 
-                        | TType_app (tcref,[], _) when tcref.TypeOrMeasureKind = TyparKind.Measure -> Measure.Const tcref
+                        | TType_app (tcref, [ty1;ty2], _) when tyconRefEq g tcref g.measureproduct_tcr -> Measure.Prod (conv ty1, conv ty2)
+                        | TType_app (tcref, [ty1], _) when tyconRefEq g tcref g.measureinverse_tcr -> Measure.Inv (conv ty1)
+                        | TType_app (tcref, [], _) when tyconRefEq g tcref g.measureone_tcr -> Measure.One 
+                        | TType_app (tcref, [], _) when tcref.TypeOrMeasureKind = TyparKind.Measure -> Measure.Const tcref
                         | TType_app (tcref, _, _) -> 
-                            errorR(Error(FSComp.SR.impInvalidMeasureArgument1(tcref.CompiledName, tp.Name),m))
+                            errorR(Error(FSComp.SR.impInvalidMeasureArgument1(tcref.CompiledName, tp.Name), m))
                             Measure.One
                         | _ -> 
                             errorR(Error(FSComp.SR.impInvalidMeasureArgument2(tp.Name), m))
@@ -395,7 +395,7 @@ let ImportProvidedMethodBaseAsILMethodRef (env: ImportMap) (m: range) (mbase: Ta
 
                 let declaringGenericTypeDefn =  
                     if declaringType.PUntaint((fun t -> t.IsGenericType), m) then 
-                        declaringType.PApply((fun t -> t.GetGenericTypeDefinition()), m)
+                        declaringType.PApply((fun declaringType -> declaringType.GetGenericTypeDefinition()), m)
                     else 
                         declaringType
 
diff --git a/src/Compiler/Checking/infos.fs b/src/Compiler/Checking/infos.fs
index 3dd0313886e..7859016e37a 100755
--- a/src/Compiler/Checking/infos.fs
+++ b/src/Compiler/Checking/infos.fs
@@ -73,8 +73,8 @@ type ValRef with
 #if !NO_TYPEPROVIDERS
 /// Get the return type of a provided method, where 'void' is returned as 'None'
 let GetCompiledReturnTyOfProvidedMethodInfo amap m (mi: Tainted) =
-    let returnType = 
-        if mi.PUntaint((fun mi -> mi.IsConstructor), m) then  
+    let returnType =
+        if mi.PUntaint((fun mi -> mi.IsConstructor), m) then
             mi.PApply((fun mi -> nonNull mi.DeclaringType), m)
         else mi.Coerce(m).PApply((fun mi -> mi.ReturnType), m)
     let ty = ImportProvidedType amap m returnType
@@ -407,8 +407,8 @@ let ArbitraryMethodInfoOfPropertyInfo (pi: Tainted) m =
         GetAndSanityCheckProviderMethod m pi (fun pi -> pi.GetGetMethod()) FSComp.SR.etPropertyCanReadButHasNoGetter
     elif pi.PUntaint((fun pi -> pi.CanWrite), m) then
         GetAndSanityCheckProviderMethod m pi (fun pi -> pi.GetSetMethod()) FSComp.SR.etPropertyCanWriteButHasNoSetter
-    else 
-        error(Error(FSComp.SR.etPropertyNeedsCanWriteOrCanRead(pi.PUntaint((fun mi -> mi.Name), m), pi.PUntaint((fun mi -> (nonNull mi.DeclaringType).Name), m)), m))   
+    else
+        error(Error(FSComp.SR.etPropertyNeedsCanWriteOrCanRead(pi.PUntaint((fun mi -> mi.Name), m), pi.PUntaint((fun mi -> (nonNull mi.DeclaringType).Name), m)), m))
 
 #endif
 
@@ -652,7 +652,7 @@ type MethInfo =
         | FSMeth(_, ty, _, _) -> ty
         | DefaultStructCtor(_, ty) -> ty
 #if !NO_TYPEPROVIDERS
-        | ProvidedMeth(amap, mi, _, m) -> 
+        | ProvidedMeth(amap, mi, _, m) ->
               ImportProvidedType amap m (mi.PApply((fun mi -> nonNull mi.DeclaringType), m))
 #endif
 
@@ -1140,7 +1140,7 @@ type MethInfo =
             else []
         | DefaultStructCtor _ -> []
 #if !NO_TYPEPROVIDERS
-        | ProvidedMeth(amap, mi, _, m) -> 
+        | ProvidedMeth(amap, mi, _, m) ->
             if x.IsInstance then [ ImportProvidedType amap m (mi.PApply((fun mi -> nonNull mi.DeclaringType), m)) ] // find the type of the 'this' argument
             else []
 #endif
@@ -1264,8 +1264,8 @@ type MethInfo =
                     let formalRetTy = x.GetCompiledReturnType(amap, m, formalMethTyparTys)
                     // GENERIC TYPE PROVIDERS: formal types should be  generated here, not the actual types
                     // For non-generic type providers there is no difference
-                    let formalParams = 
-                        [ [ for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do 
+                    let formalParams =
+                        [ [ for p in mi.PApplyArray((fun mi -> mi.GetParameters()), "GetParameters", m) do
                                 let paramName = p.PUntaint((fun p -> match p.Name with "" -> None | s -> Some s), m)
                                 let paramTy = ImportProvidedType amap m (p.PApply((fun p -> p.ParameterType), m))
                                 let isIn, isOut, isOptional = p.PUntaint((fun p -> p.IsIn, p.IsOut, p.IsOptional), m)
diff --git a/src/Compiler/Driver/CompilerImports.fs b/src/Compiler/Driver/CompilerImports.fs
index 7b9525842eb..61eb721aea4 100644
--- a/src/Compiler/Driver/CompilerImports.fs
+++ b/src/Compiler/Driver/CompilerImports.fs
@@ -312,7 +312,7 @@ let EncodeSignatureData (tcConfig: TcConfig, tcGlobals, exportRemapping, generat
     else
         [], []
 
-let EncodeOptimizationData (tcConfig: TcConfig, tcGlobals, outfile, exportRemapping, data, isIncrementalBuild) =
+let EncodeOptimizationData (tcGlobals, tcConfig: TcConfig, outfile, exportRemapping, data, isIncrementalBuild) =
     if tcConfig.GenerateOptimizationData then
         let data = map2Of2 (Optimizer.RemapOptimizationInfo tcGlobals exportRemapping) data
 
diff --git a/src/Compiler/Driver/CompilerImports.fsi b/src/Compiler/Driver/CompilerImports.fsi
index d628f1e5e6d..d8d9cf6f5d3 100644
--- a/src/Compiler/Driver/CompilerImports.fsi
+++ b/src/Compiler/Driver/CompilerImports.fsi
@@ -62,8 +62,8 @@ val EncodeSignatureData:
         ILAttribute list * ILResource list
 
 val EncodeOptimizationData:
-    tcConfig: TcConfig *
     tcGlobals: TcGlobals *
+    tcConfig: TcConfig *
     outfile: string *
     exportRemapping: Remap *
     (CcuThunk * #CcuOptimizationInfo) *
diff --git a/src/Compiler/Driver/fsc.fs b/src/Compiler/Driver/fsc.fs
index 35c2154426a..d59676d082e 100644
--- a/src/Compiler/Driver/fsc.fs
+++ b/src/Compiler/Driver/fsc.fs
@@ -876,7 +876,7 @@ let main3
         // Encode the optimization data
         ReportTime tcConfig ("Encoding OptData")
 
-        optimizedImpls, EncodeOptimizationData(tcConfig, tcGlobals, outfile, exportRemapping, (generatedCcu, optimizationData), false)
+        optimizedImpls, EncodeOptimizationData(tcGlobals, tcConfig, outfile, exportRemapping, (generatedCcu, optimizationData), false)
 
     // Pass on only the minimum information required for the next phase
     Args(
diff --git a/src/Compiler/FSharp.Compiler.Service.fsproj b/src/Compiler/FSharp.Compiler.Service.fsproj
index d8dbe21ac13..e2a734fef42 100644
--- a/src/Compiler/FSharp.Compiler.Service.fsproj
+++ b/src/Compiler/FSharp.Compiler.Service.fsproj
@@ -1,4 +1,4 @@
-
+
 
 
 
@@ -13,16 +13,9 @@
     FSharp.Compiler.Service
     true
     $(DefineConstants);COMPILER
-    $(DefineConstants);ENABLE_MONO_SUPPORT
-    $(OtherFlags) /warnon:3218 /warnon:1182 /warnon:3390 --times
     true
-    true
-    
-    true
     
-    $(DefineConstants);NO_CHECKNULLS
     false
-    $(DefineConstants);USE_SHIPPED_FSCORE
     $(DefineConstants);FSHARPCORE_USE_PACKAGE
     $(OtherFlags) --extraoptimizationloops:1
     
diff --git a/src/Compiler/Service/IncrementalBuild.fs b/src/Compiler/Service/IncrementalBuild.fs
index 678a9be26bb..f9aa6ae50e4 100644
--- a/src/Compiler/Service/IncrementalBuild.fs
+++ b/src/Compiler/Service/IncrementalBuild.fs
@@ -581,8 +581,7 @@ type RawFSharpAssemblyDataBackedByLanguageService (tcConfig, tcGlobals, generate
 
     let sigData =
         let _sigDataAttributes, sigDataResources = EncodeSignatureData(tcConfig, tcGlobals, exportRemapping, generatedCcu, outfile, true)
-        let sigDataReaders = GetResourceNameAndSignatureDataFuncs sigDataResources
-        sigDataReaders
+        GetResourceNameAndSignatureDataFuncs sigDataResources
 
     let autoOpenAttrs = topAttrs.assemblyAttrs |> List.choose (List.singleton >> TryFindFSharpStringAttribute tcGlobals tcGlobals.attrib_AutoOpenAttribute)
 
diff --git a/src/Compiler/Symbols/SymbolHelpers.fs b/src/Compiler/Symbols/SymbolHelpers.fs
index e9d6ead5e8f..67161c99f0f 100644
--- a/src/Compiler/Symbols/SymbolHelpers.fs
+++ b/src/Compiler/Symbols/SymbolHelpers.fs
@@ -524,13 +524,13 @@ module internal SymbolHelpers =
                 match tryTcrefOfAppTy g ty with
                 | ValueSome tcr1 ->
                     g.suppressed_types 
-                    |> List.exists (fun supp -> 
+                    |> List.exists (fun supp ->
                         let generalizedSupp = generalizedTyconRef g supp
                         // check the display name is precisely the one we're suppressing
                         match tryTcrefOfAppTy g generalizedSupp with
                         | ValueSome tcr2 ->
                             it = supp.DisplayName &&
-                            // check if they are the same logical type (after removing all abbreviations)
+                            // check if they are the same logical type (after removing all abbreviations) 
                             tyconRefEq g tcr1 tcr2
                         | _ -> false) 
                 | _ -> false
diff --git a/src/Compiler/SyntaxTree/LexFilter.fs b/src/Compiler/SyntaxTree/LexFilter.fs
index 42491d78168..1a97d0d5ef4 100644
--- a/src/Compiler/SyntaxTree/LexFilter.fs
+++ b/src/Compiler/SyntaxTree/LexFilter.fs
@@ -1019,7 +1019,6 @@ type LexFilterImpl (
             if isAdjacent tokenTup lookaheadTokenTup then 
                 let mutable stack = []
                 let rec scanAhead nParen = 
-                    assert (nParen >= 0)
                     let lookaheadTokenTup = popNextTokenTup()
                     let lookaheadToken = lookaheadTokenTup.Token
                     stack <- (lookaheadTokenTup, true) :: stack
@@ -1033,26 +1032,6 @@ type LexFilterImpl (
                             scanAhead nParen 
                         else 
                             false
-                    | INFIX_COMPARE_OP "?>" -> 
-                        // just smash the token immediately
-                        stack <- stack.Tail
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 1, 0))
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, QMARK, 0, -1))
-                        scanAhead nParen 
-                    | INFIX_COMPARE_OP ">?>" -> 
-                        // just smash the token immediately
-                        stack <- stack.Tail
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 2, 0))
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, QMARK, 1, -1))
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 0, -2))
-                        scanAhead nParen 
-                    | INFIX_COMPARE_OP "?>>" -> 
-                        // just smash the token immediately
-                        stack <- stack.Tail
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 2, 0)) 
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, GREATER false, 1, -1)) 
-                        delayToken (pool.UseShiftedLocation(lookaheadTokenTup, QMARK, 0, -2)) 
-                        scanAhead nParen 
                     | GREATER _ | GREATER_RBRACK | GREATER_BAR_RBRACK -> 
                         let nParen = nParen - 1
                         let hasAfterOp = (match lookaheadToken with GREATER _ -> false | _ -> true)
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fs b/src/Compiler/TypedTree/TypedTreeOps.fs
index 8b16005c6da..62c22787cbf 100644
--- a/src/Compiler/TypedTree/TypedTreeOps.fs
+++ b/src/Compiler/TypedTree/TypedTreeOps.fs
@@ -164,9 +164,9 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) =
       let res = instTyparRef tyenv.tpinst ty tp
       addNullnessToTy nullness res
 
-  | TType_app (tcref, tinst, nullness) as ty -> 
+  | TType_app (tcref, tinst, flags) as ty -> 
       match tyenv.tyconRefRemap.TryFind tcref with 
-      | Some tcrefR -> TType_app (tcrefR, remapTypesAux tyenv tinst, nullness)
+      | Some tcrefR -> TType_app (tcrefR, remapTypesAux tyenv tinst, flags)
       | None -> 
           match tinst with 
           | [] -> ty  // optimization to avoid re-allocation of TType_app node in the common case 
@@ -174,7 +174,7 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) =
               // avoid reallocation on idempotent 
               let tinstR = remapTypesAux tyenv tinst
               if tinst === tinstR then ty else 
-              TType_app (tcref, tinstR, nullness)
+              TType_app (tcref, tinstR, flags)
 
   | TType_ucase (UnionCaseRef(tcref, n), tinst) -> 
       match tyenv.tyconRefRemap.TryFind tcref with 
@@ -193,11 +193,11 @@ let rec remapTypeAux (tyenv: Remap) (ty: TType) =
       if tupInfo === tupInfoR && l === lR then ty else  
       TType_tuple (tupInfoR, lR)
 
-  | TType_fun (domainTy, rangeTy, nullness) as ty -> 
+  | TType_fun (domainTy, rangeTy, flags) as ty -> 
       let domainTyR = remapTypeAux tyenv domainTy
-      let rangeTyR = remapTypeAux tyenv rangeTy
-      if domainTy === domainTyR && rangeTy === rangeTyR then ty else
-      TType_fun (domainTyR, rangeTyR, nullness)
+      let retTyR = remapTypeAux tyenv rangeTy
+      if domainTy === domainTyR && rangeTy === retTyR then ty else
+      TType_fun (domainTyR, retTyR, flags)
 
   | TType_forall (tps, ty) -> 
       let tpsR, tyenv = copyAndRemapAndBindTypars tyenv tps
diff --git a/src/Compiler/TypedTree/TypedTreePickle.fs b/src/Compiler/TypedTree/TypedTreePickle.fs
index c6977b7993d..4f44e56e38f 100644
--- a/src/Compiler/TypedTree/TypedTreePickle.fs
+++ b/src/Compiler/TypedTree/TypedTreePickle.fs
@@ -631,6 +631,12 @@ let u_option f st =
     | 1 -> Some (f st)
     | n -> ufailwith st ("u_option: found number " + string n)
 
+// Boobytrap an OSGN node with a force of a lazy load of a bunch of pickled data
+#if LAZY_UNPICKLE
+let wire (x: osgn<_>) (res: Lazy<_>) =
+    x.osgnTripWire <- Some(fun () -> res.Force() |> ignore)
+#endif
+
 let u_lazy u st =
 
     // Read the number of bytes in the record
@@ -643,8 +649,25 @@ let u_lazy u st =
     let ovalsIdx1   = prim_u_int32 st // fixupPos6
     let ovalsIdx2   = prim_u_int32 st // fixupPos7
 
+#if LAZY_UNPICKLE
+    // Record the position in the bytestream to use when forcing the read of the data
+    let idx1 = st.is.Position
+    // Skip the length of data
+    st.is.Skip len
+    // This is the lazy computation that wil force the unpickling of the term.
+    // This term must contain OSGN definitions of the given nodes.
+    let res =
+        lazy (let st = { st with is = st.is.CloneAndSeek idx1 }
+              u st)
+    // Force the reading of the data as a "tripwire" for each of the OSGN thunks
+    for i = otyconsIdx1 to otyconsIdx2-1 do wire (st.ientities.Get i) res done
+    for i = ovalsIdx1   to ovalsIdx2-1   do wire (st.ivals.Get i)   res done
+    for i = otyparsIdx1 to otyparsIdx2-1 do wire (st.itypars.Get i) res done
+    res
+#else
     ignore (len, otyconsIdx1, otyconsIdx2, otyparsIdx1, otyparsIdx2, ovalsIdx1, ovalsIdx2)
     Lazy.CreateFromValue(u st)
+#endif
 
 
 let u_hole () =
@@ -722,7 +745,7 @@ let p_nleref x st = p_int (encode_nleref st.occus st.ostrings st.onlerefs st.osc
 // Simple types are types like "int", represented as TType(Ref_nonlocal(..., "int"), []).
 // A huge number of these occur in pickled F# data, so make them unique.
 //
-// TODO NULLNESS - the simpletyp table now holds KnownAmbivalentToNull by default, is this the right default?
+// NULLNESS - the simpletyp table now holds KnownAmbivalentToNull by default.
 // For old assemblies it is, if we give those assemblies the ambivalent interpretation.
 // For new asemblies compiled with null-checking on it isn't, if the default is to give
 // those the KnownWithoutNull interpretation by default.
@@ -827,17 +850,17 @@ let check (ilscope: ILScopeRef) (inMap: NodeInTable<_,_>) =
 let unpickleObjWithDanglingCcus file viewedScope (ilModule: ILModuleDef option) u (phase2bytes: ReadOnlyByteMemory) (phase1bytesB: ReadOnlyByteMemory) =
     let st2 =
        { is = ByteStream.FromBytes (phase2bytes, 0, phase2bytes.Length)
-         isB = ByteStream.FromBytes (ByteMemory.FromArray([| |]).AsReadOnly(),0,0) 
+         isB = ByteStream.FromBytes (ByteMemory.FromArray([| |]).AsReadOnly(), 0, 0) 
          iilscope = viewedScope
-         iccus = new_itbl "iccus (fake)" [| |] 
-         ientities = NodeInTable<_,_>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ientities",0) 
-         itypars = NodeInTable<_,_>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"itypars",0) 
-         ivals = NodeInTable<_,_>.Create (Val.NewUnlinked , (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ivals",0)
-         ianoninfos = NodeInTable<_,_>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg),(fun osgn -> osgn.IsLinked),"ianoninfos",0)
-         istrings = new_itbl "istrings (fake)" [| |] 
-         inlerefs = new_itbl "inlerefs (fake)" [| |] 
-         ipubpaths = new_itbl "ipubpaths (fake)" [| |] 
-         isimpletys = new_itbl "isimpletys (fake)" [| |] 
+         iccus = new_itbl "iccus (fake)" [| |]
+         ientities = NodeInTable<_, _>.Create (Tycon.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itycons", 0)
+         itypars = NodeInTable<_, _>.Create (Typar.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "itypars", 0)
+         ivals = NodeInTable<_, _>.Create (Val.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ivals", 0)
+         ianoninfos = NodeInTable<_, _>.Create(AnonRecdTypeInfo.NewUnlinked, (fun osgn tg -> osgn.Link tg), (fun osgn -> osgn.IsLinked), "ianoninfos", 0)
+         istrings = new_itbl "istrings (fake)" [| |]
+         inlerefs = new_itbl "inlerefs (fake)" [| |]
+         ipubpaths = new_itbl "ipubpaths (fake)" [| |]
+         isimpletys = new_itbl "isimpletys (fake)" [| |]
          ifile = file
          iILModule = ilModule }
     let ccuNameTab = u_array u_encoded_ccuref st2
diff --git a/src/Compiler/Utilities/lib.fs b/src/Compiler/Utilities/lib.fs
index e7279eae5a5..99f1631b8a4 100755
--- a/src/Compiler/Utilities/lib.fs
+++ b/src/Compiler/Utilities/lib.fs
@@ -342,11 +342,7 @@ let nullableSlotFull (x: 'T) : NonNullSlot<'T> = x
 // Caches, mainly for free variables
 //---------------------------------------------------------------------------
 
-//#if BUILDING_WITH_LKG
 type cache<'T when 'T : not struct> = { mutable cacheVal: NonNullSlot<'T> }
-//#else
-//type cache<'T when 'T : (* not null and *) 'T : not struct> = { mutable cacheVal: NonNullSlot<'T> }
-//#endif
 let newCache() = { cacheVal = nullableSlotEmpty() }
 
 let inline cached cache resF =
@@ -387,7 +383,6 @@ type Dumper(x:obj) =
      []
      member self.Dump = sprintf "%A" x
 #endif
-
 //---------------------------------------------------------------------------
 // EnableHeapTerminationOnCorruption()
 //---------------------------------------------------------------------------
diff --git a/src/Compiler/Utilities/sformat.fs b/src/Compiler/Utilities/sformat.fs
index 9afd0f2930a..bb119712d5a 100644
--- a/src/Compiler/Utilities/sformat.fs
+++ b/src/Compiler/Utilities/sformat.fs
@@ -497,10 +497,10 @@ module ReflectUtils =
         // Analyze an object to see if it the representation
         // of an F# value.
         let GetValueInfoOfObject (bindingFlags: BindingFlags) (obj: obj) =
-            match obj with 
+            match obj with
             | Null -> NullValue
-            | _ -> 
-                let reprty = obj.GetType() 
+            | _ ->
+                let reprty = obj.GetType()
 
                 // First a bunch of special rules for tuples
                 // Because of the way F# currently compiles tuple values
@@ -563,7 +563,7 @@ module ReflectUtils =
 
         let GetValueInfo bindingFlags (x: 'a, ty: Type) (* x could be null *)  =
             let obj = (box x)
-            match obj with 
+            match obj with
             | Null ->
                 let isNullaryUnion =
                     match ty.GetCustomAttributes(typeof, false) with
@@ -577,7 +577,7 @@ module ReflectUtils =
                         |> Array.filter (fun uc -> uc.GetFields().Length = 0)
                         |> Array.item 0
 
-                    UnionCaseValue(nullaryCase.Name, [| |])
+                    UnionCaseValue(nullaryCase.Name, [||])
                 elif isUnitType ty then
                     UnitValue
                 else
@@ -842,9 +842,9 @@ module Display =
         | _ -> failwith "unpackCons"
 
     let getListValueInfo bindingFlags (x: obj, ty: Type) =
-        match x with 
-        | Null -> None 
-        | NonNull x -> 
+        match x with
+        | Null -> None
+        | NonNull x ->
             match Value.GetValueInfo bindingFlags (x, ty) with
             | UnionCaseValue ("Cons", recd) -> Some(unpackCons recd)
             | UnionCaseValue ("Empty", [||]) -> None
@@ -994,18 +994,18 @@ module Display =
         and objL showMode depthLim prec (x: obj, ty: Type) =
             let info = Value.GetValueInfo bindingFlags (x, ty)
             try
-                if depthLim<=0 || exceededPrintSize() then
+                if depthLim <= 0 || exceededPrintSize () then
                     wordL (tagPunctuation "...")
                 else
-                    match x with 
+                    match x with
                     | Null -> reprL showMode (depthLim - 1) prec info x
                     | NonNull x ->
-                        if (path.ContainsKey(x)) then 
+                        if (path.ContainsKey(x)) then
                             wordL (tagPunctuation "...")
-                        else 
-                            path.Add(x,0)
+                        else
+                            path.Add(x, 0)
 
-                            let res = 
+                            let res =
                                 // Lazy values. VS2008 used StructuredFormatDisplayAttribute to show via ToString. Dev10 (no attr) needs a special case.
                                 let ty = x.GetType()
 
@@ -1581,7 +1581,7 @@ module Display =
                     let text = obj.ToString()
 
                     match text with
-                    | Null -> ""
+                    | null -> ""
                     | _ -> text
                 with e ->
                     // If a .ToString() call throws an exception, catch it and use the message as the result.
diff --git a/src/Compiler/pars.fsy b/src/Compiler/pars.fsy
index 133d464542d..3ea8bd9a337 100644
--- a/src/Compiler/pars.fsy
+++ b/src/Compiler/pars.fsy
@@ -2314,7 +2314,7 @@ typeConstraint:
      { SynTypeConstraint.WhereTyparIsValueType($1, lhs parseState) }
 
   | typar COLON IDENT STRUCT
-     { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + "1"))
+     { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + " (1)"))
        SynTypeConstraint.WhereTyparIsReferenceType($1, lhs parseState) }
 
   | typar COLON NULL
@@ -2323,12 +2323,11 @@ typeConstraint:
 ** TODO: This rule is not triggering, faking it with __notnull for now
 
   | typar COLON IDENT NULL
-      { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + "2"))  
+      { if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + " (2)"))  
         SynTypeConstraint.WhereTyparNotSupportsNull($1, lhs parseState) }
 */
   | typar COLON NOTNULL__
-      { //if $3 <> "not" then reportParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier($3 + "2"))  
-        SynTypeConstraint.WhereTyparNotSupportsNull($1, lhs parseState) }
+      { SynTypeConstraint.WhereTyparNotSupportsNull($1, lhs parseState) }
 
   | typar COLON LPAREN classMemberSpfn rparen
      { let tp = $1
@@ -2348,14 +2347,14 @@ typeConstraint:
        | "enum" ->
            let _ltm, _gtm, args, _commas, mWhole = $4
            SynTypeConstraint.WhereTyparIsEnum($1, args, unionRanges $1.Range mWhole)
-       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm + "3")) }
+       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm + " (3)")) }
 
   | typar COLON IDENT
      { match $3 with
        | "comparison" -> SynTypeConstraint.WhereTyparIsComparable($1, lhs parseState)
        | "equality" -> SynTypeConstraint.WhereTyparIsEquatable($1, lhs parseState)
        | "unmanaged" -> SynTypeConstraint.WhereTyparIsUnmanaged($1, lhs parseState)
-       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm + "4")) }
+       | nm -> raiseParseErrorAt (rhs parseState 3) (FSComp.SR.parsUnexpectedIdentifier(nm + " (4)")) }
 
   | appType
      { SynTypeConstraint.WhereSelfConstrained($1, lhs parseState) }
@@ -2836,17 +2835,22 @@ cType:
      { let m = lhs parseState
        SynType.App(SynType.LongIdent(SynLongIdent([ident("nativeptr", m)], [], [ Some(IdentTrivia.OriginalNotation "*") ])), None, [$1], [], None, true, m) }
 
+/*
   | cType QMARK
     { SynType.WithNull($1, false, lhs parseState) }
+*/
+  | cType WITHNULL__
+    { SynType.WithNull($1, false, lhs parseState) }
 
   | cType AMP
      { let m = lhs parseState
-       SynType.App(SynType.LongIdent(SynLongIdent([ident("byref", m)], [], [ Some (IdentTrivia.OriginalNotation "&") ])), None, [$1], [], None, true, m) }
+       SynType.App(SynType.LongIdent(SynLongIdent([ident("byref", m)], [], [ Some(IdentTrivia.OriginalNotation "&") ])), None, [$1], [], None, true, m) }
 
   | VOID STAR
      { let m = lhs parseState
        SynType.App(SynType.LongIdent(SynLongIdent([ident("nativeint", m)], [], [ Some(IdentTrivia.OriginalNotation "void*") ])), None, [], [], None, true, m) }
 
+
 /* A return type in an 'extern' DllImport function definition */
 cRetType:
   | opt_attributes cType
diff --git a/src/FSharp.Build/Fsi.fs b/src/FSharp.Build/Fsi.fs
index 9a495f08116..dd0ccff9754 100644
--- a/src/FSharp.Build/Fsi.fs
+++ b/src/FSharp.Build/Fsi.fs
@@ -326,7 +326,7 @@ type public Fsi() as this =
             let host = box fsi.HostObject
 
             match host with
-            | Null -> base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
+            | null -> base.ExecuteTool(pathToTool, responseFileCommands, commandLineCommands)
             | _ ->
                 let invokeCompiler baseCallDelegate =
                     try
diff --git a/src/FSharp.Build/SubstituteText.fs b/src/FSharp.Build/SubstituteText.fs
index 9d451ba9764..97e8758ce55 100644
--- a/src/FSharp.Build/SubstituteText.fs
+++ b/src/FSharp.Build/SubstituteText.fs
@@ -24,7 +24,7 @@ type SubstituteText() =
     override _.Execute() =
         copiedFiles.Clear()
 
-        if not (isNull (box embeddedResources)) then
+        if not (isNull (box embeddedResources)) then // this check can't fail, the type is non-nullable
             for item in embeddedResources do
                 // Update ITaskItem metadata to point to new location
                 let sourcePath = item.GetMetadata("FullPath")
diff --git a/src/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj b/src/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
deleted file mode 100644
index 6a14efdbf0c..00000000000
--- a/src/FSharp.Compiler.Server.Shared/FSharp.Compiler.Server.Shared.fsproj
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-  
-    net472
-    FSharp.Compiler.Server.Shared
-    true
-    true
-  
-
-  
-  
-      false
-  
-
-  
-    
-    
-    
-    
-  
-
-  
-    
-    
-  
-
-  
-    
-  
-
-  
-    
-  
-
-
diff --git a/src/FSharp.Core/FSharp.Core.fsproj b/src/FSharp.Core/FSharp.Core.fsproj
index 0d7025dea1b..8c49afc75ff 100644
--- a/src/FSharp.Core/FSharp.Core.fsproj
+++ b/src/FSharp.Core/FSharp.Core.fsproj
@@ -9,11 +9,8 @@
     $(NoWarn);75 
     $(NoWarn);1204 
     true
-    $(OtherFlags) --warnon:3218
     $(DefineConstants);FSHARP_CORE
     BUILDING_WITH_LKG;$(DefineConstants)
-    $(OtherFlags) --warnon:3218 --warnon:1182 --warnon:3390
-    $(OtherFlags) --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1
     $(OtherFlags) --langversion:preview
     true 
     
diff --git a/src/FSharp.Core/array.fs b/src/FSharp.Core/array.fs
index 2bf85b73ee9..65d0eedef40 100644
--- a/src/FSharp.Core/array.fs
+++ b/src/FSharp.Core/array.fs
@@ -831,7 +831,7 @@ module Array =
 
             count
 
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
         let private createMask<'a>
             (f: 'a -> bool)
             (src: array<'a>)
@@ -842,7 +842,7 @@ module Array =
         let private createMask<'a>
             (f: 'a -> bool)
             (src: array<'a>)
-            (maskArrayOut: byref?>)
+            (maskArrayOut: byref __withnull>)
             (leftoverMaskOut: byref)
             =
 #endif
@@ -1035,10 +1035,10 @@ module Array =
 
             dstIdx
 
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
         let private filterViaMask (maskArray: array) (leftoverMask: uint32) (count: int) (src: array<_>) =
 #else
-        let private filterViaMask (maskArray: array?) (leftoverMask: uint32) (count: int) (src: array<_>) =
+        let private filterViaMask (maskArray: array __withnull) (leftoverMask: uint32) (count: int) (src: array<_>) =
 #endif
             let dst = Microsoft.FSharp.Primitives.Basics.Array.zeroCreateUnchecked count
 
diff --git a/src/FSharp.Core/async.fs b/src/FSharp.Core/async.fs
index 6fe0b1ea5e2..9d879261d6c 100644
--- a/src/FSharp.Core/async.fs
+++ b/src/FSharp.Core/async.fs
@@ -868,10 +868,10 @@ module AsyncPrimitives =
 
     ///   - Initial cancellation check
     ///   - Call syncCtxt.Post with exception protection. THis may fail as it is arbitrary user code
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     let CreateSwitchToAsync (syncCtxt: SynchronizationContext) =
 #else
-    let CreateSwitchToAsync (syncCtxt: SynchronizationContext?) =
+    let CreateSwitchToAsync (syncCtxt: SynchronizationContext __withnull) =
 #endif
         MakeAsyncWithCancelCheck(fun ctxt -> ctxt.PostWithTrampoline syncCtxt ctxt.cont)
 
diff --git a/src/FSharp.Core/local.fs b/src/FSharp.Core/local.fs
index dd32d4e6b13..12a18512cdf 100644
--- a/src/FSharp.Core/local.fs
+++ b/src/FSharp.Core/local.fs
@@ -1086,10 +1086,10 @@ module internal Array =
         if array.Length > 1 then 
             Array.Sort<_>(array, fastComparerForArraySort())
 
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     let stableSortWithKeysAndComparer (cFast:IComparer<'Key>) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
 #else
-    let stableSortWithKeysAndComparer (cFast:IComparer<'Key>?) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
+    let stableSortWithKeysAndComparer (cFast:IComparer<'Key> __withnull) (c:IComparer<'Key>) (array:array<'T>) (keys:array<'Key>)  =
 #endif
         // 'places' is an array or integers storing the permutation performed by the sort        
         let len = array.Length
diff --git a/src/FSharp.Core/option.fs b/src/FSharp.Core/option.fs
index fe4740f248c..e209447be30 100644
--- a/src/FSharp.Core/option.fs
+++ b/src/FSharp.Core/option.fs
@@ -152,7 +152,7 @@ module Option =
         else
             None
 
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     []
     let inline ofObj value =
         match value with
@@ -329,7 +329,7 @@ module ValueOption =
         else
             ValueNone
 
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     []
     let ofObj value =
         match value with
diff --git a/src/FSharp.Core/option.fsi b/src/FSharp.Core/option.fsi
index c9c0c785743..78b9e07e7b7 100644
--- a/src/FSharp.Core/option.fsi
+++ b/src/FSharp.Core/option.fsi
@@ -440,7 +440,7 @@ module Option =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     val inline ofObj: value: 'T -> 'T option  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -460,7 +460,7 @@ module Option =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     val inline toObj: value: 'T option -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -898,7 +898,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     val ofObj: value: 'T -> 'T voption  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
@@ -918,7 +918,7 @@ module ValueOption =
     /// 
     /// 
     []
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
     val toObj: value: 'T voption -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
diff --git a/src/FSharp.Core/prim-types.fs b/src/FSharp.Core/prim-types.fs
index 40a30829043..d29a28a7055 100644
--- a/src/FSharp.Core/prim-types.fs
+++ b/src/FSharp.Core/prim-types.fs
@@ -2393,7 +2393,7 @@ namespace Microsoft.FSharp.Core
         // and only request AllowLeadingSign.
 
         let isOXB c = 
-            let c = Char.ToLowerInvariant c
+            let c = System.Char.ToLowerInvariant c
             charEq c 'x' || charEq c 'o' || charEq c 'b'
 
         let is0OXB (s:string) p l = 
@@ -2401,7 +2401,7 @@ namespace Microsoft.FSharp.Core
 
         let get0OXB (s:string) (p:byref)  l = 
             if is0OXB s p l
-            then let r = Char.ToLowerInvariant(s.Chars(p+1)) in p <- p + 2; r
+            then let r = System.Char.ToLowerInvariant(s.Chars(p+1)) in p <- p + 2; r
             else 'd' 
 
         let getSign32 (s:string) (p:byref) l = 
@@ -2426,8 +2426,8 @@ namespace Microsoft.FSharp.Core
             | s -> s.Replace("_", "")
 
         let ParseUInt32 (s:string) = 
-            if Object.ReferenceEquals(s,null) then
-                raise( new ArgumentNullException("s") )
+            if System.Object.ReferenceEquals(s,null) then
+                raise( new System.ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2443,8 +2443,8 @@ namespace Microsoft.FSharp.Core
         let inline int64OfUInt64 (x:uint64) = (# "" x  : int64 #)
 
         let ParseInt32 (s:string) = 
-            if Object.ReferenceEquals(s,null) then
-                raise( new ArgumentNullException("s") )
+            if System.Object.ReferenceEquals(s,null) then
+                raise( new System.ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2458,8 +2458,8 @@ namespace Microsoft.FSharp.Core
             | _ -> Int32.Parse(s, NumberStyles.AllowLeadingSign, CultureInfo.InvariantCulture)
 
         let ParseInt64 (s:string) = 
-            if Object.ReferenceEquals(s,null) then
-                raise( new ArgumentNullException("s") )
+            if System.Object.ReferenceEquals(s,null) then
+                raise( new System.ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -2473,8 +2473,8 @@ namespace Microsoft.FSharp.Core
             | _ -> Int64.Parse(s, NumberStyles.AllowLeadingSign, CultureInfo.InvariantCulture)
 
         let ParseUInt64     (s:string) : uint64 = 
-            if Object.ReferenceEquals(s,null) then
-                raise( new ArgumentNullException("s") )
+            if System.Object.ReferenceEquals(s,null) then
+                raise( new System.ArgumentNullException("s") )
             let s = removeUnderscores (s.Trim())
             let l = s.Length 
             let mutable p = 0 
@@ -4233,13 +4233,13 @@ namespace Microsoft.FSharp.Core
             | null -> false 
             | _ -> true
 
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_LIB_SUPPORT
 
         []
         let inline isNullV (value : Nullable<'T>) = not value.HasValue
 
         []
-        let inline nonNull (value : 'T? when 'T : not struct and 'T : __notnull) = 
+        let inline nonNull (value : 'T __withnull when 'T : not struct and 'T : __notnull) = 
             match box value with 
             | null -> raise (NullReferenceException()) 
             | _ -> (# "" value : 'T #)
@@ -4252,7 +4252,7 @@ namespace Microsoft.FSharp.Core
                 raise (NullReferenceException())
 
         []
-        let inline (|Null|NonNull|) (value : 'T? when 'T : __notnull) = 
+        let inline (|Null|NonNull|) (value : 'T __withnull when 'T : __notnull) = 
             match value with 
             | null -> Null () 
             | _ -> NonNull (# "" value : 'T #)
@@ -4263,7 +4263,7 @@ namespace Microsoft.FSharp.Core
             else NullV ()
 
         []
-        let inline (|NonNullQuick|) (value : 'T? when 'T : __notnull) =
+        let inline (|NonNullQuick|) (value : 'T __withnull when 'T : __notnull) =
             match box value with 
             | null -> raise (NullReferenceException()) 
             | _ -> (# "" value : 'T #)
@@ -4274,13 +4274,19 @@ namespace Microsoft.FSharp.Core
             else raise (NullReferenceException()) 
 
         []
-        let inline withNull (value : 'T when 'T : not struct) = (# "" value : 'T? #)
+        let inline withNull (value : 'T when 'T : not struct) = (# "" value : 'T __withnull #)
 
         []
         let inline withNullV (value : 'T) : Nullable<'T> = Nullable<'T>(value)
 
         []
         let inline nullV<'T when 'T : struct and 'T : (new : unit -> 'T) and 'T :> ValueType>  = Nullable<'T>()
+
+        []
+        let inline nullArgCheck (argumentName:string) (value: 'T __withnull when 'T : not struct and 'T : __notnull) = 
+            match value with 
+            | null -> raise (new ArgumentNullException(argumentName))        
+            | _ ->  (# "" value : 'T #)
 #endif
 
         []
@@ -4324,14 +4330,6 @@ namespace Microsoft.FSharp.Core
         let inline nullArg (argumentName:string) = 
             raise (new ArgumentNullException(argumentName))        
 
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
-        []
-        let inline nullArgCheck (argumentName:string) (value: 'T? when 'T : not struct and 'T : __notnull) = 
-            match value with 
-            | null -> raise (new ArgumentNullException(argumentName))        
-            | _ ->  (# "" value : 'T #)
-#endif
-
         []
         let inline invalidOp message = raise (InvalidOperationException(message))
 
@@ -4378,20 +4376,14 @@ namespace Microsoft.FSharp.Core
         let (^) (s1: string) (s2: string) = String.Concat(s1, s2)
 
         []
-        let defaultArg arg defaultValue = 
-            match arg with None -> defaultValue | Some v -> v
+        let defaultArg arg defaultValue = match arg with None -> defaultValue | Some v -> v
         
         []
-        let defaultValueArg arg defaultValue = 
-            match arg with ValueNone -> defaultValue | ValueSome v -> v
+        let defaultValueArg arg defaultValue = match arg with ValueNone -> defaultValue | ValueSome v -> v
 
-        []
-        let inline defaultIfNone defaultValue arg = 
-            match arg with None -> defaultValue | Some v -> v
-        
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_LIB_SUPPORT
         []
-        let inline defaultIfNull defaultValue (arg: 'T? when 'T : not struct and 'T : __notnull) = 
+        let inline defaultIfNull defaultValue (arg: 'T __withnull when 'T : not struct and 'T : __notnull) = 
             match arg with null -> defaultValue | _ -> (# "" arg : 'T #)
         
         []
diff --git a/src/FSharp.Core/prim-types.fsi b/src/FSharp.Core/prim-types.fsi
index d7e690d0554..db9ac1f434e 100644
--- a/src/FSharp.Core/prim-types.fsi
+++ b/src/FSharp.Core/prim-types.fsi
@@ -1343,10 +1343,10 @@ namespace Microsoft.FSharp.Core
         val inline FastGenericComparer<'T> : System.Collections.Generic.IComparer<'T> when 'T: comparison 
 
         /// Make an F# comparer object for the given type, where it can be null if System.Collections.Generic.Comparer<'T>.Default
-#if BUILDING_WITH_LKG || NO_NULLCHECKING_FEATURE
+#if BUILDING_WITH_LKG || NO_NULLCHECKING_LIB_SUPPORT
         val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T> when 'T : comparison 
 #else
-        val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T>? when 'T : comparison 
+        val internal FastGenericComparerCanBeNull<'T>  : System.Collections.Generic.IComparer<'T> __withnull when 'T : comparison 
 #endif
 
         /// Make an F# hash/equality object for the given type
@@ -3102,14 +3102,7 @@ namespace Microsoft.FSharp.Core
         /// 
         val inline (<|||): func: ('T1 -> 'T2 -> 'T3 -> 'U) -> arg1: 'T1 * arg2: 'T2 * arg3: 'T3 -> 'U
 
-        /// Used to specify a default value for an optional argument in the implementation of a function
-        /// The default value of the argument.
-        /// An option representing the argument.
-        /// The argument value. If it is None, the defaultValue is returned.
-        []
-        val inline defaultIfNone : defaultValue:'T -> arg:'T option -> 'T 
-
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_LIB_SUPPORT
         /// Used to specify a default value for a nullable reference argument in the implementation of a function
         /// The default value of the argument.
         /// A nullable value representing the argument.
@@ -3424,7 +3417,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline isNull: value: 'T -> bool when 'T: null
         
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_LIB_SUPPORT
         /// Determines whether the given value is null.
         /// The value to check.
         /// A choice indicating whether the value is null or not-null.
@@ -3472,7 +3465,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline internal isNotNull: value:'T -> bool when 'T : null
 
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_LIB_SUPPORT
         /// Get the null value for a value type.
         /// In a future revision of nullness support this may be unified with 'null'.
         /// The null value for a value type.
@@ -3575,7 +3568,7 @@ namespace Microsoft.FSharp.Core
         []
         val inline nullArg: argumentName: string -> 'T 
 
-#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_FEATURE
+#if !BUILDING_WITH_LKG && !NO_NULLCHECKING_LIB_SUPPORT
         /// Throw a System.ArgumentNullException if the given value is null exception
         /// 
         /// The argument name.
diff --git a/src/fsiAnyCpu/fsiAnyCpu.fsproj b/src/fsiAnyCpu/fsiAnyCpu.fsproj
deleted file mode 100644
index 4f3b7d36534..00000000000
--- a/src/fsiAnyCpu/fsiAnyCpu.fsproj
+++ /dev/null
@@ -1,48 +0,0 @@
-
-
-
-
-  
-    Exe
-    net472
-    AnyCPU
-    .exe
-    $(NoWarn);44 
-    true
-    true
-    $(OtherFlags)  --warnon:1182
-    ..\fsi\fsi.res
-    true
-    true
-  
-
-  
-    $(DefineConstants);FSI_SHADOW_COPY_REFERENCES;FSI_SERVER
-  
-
-  
-    
-    
-    
-      {{FSCoreVersion}}
-      $(FSCoreVersion)
-    
-  
-
-  
-    
-    
-    
-    
-    
-  
-
-  
-    
-    
-    
-    
-    
-  
-
-
diff --git a/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs b/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs
index 79e54a7462d..341955aa7c8 100644
--- a/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs
+++ b/tests/fsharp/Compiler/Regressions/NullableOptionalRegressionTests.fs
@@ -5,7 +5,7 @@ namespace FSharp.Compiler.UnitTests
 open NUnit.Framework
 open FSharp.Test.Compiler
 
-[]
+[]
 module NullableOptionalRegressionTests =
 
     //Disabled, see RFC for nullable
diff --git a/tests/fsharp/core/syntax/test.fsx b/tests/fsharp/core/syntax/test.fsx
index 4282af554d5..68189150949 100644
--- a/tests/fsharp/core/syntax/test.fsx
+++ b/tests/fsharp/core/syntax/test.fsx
@@ -1441,7 +1441,7 @@ module TypeApplicationDisambiguation =
     let f8 x = xx
     let f9 x = xx
     let f10 x = xx
- //   let f13 x = xx
+    let f13 x = xx
     let f14 x = xx
     let f16 x = x x>x
     let f17 x = xx
diff --git a/tests/fsharp/regression/literal-value-bug-1/test.il.bsl b/tests/fsharp/regression/literal-value-bug-1/test.il.bsl
index c2826dff865..86655b9a6e7 100644
--- a/tests/fsharp/regression/literal-value-bug-1/test.il.bsl
+++ b/tests/fsharp/regression/literal-value-bug-1/test.il.bsl
@@ -31,21 +31,11 @@
   // Offset: 0x00000000 Length: 0x00000274
   // WARNING: managed resource file FSharpSignatureData.test created
 }
-.mresource public FSharpSignatureDataB.test
-{
-  // Offset: 0x00000000 Length: 0x00000274
-  // WARNING: managed resource file FSharpSignatureDataB.test created
-}
 .mresource public FSharpOptimizationData.test
 {
   // Offset: 0x00000278 Length: 0x0000006F
   // WARNING: managed resource file FSharpOptimizationData.test created
 }
-.mresource public FSharpOptimizationDataB.test
-{
-  // Offset: 0x00000278 Length: 0x0000006F
-  // WARNING: managed resource file FSharpOptimizationData.test created
-}
 .module test.exe
  // MVID: {5AA663EB-D9C1-2E4E-A745-0383EB63A65A}
 .imagebase 0x00400000
diff --git a/tests/fsharp/tests.fs b/tests/fsharp/tests.fs
index c83a53b542a..bfdb893c2dc 100644
--- a/tests/fsharp/tests.fs
+++ b/tests/fsharp/tests.fs
@@ -39,7 +39,7 @@ module CoreTests =
 
 #if !NETCOREAPP
     []
-    let ``subtype-langversion-50-checknulls`` () =
+    let ``subtype-langversion-preview-checknulls`` () =
         let cfg = testConfig "core/subtype"
 
         use testOkFile = fileguard cfg "test.ok"
@@ -51,7 +51,7 @@ module CoreTests =
         testOkFile.CheckExists()
 
     []
-    let ``subtype-langversion-50-no-checknulls`` () =
+    let ``subtype-langversion-preview-no-checknulls`` () =
         let cfg = testConfig "core/subtype"
 
         use testOkFile = fileguard cfg "test.ok"
@@ -63,7 +63,7 @@ module CoreTests =
         testOkFile.CheckExists()
 
     []
-    let ``subtype-langversion-45`` () =
+    let ``subtype-langversion-46`` () =
         let cfg = testConfig "core/subtype"
 
         use testOkFile = fileguard cfg "test.ok"
@@ -107,9 +107,12 @@ module CoreTests =
 
     []
     let ``quotes-FSI-BASIC`` () = singleTestBuildAndRun "core/quotes" FSI
+#endif
+
 
-    // This test has hardcoded expectations about current synchronization context
-    // Will be moved out of FsharpSuite.Tests in a later phase for desktop framework
+#if !NETCOREAPP
+// This test has hardcoded expectations about current synchronization context
+// Will be moved out of FsharpSuite.Tests in a later phase for desktop framework
     []
     let ``control-FSC_OPTIMIZED`` () = singleTestBuildAndRun "core/control" FSC_OPTIMIZED
 
@@ -445,7 +448,7 @@ module CoreTests =
     //    // "%FSI%" %fsi_flags%  --shadowcopyreferences- < test1.fsx
     //    []
-    let ``libtest-langversion-45`` () =
+    let ``libtest-langversion-46`` () =
         let cfg = testConfig "core/libtest"
 
         use testOkFile = fileguard cfg "test.ok"
diff --git a/tests/service/ExprTests.fs b/tests/service/ExprTests.fs
index 13fb97b30fc..3ea39ce39fc 100644
--- a/tests/service/ExprTests.fs
+++ b/tests/service/ExprTests.fs
@@ -2962,7 +2962,7 @@ let ``Test Operator Declarations for String`` () =
         [], "let testStringToStringOperator(e1) = Operators.ToString (e1) @ (56,47--56,56)"
       ]
     let expectedOptimized = [
-        [], "type OperatorTestsString";
+        [], "type OperatorTestsString"
         [], "let testStringEqualsOperator(e1) (e2) = String.Equals (e1,e2) @ (4,69--4,78)"
         [], "let testStringNotEqualsOperator(e1) (e2) = Operators.op_Equality (String.Equals (e1,e2),False) @ (5,69--5,79)"
         [], "let testStringLessThanOperator(e1) (e2) = HashCompare.GenericLessThanIntrinsic (e1,e2) @ (6,69--6,78)"
@@ -2989,14 +2989,9 @@ let ``Test Operator Declarations for String`` () =
         [], "let testStringToUInt32Operator(e1) = LanguagePrimitives.ParseUInt32 (e1) @ (47,47--47,56)"
         [], "let testStringToInt64Operator(e1) = LanguagePrimitives.ParseInt64 (e1) @ (48,47--48,55)"
         [], "let testStringToUInt64Operator(e1) = LanguagePrimitives.ParseUInt64 (e1) @ (49,47--49,56)"
-#if USES_FSHARP_CORE_45_PACKAGE
         // the definition of these operators has changed slightly in latest FSharp.Core
         [], "let testStringToSingleOperator(e1) = Single.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (52,47--52,57)"
         [], "let testStringToDoubleOperator(e1) = Double.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (53,47--53,55)"
-#else
-        [FC47; FC50], "let testStringToSingleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> System.Exception) else ()); Single.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (52,47--52,57)"
-        [FC47; FC50], "let testStringToDoubleOperator(e1) = ((if Object.ReferenceEquals (e1 :> Microsoft.FSharp.Core.obj,dflt) then Operators.Raise (new ArgumentNullException(\"s\") :> System.Exception) else ()); Double.Parse (e1.Replace(\"_\",\"\"),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider)) @ (53,47--53,55)"
-#endif
         [], "let testStringToDecimalOperator(e1) = Decimal.Parse (e1,167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (54,47--54,57)"
         [], "let testStringToCharOperator(e1) = Char.Parse (e1) @ (55,47--55,54)"
         [FC47; FC50], """let testStringToStringOperator(e1) = (if String.Equals (e1,dflt) then "" else e1) @ (56,47--56,56)"""
@@ -3553,7 +3548,7 @@ let isNullQuoted (ts : 't[]) =
 
     let createOptions() = createOptionsAux [fileSource1] ["--langversion:7.0"]
 
-[]
+[]
 let ``Test ProjectForWitnesses4 GetWitnessPassingInfo`` () =
     let cleanup, options = ProjectForWitnesses4.createOptions()
     use _holder = cleanup
diff --git a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
index 9ad5e741fa8..8e22b5318d5 100644
--- a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
@@ -14,7 +14,6 @@ open Microsoft.CodeAnalysis.Text
 open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Completion
 
 open Microsoft.VisualStudio.Shell
-open Microsoft.VisualStudio.FSharp.Editor.Extensions
 
 open FSharp.Compiler.CodeAnalysis
 open FSharp.Compiler.EditorServices
diff --git a/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs b/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs
deleted file mode 100644
index f65719997bc..00000000000
--- a/vsintegration/src/FSharp.Editor/Lens/LensDisplayService.fs
+++ /dev/null
@@ -1,348 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-namespace Microsoft.VisualStudio.FSharp.Editor
-
-open System
-open System.Windows.Controls
-open Microsoft.VisualStudio.FSharp.Editor.Logging
-open Microsoft.VisualStudio.Text
-open Microsoft.VisualStudio.Text.Editor
-open Microsoft.VisualStudio.Text.Formatting
-open System.Threading
-open System.Windows
-open System.Collections.Generic
-
-type LensDisplayService (view : IWpfTextView, buffer : ITextBuffer) as self =
-
-    // Add buffer changed event handler
-    do (
-        buffer.Changed.Add self.HandleBufferChanged
-        view.LayoutChanged.Add self.HandleLayoutChanged
-       )
-       
-    /// 
-    /// Enqueing an unit signals to the tagger that all visible lens must be layouted again,
-    /// to respect single line changes.
-    /// 
-    member val RelayoutRequested : Queue<_> = Queue() with get
-
-    member val WpfView = view
-
-    member val TextBuffer = buffer
-
-    /// Saves the ui context to switch context for ui related work.
-    member val UiContext = SynchronizationContext.Current
-
-    // Tracks the created ui elements per TrackingSpan
-    member val UiElements = Dictionary<_,Grid>()
-
-    member val TrackingSpanUiParent = HashSet()
-
-    member val UiElementNeighbour = Dictionary()
-
-    /// Caches the current used TrackingSpans per line. One line can contain multiple trackingSpans
-    member val TrackingSpans = Dictionary>()
-
-    /// Text view for accessing the adornment layer.
-    member val View: IWpfTextView = view
-
-    member val LensLayer = view.GetAdornmentLayer "Lens"
-
-    /// Tracks the recent first + last visible line numbers for adornment layout logic.
-    member val RecentFirstVsblLineNmbr = 0 with get, set
-
-    member val RecentLastVsblLineNmbr = 0 with get, set
-
-    /// Tracks the adornments on the layer.
-    member val AddedAdornments = HashSet()
-
-    /// Cancellation token source for the layout changed event. Needed to abort previous async-work.
-    member val LayoutChangedCts = new CancellationTokenSource() with get, set
-
-    /// Tracks the last used buffer snapshot, should be preferred used in combination with mutex.
-    member val CurrentBufferSnapshot = null with get, set
-
-    /// Helper method which returns the start line number of a tracking span
-    member _.GetTrackingSpanStartLine (snapshot:ITextSnapshot) (trackingSpan:ITrackingSpan) =
-        snapshot.GetLineNumberFromPosition(trackingSpan.GetStartPoint(snapshot).Position)
-
-    /// Helper method which returns the start line number of a tracking span
-    member _.TryGetTSpanStartLine (snapshot:ITextSnapshot) (trackingSpan:ITrackingSpan) =
-        let pos = trackingSpan.GetStartPoint(snapshot).Position
-        if snapshot.Length - 1 < pos then None
-        else pos |> snapshot.GetLineNumberFromPosition |> Some
-
-    member self.UpdateTrackingSpansFast (snapshot:ITextSnapshot) lineNumber =
-        if lineNumber |> self.TrackingSpans.ContainsKey then
-            let currentTrackingSpans = self.TrackingSpans.[lineNumber] |> ResizeArray // We need a copy because we modify the list.
-            for trackingSpan in currentTrackingSpans do
-                let newLineOption = self.TryGetTSpanStartLine snapshot trackingSpan
-                match newLineOption with 
-                | None -> ()
-                | Some newLine ->
-                    if newLine <> lineNumber then
-                        // We're on a new line and need to check whether we're currently in another grid 
-                        // (because somehow there were multiple trackingSpans per line).
-                        if self.TrackingSpanUiParent.Contains trackingSpan then
-                            self.TrackingSpanUiParent.Remove trackingSpan |> ignore
-                            self.UiElementNeighbour.Remove self.UiElements.[trackingSpan] |> ignore
-                        // remove our entry in the line cache dictionary
-                        self.TrackingSpans.[lineNumber].Remove(trackingSpan) |> ignore
-                        // if the cache entry for the old line is now empty remove it completely
-                        if self.TrackingSpans.[lineNumber].Count = 0 then
-                            self.TrackingSpans.Remove lineNumber |> ignore
-                        // now re-register our tracking span in the cache dict.
-                        // Check whether the new line has no existing entry to add a fresh one.
-                        // If there is already one we put our grid into the grid of the first entry of the line.
-                        if newLine |> self.TrackingSpans.ContainsKey |> not then
-                            self.TrackingSpans.[newLine] <- ResizeArray()
-                        else
-                            let neighbour = 
-                                self.UiElements.[self.TrackingSpans.[newLine] |> Seq.last] // This fails if a tracking span has no ui element!
-                            self.UiElementNeighbour.[self.UiElements.[trackingSpan]] <- neighbour
-                            self.TrackingSpanUiParent.Add trackingSpan |> ignore
-                        // And finally add us to the cache again.
-                        self.TrackingSpans.[newLine].Add(trackingSpan)
-                        // Be sure that the uiElement of the trackingSpan is viRecentLastVsblLineNmbr the visible line space.
-                        if newLine < self.RecentFirstVsblLineNmbr || newLine > self.RecentLastVsblLineNmbr then
-                            if self.UiElements.ContainsKey trackingSpan then 
-                                let mutable element = self.UiElements.[trackingSpan]
-                                element.Visibility <- Visibility.Hidden
-
-    member _.CreateDefaultStackPanel () = 
-        let grid = Grid(Visibility = Visibility.Hidden)
-        Canvas.SetLeft(grid, 0.)
-        Canvas.SetTop(grid, 0.)
-        grid
-
-    /// Helper methods which invokes every action which is needed for new trackingSpans
-    member self.AddTrackingSpan (trackingSpan:ITrackingSpan)=
-        let snapshot = buffer.CurrentSnapshot
-        let startLineNumber = snapshot.GetLineNumberFromPosition(trackingSpan.GetStartPoint(snapshot).Position)
-        let uiElement = 
-            if self.UiElements.ContainsKey trackingSpan then
-#if DEBUG
-                logErrorf "Added a tracking span twice, this is not allowed and will result in invalid values! %A" (trackingSpan.GetText snapshot)
-#endif
-                self.UiElements.[trackingSpan]
-            else
-                let defaultStackPanel = self.CreateDefaultStackPanel()
-                self.UiElements.[trackingSpan] <- defaultStackPanel
-                defaultStackPanel
-        if self.TrackingSpans.ContainsKey startLineNumber then
-            self.TrackingSpans.[startLineNumber].Add trackingSpan
-            let neighbour = 
-                self.UiElements.[self.TrackingSpans.[startLineNumber] |> Seq.last] // This fails if a tracking span has no ui element!
-            self.UiElementNeighbour.[uiElement] <- neighbour
-            self.TrackingSpanUiParent.Add trackingSpan |> ignore
-        else
-            self.TrackingSpans.[startLineNumber] <- ResizeArray()
-            self.TrackingSpans.[startLineNumber].Add trackingSpan
-        uiElement
-        
-
-    member self.HandleBufferChanged(e:TextContentChangedEventArgs) =
-        try
-            let oldSnapshot = e.Before
-            let snapshot = e.After
-            self.CurrentBufferSnapshot <- snapshot
-            for line in oldSnapshot.Lines do
-                let lineNumber = line.LineNumber
-                self.UpdateTrackingSpansFast snapshot lineNumber
-            let firstLine = view.TextViewLines.FirstVisibleLine
-            view.DisplayTextLineContainingBufferPosition (firstLine.Start, 0., ViewRelativePosition.Top)
-            self.RelayoutRequested.Enqueue(())
-         with e ->
-#if DEBUG
-            logErrorf "Error in lens provider: %A" e
-#else
-            ignore e
-#endif
-
-    /// Public non-thread-safe method to add lens for a given tracking span.
-    /// Returns an UIElement which can be used to add Ui elements and to remove the lens later.
-    member self.AddLens (trackingSpan:ITrackingSpan) =
-        if trackingSpan.TextBuffer <> buffer then failwith "TrackingSpan text buffer does not equal with Lens text buffer"
-        let Grid = self.AddTrackingSpan trackingSpan
-        self.RelayoutRequested.Enqueue(())
-        Grid :> UIElement
-    
-    /// Public non-thread-safe method to remove lens for a given tracking span.
-    member self.RemoveLens (trackingSpan:ITrackingSpan) =
-        if self.UiElements.ContainsKey trackingSpan then
-            let Grid = self.UiElements.[trackingSpan]
-            Grid.Children.Clear()
-            self.UiElements.Remove trackingSpan |> ignore
-            try
-                self.LensLayer.RemoveAdornment(Grid) 
-            with e ->
-#if DEBUG
-                logExceptionWithContext(e, "Removing lens")
-#else
-                ignore e
-#endif
-#if DEBUG
-        else
-            logWarningf "No ui element is attached to this tracking span!"
-#endif
-        let lineNumber = 
-            (trackingSpan.GetStartPoint self.CurrentBufferSnapshot).Position 
-            |> self.CurrentBufferSnapshot.GetLineNumberFromPosition
-        if self.TrackingSpans.ContainsKey lineNumber then
-#if DEBUG
-            if self.TrackingSpans.[lineNumber].Remove trackingSpan |> not then
-                logWarningf "No tracking span is accociated with this line number %d!" lineNumber
-#endif
-            if self.TrackingSpans.[lineNumber].Count = 0 then
-                self.TrackingSpans.Remove lineNumber |> ignore
-#if DEBUG
-        else
-            logWarningf "No tracking span is accociated with this line number %d!" lineNumber
-#endif
-
-    member self.AddUiElementToLens (trackingSpan:ITrackingSpan, uiElement:UIElement) =
-        let Grid = self.UiElements.[trackingSpan]
-        Grid.Children.Add uiElement |> ignore
-
-    member self.AddUiElementToLensOnce (trackingSpan:ITrackingSpan, uiElement:UIElement)=
-        let Grid = self.UiElements.[trackingSpan]
-        if uiElement |> Grid.Children.Contains |> not then
-            self.AddUiElementToLens (trackingSpan, uiElement)
-
-    member self.RemoveUiElementFromLens (trackingSpan:ITrackingSpan, uiElement:UIElement) =
-        let Grid = self.UiElements.[trackingSpan]
-        Grid.Children.Remove(uiElement) |> ignore
-    
-    member self.HandleLayoutChanged (e:TextViewLayoutChangedEventArgs) =
-        try
-            // We can cancel existing stuff because the algorithm supports abortion without any data loss
-            self.LayoutChangedCts.Cancel()
-            self.LayoutChangedCts.Dispose()
-            self.LayoutChangedCts <- new CancellationTokenSource()
-            let buffer = e.NewSnapshot
-            let recentVisibleLineNumbers = Set [self.RecentFirstVsblLineNmbr .. self.RecentLastVsblLineNmbr]
-            let firstVisibleLineNumber, lastVisibleLineNumber =
-                let first, last = 
-                    view.TextViewLines.FirstVisibleLine, 
-                    view.TextViewLines.LastVisibleLine
-                buffer.GetLineNumberFromPosition(first.Start.Position),
-                buffer.GetLineNumberFromPosition(last.Start.Position)
-            let visibleLineNumbers = Set [firstVisibleLineNumber .. lastVisibleLineNumber]
-            let nonVisibleLineNumbers = Set.difference recentVisibleLineNumbers visibleLineNumbers
-            let newVisibleLineNumbers = Set.difference visibleLineNumbers recentVisibleLineNumbers
-        
-            let applyFuncOnLineStackPanels (line:IWpfTextViewLine) (func:Grid -> unit) =
-                let lineNumber = line.Snapshot.GetLineNumberFromPosition(line.Start.Position)
-                if (self.TrackingSpans.ContainsKey lineNumber) && (self.TrackingSpans.[lineNumber]) |> (Seq.isEmpty >> not) then
-                    for trackingSpan in self.TrackingSpans.[lineNumber] do
-                        let success, ui = self.UiElements.TryGetValue trackingSpan
-                        if success then 
-                            func ui
-
-            if nonVisibleLineNumbers.Count > 0 || newVisibleLineNumbers.Count > 0 then
-                for lineNumber in nonVisibleLineNumbers do
-                    if lineNumber > 0 && lineNumber < buffer.LineCount then
-                        try
-                            let line = 
-                                (buffer.GetLineFromLineNumber lineNumber).Start
-                                |> view.GetTextViewLineContainingBufferPosition
-                            applyFuncOnLineStackPanels line (fun ui ->
-                                ui.Visibility <- Visibility.Hidden
-                            )
-                        with e ->
-#if DEBUG
-                            logErrorf "Error in non visible lines iteration %A" e
-#else
-                            ignore e
-#endif
-                for lineNumber in newVisibleLineNumbers do
-                    try
-                        let line = 
-                                (buffer.GetLineFromLineNumber lineNumber).Start
-                                |> view.GetTextViewLineContainingBufferPosition
-                        applyFuncOnLineStackPanels line (fun ui ->
-                            ui.Visibility <- Visibility.Visible
-                            self.LayoutUIElementOnLine view line ui
-                        )
-                     with e ->
-#if DEBUG
-                        logErrorf "Error in new visible lines iteration %A" e
-#else
-                        ignore e
-#endif
-            if not e.VerticalTranslation && e.NewViewState.ViewportHeight <> e.OldViewState.ViewportHeight then
-                self.RelayoutRequested.Enqueue() // Unfortunately zooming requires a relayout too, to ensure that no weird layout happens due to unkown reasons.
-            if self.RelayoutRequested.Count > 0 then
-                self.RelayoutRequested.Dequeue() |> ignore
-                for lineNumber in visibleLineNumbers do
-                    let line = 
-                        (buffer.GetLineFromLineNumber lineNumber).Start
-                        |> view.GetTextViewLineContainingBufferPosition
-                    applyFuncOnLineStackPanels line (fun ui ->
-                        ui.Visibility <- Visibility.Visible
-                        self.LayoutUIElementOnLine view line ui
-                    )
-            // Save the new first and last visible lines for tracking
-            self.RecentFirstVsblLineNmbr <- firstVisibleLineNumber
-            self.RecentLastVsblLineNmbr <- lastVisibleLineNumber
-
-            self.AsyncCustomLayoutOperation visibleLineNumbers buffer
-            |> RoslynHelpers.StartAsyncSafe self.LayoutChangedCts.Token "HandleLayoutChanged"
-        with e ->
-#if DEBUG
-            logExceptionWithContext (e, "Layout changed")
-#else
-            ignore e
-#endif
-
-    /// Layouts all stack panels on the line
-    member self.LayoutUIElementOnLine _ (line:ITextViewLine) (ui:Grid) =
-        let left, top = 
-            try
-                let bounds = line.GetCharacterBounds(line.Start)
-                line.TextRight + 5.0, bounds.Top - 1.
-            with e ->
-#if DEBUG
-                logExceptionWithContext (e, "Error in layout ui element on line")
-#else
-                ignore e
-#endif
-                Canvas.GetLeft ui, Canvas.GetTop ui
-        Canvas.SetLeft(ui, left)
-        Canvas.SetTop(ui, top)
-    
-    member self.AsyncCustomLayoutOperation visibleLineNumbers buffer =
-        asyncMaybe {
-            // Suspend 5 ms, instantly applying the layout to the adornment elements isn't needed 
-            // and would consume too much performance
-            do! Async.Sleep(5) |> liftAsync // Skip at least one frames
-            do! Async.SwitchToContext self.UiContext |> liftAsync
-            let layer = self.LensLayer
-            do! Async.Sleep(495) |> liftAsync
-            try
-                for visibleLineNumber in visibleLineNumbers do
-                    if self.TrackingSpans.ContainsKey visibleLineNumber then
-                        self.TrackingSpans.[visibleLineNumber] 
-                        |> Seq.map (fun trackingSpan ->
-                                let success, res = self.UiElements.TryGetValue trackingSpan
-                                if success then 
-                                    Some res 
-                                else None
-                            )
-                        |> Seq.choose (function Some ui when not (self.AddedAdornments.Contains ui) -> Some ui | _ ->  None)
-                        |> Seq.iter(fun grid ->
-                                layer.AddAdornment(AdornmentPositioningBehavior.OwnerControlled, Nullable(), 
-                                    self, grid, AdornmentRemovedCallback(fun _ _ -> self.AddedAdornments.Remove grid |> ignore)) |> ignore
-                                self.AddedAdornments.Add grid |> ignore
-                                let line = 
-                                    let l = buffer.GetLineFromLineNumber visibleLineNumber
-                                    view.GetTextViewLineContainingBufferPosition l.Start
-                                self.LayoutUIElementOnLine view line grid
-                            )
-            with e ->
-#if DEBUG
-                logExceptionWithContext (e, "LayoutChanged, processing new visible lines")
-#else
-                ignore e
-#endif
-        } |> Async.Ignore
\ No newline at end of file
diff --git a/vsintegration/src/FSharp.Editor/Lens/LensProvider.fs b/vsintegration/src/FSharp.Editor/Lens/LensProvider.fs
deleted file mode 100644
index 16f20c95a8c..00000000000
--- a/vsintegration/src/FSharp.Editor/Lens/LensProvider.fs
+++ /dev/null
@@ -1,63 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-namespace Microsoft.VisualStudio.FSharp.Editor
-
-open System
-open Microsoft.VisualStudio.Text
-open Microsoft.VisualStudio.Text.Editor
-open System.ComponentModel.Composition
-open Microsoft.VisualStudio.Utilities
-open Microsoft.VisualStudio.Shell
-open Microsoft.VisualStudio
-open Microsoft.VisualStudio.LanguageServices
-open Microsoft.VisualStudio.Text.Tagging
-open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Editor.Shared.Utilities
-
-[)>]
-[)>]
-[]
-[]
-type internal LensProvider  
-    []
-    (
-        [)>] serviceProvider: IServiceProvider,
-        textDocumentFactory: ITextDocumentFactoryService,
-        metadataAsSource: FSharpMetadataAsSourceService,
-        typeMap : FSharpClassificationTypeMap Lazy,
-        settings: EditorOptions
-    ) =
-
-    let tryGetTextDocument (buffer: ITextBuffer) (factory: ITextDocumentFactoryService) = 
-        match factory.TryGetTextDocument buffer with
-        | true, document -> Some document
-        | _ -> None
-
-    let lensProviders = ResizeArray()
-    let componentModel = Package.GetGlobalService(typeof) :?> ComponentModelHost.IComponentModel
-    let workspace = componentModel.GetService()
-
-    let addLensProvider wpfView buffer =
-        textDocumentFactory
-        |> tryGetTextDocument buffer
-        |> Option.map (fun document -> workspace.CurrentSolution.GetDocumentIdsWithFilePath(document.FilePath))
-        |> Option.bind Seq.tryHead
-        |> Option.map (fun documentId ->
-            let service = LensService(serviceProvider, workspace, documentId, buffer, metadataAsSource, componentModel.GetService(), typeMap, LensDisplayService(wpfView, buffer), settings)
-            let provider = (wpfView, service)
-            wpfView.Closed.Add (fun _ -> lensProviders.Remove provider |> ignore)
-            lensProviders.Add(provider))
-
-    [); Name("Lens");
-      Order(Before = PredefinedAdornmentLayers.Text);
-      TextViewRole(PredefinedTextViewRoles.Document)>]
-    member val LensAdornmentLayerDefinition : AdornmentLayerDefinition MaybeNull = null with get, set
-
-    interface IWpfTextViewCreationListener with
-        override _.TextViewCreated view =
-            if settings.Lens.Enabled then
-                let provider = 
-                    lensProviders 
-                    |> Seq.tryFind (fun (v, _) -> v = view)
-
-                if provider.IsNone then
-                    addLensProvider view (view.TextBuffer) |> ignore
\ No newline at end of file
diff --git a/vsintegration/src/FSharp.Editor/Lens/LensService.fs b/vsintegration/src/FSharp.Editor/Lens/LensService.fs
deleted file mode 100644
index 5623c691f8c..00000000000
--- a/vsintegration/src/FSharp.Editor/Lens/LensService.fs
+++ /dev/null
@@ -1,408 +0,0 @@
-// Copyright (c) Microsoft Corporation.  All Rights Reserved.  See License.txt in the project root for license information.
-
-namespace Microsoft.VisualStudio.FSharp.Editor
-
-
-open System
-open System.Collections.Generic
-open System.Threading
-open System.Windows
-open System.Windows.Controls
-open System.Windows.Media
-open System.Windows.Media.Animation
-
-open Microsoft.CodeAnalysis
-open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Classification
-open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Editor.Shared.Extensions
-
-open FSharp.Compiler.Symbols
-open FSharp.Compiler.Syntax
-open FSharp.Compiler.Text
-
-open Microsoft.VisualStudio.FSharp.Editor.Logging
-open Microsoft.VisualStudio.Shell.Interop
-open Microsoft.VisualStudio.Text
-open Microsoft.VisualStudio.Text.Classification
-
-open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Editor.Shared.Utilities
-
-type internal Lens(taggedText, computed, funcID, uiElement) =
-    member val TaggedText: Async<(ResizeArray * FSharpNavigation) option> = taggedText
-    member val Computed: bool = computed with get, set
-    member val FuncID: string = funcID
-    member val UiElement: UIElement MaybeNull = uiElement with get, set
-
-type internal LensService
-    (
-        serviceProvider: IServiceProvider,
-        workspace: Workspace, 
-        documentId: DocumentId,
-        buffer: ITextBuffer, 
-        metadataAsSource: FSharpMetadataAsSourceService,
-        classificationFormatMapService: IClassificationFormatMapService,
-        typeMap: Lazy,
-        lensDisplayService : LensDisplayService,
-        settings: EditorOptions
-    ) as self =
-
-    let visit pos parseTree = 
-        SyntaxTraversal.Traverse(pos, parseTree, { new SyntaxVisitorBase<_>() with 
-            member _.VisitExpr(_path, traverseSynExpr, defaultTraverse, expr) =
-                defaultTraverse(expr)
-            
-            override _.VisitInheritSynMemberDefn (_, _, _, _, _, range) = Some range
-
-            override _.VisitTypeAbbrev(_, _, range) = Some range
-
-            override _.VisitLetOrUse(_, _, _, bindings, range) =
-                match bindings |> Seq.tryFind (fun b -> b.RangeOfHeadPattern.StartLine = pos.Line) with
-                | Some entry ->
-                    Some entry.RangeOfBindingWithRhs
-                | None ->
-                    // We choose to use the default range because
-                    // it wasn't possible to find the complete range
-                    // including implementation code.
-                    Some range
-
-            override _.VisitBinding (_, fn, binding) =
-                Some binding.RangeOfBindingWithRhs
-        })
-
-    let formatMap = lazy classificationFormatMapService.GetClassificationFormatMap "tooltip"
-
-    let mutable lastResults = Dictionary()
-    let mutable firstTimeChecked = false
-    let mutable bufferChangedCts = new CancellationTokenSource()
-    let uiContext = SynchronizationContext.Current
-
-    let layoutTagToFormatting (layoutTag: TextTag) =
-        layoutTag
-        |> RoslynHelpers.roslynTag
-        |> FSharpClassificationTags.GetClassificationTypeName
-        |> typeMap.Value.GetClassificationType
-        |> formatMap.Value.GetTextProperties   
-
-    let createTextBox (lens:Lens) =
-        async {
-            do! Async.SwitchToContext uiContext
-            let! res = lens.TaggedText
-            match res with
-            | Some (taggedText, navigation) ->
-#if DEBUG
-                logInfof "Tagged text %A" taggedText
-#endif
-                let textBlock = new TextBlock(Background = Brushes.AliceBlue, Opacity = 0.0, TextTrimming = TextTrimming.None)
-                FSharpDependencyObjectExtensions.SetDefaultTextProperties(textBlock, formatMap.Value)
-
-                let prefix = Documents.Run settings.Lens.Prefix
-                prefix.Foreground <- SolidColorBrush(Color.FromRgb(153uy, 153uy, 153uy))
-                textBlock.Inlines.Add prefix
-
-                for text in taggedText do
-
-                    let coloredProperties = layoutTagToFormatting text.Tag
-                    let actualProperties =
-                        if settings.Lens.UseColors
-                        then
-                            // If color is gray (R=G=B), change to correct gray color.
-                            // Otherwise, use the provided color.
-                            match coloredProperties.ForegroundBrush with
-                            | :? SolidColorBrush as b ->
-                                let c = b.Color
-                                if c.R = c.G && c.R = c.B
-                                then coloredProperties.SetForeground(Color.FromRgb(153uy, 153uy, 153uy))
-                                else coloredProperties
-                            | _ -> coloredProperties
-                        else
-                            coloredProperties.SetForeground(Color.FromRgb(153uy, 153uy, 153uy))
-
-                    let run = Documents.Run text.Text
-                    FSharpDependencyObjectExtensions.SetTextProperties (run, actualProperties)
-
-                    let inl =
-                        match text with
-                        | :? NavigableTaggedText as nav when navigation.IsTargetValid nav.Range ->
-                            let h = Documents.Hyperlink(run, ToolTip = nav.Range.FileName)
-                            h.Click.Add (fun _ -> 
-                                navigation.NavigateTo(nav.Range, CancellationToken.None))
-                            h :> Documents.Inline
-                        | _ -> run :> _
-                    FSharpDependencyObjectExtensions.SetTextProperties (inl, actualProperties)
-                    textBlock.Inlines.Add inl
-            
-
-                textBlock.Measure(Size(Double.PositiveInfinity, Double.PositiveInfinity))
-                lens.Computed <- true
-                lens.UiElement <- textBlock
-                return true
-            | _ -> 
-                return false
-        }  
-
-    let executeLensAsync () =  
-        asyncMaybe {
-            do! Async.Sleep 800 |> liftAsync
-#if DEBUG
-            logInfof "Rechecking code due to buffer edit!"
-#endif
-            let! document = workspace.CurrentSolution.GetDocument documentId |> Option.ofObj
-            let! parseFileResults, checkFileResults = document.GetFSharpParseAndCheckResultsAsync(nameof(FSharpUseMutationWhenValueIsMutableFixProvider)) |> liftAsync
-            let parsedInput = parseFileResults.ParseTree
-#if DEBUG
-            logInfof "Getting uses of all symbols!"
-#endif
-            let! ct = Async.CancellationToken |> liftAsync
-            let symbolUses = checkFileResults.GetAllUsesOfAllSymbolsInFile(ct)
-            let textSnapshot = buffer.CurrentSnapshot
-#if DEBUG
-            logInfof "Updating due to buffer edit!"
-#endif
-            // Clear existing data and cache flags
-            // The results which are left.
-            let oldResults = Dictionary(lastResults)
-
-            let newResults = Dictionary()
-            // Symbols which cache wasn't found yet
-            let unattachedSymbols = ResizeArray()
-            // Tags which are new or need to be updated due to changes.
-            let tagsToUpdate = Dictionary()
-            let lensToAdd = ResizeArray()
-
-            let useResults (displayContext: FSharpDisplayContext, func: FSharpMemberOrFunctionOrValue, realPosition: range) =
-                async {
-                    try
-                        let textSnapshot = buffer.CurrentSnapshot
-                        let lineNumber = Line.toZ func.DeclarationLocation.StartLine
-                        if (lineNumber >= 0 || lineNumber < textSnapshot.LineCount) then
-                            match func.FullTypeSafe with
-                            | Some _ ->
-                                let maybeContext = checkFileResults.GetDisplayContextForPos(func.DeclarationLocation.Start)
-                            
-                                let displayContext = Option.defaultValue displayContext maybeContext
-                                let typeLayout = func.FormatLayout displayContext
-                                let taggedText = ResizeArray()        
-                                typeLayout |> Seq.iter taggedText.Add
-                                let statusBar = StatusBar(serviceProvider.GetService()) 
-                                let navigation = FSharpNavigation(statusBar, metadataAsSource, document, realPosition)
-                                // Because the data is available notify that this line should be updated, displaying the results
-                                return Some (taggedText, navigation)
-                            | None -> 
-#if DEBUG
-                                logWarningf "Couldn't acquire Lens data for function %A" func
-#endif
-                                return None
-                        else return None
-                    with e ->
-#if DEBUG
-                        logErrorf "Error in lazy lens computation. %A" e
-#else
-                        ignore e
-#endif
-                        return None
-                }
-                
-            let inline setNewResultsAndWarnIfOverriden fullDeclarationText value = 
-#if DEBUG
-                if newResults.ContainsKey fullDeclarationText then
-                    logWarningf "New results already contains: %A" fullDeclarationText
-#endif
-                newResults.[fullDeclarationText] <- value
-                
-            for symbolUse in symbolUses do
-                if symbolUse.IsFromDefinition then
-                    match symbolUse.Symbol with
-                    | :? FSharpMemberOrFunctionOrValue as func when func.IsModuleValueOrMember || func.IsProperty ->
-                        let funcID = func.LogicalName + (func.FullType.ToString() |> hash |> string)
-                        // Try to re-use the last results
-                        if lastResults.ContainsKey funcID then
-                            // Make sure that the results are usable
-                            let inline setNewResultsAndWarnIfOverridenLocal value = setNewResultsAndWarnIfOverriden funcID value
-                            let lastTrackingSpan, lens as lastResult = lastResults.[funcID]
-                            if lens.FuncID = funcID then
-                                setNewResultsAndWarnIfOverridenLocal lastResult
-                                oldResults.Remove funcID |> ignore
-                            else
-                                let declarationLine, range = 
-                                    match visit func.DeclarationLocation.Start parsedInput with
-                                    | Some range -> range.StartLine - 1, range
-                                    | _ -> func.DeclarationLocation.StartLine - 1, func.DeclarationLocation
-                                // Track the old element for removal
-                                let declarationSpan = 
-                                    let line = textSnapshot.GetLineFromLineNumber declarationLine
-                                    let offset = line.GetText() |> Seq.findIndex (Char.IsWhiteSpace >> not)
-                                    SnapshotSpan(line.Start.Add offset, line.End).Span
-                                let newTrackingSpan = 
-                                    textSnapshot.CreateTrackingSpan(declarationSpan, SpanTrackingMode.EdgeExclusive)
-                                // Push back the new results
-                                let res =
-                                        Lens( Async.cache (useResults (symbolUse.DisplayContext, func, range)),
-                                            false,
-                                            funcID,
-                                            null)
-                                // The old results aren't computed at all, because the line might have changed create new results
-                                tagsToUpdate.[lastTrackingSpan] <- (newTrackingSpan, funcID, res)
-                                setNewResultsAndWarnIfOverridenLocal (newTrackingSpan, res)
-                                        
-                                oldResults.Remove funcID |> ignore
-                        else
-                            // The symbol might be completely new or has slightly changed. 
-                            // We need to track this and iterate over the left entries to ensure that there isn't anything
-                            unattachedSymbols.Add(symbolUse, func, funcID)
-                    | _ -> ()
-            
-            // In best case this works quite `covfefe` fine because often enough we change only a small part of the file and not the complete.
-            for unattachedSymbol in unattachedSymbols do
-                let symbolUse, func, funcID = unattachedSymbol
-                let declarationLine, range = 
-                    match visit func.DeclarationLocation.Start parsedInput with
-                    | Some range -> range.StartLine - 1, range
-                    | _ -> func.DeclarationLocation.StartLine - 1, func.DeclarationLocation
-                    
-                let test (v:KeyValuePair<_, _>) =
-                    let _, (lens:Lens) = v.Value
-                    lens.FuncID = funcID
-                match oldResults |> Seq.tryFind test with
-                | Some res ->
-                    let (trackingSpan : ITrackingSpan), (lens : Lens) = res.Value
-                    let declarationSpan = 
-                        let line = textSnapshot.GetLineFromLineNumber declarationLine
-                        let offset = line.GetText() |> Seq.findIndex (Char.IsWhiteSpace >> not)
-                        SnapshotSpan(line.Start.Add offset, line.End).Span
-                    let newTrackingSpan = 
-                        textSnapshot.CreateTrackingSpan(declarationSpan, SpanTrackingMode.EdgeExclusive)
-                    if lens.Computed && (isNull lens.UiElement |> not) then
-                        newResults.[funcID] <- (newTrackingSpan, lens)
-                        tagsToUpdate.[trackingSpan] <- (newTrackingSpan, funcID, lens)
-                    else
-                        let res = 
-                            Lens(
-                                Async.cache (useResults (symbolUse.DisplayContext, func, range)),
-                                false,
-                                funcID,
-                                null)
-                        // The tag might be still valid but it hasn't been computed yet so create fresh results
-                        tagsToUpdate.[trackingSpan] <- (newTrackingSpan, funcID, res)
-                        newResults.[funcID] <- (newTrackingSpan, res)
-                    let key = res.Key
-                    oldResults.Remove key |> ignore // no need to check this entry again
-                | None ->
-                    // This function hasn't got any cache and so it's completely new.
-                    // So create completely new results
-                    // And finally add a tag for this.
-                    let res = 
-                        Lens(
-                            Async.cache (useResults (symbolUse.DisplayContext, func, range)),
-                            false,
-                            funcID,
-                            null)
-                    try
-                        let declarationSpan = 
-                            let line = textSnapshot.GetLineFromLineNumber declarationLine
-                            let offset = line.GetText() |> Seq.findIndex (Char.IsWhiteSpace >> not)
-                            SnapshotSpan(line.Start.Add offset, line.End).Span
-                        let trackingSpan = 
-                            textSnapshot.CreateTrackingSpan(declarationSpan, SpanTrackingMode.EdgeExclusive)
-                        lensToAdd.Add (trackingSpan, res)
-                        newResults.[funcID] <- (trackingSpan, res)
-                    with e ->
-#if DEBUG
-                        logExceptionWithContext (e, "Lens tracking tag span creation")
-#endif
-                        ignore e
-                ()
-            lastResults <- newResults
-            do! Async.SwitchToContext uiContext |> liftAsync
-            let createLensUIElement (lens:Lens) trackingSpan _ =
-                if lens.Computed |> not then
-                    async {
-                        let! res = createTextBox lens
-                        if res then
-                            do! Async.SwitchToContext uiContext
-#if DEBUG
-                            logInfof "Adding ui element for %A" (lens.TaggedText)
-#endif
-                            // TODO NULLNESS - check that doing nothing when codeLens.UiElement is null is ok
-                            match lens.UiElement with 
-                            | Null -> ()
-                            | NonNull uiElement ->
-                            let animation = 
-                                DoubleAnimation(
-                                    To = Nullable 0.8,
-                                    Duration = (TimeSpan.FromMilliseconds 800. |> Duration.op_Implicit),
-                                    EasingFunction = QuadraticEase()
-                                    )
-                            let sb = Storyboard()
-                            Storyboard.SetTarget(sb, uiElement)
-                            Storyboard.SetTargetProperty(sb, PropertyPath Control.OpacityProperty)
-                            sb.Children.Add animation
-                            lensDisplayService.AddUiElementToLensOnce (trackingSpan, uiElement)
-                            lensDisplayService.RelayoutRequested.Enqueue ()
-                            sb.Begin()
-                        else
-#if DEBUG
-                            logWarningf "Couldn't retrieve lens information for %A" lens.FuncID
-#endif
-                            ()
-                    } |> (RoslynHelpers.StartAsyncSafe CancellationToken.None) "UIElement creation"
-
-            for value in tagsToUpdate do
-                let trackingSpan, (newTrackingSpan, _, lens) = value.Key, value.Value
-                lensDisplayService.RemoveLens trackingSpan |> ignore
-                let grid = lensDisplayService.AddLens newTrackingSpan
-                if lens.Computed && (isNull lens.UiElement |> not) then
-                    match lens.UiElement with 
-                    | Null -> ()
-                    | NonNull uiElement ->
-                    lensDisplayService.AddUiElementToLensOnce (newTrackingSpan, uiElement)
-                else
-                    grid.IsVisibleChanged
-                    |> Event.filter (fun eventArgs -> eventArgs.NewValue :?> bool)
-                    |> Event.add (createLensUIElement lens newTrackingSpan)
-
-            for value in lensToAdd do
-                let trackingSpan, lens = value
-                let grid = lensDisplayService.AddLens trackingSpan
-#if DEBUG
-                logInfof "Trackingspan %A is being added." trackingSpan
-#endif
-                
-                grid.IsVisibleChanged
-                |> Event.filter (fun eventArgs -> eventArgs.NewValue :?> bool)
-                |> Event.add (createLensUIElement lens trackingSpan)
-
-            for oldResult in oldResults do
-                let trackingSpan, _ = oldResult.Value
-                lensDisplayService.RemoveLens trackingSpan |> ignore
-#if DEBUG
-            logInfof "Finished updating lens."
-#endif
-            
-            if not firstTimeChecked then
-                firstTimeChecked <- true
-        } |> Async.Ignore
-    
-    do  
-        begin
-            buffer.Changed.AddHandler(fun _ e -> (self.BufferChanged e))
-            async {
-              let mutable numberOfFails = 0
-              while not firstTimeChecked && numberOfFails < 10 do
-                  try
-                      do! executeLensAsync()
-                      do! Async.Sleep(1000)
-                  with
-                  | e ->
-#if DEBUG
-                      logErrorf "Lens startup failed with: %A" e
-#else
-                      ignore e
-#endif
-                      numberOfFails <- numberOfFails + 1
-           } |> Async.Start
-        end
-
-    member _.BufferChanged ___ =
-        bufferChangedCts.Cancel() // Stop all ongoing async workflow. 
-        bufferChangedCts.Dispose()
-        bufferChangedCts <- new CancellationTokenSource()
-        executeLensAsync () |> Async.Ignore |> RoslynHelpers.StartAsyncSafe bufferChangedCts.Token "Buffer Changed"
diff --git a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
index 1a031001f5f..cb2742c45c3 100644
--- a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
+++ b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
@@ -7,7 +7,6 @@
     $(NoWarn);47;75
     true
     $(OtherFlags) --subsystemversion:6.00
-    $(OtherFlags) --langversion:preview 
     false
     true
   
diff --git a/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj b/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj
index 442cd05720b..58862ce6747 100644
--- a/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj
+++ b/vsintegration/tests/Salsa/VisualFSharp.Salsa.fsproj
@@ -8,7 +8,6 @@
     true
     true
     false
-    $(OtherFlags) --langversion:preview 
   
 
   
diff --git a/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs b/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs
index 9559e6acb29..eca70a6bd89 100644
--- a/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs
+++ b/vsintegration/tests/UnitTests/LegacyLanguageService/Tests.LanguageService.ErrorList.fs
@@ -57,10 +57,6 @@ type UsingMSBuild() as this =
         let ok = errors |> List.exists (fun err -> err.Message = text)
         Assert.IsTrue(ok, sprintf "Error list should contain '%s' message" text)
 
-    let assertContainsContains (errors : list) text = 
-        let ok = errors |> List.exists (fun err -> err.Message.Contains(text))
-        Assert.IsTrue(ok, sprintf "Error list should contain '%s' message" text)
-
     let assertExpectedErrorMessages expected (actual: list) =
         let normalizeCR input = System.Text.RegularExpressions.Regex.Replace(input, @"\r\n|\n\r|\n|\r", "\r\n")
         let actual = 
diff --git a/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj b/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj
index dd11a59d08e..1ee9d2b4a4a 100644
--- a/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj
+++ b/vsintegration/tests/UnitTests/VisualFSharp.UnitTests.fsproj
@@ -13,7 +13,6 @@
     false
     nunit
     true
-    $(OtherFlags) --langversion:preview 
   
 
   

From 6cbfb82b9d390dbd7b99cedd12db663c78113c9a Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 14:07:17 +0100
Subject: [PATCH 103/112] minimize diff

---
 fcs-samples/FsiExe/console.fs                 |   4 +-
 fcs-samples/InteractiveService/Program.fs     |   4 +-
 .../FSharp.LanguageService.Base/ViewFilter.cs |   6 +-
 .../src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj    |   1 -
 vsintegration/src/FSharp.VS.FSI/fsiBasis.fs   |   9 -
 .../src/FSharp.VS.FSI/fsiLanguageService.fs   |  19 +-
 .../src/FSharp.VS.FSI/fsiPackageHooks.fs      |  12 +-
 .../src/FSharp.VS.FSI/fsiSessionToolWindow.fs | 219 ++++++++----------
 .../src/FSharp.VS.FSI/fsiTextBufferStream.fs  |   4 +-
 vsintegration/src/FSharp.VS.FSI/sessions.fs   |  10 +-
 10 files changed, 126 insertions(+), 162 deletions(-)

diff --git a/fcs-samples/FsiExe/console.fs b/fcs-samples/FsiExe/console.fs
index 7ed6202fc22..efde3707c25 100644
--- a/fcs-samples/FsiExe/console.fs
+++ b/fcs-samples/FsiExe/console.fs
@@ -21,12 +21,12 @@ type internal History() =
     member x.Clear() = list.Clear(); current <- -1
     member x.Add line = 
         match line with 
-        | Null | "" -> ()
+        | null | "" -> ()
         | _ -> list.Add(line)
 
     member x.AddLast line = 
         match line with 
-        | Null | "" -> ()
+        | null | "" -> ()
         | _ -> list.Add(line); current <- list.Count
 
     // Dead code   
diff --git a/fcs-samples/InteractiveService/Program.fs b/fcs-samples/InteractiveService/Program.fs
index 25b4851e779..4b8d968864c 100644
--- a/fcs-samples/InteractiveService/Program.fs
+++ b/fcs-samples/InteractiveService/Program.fs
@@ -33,7 +33,7 @@ let main (argv) =
                 printfn "Ok"
         with e -> 
             match e.InnerException with
-            | Null -> printfn "Error evaluating expression (%s)" e.Message
-            | NonNull err -> printfn "Error evaluating expression (%s)" err.Message
+            | null -> printfn "Error evaluating expression (%s)" e.Message
+            | err -> printfn "Error evaluating expression (%s)" err.Message
     // | _ -> printfn "Error evaluating expression (%s)" e.Message
     0
\ No newline at end of file
diff --git a/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs b/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs
index e1b22de4d3c..5026bc3d022 100644
--- a/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs
+++ b/vsintegration/src/FSharp.LanguageService.Base/ViewFilter.cs
@@ -543,12 +543,12 @@ public virtual bool HandlePreExec(ref Guid guidCmdGroup, uint nCmdId, uint nCmde
             {
                 if (nCmdId == (uint) Microsoft.VisualStudio.VSConstants.VSStd11CmdID.ExecuteSelectionInInteractive)
                 {
-                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteSelection);
+                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteSelection, null, null);
                     return true;
                 }
                 else if (nCmdId == (uint) Microsoft.VisualStudio.VSConstants.VSStd11CmdID.ExecuteLineInInteractive)
                 {
-                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteLine);
+                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.ExecuteLine, null, null);
                     return true;
                 }
             }
@@ -556,7 +556,7 @@ public virtual bool HandlePreExec(ref Guid guidCmdGroup, uint nCmdId, uint nCmde
             {
                 if (nCmdId == cmdIDDebugSelection)
                 {
-                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.DebugSelection);
+                    Interactive.Hooks.OnMLSend(GetProjectSystemPackage(), Interactive.FsiEditorSendAction.DebugSelection, null, null);
                     return true;
                 }
             }
diff --git a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
index cb2742c45c3..a4fba0a23d8 100644
--- a/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
+++ b/vsintegration/src/FSharp.VS.FSI/FSharp.VS.FSI.fsproj
@@ -8,7 +8,6 @@
     true
     $(OtherFlags) --subsystemversion:6.00
     false
-    true
   
 
   
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
index 22bad230981..73c0af3eea2 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
@@ -58,15 +58,6 @@ module internal Guids =
 
 module internal Util =
 
-#if NO_CHECKNULLS
-    type MaybeNull<'T when 'T : null> = 'T
-
-    // Shim to match nullness checking library support in preview
-    let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-#else
-    type MaybeNull<'T when 'T : __notnull> = 'T?
-#endif
-
     /// Utility function to create an instance of a class from the local registry. [From Iron Python].
     let CreateObject (globalProvider:System.IServiceProvider) (classType:Type,interfaceType:Type) =
         // Follows IronPython sample. See ConsoleWindow.CreateObject
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs b/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
index df8c12fd95e..6cecc7b106b 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
@@ -85,7 +85,7 @@ type internal FsiMethods() =
     override this.GetParameterCount(i:int) = 0
     override this.GetParameterInfo(i,param_i,name:byref,display:byref,description:byref) =
         name <- items.[i]; display <- ""; description <- ""
-    override this.GetType(i:int) : string MaybeNull = null
+    override this.GetType(i:int) = null:string
 
 // FsiSource
 type internal FsiSource(service:LanguageService, textLines:IVsTextLines, colorizer:Colorizer) =
@@ -114,7 +114,7 @@ type internal FsiAuthoringScope(sessions:FsiSessions option,readOnlySpanGetter:u
     inherit AuthoringScope()
     override this.GetDataTipText(line:int,col:int,span:byref) =
         span <- new TextSpan()
-        null
+        null : string
 
     override this.GetDeclarations(_snapshot,line:int,col:int,info:TokenInfo,reason:ParseReason) =
         (new FsiDeclarations() :> Declarations)
@@ -179,9 +179,9 @@ module internal Helpers =
 type internal FsiLanguageService() = 
     inherit LanguageService()
 
-    let mutable preferences : LanguagePreferences MaybeNull = null
-    let mutable scanner : IScanner option = None
-    let mutable sessions : Session.FsiSessions option = None
+    let mutable preferences        = null : LanguagePreferences     
+    let mutable scanner            = null : IScanner
+    let mutable sessions           = None : Session.FsiSessions option
     let mutable readOnlySpanGetter = (fun () -> new TextSpan())
 
     let readOnlySpan() = readOnlySpanGetter() // do not eta-contract, readOnlySpanGetter is mutable.
@@ -198,12 +198,9 @@ type internal FsiLanguageService() =
         preferences
         
     override this.GetScanner(buffer:IVsTextLines) =
-        match scanner with
-        | None ->
-            let res = new FsiScanner(buffer) :> IScanner
-            scanner <- Some res
-            res
-        | Some scanner -> scanner
+        if isNull scanner then
+            scanner <- (new FsiScanner(buffer) :> IScanner)
+        scanner
         
     override this.ParseSource(req:ParseRequest) =
         (new FsiAuthoringScope(sessions,readOnlySpan) :> AuthoringScope)
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs b/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
index 9c4994c1e32..446c425a9c4 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiPackageHooks.fs
@@ -60,12 +60,12 @@ module internal Hooks =
     let private withFSIToolWindow (this:Package) f =
         queryFSIToolWindow true this f ()
 
-    let OnMLSend (this:Package) (action : FsiEditorSendAction) =
+    let OnMLSend (this:Package) (action : FsiEditorSendAction) (sender:obj) (e:EventArgs) =
         withFSIToolWindow this (fun window ->
             match action with
-            | ExecuteSelection -> window.MLSendSelection()
-            | ExecuteLine -> window.MLSendLine()
-            | DebugSelection -> window.MLDebugSelection()
+            | ExecuteSelection -> window.MLSendSelection(sender, e)
+            | ExecuteLine -> window.MLSendLine(sender, e)
+            | DebugSelection -> window.MLDebugSelection(sender, e)
         )
 
     let AddReferencesToFSI (this:Package) references =
@@ -77,7 +77,7 @@ module internal Hooks =
     // FxCop request this function not be public
     let private supportWhenFSharpDocument (sender:obj) (e:EventArgs) =    
         let command = sender :?> OleMenuCommand       
-        if box command <> null then                        
+        if command <> null then                        
             let looksLikeFSharp,haveSelection = 
                 try // catch all exceptions from this block
                     let providerGlobal   = Package.GetGlobalService(typeof) :?> IOleServiceProvider
@@ -117,7 +117,7 @@ module internal Hooks =
     let fsiConsoleWindowPackageInitalizeSited (this:Package) (commandService : OleMenuCommandService) =
         if not hasBeenInitialized then
             hasBeenInitialized <- true
-            if null <> box commandService then
+            if null <> commandService then
 
                 // Create the command for the tool window
                 let id  = new CommandID(Guids.guidFsiPackageCmdSet,int32 Guids.cmdIDLaunchFsiToolWindow)
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs b/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
index 85db76f4a7c..c57c2171e4f 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
@@ -13,7 +13,6 @@ open Microsoft.VisualStudio.Shell
 open Microsoft.VisualStudio.TextManager.Interop
 open Microsoft.VisualStudio.Package
 open EnvDTE
-open Util
 
 open Microsoft.VisualStudio.ComponentModelHost
 open Microsoft.VisualStudio.Editor
@@ -123,9 +122,9 @@ type internal FsiToolWindow() as this =
     let textStream = new TextBufferStream(textViewAdapter.GetDataBuffer(textLines), contentTypeRegistry)
     let synchronizationContext = System.Threading.SynchronizationContext.Current
     let win32win = { new System.Windows.Forms.IWin32Window with member _.Handle = textView.GetWindowHandle()}
-    let mutable textView : IVsTextView MaybeNull = textView
-    let mutable textLines : IVsTextLines MaybeNull = textLines
-    let mutable commandService : OleMenuCommandService MaybeNull = null
+    let mutable textView       = textView
+    let mutable textLines      = textLines
+    let mutable commandService = null
     let mutable commandList : OleMenuCommand list = []
 
     // Set a function that gets the current ReadOnly span for the text of this instance.
@@ -197,9 +196,8 @@ type internal FsiToolWindow() as this =
     do  fsiLangService.Sessions <- sessions    
 
     let writeText scroll (str:string) =
-        match textLines with
-        | Null -> ()
-        | NonNull lines -> 
+        if str <> null && textLines <> null then
+            lock textLines (fun () ->
             lock lines (fun () ->
                 textStream.DirectWrite(fixServerPrompt str)
                 if scroll then 
@@ -246,34 +244,32 @@ type internal FsiToolWindow() as this =
     // or else by pressing Enter in the REPL window.
     do  showInitialMessageNetCore false
         if not Session.SessionsProperties.fsiUseNetCore then 
-            sessions.Restart(None)
+            sessions.Restart(null)
 
     let clearUndoStack (textLines:IVsTextLines) = // Clear the UNDO stack.
         let undoManager = textLines.GetUndoManager() |> throwOnFailure1
         undoManager.DiscardFrom(null)
             
     let setCursorAtEndOfBuffer() =
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
+        if null <> textView && null <> textLines then            
             let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
             textView.SetCaretPos(lastLine, lastIndex)             |> throwOnFailure0                
             setScrollToEndOfBuffer()
             setScrollToStartOfLine()
-        | _ -> ()
         
     /// Returns true if the current position is inside the writable section of the buffer.
     let isCurrentPositionInInputArea() =
-        match textView with
-        | Null -> false
-        | NonNull textView ->
+        if (null = textView) (*|| (null = textStream.ReadOnlyMarker)*) then
+            false
+        else
             let span = textStream.ReadOnlyMarkerSpan
             let line,column = textView.GetCaretPos() |> throwOnFailure2
             (line > span.iEndLine) || ((line = span.iEndLine) && (column >= span.iEndIndex))
             
     let isSelectionIntersectsWithReadonly() =
-        match textView with
-        | Null -> false
-        | NonNull textView ->
+        if null = textView then
+            false
+        else
             let span = textStream.ReadOnlyMarkerSpan
             let isInInputArea (line,column) = (line > span.iEndLine) || ((line = span.iEndLine) && (column >= span.iEndIndex))
             let (anchorLine,anchorCol,endLine,endCol) = textView.GetSelection() |> throwOnFailure4
@@ -281,37 +277,31 @@ type internal FsiToolWindow() as this =
 
     /// Returns true if the current position is at the start of the writable section of the buffer.
     let isCurrentPositionAtStartOfInputArea() =
-        match textView with
-        | Null -> false
-        | NonNull textView ->
+        if (null = textView) (*|| (null = textStream.ReadOnlyMarker)*) then
+            false
+        else
             let line,column = textView.GetCaretPos() |> throwOnFailure2
             let span = textStream.ReadOnlyMarkerSpan
             (line = span.iEndLine && column <= span.iEndIndex)
             
     let getInputAreaText() = 
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-            let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
-            let span = textStream.ReadOnlyMarkerSpan
-            let text = textLines.GetLineText(span.iEndLine,span.iEndIndex,lastLine,lastIndex) |> throwOnFailure1
-            text
-        | _ -> ""
+        let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
+        let span = textStream.ReadOnlyMarkerSpan
+        let text = textLines.GetLineText(span.iEndLine,span.iEndIndex,lastLine,lastIndex) |> throwOnFailure1
+        text
 
     let setInputAreaText (str:string) =        
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-            lock textLines (fun () ->
-                let  span = textStream.ReadOnlyMarkerSpan
-                let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
-                let strHandle = GCHandle.Alloc(str, GCHandleType.Pinned)
-                try 
-                    textLines.ReplaceLines(span.iEndLine, span.iEndIndex, lastLine, lastIndex, strHandle.AddrOfPinnedObject(), str.Length, null) |> throwOnFailure0
-                finally
-                    strHandle.Free()
-            )
-        | _ -> ()
-
-    let executeTextNoHistory (sourceFile: string option) (text: unit -> string) =
+        lock textLines (fun () ->
+            let  span = textStream.ReadOnlyMarkerSpan
+            let lastLine,lastIndex = textLines.GetLastLineIndex() |> throwOnFailure2
+            let strHandle = GCHandle.Alloc(str, GCHandleType.Pinned)
+            try 
+                textLines.ReplaceLines(span.iEndLine, span.iEndIndex, lastLine, lastIndex, strHandle.AddrOfPinnedObject(), str.Length, null) |> throwOnFailure0
+            finally
+                strHandle.Free()
+        )
+
+    let executeTextNoHistory sourceFile (text: unit -> string) =
         sessions.Ensure(sourceFile)
         textStream.DirectWriteLine()
         sessions.SendInput(text())
@@ -319,7 +309,7 @@ type internal FsiToolWindow() as this =
         
     let executeUserInput() = 
         if isCurrentPositionInInputArea() then
-            sessions.Ensure(None)
+            sessions.Ensure(null)
             let text = getInputAreaText()
             textStream.ExtendReadOnlyMarker()
             textStream.DirectWriteLine()
@@ -332,13 +322,15 @@ type internal FsiToolWindow() as this =
     /// Supported command when input is permitted.
     let supportWhenInInputArea (sender:obj) (args:EventArgs) =    
         let command = sender :?> MenuCommand
-        let enabled = not source.IsCompletorActive && isCurrentPositionInInputArea()
-        command.Supported <- enabled
+        if null <> command then // are these null checks needed?
+            let enabled = not source.IsCompletorActive && isCurrentPositionInInputArea()
+            command.Supported <- enabled
 
     /// Support command except when completion is active.    
     let supportUnlessCompleting (sender:obj) (args:EventArgs) =    
         let command = sender :?> MenuCommand
-        command.Supported <- not source.IsCompletorActive
+        if null <> command then
+            command.Supported <- not source.IsCompletorActive
 
     let haveTextViewSelection() =        
         let res,text = textView.GetSelectedText()
@@ -346,54 +338,50 @@ type internal FsiToolWindow() as this =
 
     /// Support when at the start of the input area (e.g. to enable NoAction on LEFT).
     let supportWhenAtStartOfInputArea (sender:obj) (e:EventArgs) =
-        let command = sender :?> MenuCommand
-        command.Supported <- not source.IsCompletorActive && isCurrentPositionAtStartOfInputArea()
+        let command = sender :?> MenuCommand       
+        if command <> null then
+            command.Supported <- not source.IsCompletorActive && isCurrentPositionAtStartOfInputArea()
 
     /// Support when at the start of the input area AND no-selection (e.g. to enable NoAction on BACKSPACE).
     let supportWhenAtStartOfInputAreaAndNoSelection (sender:obj) (e:EventArgs) =
         let command = sender :?> MenuCommand
-        command.Supported  <- isCurrentPositionAtStartOfInputArea()
+        if command <> null then
+            command.Supported  <- isCurrentPositionAtStartOfInputArea()
             
     let supportWhenSelectionIntersectsWithReadonlyOrNoSelection (sender:obj) (_:EventArgs) =
         let command = sender :?> MenuCommand
-        command.Supported  <- isSelectionIntersectsWithReadonly() || not (haveTextViewSelection())
+        if command <> null then
+            command.Supported  <- isSelectionIntersectsWithReadonly() || not (haveTextViewSelection())
 
     // NOTE: On* are command handlers.
 
     /// Handles HOME command, move to either start of line (or end of read only region is applicable).    
     let onHome (sender:obj) (e:EventArgs) =
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-            let currentLine,currentColumn = textView.GetCaretPos() |> throwOnFailure2
-            let span = textStream.ReadOnlyMarkerSpan
-            if currentLine = span.iEndLine then
-                textView.SetCaretPos(currentLine,span.iEndIndex) |> throwOnFailure0
-            else
-                textView.SetCaretPos(currentLine,0) |> throwOnFailure0
-        | _ -> ()
+        let currentLine,currentColumn = textView.GetCaretPos() |> throwOnFailure2
+        let span = textStream.ReadOnlyMarkerSpan
+        if currentLine = span.iEndLine then
+            textView.SetCaretPos(currentLine,span.iEndIndex) |> throwOnFailure0
+        else
+            textView.SetCaretPos(currentLine,0) |> throwOnFailure0            
 
     /// Handle 'Shift' + 'HOME', move to start of line (or end or readonly area if applicable).    
     let onShiftHome (sender:obj) (args:EventArgs) =        
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-            let line,endColumn = textView.GetCaretPos() |> throwOnFailure2
-            let span = textStream.ReadOnlyMarkerSpan
-            let startColumn = 
-                if line = span.iEndLine then
-                    span.iEndIndex
-                else
-                    0
-            textView.SetSelection(line, endColumn, line, startColumn) |> throwOnFailure0
-        | _ -> ()
+        let line,endColumn = textView.GetCaretPos() |> throwOnFailure2
+        let span = textStream.ReadOnlyMarkerSpan
+        let startColumn = 
+            if line = span.iEndLine (* && endColumn >= span.iEndIndex *) then
+                span.iEndIndex
+            else
+                0
+        textView.SetSelection(line, endColumn, line, startColumn) |> throwOnFailure0
 
     /// Hanlde no-op, used to overwrite some standard command with an empty action.
     let onNoAction (sender:obj) (e:EventArgs) = ()
     
+
     /// Handle "Clear Pane". Clear input and all but the last ReadOnly line (probably the prompt).    
     let onClearPane (sender:obj) (args:EventArgs) =
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-          lock textLines (fun () ->        
+        lock textLines (fun () ->        
             // ReadOnly off, then upto the last line and then the input area, then ReadOnly on.
             let span = textStream.ReadOnlyMarkerSpan
             textStream.ResetReadOnlyMarker()
@@ -409,14 +397,11 @@ type internal FsiToolWindow() as this =
             textView.SetCaretPos(0,span.iEndIndex) |> throwOnFailure0
 
             clearUndoStack textLines // ClearPane should not be an undo-able operation
-          )
-        | _ -> ()
+        )
 
     let showContextMenu (sender:obj) (args:EventArgs) =
         let uiShell = provider.GetService(typeof) :?> IVsUIShell
-        match box uiShell with
-        | null -> ()
-        | _ ->
+        if null <> uiShell then
             let pt   = System.Windows.Forms.Cursor.Position
             let pnts = [| new POINTS(x=int16 pt.X,y=int16 pt.Y) |]
             let mutable menuGuid = Guids.guidFsiConsoleCmdSet
@@ -426,36 +411,30 @@ type internal FsiToolWindow() as this =
         sessions.Interrupt() |> ignore
   
     let onRestart (sender:obj) (args:EventArgs) =
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-            sessions.Kill() // When Kill() returns there should be no more output/events from that session
-            flushResponseBuffer()  // flush output and errors from the killed session that have been buffered, but have not yet come through.
-            lock textLines (fun () ->        
-                // Clear all prior to restart
-                textStream.ResetReadOnlyMarker()            
-                textView.SetCaretPos(0,0) |> throwOnFailure0
-                let lastLine,lastColumn = textLines.GetLastLineIndex() |> throwOnFailure2
-                textLines.ReplaceLines(0, 0, lastLine, lastColumn, IntPtr.Zero, 0, null) |> throwOnFailure0
-            )
-            clearUndoStack textLines // The reset clear should not be undoable.
-            showInitialMessageNetCore true
-            if not Session.SessionsProperties.fsiUseNetCore then 
-                sessions.Restart(None)
-        | _ -> ()
+        sessions.Kill() // When Kill() returns there should be no more output/events from that session
+        flushResponseBuffer()  // flush output and errors from the killed session that have been buffered, but have not yet come through.
+        lock textLines (fun () ->        
+            // Clear all prior to restart
+            textStream.ResetReadOnlyMarker()            
+            textView.SetCaretPos(0,0) |> throwOnFailure0
+            let lastLine,lastColumn = textLines.GetLastLineIndex() |> throwOnFailure2
+            textLines.ReplaceLines(0, 0, lastLine, lastColumn, IntPtr.Zero, 0, null) |> throwOnFailure0
+        )
+        clearUndoStack textLines // The reset clear should not be undoable.
+        showInitialMessageNetCore true
+        if not Session.SessionsProperties.fsiUseNetCore then 
+            sessions.Restart(null)
 
     /// Handle RETURN, unless Intelisense completion is in progress.
     let onReturn (sender:obj) (e:EventArgs) =    
-        match textView, textLines with
-        | NonNull textView, NonNull textLines ->
-            lock textLines (fun () ->
-                if not sessions.Alive then
-                    sessions.Restart(None)
-                else
-                    if isCurrentPositionInInputArea() then                                            
-                        executeUserInput()
-                        setCursorAtEndOfBuffer()
-            )
-        | _ -> ()
+        lock textLines (fun () ->
+            if not sessions.Alive then
+                sessions.Restart(null)
+            else
+                if isCurrentPositionInInputArea() then                                            
+                    executeUserInput()
+                    setCursorAtEndOfBuffer()
+        )
 
     let showNoActivate() = 
         let frame = this.Frame :?> IVsWindowFrame
@@ -514,7 +493,7 @@ type internal FsiToolWindow() as this =
     // if not, pops a dialog warning the user
     let checkDebuggability () =       
         if not sessions.Alive then
-            sessions.Restart(None)
+            sessions.Restart(null)
 
         // debug experience is good when optimizations are off and debug info is produced
         if ArgParsing.debugInfoEnabled sessions.ProcessArgs && not (ArgParsing.optimizationsEnabled sessions.ProcessArgs) then
@@ -553,7 +532,7 @@ type internal FsiToolWindow() as this =
             showNoActivate()
             let directiveC  = sprintf "# 1 \"stdin\""    (* stdin line number reset code *)                
             let text() = "\n" + text + "\n" + directiveC + "\n;;\n"
-            executeTextNoHistory None text
+            executeTextNoHistory null text
         with _ -> ()
 
     let hide () =
@@ -578,7 +557,7 @@ type internal FsiToolWindow() as this =
 #1 "stdin"
 {    show()};;
 """
-        executeTextNoHistory (Some(filename)) interaction
+        executeTextNoHistory filename interaction
 
     let sendSelectionToFSI action =
         let dbgBreak,selectLine = 
@@ -608,13 +587,13 @@ type internal FsiToolWindow() as this =
                  // REVIEW: log error into Trace.
                  // Example errors include no active document.
 
-    let onMLSendSelection () =       
+    let onMLSendSelection (sender:obj) (e:EventArgs) =       
         sendSelectionToFSI ExecuteSelection
 
-    let onMLSendLine () =       
+    let onMLSendLine (sender:obj) (e:EventArgs) =       
         sendSelectionToFSI ExecuteLine
 
-    let onMLDebugSelection () = 
+    let onMLDebugSelection (sender:obj) (e:EventArgs) = 
         if checkDebuggability () then
             attachDebugger ()
         sendSelectionToFSI DebugSelection
@@ -622,7 +601,7 @@ type internal FsiToolWindow() as this =
     /// Handle UP and DOWN. Cycle history.    
     let onHistory (sender:obj) (e:EventArgs) =
         let command = sender :?> OleMenuCommand
-        if null <> box command && command.CommandID.Guid = typeof.GUID then
+        if null <> command && command.CommandID.Guid = typeof.GUID then
             // sanity check command and it's group
             let current = getInputAreaText()
             let nextO =
@@ -655,9 +634,9 @@ type internal FsiToolWindow() as this =
     do  this.BitmapIndex      <- 0  
     do  this.Caption          <- VFSIstrings.SR.fsharpInteractive()
    
-    member _.MLSendSelection() = onMLSendSelection ()
-    member _.MLSendLine() = onMLSendLine ()
-    member _.MLDebugSelection() = onMLDebugSelection ()
+    member _.MLSendSelection(obj,e) = onMLSendSelection obj e
+    member _.MLSendLine(obj,e) = onMLSendLine obj e
+    member _.MLDebugSelection(obj,e) = onMLDebugSelection obj e
 
     member _.GetDebuggerState() =
         let (state, _) = getDebuggerState ()
@@ -734,10 +713,10 @@ type internal FsiToolWindow() as this =
             addCommand Guids.guidFsiConsoleCmdSet Guids.cmdIDAttachDebugger      onAttachDebugger  None
             addCommand Guids.guidFsiConsoleCmdSet Guids.cmdIDDetachDebugger      onDetachDebugger  None
             
-            addCommand Guids.guidInteractiveShell Guids.cmdIDSendSelection       (fun _ _ -> onMLSendSelection())   None
-            addCommand Guids.guidInteractiveShell Guids.cmdIDSendLine            (fun _ _ -> onMLSendLine())        None
+            addCommand Guids.guidInteractiveShell Guids.cmdIDSendSelection       onMLSendSelection   None
+            addCommand Guids.guidInteractiveShell Guids.cmdIDSendLine            onMLSendLine        None
 
-            addCommand Guids.guidInteractive Guids.cmdIDDebugSelection           (fun _ _ -> onMLDebugSelection())  None
+            addCommand Guids.guidInteractive Guids.cmdIDDebugSelection           onMLDebugSelection  None
             
             addCommand guidVSStd2KCmdID (int32 VSConstants.VSStd2KCmdID.UP)      onHistory      (Some supportWhenInInputArea)
             addCommand guidVSStd2KCmdID (int32 VSConstants.VSStd2KCmdID.DOWN)    onHistory      (Some supportWhenInInputArea)            
@@ -777,8 +756,6 @@ type internal FsiToolWindow() as this =
 
         /// Returns the n most recent lines in the view.  After SendTextInteraction, can poll for a prompt to know when interaction finished.
         member _.GetMostRecentLines(n:int) : string[] =
-          match textView, textLines with
-          | NonNull textView, NonNull textLines ->
             lock textLines (fun () ->
                 try
                     let mutable lineCount = 0
@@ -801,9 +778,7 @@ type internal FsiToolWindow() as this =
                 | ex -> 
                     let returnVal = [| "Unhandled Exception"; ex.Message |]
                     returnVal
-              )
-          | _ ->
-            [| "Null textView" |]
+            )
             
     interface IOleCommandTarget with
         member _.QueryStatus (guid, cCmds, prgCmds, pCmdText)=
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs b/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
index e6dd42381ed..7e9d55da69f 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
@@ -12,14 +12,14 @@ open Util
 // It provides the API for writing directly to the read-only part of the buffer.
 // It extends the read-only marker on the buffer (making the written text read-only).
 //
-type internal TextBufferStream(textLines:ITextBuffer MaybeNull, contentTypeRegistry: IContentTypeRegistryService) = 
+type internal TextBufferStream(textLines:ITextBuffer, contentTypeRegistry: IContentTypeRegistryService) = 
     do if null = textLines then raise (new ArgumentNullException("textLines"))
     // The following line causes unhandled excepiton on a background thread, see https://github.com/dotnet/fsharp/issues/2318#issuecomment-279340343
     // It seems we should provide a Quick Info Provider at the same time as uncommenting it.
     
     //do textLines.ChangeContentType(contentTypeRegistry.GetContentType Guids.fsiContentTypeName, Guid Guids.guidFsiLanguageService)
     
-    let mutable readonlyRegion  = null : IReadOnlyRegion MaybeNull
+    let mutable readonlyRegion  = null : IReadOnlyRegion
 
     let extendReadOnlyRegion position =
             use readonlyEdit = textLines.CreateReadOnlyRegionEdit()
diff --git a/vsintegration/src/FSharp.VS.FSI/sessions.fs b/vsintegration/src/FSharp.VS.FSI/sessions.fs
index c8504026a2e..c30f2090c19 100644
--- a/vsintegration/src/FSharp.VS.FSI/sessions.fs
+++ b/vsintegration/src/FSharp.VS.FSI/sessions.fs
@@ -276,7 +276,7 @@ let fsiStartInfo channelName sourceFile =
     
     let initialPath = 
         match sourceFile with 
-        | Some path when Directory.Exists(Path.GetDirectoryName(path)) -> Path.GetDirectoryName(path)
+        | path when path <> null && Directory.Exists(Path.GetDirectoryName(path)) -> Path.GetDirectoryName(path)
         | _ -> Path.GetTempPath()
 
     if Directory.Exists(initialPath) then
@@ -285,8 +285,10 @@ let fsiStartInfo channelName sourceFile =
     procInfo
 
 
+let nonNull = function null -> false | (s:string) -> true
+
 /// Represents an active F# Interactive process to which Visual Studio is connected via stdin/stdout/stderr and a remoting channel
-type FsiSession(sourceFile: string option) = 
+type FsiSession(sourceFile) = 
     let randomSalt = System.Random()
     let channelName =
         let pid  = Process.GetCurrentProcess().Id
@@ -411,9 +413,9 @@ type FsiSession(sourceFile: string option) =
 
     member _.SendInput (str: string) = inputQueue.Post(str)
 
-    member _.Output      = Observable.filter (isNull >> not) fsiOutput.Publish
+    member _.Output      = Observable.filter nonNull fsiOutput.Publish
 
-    member _.Error       = Observable.filter (isNull >> not) fsiError.Publish
+    member _.Error       = Observable.filter nonNull fsiError.Publish
 
     member _.Exited      = (cmdProcess.Exited |> Observable.map id)
 

From e0db05f27d078d4bea56c9ded0d33bebb0c46c12 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 14:09:40 +0100
Subject: [PATCH 104/112] minimize diff

---
 vsintegration/src/FSharp.VS.FSI/fsiBasis.fs             | 1 -
 vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs   | 4 ++--
 vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs | 3 +--
 vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs  | 1 -
 4 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
index 73c0af3eea2..8e4d3974761 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
@@ -57,7 +57,6 @@ module internal Guids =
     let fsiContentTypeName              = "FSharpInteractive"
 
 module internal Util =
-
     /// Utility function to create an instance of a class from the local registry. [From Iron Python].
     let CreateObject (globalProvider:System.IServiceProvider) (classType:Type,interfaceType:Type) =
         // Follows IronPython sample. See ConsoleWindow.CreateObject
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs b/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
index 6cecc7b106b..b943d3cca13 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiLanguageService.fs
@@ -114,7 +114,7 @@ type internal FsiAuthoringScope(sessions:FsiSessions option,readOnlySpanGetter:u
     inherit AuthoringScope()
     override this.GetDataTipText(line:int,col:int,span:byref) =
         span <- new TextSpan()
-        null : string
+        null
 
     override this.GetDeclarations(_snapshot,line:int,col:int,info:TokenInfo,reason:ParseReason) =
         (new FsiDeclarations() :> Declarations)
@@ -128,7 +128,7 @@ type internal FsiAuthoringScope(sessions:FsiSessions option,readOnlySpanGetter:u
                        col      : int,
                        span     : byref) =
         span <- new TextSpan()
-        null
+        null : string
 
 type internal FsiViewFilter(mgr:CodeWindowManager,view:IVsTextView) =
     inherit ViewFilter(mgr,view)
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs b/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
index c57c2171e4f..53432cd843c 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiSessionToolWindow.fs
@@ -198,7 +198,6 @@ type internal FsiToolWindow() as this =
     let writeText scroll (str:string) =
         if str <> null && textLines <> null then
             lock textLines (fun () ->
-            lock lines (fun () ->
                 textStream.DirectWrite(fixServerPrompt str)
                 if scroll then 
                     setScrollToEndOfBuffer()
@@ -378,7 +377,7 @@ type internal FsiToolWindow() as this =
     /// Hanlde no-op, used to overwrite some standard command with an empty action.
     let onNoAction (sender:obj) (e:EventArgs) = ()
     
-
+    
     /// Handle "Clear Pane". Clear input and all but the last ReadOnly line (probably the prompt).    
     let onClearPane (sender:obj) (args:EventArgs) =
         lock textLines (fun () ->        
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs b/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
index 7e9d55da69f..2e6291ef3ec 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiTextBufferStream.fs
@@ -6,7 +6,6 @@ open System
 open Microsoft.VisualStudio.TextManager.Interop
 open Microsoft.VisualStudio.Text
 open Microsoft.VisualStudio.Utilities
-open Util
 
 // This type wraps the IVsTextLines which contains the FSI session (output and input).
 // It provides the API for writing directly to the read-only part of the buffer.

From 5ff14d182c67d4c2752f3a91de83b5fb5dcb66fb Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 14:21:34 +0100
Subject: [PATCH 105/112] minimize diff

---
 src/Compiler/Checking/CheckDeclarations.fs    | 4 ++--
 src/Compiler/Checking/CheckExpressions.fs     | 2 +-
 src/Compiler/Checking/ConstraintSolver.fs     | 6 +++---
 src/Compiler/Checking/SignatureConformance.fs | 4 ++--
 src/Compiler/Checking/import.fs               | 2 +-
 src/Compiler/TypedTree/TypedTreeOps.fs        | 8 ++++----
 src/Compiler/TypedTree/TypedTreeOps.fsi       | 4 ++--
 7 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/src/Compiler/Checking/CheckDeclarations.fs b/src/Compiler/Checking/CheckDeclarations.fs
index 0f00b575f6f..0699c35ae5f 100644
--- a/src/Compiler/Checking/CheckDeclarations.fs
+++ b/src/Compiler/Checking/CheckDeclarations.fs
@@ -3209,8 +3209,8 @@ module EstablishTypeDefinitionCores =
                 
             let allowNullLiteralAttributeCheck() = 
                 if hasAllowNullLiteralAttr then 
-                    tycon.TypeContents.tcaug_super |> Option.iter (fun ty -> if not (TypeNullIsExtraValueOld g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m)))
-                    tycon.ImmediateInterfaceTypesOfFSharpTycon |> List.iter (fun ty -> if not (TypeNullIsExtraValueOld g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m)))
+                    tycon.TypeContents.tcaug_super |> Option.iter (fun ty -> if not (TypeNullIsExtraValue g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m)))
+                    tycon.ImmediateInterfaceTypesOfFSharpTycon |> List.iter (fun ty -> if not (TypeNullIsExtraValue g m ty) then errorR (Error(FSComp.SR.tcAllowNullTypesMayOnlyInheritFromAllowNullTypes(), m)))
                 
                 
             let structLayoutAttributeCheck allowed = 
diff --git a/src/Compiler/Checking/CheckExpressions.fs b/src/Compiler/Checking/CheckExpressions.fs
index b2f0ba5f73a..030a14f7796 100755
--- a/src/Compiler/Checking/CheckExpressions.fs
+++ b/src/Compiler/Checking/CheckExpressions.fs
@@ -2078,7 +2078,7 @@ module GeneralizationHelpers =
             match tp.Constraints |> List.partition (function TyparConstraint.CoercesTo _ -> true | _ -> false) with
             | [TyparConstraint.CoercesTo(tgtTy, _)], others ->
                  // Throw away null constraints if they are implied
-                 if others |> List.exists (function TyparConstraint.SupportsNull _ -> not (TypeNullIsExtraValueOld g m tgtTy) | _ -> true)
+                 if others |> List.exists (function TyparConstraint.SupportsNull _ -> not (TypeNullIsExtraValue g m tgtTy) | _ -> true)
                  then None
                  else Some tgtTy
             | _ -> None
diff --git a/src/Compiler/Checking/ConstraintSolver.fs b/src/Compiler/Checking/ConstraintSolver.fs
index 5cd30a5d99c..e723b3cd960 100644
--- a/src/Compiler/Checking/ConstraintSolver.fs
+++ b/src/Compiler/Checking/ConstraintSolver.fs
@@ -2495,7 +2495,7 @@ and SolveTypeSupportsNullCore (csenv:ConstraintSolverEnv) ndeep m2 trace ty = tr
 
             // If langFeatureNullness or checkNullness are off give the same errors as F# 4.5
             if not g.langFeatureNullness || not g.checkNullness then 
-                if not (TypeNullIsExtraValueOld g m ty) then
+                if not (TypeNullIsExtraValue g m ty) then
                     return! ErrorD (ConstraintSolverError(FSComp.SR.csTypeDoesNotHaveNull(NicePrint.minimalStringOfType denv ty), m, m2))
   }
 
@@ -2544,7 +2544,7 @@ and SolveNullnessNotSupportsNull (csenv:ConstraintSolverEnv) ndeep m2 (trace: Op
                 if not (isObjTy g ty) then 
                     return! WarnD(ConstraintSolverNonNullnessWarningWithType(denv, ty, n1, m, m2)) 
             else
-                if TypeNullIsExtraValueOld g m ty then
+                if TypeNullIsExtraValue g m ty then
                     return! ErrorD (ConstraintSolverError(FSComp.SR.csTypeHasNullAsExtraValue(NicePrint.minimalStringOfType denv ty), m, m2))
   }
 
@@ -2557,7 +2557,7 @@ and SolveTypeNotSupportsNullCore (csenv:ConstraintSolverEnv) ndeep m2 trace ty =
         // code via Option.ofObj and Option.toObj
         do! WarnD (ConstraintSolverError(FSComp.SR.csTypeHasNullAsTrueValue(NicePrint.minimalStringOfType denv ty), m, m2))
     elif TypeNullIsExtraValueNew g m ty then 
-        if g.checkNullness || TypeNullIsExtraValueOld g m ty then 
+        if g.checkNullness || TypeNullIsExtraValue g m ty then 
             do! WarnD (ConstraintSolverError(FSComp.SR.csTypeHasNullAsExtraValue(NicePrint.minimalStringOfType denv ty), m, m2))
     else
         if g.checkNullness then 
diff --git a/src/Compiler/Checking/SignatureConformance.fs b/src/Compiler/Checking/SignatureConformance.fs
index bd5a40e81f7..921b6b0fc64 100644
--- a/src/Compiler/Checking/SignatureConformance.fs
+++ b/src/Compiler/Checking/SignatureConformance.fs
@@ -229,8 +229,8 @@ type Checker(g, amap, denv, remapInfo: SignatureRepackageInfo, checkingSig) =
                     false
                 else
 
-                let aNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef implTycon))
-                let fNull2 = TypeNullIsExtraValueOld g m (generalizedTyconRef g (mkLocalTyconRef implTycon)) // TODO: should be sigTycon, raises extra errors
+                let aNull2 = TypeNullIsExtraValue g m (generalizedTyconRef g (mkLocalTyconRef implTycon))
+                let fNull2 = TypeNullIsExtraValue g m (generalizedTyconRef g (mkLocalTyconRef implTycon)) // TODO: should be sigTycon, raises extra errors
                 if aNull2 && not fNull2 then 
                     errorR(Error(FSComp.SR.DefinitionsInSigAndImplNotCompatibleImplementationSaysNull2(implTycon.TypeOrMeasureKind.ToString(), implTycon.DisplayName), m))
                     false
diff --git a/src/Compiler/Checking/import.fs b/src/Compiler/Checking/import.fs
index 65c987e188b..c3ab51ac1ff 100644
--- a/src/Compiler/Checking/import.fs
+++ b/src/Compiler/Checking/import.fs
@@ -175,7 +175,7 @@ let ImportNullness (g: TcGlobals) =
 
 let ImportNullnessForTyconRef (g: TcGlobals) (m: range) (tcref: TyconRef) =
     ignore (g, tcref, m)
-    // if g.langFeatureNullness && g.assumeNullOnImport && TyconRefNullIsExtraValueOld g m tcref then
+    // if g.langFeatureNullness && g.assumeNullOnImport && TyconRefNullIsExtraValue g m tcref then
     //     KnownWithNull
     // else
     KnownAmbivalentToNull
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fs b/src/Compiler/TypedTree/TypedTreeOps.fs
index 62c22787cbf..904e9afda78 100644
--- a/src/Compiler/TypedTree/TypedTreeOps.fs
+++ b/src/Compiler/TypedTree/TypedTreeOps.fs
@@ -8904,11 +8904,11 @@ let TyconRefNullIsExtraValue isNew g m (tcref: TyconRef) =
 // Putting AllowNullLiteralAttribute(true) on an F# type means it always admits null even in the new model
         (TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some true))
 
-let TyconRefNullIsExtraValueOld g m tcref = TyconRefNullIsExtraValue false g m tcref
+let TyconRefNullIsExtraValue g m tcref = TyconRefNullIsExtraValue false g m tcref
 let TyconRefNullIsExtraValueNew g m tcref = TyconRefNullIsExtraValue true g m tcref
 
 /// The F# 4.5 logic about whether a type admits the use of 'null' as a value.
-let TypeNullIsExtraValueOld g m ty = 
+let TypeNullIsExtraValue g m ty = 
     if isILReferenceTy g ty || isDelegateTy g ty then
         match tryTcrefOfAppTy g ty with 
         | ValueSome tcref -> 
@@ -8957,13 +8957,13 @@ let TypeNullIsTrueValue g ty =
 /// Indicates if unbox(null) is actively rejected at runtime.   See nullability RFC.  This applies to types that don't have null
 /// as a valid runtime representation under old compatiblity rules.
 let TypeNullNotLiked g m ty = 
-       not (TypeNullIsExtraValueOld g m ty) 
+       not (TypeNullIsExtraValue g m ty) 
     && not (TypeNullIsTrueValue g ty) 
     && not (TypeNullNever g ty) 
 
 let rec TypeHasDefaultValue isNew g m ty = 
     let ty = stripTyEqnsAndMeasureEqns g ty
-    (if isNew then TypeNullIsExtraValueNew g m ty else TypeNullIsExtraValueOld g m ty)
+    (if isNew then TypeNullIsExtraValueNew g m ty else TypeNullIsExtraValue g m ty)
     || (isStructTy g ty &&
         // Is it an F# struct type?
         (if isFSharpStructTy g ty then 
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fsi b/src/Compiler/TypedTree/TypedTreeOps.fsi
index ea3092a228e..f0ca81bdad7 100755
--- a/src/Compiler/TypedTree/TypedTreeOps.fsi
+++ b/src/Compiler/TypedTree/TypedTreeOps.fsi
@@ -1744,9 +1744,9 @@ val TypeNullIsTrueValue: TcGlobals -> TType -> bool
 
 val TypeNullIsExtraValueNew: TcGlobals -> range -> TType -> bool
 
-val TypeNullIsExtraValueOld: TcGlobals -> range -> TType -> bool
+val TypeNullIsExtraValue: TcGlobals -> range -> TType -> bool
 
-val TyconRefNullIsExtraValueOld: TcGlobals -> range -> TyconRef -> bool
+val TyconRefNullIsExtraValue: TcGlobals -> range -> TyconRef -> bool
 
 val TyconRefNullIsExtraValueNew: TcGlobals -> range -> TyconRef -> bool
 

From da0bd75fddd1c593a04a41b89ed29bf80dfc40c3 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 14:53:16 +0100
Subject: [PATCH 106/112] minimize diff

---
 src/Compiler/Checking/CheckExpressions.fs     |  2 +-
 src/Compiler/Checking/ConstraintSolver.fs     |  4 +-
 src/Compiler/Checking/MethodCalls.fs          |  4 +-
 src/Compiler/Checking/PostInferenceChecks.fs  |  4 +-
 src/Compiler/Checking/TypeHierarchy.fs        |  8 +-
 src/Compiler/Driver/CompilerConfig.fsi        |  2 -
 src/Compiler/SyntaxTree/LexFilter.fs          |  6 +-
 src/Compiler/SyntaxTree/LexHelpers.fs         |  3 +-
 src/Compiler/SyntaxTree/SyntaxTree.fsi        |  2 +-
 src/Compiler/TypedTree/TypeProviders.fs       | 74 +++++++++----------
 src/Compiler/TypedTree/TypedTreeOps.fs        | 20 ++---
 src/Compiler/TypedTree/TypedTreeOps.fsi       |  2 +-
 src/Compiler/TypedTree/TypedTreePickle.fs     | 14 ++--
 src/Compiler/TypedTree/tainted.fs             |  2 +-
 src/Compiler/Utilities/illib.fs               |  2 +-
 src/Compiler/Utilities/illib.fsi              |  2 +-
 src/FSharp.Build/FSharpCommandLineBuilder.fs  |  2 +-
 src/FSharp.Core/option.fs                     |  8 +-
 src/FSharp.Core/option.fsi                    |  8 +-
 src/FSharp.Core/prim-types.fsi                | 12 +--
 src/fsi/console.fs                            |  2 +-
 tests/fsharp/core/nullness/test.fsx           | 10 +--
 .../src/FSharp.Editor/Common/Extensions.fs    |  2 +-
 23 files changed, 95 insertions(+), 100 deletions(-)

diff --git a/src/Compiler/Checking/CheckExpressions.fs b/src/Compiler/Checking/CheckExpressions.fs
index 030a14f7796..cbcbfab6dab 100755
--- a/src/Compiler/Checking/CheckExpressions.fs
+++ b/src/Compiler/Checking/CheckExpressions.fs
@@ -4400,7 +4400,7 @@ and TcTypeOrMeasure kindOpt (cenv: cenv) newOk checkConstraints occ (iwsam: Warn
                 // For example "int option?" is not allowed, not "string??".
                 //
                 // For variable types in FSharp.Core we make an exception because we must allow
-                //    val toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : __notnull *)
+                //    val toObj: value: 'T option -> 'T __withnull when 'T : not struct (* and 'T : __notnull *)
                 // wihout implying 'T is not null.  This is because it is legitimate to use this
                 // function to "collapse" null and obj-null-coming-from-option using such a function.
 
diff --git a/src/Compiler/Checking/ConstraintSolver.fs b/src/Compiler/Checking/ConstraintSolver.fs
index e723b3cd960..c0f8433591d 100644
--- a/src/Compiler/Checking/ConstraintSolver.fs
+++ b/src/Compiler/Checking/ConstraintSolver.fs
@@ -2771,14 +2771,14 @@ and SolveTypeRequiresDefaultConstructor (csenv: ConstraintSolverEnv) ndeep m2 tr
     | ValueSome tp ->
         AddConstraint csenv ndeep m2 trace tp (TyparConstraint.RequiresDefaultConstructor m)
     | _ ->
-        if isStructTy g ty && (isStructTupleTy g ty || isStructAnonRecdTy g ty || TypeHasDefaultValueOld g m ty) then
+        if isStructTy g ty && (isStructTupleTy g ty || isStructAnonRecdTy g ty || TypeHasDefaultValue g m ty) then
             if isStructTupleTy g ty then 
                 destStructTupleTy g ty |> IterateD (SolveTypeRequiresDefaultValue csenv ndeep m trace)
             elif isStructAnonRecdTy g ty then 
                 match tryDestAnonRecdTy g ty with
                 | ValueNone -> CompleteD
                 | ValueSome (_, ptys) -> ptys |> IterateD (SolveTypeRequiresDefaultValue csenv ndeep m trace)
-            elif TypeHasDefaultValueOld g m ty then
+            elif TypeHasDefaultValue g m ty then
                 CompleteD
             else
                 ErrorD (ConstraintSolverError(FSComp.SR.csGenericConstructRequiresPublicDefaultConstructor(NicePrint.minimalStringOfType denv origTy), m, m2))
diff --git a/src/Compiler/Checking/MethodCalls.fs b/src/Compiler/Checking/MethodCalls.fs
index b4858e762c0..e8d6850bc77 100644
--- a/src/Compiler/Checking/MethodCalls.fs
+++ b/src/Compiler/Checking/MethodCalls.fs
@@ -1184,12 +1184,12 @@ let BuildMethodCall tcVal g amap isMutable m isProp minfo valUseFlags minst objA
         // Build a 'call' to a struct default constructor 
         | DefaultStructCtor (g, ty) -> 
             if g.langFeatureNullness then 
-                if not (TypeHasDefaultValueNew g m ty) && not (TypeHasDefaultValueOld g m ty) then 
+                if not (TypeHasDefaultValueNew g m ty) && not (TypeHasDefaultValue g m ty) then 
                     errorR(Error(FSComp.SR.tcDefaultStructConstructorCall(), m))
                 if g.checkNullness && not (TypeHasDefaultValueNew g m ty) then 
                     warning(Error(FSComp.SR.tcDefaultStructConstructorCallNulls(), m))  
             else
-                if not (TypeHasDefaultValueOld g m ty) then 
+                if not (TypeHasDefaultValue g m ty) then 
                     errorR(Error(FSComp.SR.tcDefaultStructConstructorCall(), m))
             mkDefault (m, ty), ty)
 
diff --git a/src/Compiler/Checking/PostInferenceChecks.fs b/src/Compiler/Checking/PostInferenceChecks.fs
index 6c2b1b0ffea..cf855cd1ea7 100644
--- a/src/Compiler/Checking/PostInferenceChecks.fs
+++ b/src/Compiler/Checking/PostInferenceChecks.fs
@@ -2540,7 +2540,7 @@ let CheckEntityDefn cenv env (tycon: Entity) =
                 let zeroInitUnsafe = TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute f.FieldAttribs
                 if zeroInitUnsafe = Some true then
                     let ty = f.FormalType
-                    if not (TypeHasDefaultValueNew g m ty) && not (TypeHasDefaultValueOld g m ty) then 
+                    if not (TypeHasDefaultValueNew g m ty) && not (TypeHasDefaultValue g m ty) then 
                         if tycon.IsStructOrEnumTycon then 
                             // Under F# 4.5 we gave a hard error for this case so we can give it now
                             errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m))
@@ -2559,7 +2559,7 @@ let CheckEntityDefn cenv env (tycon: Entity) =
                 // Check if it's marked unsafe 
                 let zeroInitUnsafe = TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute f.FieldAttribs
                 if zeroInitUnsafe = Some true then
-                    if not (TypeHasDefaultValueOld g m ty) then 
+                    if not (TypeHasDefaultValue g m ty) then 
                         errorR(Error(FSComp.SR.chkValueWithDefaultValueMustHaveDefaultValue(), m))
 
         // Check type abbreviations
diff --git a/src/Compiler/Checking/TypeHierarchy.fs b/src/Compiler/Checking/TypeHierarchy.fs
index 6fba08da371..16bc5e16fbf 100644
--- a/src/Compiler/Checking/TypeHierarchy.fs
+++ b/src/Compiler/Checking/TypeHierarchy.fs
@@ -270,10 +270,10 @@ let FoldHierarchyOfTypeAux followInterfaces allowMultiIntfInst skipUnref visitor
                           | TyparConstraint.IsDelegate _
                           | TyparConstraint.SupportsNull _
                           | TyparConstraint.NotSupportsNull _
-                          | TyparConstraint.IsNonNullableStruct _ 
-                          | TyparConstraint.IsUnmanaged _ 
-                          | TyparConstraint.IsReferenceType _ 
-                          | TyparConstraint.SimpleChoice _ 
+                          | TyparConstraint.IsNonNullableStruct _
+                          | TyparConstraint.IsUnmanaged _
+                          | TyparConstraint.IsReferenceType _
+                          | TyparConstraint.SimpleChoice _
                           | TyparConstraint.RequiresDefaultConstructor _ -> vacc
                           | TyparConstraint.CoercesTo(cty, _) ->
                                   loop (ndeep + 1)  cty vacc)
diff --git a/src/Compiler/Driver/CompilerConfig.fsi b/src/Compiler/Driver/CompilerConfig.fsi
index dfd83f15349..f97ba86d7d6 100644
--- a/src/Compiler/Driver/CompilerConfig.fsi
+++ b/src/Compiler/Driver/CompilerConfig.fsi
@@ -12,14 +12,12 @@ open FSharp.Compiler.Xml
 open FSharp.Compiler.AbstractIL.IL
 open FSharp.Compiler.AbstractIL.ILBinaryReader
 open FSharp.Compiler.AbstractIL.ILPdbWriter
-open FSharp.Compiler.CodeAnalysis
 open FSharp.Compiler.DependencyManager
 open FSharp.Compiler.Diagnostics
 open FSharp.Compiler.DiagnosticsLogger
 open FSharp.Compiler.Features
 open FSharp.Compiler.CodeAnalysis
 open FSharp.Compiler.Text
-open FSharp.Compiler.Xml
 open FSharp.Compiler.BuildGraph
 
 exception FileNameNotResolved of searchedLocations: string * fileName: string * range: range
diff --git a/src/Compiler/SyntaxTree/LexFilter.fs b/src/Compiler/SyntaxTree/LexFilter.fs
index 1a97d0d5ef4..b04d0e379a3 100644
--- a/src/Compiler/SyntaxTree/LexFilter.fs
+++ b/src/Compiler/SyntaxTree/LexFilter.fs
@@ -1084,9 +1084,11 @@ type LexFilterImpl (
                     //      f<{| C : int |}>x
                     //      fx
                     //      fx
-                    //      fx
+                    //      fx
+                    //      fx
+                    //      fx
                     | DEFAULT | COLON | COLON_GREATER | STRUCT | NULL | DELEGATE | AND | WHEN 
-                    | QMARK | AMBIVALENT__
+                    | NOTNULL__ | AMBIVALENT__ | WITHNULL__
                     | DOT_DOT
                     | NEW
                     | LBRACE_BAR
diff --git a/src/Compiler/SyntaxTree/LexHelpers.fs b/src/Compiler/SyntaxTree/LexHelpers.fs
index 19b36e6d242..fb107bb6bd6 100644
--- a/src/Compiler/SyntaxTree/LexHelpers.fs
+++ b/src/Compiler/SyntaxTree/LexHelpers.fs
@@ -382,8 +382,7 @@ module Keywords =
             ALWAYS, "while", WHILE
             ALWAYS, "with", WITH
             FSHARP, "yield", YIELD(true)
-            ALWAYS, "_", UNDERSCORE
-            (*------- for explaining offside rule *)
+            (*------- for prototyping and explaining offside rule *)
             FSHARP, "__token_OBLOCKSEP", OBLOCKSEP
             FSHARP, "__token_OWITH", OWITH
             FSHARP, "__token_ODECLEND", ODECLEND
diff --git a/src/Compiler/SyntaxTree/SyntaxTree.fsi b/src/Compiler/SyntaxTree/SyntaxTree.fsi
index 2f00d6139d5..b785f4ac6ee 100644
--- a/src/Compiler/SyntaxTree/SyntaxTree.fsi
+++ b/src/Compiler/SyntaxTree/SyntaxTree.fsi
@@ -502,7 +502,7 @@ type SynType =
     /// For the dimensionless units i.e. 1, and static parameters to provided types
     | StaticConstant of constant: SynConst * range: range
 
-    /// F# syntax : nul used in parameters to type providers
+    /// F# syntax: null, used in parameters to type providers
     | StaticConstantNull of range: range
 
     /// F# syntax: const expr, used in static parameters to type providers
diff --git a/src/Compiler/TypedTree/TypeProviders.fs b/src/Compiler/TypedTree/TypeProviders.fs
index 82382eb0ab0..fbb1899bcd1 100644
--- a/src/Compiler/TypedTree/TypeProviders.fs
+++ b/src/Compiler/TypedTree/TypeProviders.fs
@@ -231,8 +231,8 @@ let TryTypeMemberArray (st: Tainted<_>, fullName, memberName, m, f) =
 let TryTypeMemberNonNull<'T, 'U when 'U : null and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U)) : Tainted<'U> =
     match TryTypeMember(st, fullName, memberName, m, recover, f) with 
 #else
-let TryTypeMemberNonNull<'T, 'U when 'U : __notnull and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U?)) : Tainted<'U> =
-    match TryTypeMember<'T, 'U?>(st, fullName, memberName, m, withNull recover, f) with 
+let TryTypeMemberNonNull<'T, 'U when 'U : __notnull and 'U : not struct>(st: Tainted<'T>, fullName, memberName, m, recover: 'U, (f: 'T -> 'U __withnull)) : Tainted<'U> =
+    match TryTypeMember<'T, 'U __withnull>(st, fullName, memberName, m, withNull recover, f) with 
 #endif
     | Tainted.Null -> 
         errorR(Error(FSComp.SR.etUnexpectedNullFromProvidedTypeMember(fullName, memberName), m))
@@ -1417,41 +1417,41 @@ let TryLinkProvidedType(resolver: Tainted, moduleOrNamespace: str
         
         let staticArgs = 
             staticParameters |> Array.map (fun sp -> 
-                    let typeBeforeArgumentsName = typeBeforeArguments.PUntaint ((fun st -> st.Name), range)
-                    let spName = sp.PUntaint ((fun sp -> sp.Name), range)
-                    match argSpecsTable.TryGetValue spName with
-                    | true, arg ->
-                        /// Find the name of the representation type for the static parameter
-                        let spReprTypeName = 
-                            sp.PUntaint((fun sp -> 
-                                let pt = sp.ParameterType
-                                let uet = if pt.IsEnum then pt.GetEnumUnderlyingType() else pt
-                                uet.FullName), range)
-
-                        match spReprTypeName with 
-                        | "System.SByte" -> box (sbyte arg)
-                        | "System.Int16" -> box (int16 arg)
-                        | "System.Int32" -> box (int32 arg)
-                        | "System.Int64" -> box (int64 arg)
-                        | "System.Byte" -> box (byte arg)
-                        | "System.UInt16" -> box (uint16 arg)
-                        | "System.UInt32" -> box (uint32 arg)
-                        | "System.UInt64" -> box (uint64 arg)
-                        | "System.Decimal" -> box (decimal arg)
-                        | "System.Single" -> box (single arg)
-                        | "System.Double" -> box (double arg)
-                        | "System.Char" -> box (char arg)
-                        | "System.Boolean" -> box (arg = "True")
-                        | "System.String" -> box (string arg)
-                        | s -> error(Error(FSComp.SR.etUnknownStaticArgumentKind(s, typeLogicalName), range0))
-
-                    | _ ->
-                        if sp.PUntaint ((fun sp -> sp.IsOptional), range) then 
-                            match sp.PUntaint((fun sp -> sp.RawDefaultValue), range) with
-                            | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
-                            | NonNull v -> v
-                        else
-                            error(Error(FSComp.SR.etProvidedTypeReferenceMissingArgument spName, range0)))
+                let typeBeforeArgumentsName = typeBeforeArguments.PUntaint ((fun st -> st.Name), range)
+                let spName = sp.PUntaint ((fun sp -> sp.Name), range)
+                match argSpecsTable.TryGetValue spName with
+                | true, arg ->
+                    /// Find the name of the representation type for the static parameter
+                    let spReprTypeName = 
+                        sp.PUntaint((fun sp -> 
+                            let pt = sp.ParameterType
+                            let uet = if pt.IsEnum then pt.GetEnumUnderlyingType() else pt
+                            uet.FullName), range)
+
+                    match spReprTypeName with 
+                    | "System.SByte" -> box (sbyte arg)
+                    | "System.Int16" -> box (int16 arg)
+                    | "System.Int32" -> box (int32 arg)
+                    | "System.Int64" -> box (int64 arg)
+                    | "System.Byte" -> box (byte arg)
+                    | "System.UInt16" -> box (uint16 arg)
+                    | "System.UInt32" -> box (uint32 arg)
+                    | "System.UInt64" -> box (uint64 arg)
+                    | "System.Decimal" -> box (decimal arg)
+                    | "System.Single" -> box (single arg)
+                    | "System.Double" -> box (double arg)
+                    | "System.Char" -> box (char arg)
+                    | "System.Boolean" -> box (arg = "True")
+                    | "System.String" -> box (string arg)
+                    | s -> error(Error(FSComp.SR.etUnknownStaticArgumentKind(s, typeLogicalName), range0))
+
+                | _ ->
+                    if sp.PUntaint ((fun sp -> sp.IsOptional), range) then 
+                        match sp.PUntaint((fun sp -> sp.RawDefaultValue), range) with
+                        | Null -> error (Error(FSComp.SR.etStaticParameterRequiresAValue (spName, typeBeforeArgumentsName, typeBeforeArgumentsName, spName), range0))
+                        | NonNull v -> v
+                    else
+                        error(Error(FSComp.SR.etProvidedTypeReferenceMissingArgument spName, range0)))
                 
 
         match TryApplyProvidedType(typeBeforeArguments, None, staticArgs, range0) with 
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fs b/src/Compiler/TypedTree/TypedTreeOps.fs
index 904e9afda78..85e6fb14e53 100644
--- a/src/Compiler/TypedTree/TypedTreeOps.fs
+++ b/src/Compiler/TypedTree/TypedTreeOps.fs
@@ -8894,7 +8894,7 @@ let TypeNullNever g ty =
     isByrefTy g underlyingTy ||
     isNonNullableStructTyparTy g ty
 
-let TyconRefNullIsExtraValue isNew g m (tcref: TyconRef) = 
+let TyconRefNullIsExtraValueAux isNew g m (tcref: TyconRef) = 
     not tcref.IsStructOrEnumTycon &&
     not (isByrefLikeTyconRef g m tcref) && 
     (if tcref.IsILTycon then 
@@ -8904,8 +8904,8 @@ let TyconRefNullIsExtraValue isNew g m (tcref: TyconRef) =
 // Putting AllowNullLiteralAttribute(true) on an F# type means it always admits null even in the new model
         (TryFindTyconRefBoolAttribute g m g.attrib_AllowNullLiteralAttribute tcref = Some true))
 
-let TyconRefNullIsExtraValue g m tcref = TyconRefNullIsExtraValue false g m tcref
-let TyconRefNullIsExtraValueNew g m tcref = TyconRefNullIsExtraValue true g m tcref
+let TyconRefNullIsExtraValue g m tcref = TyconRefNullIsExtraValueAux false g m tcref
+let TyconRefNullIsExtraValueNew g m tcref = TyconRefNullIsExtraValueAux true g m tcref
 
 /// The F# 4.5 logic about whether a type admits the use of 'null' as a value.
 let TypeNullIsExtraValue g m ty = 
@@ -8932,7 +8932,7 @@ let TypeNullIsExtraValue g m ty =
         else
             false
 
-/// The F# 5.0 logic about whether a type admits the use of 'null' as a value.
+/// The new logic about whether a type admits the use of 'null' as a value.
 let TypeNullIsExtraValueNew g m ty = 
     let sty = stripTyparEqns ty
     (match tryTcrefOfAppTy g sty with 
@@ -8961,7 +8961,7 @@ let TypeNullNotLiked g m ty =
     && not (TypeNullIsTrueValue g ty) 
     && not (TypeNullNever g ty) 
 
-let rec TypeHasDefaultValue isNew g m ty = 
+let rec TypeHasDefaultValueAux isNew g m ty = 
     let ty = stripTyEqnsAndMeasureEqns g ty
     (if isNew then TypeNullIsExtraValueNew g m ty else TypeNullIsExtraValue g m ty)
     || (isStructTy g ty &&
@@ -8974,17 +8974,17 @@ let rec TypeHasDefaultValue isNew g m ty =
                   // We can ignore fields with the DefaultValue(false) attribute 
                   |> List.filter (fun fld -> not (TryFindFSharpBoolAttribute g g.attrib_DefaultValueAttribute fld.FieldAttribs = Some false))
 
-            flds |> List.forall (actualTyOfRecdField (mkTyconRefInst tcref tinst) >> TypeHasDefaultValue isNew g m)
+            flds |> List.forall (actualTyOfRecdField (mkTyconRefInst tcref tinst) >> TypeHasDefaultValueAux isNew g m)
 
          // Struct tuple types have a DefaultValue if all their element types have a default value
          elif isStructTupleTy g ty then 
-            destStructTupleTy g ty |> List.forall (TypeHasDefaultValue isNew g m)
+            destStructTupleTy g ty |> List.forall (TypeHasDefaultValueAux isNew g m)
          
          // Struct anonymous record types have a DefaultValue if all their element types have a default value
          elif isStructAnonRecdTy g ty then 
             match tryDestAnonRecdTy g ty with
             | ValueNone -> true
-            | ValueSome (_, ptys) -> ptys |> List.forall (TypeHasDefaultValue isNew g m)
+            | ValueSome (_, ptys) -> ptys |> List.forall (TypeHasDefaultValueAux isNew g m)
          else
             // All nominal struct types defined in other .NET languages have a DefaultValue regardless of their instantiation
             true))
@@ -8993,9 +8993,9 @@ let rec TypeHasDefaultValue isNew g m ty =
       (isNonNullableStructTyparTy g ty &&
         (destTyparTy g ty).Constraints |> List.exists (function TyparConstraint.RequiresDefaultConstructor _ -> true | _ -> false))
 
-let TypeHasDefaultValueOld g m ty = TypeHasDefaultValue false g m ty  
+let TypeHasDefaultValue g m ty = TypeHasDefaultValueAux false g m ty  
 
-let TypeHasDefaultValueNew g m ty = TypeHasDefaultValue true g m ty  
+let TypeHasDefaultValueNew g m ty = TypeHasDefaultValueAux true g m ty  
 
 /// Determines types that are potentially known to satisfy the 'comparable' constraint and returns
 /// a set of residual types that must also satisfy the constraint
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fsi b/src/Compiler/TypedTree/TypedTreeOps.fsi
index f0ca81bdad7..1dee86e329b 100755
--- a/src/Compiler/TypedTree/TypedTreeOps.fsi
+++ b/src/Compiler/TypedTree/TypedTreeOps.fsi
@@ -1754,7 +1754,7 @@ val TypeNullNever: TcGlobals -> TType -> bool
 
 val TypeHasDefaultValueNew: TcGlobals -> range -> TType -> bool
 
-val TypeHasDefaultValueOld: TcGlobals -> range -> TType -> bool
+val TypeHasDefaultValue: TcGlobals -> range -> TType -> bool
 
 val isAbstractTycon: Tycon -> bool
 
diff --git a/src/Compiler/TypedTree/TypedTreePickle.fs b/src/Compiler/TypedTree/TypedTreePickle.fs
index 4f44e56e38f..94ecd371154 100644
--- a/src/Compiler/TypedTree/TypedTreePickle.fs
+++ b/src/Compiler/TypedTree/TypedTreePickle.fs
@@ -793,8 +793,8 @@ let pickleObjWithDanglingCcus inMem file g scope p x =
        osB = ByteBuffer.Create(PickleBufferCapacity, useArrayPool = true)
        oscope=scope
        occus= Table<_>.Create "occus (fake)"
-       oentities=NodeOutTable<_, _>.Create((fun (tc: Tycon) -> tc.Stamp), (fun tc -> tc.LogicalName), (fun tc -> tc.Range), (fun osgn -> osgn), "otycons")
-       otypars=NodeOutTable<_, _>.Create((fun (tp: Typar) -> tp.Stamp), (fun tp -> tp.DisplayName), (fun tp -> tp.Range), (fun osgn -> osgn), "otypars")
+       oentities=NodeOutTable<_, _>.Create((fun (tc: Tycon) -> tc.Stamp), (fun tc -> tc.LogicalName), (fun tc -> tc.Range), id, "otycons")
+       otypars=NodeOutTable<_, _>.Create((fun (tp: Typar) -> tp.Stamp), (fun tp -> tp.DisplayName), (fun tp -> tp.Range), id, "otypars")
        ovals=NodeOutTable<_, _>.Create((fun (v: Val) -> v.Stamp), (fun v -> v.LogicalName), (fun v -> v.Range), (fun osgn -> osgn), "ovals")
        oanoninfos=NodeOutTable<_, _>.Create((fun (v: AnonRecdTypeInfo) -> v.Stamp), (fun v -> string v.Stamp), (fun _ -> range0), id, "oanoninfos")
        ostrings=Table<_>.Create "ostrings (fake)"
@@ -808,16 +808,12 @@ let pickleObjWithDanglingCcus inMem file g scope p x =
 
   let phase2bytes =
     p_array p_encoded_ccuref ccuNameTab.AsArray st2
-
-    // For F# 5.0 and beyond we add a 4th integer for nanoninfos, indicated by a negative 1st integer
-    // Note that this means assemblies using anonymous record types are not binary-metadata consumable by previous
-    // generation F# tooling.
+    // Add a 4th integer indicated by a negative 1st integer
     let z1 = if nanoninfos > 0 then  -ntycons-1 else ntycons
     p_int z1 st2
     p_tup2 p_int p_int (ntypars, nvals) st2
     if nanoninfos > 0 then
         p_int nanoninfos st2
-
     p_tup5
         (p_array p_encoded_string)
         (p_array p_encoded_pubpath)
@@ -1783,7 +1779,7 @@ let _ = fill_p_ty2 (fun isStructThisArgPos ty st ->
         p_byte 4 st
         p_tpref r st
 
-    | TType_forall (tps,r) -> 
+    | TType_forall (tps, r) ->
         p_byte 5 st
         p_tyar_specs tps st
         // Note, the "this" argument may be found in the body of a generic forall type, so propagate the isStructThisArgPos value
@@ -1809,7 +1805,7 @@ let _ = fill_u_ty (fun st ->
     let tag = u_byte st
 
     match tag with
-    | 0 -> 
+    | 0 ->
         let l = u_tys st
         TType_tuple (tupInfoRef, l)
     | 1 -> 
diff --git a/src/Compiler/TypedTree/tainted.fs b/src/Compiler/TypedTree/tainted.fs
index 307a004e775..af34d2bcb8e 100644
--- a/src/Compiler/TypedTree/tainted.fs
+++ b/src/Compiler/TypedTree/tainted.fs
@@ -168,7 +168,7 @@ module internal Tainted =
     let (|Null|NonNull|) (p:Tainted<'T>) : Choice> when 'T : null and 'T : not struct =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure id)
 #else
-    let (|Null|NonNull|) (p:Tainted<'T?>) : Choice> when 'T : __notnull =
+    let (|Null|NonNull|) (p:Tainted<'T __withnull>) : Choice> when 'T : __notnull =
         if p.PUntaintNoFailure isNull then Null else NonNull (p.PApplyNoFailure nonNull)
 #endif
 
diff --git a/src/Compiler/Utilities/illib.fs b/src/Compiler/Utilities/illib.fs
index 43a6ae37f24..1e58c98329c 100644
--- a/src/Compiler/Utilities/illib.fs
+++ b/src/Compiler/Utilities/illib.fs
@@ -62,7 +62,7 @@ module internal PervasiveAutoOpens =
         | null -> raise (ArgumentNullException(paramName))
         | v -> v
 #else
-    type 'T MaybeNull when 'T: __notnull and 'T: not struct = 'T?
+    type 'T MaybeNull when 'T: __notnull and 'T: not struct = 'T __withnull
 
 #endif
 
diff --git a/src/Compiler/Utilities/illib.fsi b/src/Compiler/Utilities/illib.fsi
index 82e8b6c8cd0..70840418405 100644
--- a/src/Compiler/Utilities/illib.fsi
+++ b/src/Compiler/Utilities/illib.fsi
@@ -45,7 +45,7 @@ module internal PervasiveAutoOpens =
 #else
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?'
-    type 'T MaybeNull when 'T: __notnull and 'T: not struct = 'T?
+    type 'T MaybeNull when 'T: __notnull and 'T: not struct = 'T __withnull
 #endif
 
     val inline (===): x: 'a -> y: 'a -> bool when 'a: not struct
diff --git a/src/FSharp.Build/FSharpCommandLineBuilder.fs b/src/FSharp.Build/FSharpCommandLineBuilder.fs
index 8f2bf760013..552ca4cd49f 100644
--- a/src/FSharp.Build/FSharpCommandLineBuilder.fs
+++ b/src/FSharp.Build/FSharpCommandLineBuilder.fs
@@ -28,7 +28,7 @@ module Utils =
 #else
     /// Indicates that a type may be null. 'MaybeNull' used internally in the F# compiler as unchecked
     /// replacement for 'string?' for example for future FS-1060.
-    type MaybeNull<'T when 'T : __notnull> = 'T?
+    type MaybeNull<'T when 'T : __notnull> = 'T __withnull
 #endif
 
 type FSharpCommandLineBuilder() =
diff --git a/src/FSharp.Core/option.fs b/src/FSharp.Core/option.fs
index e209447be30..f2194f6bd2f 100644
--- a/src/FSharp.Core/option.fs
+++ b/src/FSharp.Core/option.fs
@@ -166,13 +166,13 @@ module Option =
         | Some x -> x
 #else
     []
-    let ofObj (value: 'T?) : 'T option when 'T: not struct and 'T : __notnull = 
+    let ofObj (value: 'T __withnull) : 'T option when 'T: not struct and 'T : __notnull = 
         match value with
         | null -> None
         | _ -> Some value
 
     []
-    let toObj (value: 'T option) : 'T? when 'T: not struct (* and 'T : __notnull *)  =
+    let toObj (value: 'T option) : 'T __withnull when 'T: not struct (* and 'T : __notnull *)  =
         match value with
         | None -> null
         | Some x -> x
@@ -343,13 +343,13 @@ module ValueOption =
         | ValueSome x -> x
 #else
     []
-    let ofObj (value: 'T?) : 'T voption when 'T: not struct and 'T : __notnull  = 
+    let ofObj (value: 'T __withnull) : 'T voption when 'T: not struct and 'T : __notnull  = 
         match value with
         | null -> ValueNone
         | _ -> ValueSome value
 
     []
-    let toObj (value : 'T voption) : 'T? when 'T: not struct (* and 'T : __notnull *) = 
+    let toObj (value : 'T voption) : 'T __withnull when 'T: not struct (* and 'T : __notnull *) = 
         match value with
         | ValueNone -> null
         | ValueSome x -> x
diff --git a/src/FSharp.Core/option.fsi b/src/FSharp.Core/option.fsi
index 78b9e07e7b7..2e92a5e658c 100644
--- a/src/FSharp.Core/option.fsi
+++ b/src/FSharp.Core/option.fsi
@@ -444,7 +444,7 @@ module Option =
     val inline ofObj: value: 'T -> 'T option  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val inline ofObj: value: 'T? -> 'T option  when 'T : not struct and 'T : __notnull
+    val inline ofObj: value: 'T __withnull -> 'T option  when 'T : not struct and 'T : __notnull
 #endif
 
     /// Convert an option to a potentially null value.
@@ -464,7 +464,7 @@ module Option =
     val inline toObj: value: 'T option -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val inline toObj: value: 'T option -> 'T? when 'T : not struct (* and 'T : __notnull *)
+    val inline toObj: value: 'T option -> 'T __withnull when 'T : not struct (* and 'T : __notnull *)
 #endif
 
 /// Contains operations for working with value options.
@@ -902,7 +902,7 @@ module ValueOption =
     val ofObj: value: 'T -> 'T voption  when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val ofObj: value: 'T? -> 'T voption  when 'T : not struct and 'T : __notnull
+    val ofObj: value: 'T __withnull -> 'T voption  when 'T : not struct and 'T : __notnull
 #endif
 
     /// Convert an option to a potentially null value.
@@ -922,5 +922,5 @@ module ValueOption =
     val toObj: value: 'T voption -> 'T when 'T : null
 #else
     // TODO NULLNESS: assess this change - is it a breaking change?
-    val toObj: value: 'T voption -> 'T? when 'T : not struct (* and 'T : __notnull *)
+    val toObj: value: 'T voption -> 'T __withnull when 'T : not struct (* and 'T : __notnull *)
 #endif
diff --git a/src/FSharp.Core/prim-types.fsi b/src/FSharp.Core/prim-types.fsi
index db9ac1f434e..17fa0acf14a 100644
--- a/src/FSharp.Core/prim-types.fsi
+++ b/src/FSharp.Core/prim-types.fsi
@@ -3109,7 +3109,7 @@ namespace Microsoft.FSharp.Core
         /// The argument value. If it is null, the defaultValue is returned.
         []
         []
-        val inline defaultIfNull : defaultValue:'T -> arg:'T? -> 'T when 'T : not struct and 'T : __notnull
+        val inline defaultIfNull : defaultValue:'T -> arg:'T __withnull -> 'T when 'T : not struct and 'T : __notnull
 
         /// Used to specify a default value for an nullable value argument in the implementation of a function
         /// The default value of the argument.
@@ -3423,7 +3423,7 @@ namespace Microsoft.FSharp.Core
         /// A choice indicating whether the value is null or not-null.
         []
         []
-        val inline (|Null|NonNull|) : value: 'T? -> Choice  when 'T : __notnull
+        val inline (|Null|NonNull|) : value: 'T __withnull -> Choice  when 'T : __notnull
         
         /// Determines whether the given value is null.
         /// In a future revision of nullness support this may be unified with 'Null|NonNull'.
@@ -3438,7 +3438,7 @@ namespace Microsoft.FSharp.Core
         /// The non-null value.
         []
         []
-        val inline (|NonNullQuick|) : value: 'T? -> 'T when 'T : __notnull 
+        val inline (|NonNullQuick|) : value: 'T __withnull -> 'T when 'T : __notnull 
         
         /// When used in a pattern checks the given value is not null.
         /// In a future revision of nullness support this may be unified with 'NonNullQuick'.
@@ -3478,7 +3478,7 @@ namespace Microsoft.FSharp.Core
         /// The value when it is not null. If the value is null an exception is raised.
         []
         []
-        val inline nonNull : value: 'T? -> 'T when 'T : not struct and 'T : __notnull
+        val inline nonNull : value: 'T __withnull -> 'T when 'T : not struct and 'T : __notnull
 
         /// Asserts that the value is non-null.
         /// In a future revision of nullness support this may be unified with 'nonNull'.
@@ -3493,7 +3493,7 @@ namespace Microsoft.FSharp.Core
         /// True when value is null, false otherwise.
         []
         []
-        val inline withNull : value:'T -> 'T? when 'T : not struct (* and 'T : __notnull *)
+        val inline withNull : value:'T -> 'T __withnull when 'T : not struct (* and 'T : __notnull *)
 
         /// Asserts that the value is non-null.
         /// In a future revision of nullness support this may be unified with 'withNull'.
@@ -3576,7 +3576,7 @@ namespace Microsoft.FSharp.Core
         /// The result value.
         []
         []
-        val inline nullArgCheck : argumentName:string -> 'T? -> 'T when 'T : not struct and 'T : __notnull
+        val inline nullArgCheck : argumentName:string -> 'T __withnull -> 'T when 'T : not struct and 'T : __notnull
 #endif
 
         /// Throw a  exception
diff --git a/src/fsi/console.fs b/src/fsi/console.fs
index 25fa8e53795..a56b3f4e4f7 100644
--- a/src/fsi/console.fs
+++ b/src/fsi/console.fs
@@ -16,7 +16,7 @@ module internal ConsoleHelpers =
   // Shim to match nullness checking library support in preview
   let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
 #else
-  type MaybeNull<'T when 'T : __notnull> = 'T?
+  type MaybeNull<'T when 'T : __notnull> = 'T __withnull
 #endif
 
 type internal Style =
diff --git a/tests/fsharp/core/nullness/test.fsx b/tests/fsharp/core/nullness/test.fsx
index 5f22dfefebb..a742ae0055d 100644
--- a/tests/fsharp/core/nullness/test.fsx
+++ b/tests/fsharp/core/nullness/test.fsx
@@ -21,7 +21,7 @@ let check s v1 v2 = test s (v1 = v2)
 open System
 open System.Runtime.CompilerServices
 
-//let f<'T when 'T : not struct> (x: 'T?) = 1
+//let f<'T when 'T : not struct> (x: 'T __withnull) = 1
 
 module Basics = 
     let x1 : string = null // ** Expected to give a Nullness warning
@@ -121,18 +121,18 @@ module Basics2 =
     let f2 () : string? = null
     // val f : unit -> string?
 
-    let f3 () : 'T? = null
+    let f3 () : 'T __withnull = null
 
-    let f4 () : 'T? when 'T : not struct = null
+    let f4 () : 'T __withnull when 'T : not struct = null
 
     let f5 () : 'T when 'T : not struct and 'T : null = null
 
 #if NEGATIVE
-    let f6 () : 'T? when 'T : not struct and 'T : null = null // Expected to give an error about inconistent constraints
+    let f6 () : 'T __withnull when 'T : not struct and 'T : null = null // Expected to give an error about inconistent constraints
 #endif
 
     // Note yet allowed 
-    //let f7 () : 'T? when 'T : struct = null
+    //let f7 () : 'T __withnull when 'T : struct = null
     let f7b () : Nullable<'T> = nullV // BUG: Incorrectly gives a warning about System.ValueType with /test:AssumeNullOnImport
 
     let f8 () : string = null // Expected to give a Nullness warning
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index 11909c0adea..9addc09a915 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -31,7 +31,7 @@ let inline nullArgCheck (argumentName:string) (value: 'T when 'T : not struct) =
     | _ ->  value
 let inline withNull<'T when 'T: not struct> (value : 'T) = value
 #else
-type MaybeNull<'T when 'T : __notnull> = 'T?
+type MaybeNull<'T when 'T : __notnull> = 'T __withnull
 #endif
 
 type private FSharpGlyph = FSharp.Compiler.EditorServices.FSharpGlyph

From 55a5af1919b5b3cfcb73a1df093afc5f4b6e3623 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 16:50:07 +0100
Subject: [PATCH 107/112] minimize diff

---
 tests/service/ExprTests.fs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/tests/service/ExprTests.fs b/tests/service/ExprTests.fs
index 3ea39ce39fc..b2679c8863c 100644
--- a/tests/service/ExprTests.fs
+++ b/tests/service/ExprTests.fs
@@ -2989,7 +2989,6 @@ let ``Test Operator Declarations for String`` () =
         [], "let testStringToUInt32Operator(e1) = LanguagePrimitives.ParseUInt32 (e1) @ (47,47--47,56)"
         [], "let testStringToInt64Operator(e1) = LanguagePrimitives.ParseInt64 (e1) @ (48,47--48,55)"
         [], "let testStringToUInt64Operator(e1) = LanguagePrimitives.ParseUInt64 (e1) @ (49,47--49,56)"
-        // the definition of these operators has changed slightly in latest FSharp.Core
         [], "let testStringToSingleOperator(e1) = Single.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (52,47--52,57)"
         [], "let testStringToDoubleOperator(e1) = Double.Parse ((if Operators.op_Equality (e1,dflt) then dflt else e1.Replace(\"_\",\"\")),167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (53,47--53,55)"
         [], "let testStringToDecimalOperator(e1) = Decimal.Parse (e1,167,CultureInfo.get_InvariantCulture () :> System.IFormatProvider) @ (54,47--54,57)"

From 245db3bc76fea62b09284d6e1e26ce06f27ab584 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 16:52:07 +0100
Subject: [PATCH 108/112] minimize diff

---
 src/Compiler/SyntaxTree/LexHelpers.fs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Compiler/SyntaxTree/LexHelpers.fs b/src/Compiler/SyntaxTree/LexHelpers.fs
index fb107bb6bd6..4030d082cdd 100644
--- a/src/Compiler/SyntaxTree/LexHelpers.fs
+++ b/src/Compiler/SyntaxTree/LexHelpers.fs
@@ -382,6 +382,7 @@ module Keywords =
             ALWAYS, "while", WHILE
             ALWAYS, "with", WITH
             FSHARP, "yield", YIELD(true)
+            ALWAYS, "_", UNDERSCORE
             (*------- for prototyping and explaining offside rule *)
             FSHARP, "__token_OBLOCKSEP", OBLOCKSEP
             FSHARP, "__token_OWITH", OWITH

From 12aa179de852e6f2eb09f4579818e5570da769c6 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 17:39:44 +0100
Subject: [PATCH 109/112] fix build

---
 .../src/FSharp.Editor/Commands/FsiCommandService.fs         | 6 +++---
 .../tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj    | 1 +
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
index b3c2dc992d7..83d2f794d18 100644
--- a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
+++ b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
@@ -41,19 +41,19 @@ type internal FsiCommandFilter(serviceProvider: System.IServiceProvider) =
                 pguidCmdGroup = VSConstants.VsStd11
                 && nCmdId = uint32 VSConstants.VSStd11CmdID.ExecuteSelectionInInteractive
             then
-                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteSelection
+                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteSelection null null
                 VSConstants.S_OK
             elif
                 pguidCmdGroup = VSConstants.VsStd11
                 && nCmdId = uint32 VSConstants.VSStd11CmdID.ExecuteLineInInteractive
             then
-                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteLine
+                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.ExecuteLine null null
                 VSConstants.S_OK
             elif
                 pguidCmdGroup = Guids.guidInteractive
                 && nCmdId = uint32 Guids.cmdIDDebugSelection
             then
-                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.DebugSelection
+                Hooks.OnMLSend fsiPackage.Value FsiEditorSendAction.DebugSelection null null
                 VSConstants.S_OK
             elif not (isNull nextTarget) then
                 nextTarget.Exec(&pguidCmdGroup, nCmdId, nCmdexecopt, pvaIn, pvaOut)
diff --git a/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj b/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj
index d21d6e3c6eb..b6fe3b58b46 100644
--- a/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj
+++ b/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj
@@ -50,6 +50,7 @@
     
     
     
+    
   
 
   

From 8b9a263bb985335a93b1c7335eef20bd8c04ce8b Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 18:02:47 +0100
Subject: [PATCH 110/112] reduce diff

---
 .../BraceCompletionSessionProvider.fs         | 34 ++++++++-----------
 .../ClassificationDefinitions.fs              | 12 +++----
 .../Commands/FsiCommandService.fs             |  2 +-
 .../src/FSharp.Editor/Common/Extensions.fs    | 21 ++----------
 .../src/FSharp.Editor/Common/Logging.fs       |  3 +-
 vsintegration/src/FSharp.Editor/Common/Vs.fs  |  6 ++--
 .../Completion/CompletionProvider.fs          |  2 +-
 .../src/FSharp.Editor/FSharp.Editor.fsproj    |  1 -
 .../InlineRename/InlineRenameService.fs       |  4 +--
 .../LanguageService/FSharpEditorFactory.fs    |  8 +++--
 .../LanguageService/LanguageService.fs        |  7 ++--
 .../LegacyProjectWorkspaceMap.fs              |  2 +-
 .../Navigation/GoToDefinition.fs              | 10 +++---
 .../Navigation/NavigableSymbolsService.fs     |  7 ++--
 .../Navigation/NavigationBarItemService.fs    |  2 +-
 .../QuickInfo/QuickInfoProvider.fs            |  2 +-
 .../FSharp.Editor.Tests.fsproj                |  1 -
 17 files changed, 50 insertions(+), 74 deletions(-)

diff --git a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
index 642d2992670..9f00d6a0b07 100644
--- a/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/AutomaticCompletion/BraceCompletionSessionProvider.fs
@@ -45,9 +45,7 @@ module BraceCompletionSessionProviderHelpers =
     []
     let BraceCompletion = "Brace_Completion"
 
-#if NO_CHECKNULLS
 []
-#endif
 type IEditorBraceCompletionSession =
     inherit ILanguageService
 
@@ -59,13 +57,11 @@ type IEditorBraceCompletionSession =
 
     abstract AfterReturn: IBraceCompletionSession * CancellationToken -> unit
 
-#if NO_CHECKNULLS
 []
-#endif
 type IEditorBraceCompletionSessionFactory =
     inherit ILanguageService
 
-    abstract TryCreateSession: Document * openingPosition: int * openingBrace: char * CancellationToken -> IEditorBraceCompletionSession option
+    abstract TryCreateSession: Document * openingPosition: int * openingBrace: char * CancellationToken -> IEditorBraceCompletionSession
 
 type BraceCompletionSession
     (
@@ -82,7 +78,7 @@ type BraceCompletionSession
     let mutable closingPoint =
         subjectBuffer.CurrentSnapshot.CreateTrackingPoint(openingPoint.Position, PointTrackingMode.Positive)
 
-    let mutable openingPoint: ITrackingPoint MaybeNull = null
+    let mutable openingPoint: ITrackingPoint = null
     let editorOperations = editorOperationsFactoryService.GetEditorOperations(textView)
 
     member _.EndSession() =
@@ -219,9 +215,6 @@ type BraceCompletionSession
 
         member this.PreBackspace handledCommand =
             handledCommand <- false
-            match openingPoint with 
-            | Null -> ()
-            | NonNull openingPoint -> 
 
             let caretPos = tryGetCaretPosition this
             let snapshot = subjectBuffer.CurrentSnapshot
@@ -540,27 +533,27 @@ type EditorBraceCompletionSessionFactory() =
     //    classifiedSpan.TextSpan.IntersectsWith position &&
     //    not (spanIsString classifiedSpan)))))
 
-    member _.CreateEditorSession(_document, _openingPosition, openingBrace, _cancellationToken) : IEditorBraceCompletionSession option =
+    member _.CreateEditorSession(_document, _openingPosition, openingBrace, _cancellationToken) =
         match openingBrace with
-        | Parenthesis.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | CurlyBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | SquareBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | VerticalBar.OpenCharacter -> VerticalBarCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | AngleBrackets.OpenCharacter -> AngleBracketCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | DoubleQuote.OpenCharacter -> DoubleQuoteCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | Asterisk.OpenCharacter -> AsteriskCompletionSession() :> IEditorBraceCompletionSession |> Some
-        | _ -> None
+        | Parenthesis.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession
+        | CurlyBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession
+        | SquareBrackets.OpenCharacter -> ParenthesisCompletionSession() :> IEditorBraceCompletionSession
+        | VerticalBar.OpenCharacter -> VerticalBarCompletionSession() :> IEditorBraceCompletionSession
+        | AngleBrackets.OpenCharacter -> AngleBracketCompletionSession() :> IEditorBraceCompletionSession
+        | DoubleQuote.OpenCharacter -> DoubleQuoteCompletionSession() :> IEditorBraceCompletionSession
+        | Asterisk.OpenCharacter -> AsteriskCompletionSession() :> IEditorBraceCompletionSession
+        | _ -> null
 
     interface IEditorBraceCompletionSessionFactory with
 
-        member this.TryCreateSession(document, openingPosition, openingBrace, cancellationToken) : IEditorBraceCompletionSession option =
+        member this.TryCreateSession(document, openingPosition, openingBrace, cancellationToken) =
             if
                 this.IsSupportedOpeningBrace(openingBrace)
                 && this.CheckCodeContext(document, openingPosition, openingBrace, cancellationToken)
             then
                 this.CreateEditorSession(document, openingPosition, openingBrace, cancellationToken)
             else
-                None
+                null
 
 [)>]
 []
@@ -590,6 +583,7 @@ type BraceCompletionSessionProvider []
 
                     let! session =
                         sessionFactory.TryCreateSession(document, openingPoint.Position, openingBrace, CancellationToken.None)
+                        |> Option.ofObj
 
                     let undoHistory =
                         undoManager.GetTextBufferUndoManager(textView.TextBuffer).TextBufferUndoHistory
diff --git a/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs b/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
index dd61fc2e66d..79405d93b48 100644
--- a/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
+++ b/vsintegration/src/FSharp.Editor/Classification/ClassificationDefinitions.fs
@@ -207,24 +207,24 @@ module internal ClassificationDefinitions =
                 VSColorTheme.remove_ThemeChanged handler
 
     []
-    let FSharpMutableVarClassificationType: ClassificationTypeDefinition MaybeNull = null
+    let FSharpMutableVarClassificationType: ClassificationTypeDefinition = null
 
     []
-    let FSharpDisposableClassificationType: ClassificationTypeDefinition MaybeNull = null
+    let FSharpDisposableClassificationType: ClassificationTypeDefinition = null
 
     []
-    let FSharpDisposableLocalValueClassificationType: ClassificationTypeDefinition MaybeNull =
+    let FSharpDisposableLocalValueClassificationType: ClassificationTypeDefinition =
         null
 
     []
-    let FSharpDisposableTopLevelValueClassificationType: ClassificationTypeDefinition MaybeNull =
+    let FSharpDisposableTopLevelValueClassificationType: ClassificationTypeDefinition =
         null
 
     []
-    let FSharpFunctionClassificationType: ClassificationTypeDefinition MaybeNull = null
+    let FSharpFunctionClassificationType: ClassificationTypeDefinition = null
 
     []
-    let FSharpPrintfClassificationType: ClassificationTypeDefinition MaybeNull = null
+    let FSharpPrintfClassificationType: ClassificationTypeDefinition = null
 
     [)>]
     []
diff --git a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
index 83d2f794d18..81e7815298f 100644
--- a/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
+++ b/vsintegration/src/FSharp.Editor/Commands/FsiCommandService.fs
@@ -19,7 +19,7 @@ type internal FsiCommandFilter(serviceProvider: System.IServiceProvider) =
 
     let loadPackage (guidString: string) =
         lazy
-            (let shell = serviceProvider.GetService(typeof) :?> IVsShell
+            (let shell = serviceProvider.GetService(typeof) :?> IVsShell
              let packageToBeLoadedGuid = ref (Guid(guidString))
 
              match shell.LoadPackage packageToBeLoadedGuid with
diff --git a/vsintegration/src/FSharp.Editor/Common/Extensions.fs b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
index 9addc09a915..cfb1136eb35 100644
--- a/vsintegration/src/FSharp.Editor/Common/Extensions.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Extensions.fs
@@ -19,21 +19,6 @@ open FSharp.Compiler.Text
 
 open Microsoft.VisualStudio.FSharp.Editor
 
-#if NO_CHECKNULLS
-type MaybeNull<'T when 'T : null> = 'T
-// Shim to match nullness checking library support in preview
-let inline (|NonNullQuick|) x = match x with null -> raise (NullReferenceException()) | v -> v
-let inline nonNull<'T when 'T : null> (x: 'T) = x
-let inline (|Null|NonNull|) (x: 'T) : Choice = match x with null -> Null | v -> NonNull v
-let inline nullArgCheck (argumentName:string) (value: 'T when 'T : not struct) = 
-    match box value with 
-    | null -> raise (new System.ArgumentNullException(argumentName))        
-    | _ ->  value
-let inline withNull<'T when 'T: not struct> (value : 'T) = value
-#else
-type MaybeNull<'T when 'T : __notnull> = 'T __withnull
-#endif
-
 type private FSharpGlyph = FSharp.Compiler.EditorServices.FSharpGlyph
 type private FSharpRoslynGlyph = Microsoft.CodeAnalysis.ExternalAccess.FSharp.FSharpGlyph
 
@@ -325,10 +310,10 @@ module Exception =
     /// messages recursively.
     let flattenMessage (root: System.Exception) =
 
-        let rec flattenInner (exc: System.Exception MaybeNull) =
+        let rec flattenInner (exc: System.Exception) =
             match exc with
-            | Null -> []
-            | NonNull exc -> [ exc.Message ] @ (flattenInner exc.InnerException)
+            | null -> []
+            | _ -> [ exc.Message ] @ (flattenInner exc.InnerException)
 
         // If an aggregate exception only has a single inner exception, use that as the root
         match root with
diff --git a/vsintegration/src/FSharp.Editor/Common/Logging.fs b/vsintegration/src/FSharp.Editor/Common/Logging.fs
index 90461d42440..db961a883ae 100644
--- a/vsintegration/src/FSharp.Editor/Common/Logging.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Logging.fs
@@ -32,8 +32,7 @@ open Config
 []
 type Logger [] ([)>] serviceProvider: IServiceProvider) =
     let outputWindow =
-        serviceProvider.GetService()
-        |> Option.ofObj
+        serviceProvider.GetService() |> Option.ofObj
 
     let createPane () =
         outputWindow
diff --git a/vsintegration/src/FSharp.Editor/Common/Vs.fs b/vsintegration/src/FSharp.Editor/Common/Vs.fs
index eb65063e5d8..672aace90eb 100644
--- a/vsintegration/src/FSharp.Editor/Common/Vs.fs
+++ b/vsintegration/src/FSharp.Editor/Common/Vs.fs
@@ -65,8 +65,8 @@ module internal VsTextLines =
         dataBuffer.CurrentSnapshot.GetText()
 
 module internal VsRunningDocumentTable =
-    let FindDocumentWithoutLocking (rdt: IVsRunningDocumentTable, url: string) : (IVsHierarchy MaybeNull * IVsTextLines MaybeNull) option =
-        let (hr: int, hier: IVsHierarchy MaybeNull, _itemid: uint32, unkData: IntPtr, _cookie: uint32) =
+    let FindDocumentWithoutLocking (rdt: IVsRunningDocumentTable, url: string) : (IVsHierarchy * IVsTextLines) option =
+        let (hr: int, hier: IVsHierarchy, _itemid: uint32, unkData: IntPtr, _cookie: uint32) =
             rdt.FindAndLockDocument(uint32 _VSRDTFLAGS.RDT_NoLock, url)
 
         try
@@ -77,7 +77,7 @@ module internal VsRunningDocumentTable =
                     else
                         Marshal.GetObjectForIUnknown(unkData)
 
-                let buffer : IVsTextLines MaybeNull = 
+                let buffer =
                     match bufferObject with
                     | :? IVsTextLines as tl -> tl
                     | _ -> null
diff --git a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
index 318dee2f9b3..963997eb804 100644
--- a/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
+++ b/vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs
@@ -218,7 +218,7 @@ type internal FSharpCompletionProvider
 
                 let namespaceName =
                     match declarationItem.NamespaceToOpen with
-                    | Some namespaceToOpen -> withNull namespaceToOpen
+                    | Some namespaceToOpen -> namespaceToOpen
                     | _ -> null // Icky, but this is how roslyn handles it
 
                 let filterText =
diff --git a/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj b/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
index 8496d43cb02..6ba152f9233 100644
--- a/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
+++ b/vsintegration/src/FSharp.Editor/FSharp.Editor.fsproj
@@ -8,7 +8,6 @@
     $(NoWarn);44
     true
     $(OtherFlags) --warnon:1182 --subsystemversion:6.00
-    true
     false
   
 
diff --git a/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs b/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs
index d11c11c4984..9bc946a9cbf 100644
--- a/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs
+++ b/vsintegration/src/FSharp.Editor/InlineRename/InlineRenameService.fs
@@ -188,7 +188,7 @@ type internal InlineRenameService [] () =
             return InlineRenameInfo(document, triggerSpan, symbol, symbolUse, checkFileResults) :> FSharpInlineRenameInfo
         }
 
-    override _.GetRenameInfoAsync(document: Document, position: int, cancellationToken: CancellationToken) : Task =
+    override _.GetRenameInfoAsync(document: Document, position: int, cancellationToken: CancellationToken) : Task =
         asyncMaybe { return! InlineRenameService.GetInlineRenameInfo(document, position) }
-        |> Async.map Option.toObj
+        |> Async.map (Option.defaultValue null)
         |> RoslynHelpers.StartAsyncAsTask(cancellationToken)
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs b/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
index 05a4649016d..48d373df713 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/FSharpEditorFactory.fs
@@ -9,7 +9,6 @@ open Microsoft.VisualStudio.Shell.Interop
 open Microsoft.VisualStudio.TextManager.Interop
 open Microsoft.VisualStudio.Utilities
 open Microsoft.VisualStudio.ComponentModelHost
-open Microsoft.VisualStudio.FSharp.Editor.Extensions
 
 type ShellPackage = Microsoft.VisualStudio.Shell.Package
 
@@ -33,8 +32,11 @@ module Constants =
 []
 type FSharpEditorFactory(parentPackage: ShellPackage) =
 
-    let parentPackage = nullArgCheck "parentPackage" parentPackage 
-    let serviceProvider = parentPackage :> IServiceProvider
+    let serviceProvider =
+        if parentPackage = null then
+            nullArg "parentPackage"
+
+        parentPackage :> IServiceProvider
 
     let componentModel =
         serviceProvider.GetService(typeof) :?> IComponentModel
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
index 6c065dae190..c9b25aad44d 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LanguageService.fs
@@ -16,7 +16,6 @@ open FSharp.NativeInterop
 open Microsoft.VisualStudio
 open Microsoft.VisualStudio.Editor
 open Microsoft.VisualStudio.FSharp.Editor
-open Microsoft.VisualStudio.FSharp.Editor.Extensions
 open Microsoft.VisualStudio.LanguageServices
 open Microsoft.VisualStudio.LanguageServices.Implementation.LanguageService
 open Microsoft.VisualStudio.LanguageServices.Implementation.ProjectSystem
@@ -37,12 +36,12 @@ open System.Threading.Tasks
 type internal RoamingProfileStorageLocation(keyName: string) =
     inherit OptionStorageLocation()
 
-    member _.GetKeyNameForLanguage(languageName: string MaybeNull) =
+    member _.GetKeyNameForLanguage(languageName: string) =
         let unsubstitutedKeyName = keyName
 
         match languageName with
-        | Null -> unsubstitutedKeyName
-        | NonNull languageName ->
+        | null -> unsubstitutedKeyName
+        | _ ->
             let substituteLanguageName =
                 if languageName = FSharpConstants.FSharpLanguageName then
                     "FSharp"
diff --git a/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs b/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs
index 12e3e5e97df..b61ec2be082 100644
--- a/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs
+++ b/vsintegration/src/FSharp.Editor/LanguageService/LegacyProjectWorkspaceMap.fs
@@ -137,7 +137,7 @@ type internal LegacyProjectWorkspaceMap
             // Roslyn is expecting site to be an IVsHierarchy.
             // It just so happens that the object that implements IProvideProjectSite is also
             // an IVsHierarchy. This assertion is to ensure that the assumption holds true.
-            Debug.Assert(not (isNull (box hierarchy)), "About to CreateProjectContext with a non-hierarchy site")
+            Debug.Assert(not (isNull hierarchy), "About to CreateProjectContext with a non-hierarchy site")
 
             let projectContext =
                 projectContextFactory.CreateProjectContext(
diff --git a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
index 51d7ffb21cc..8eea7460ba9 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/GoToDefinition.fs
@@ -31,13 +31,13 @@ open System.Text.RegularExpressions
 
 module private Symbol =
     let fullName (root: ISymbol) : string =
-        let rec inner parts (sym: ISymbol MaybeNull) =
+        let rec inner parts (sym: ISymbol) =
             match sym with
-            | Null -> parts
+            | null -> parts
             // TODO: do we have any other terminating cases?
-            | NonNull sym when sym.Kind = SymbolKind.NetModule || sym.Kind = SymbolKind.Assembly -> parts
-            | NonNull sym when sym.MetadataName <> "" -> inner (sym.MetadataName :: parts) sym.ContainingSymbol
-            | NonNull sym -> inner parts sym.ContainingSymbol
+            | sym when sym.Kind = SymbolKind.NetModule || sym.Kind = SymbolKind.Assembly -> parts
+            | sym when sym.MetadataName <> "" -> inner (sym.MetadataName :: parts) sym.ContainingSymbol
+            | sym -> inner parts sym.ContainingSymbol
 
         inner [] root |> String.concat "."
 
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
index d58027469be..99a07f8fd1d 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigableSymbolsService.fs
@@ -15,6 +15,7 @@ open Microsoft.VisualStudio.Text
 open Microsoft.VisualStudio.Text.Editor
 open Microsoft.VisualStudio.Utilities
 
+[]
 type internal FSharpNavigableSymbol(item: FSharpNavigableItem, span: SnapshotSpan, gtd: GoToDefinition) =
     interface INavigableSymbol with
         member _.Navigate(_: INavigableRelationship) =
@@ -31,7 +32,7 @@ type internal FSharpNavigableSymbolSource(metadataAsSource) =
     let statusBar = StatusBar()
 
     interface INavigableSymbolSource with
-        member _.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) : Task MaybeNull =
+        member _.GetNavigableSymbolAsync(triggerSpan: SnapshotSpan, cancellationToken: CancellationToken) =
             // Yes, this is a code smell. But this is how the editor API accepts what we would treat as None.
             if disposed then
                 null
@@ -63,7 +64,7 @@ type internal FSharpNavigableSymbolSource(metadataAsSource) =
 
                             match result with
                             | FSharpGoToDefinitionResult.NavigableItem (navItem) ->
-                                return FSharpNavigableSymbol(navItem, symbolSpan, gtd) :> INavigableSymbol MaybeNull
+                                return FSharpNavigableSymbol(navItem, symbolSpan, gtd) :> INavigableSymbol
 
                             | FSharpGoToDefinitionResult.ExternalAssembly (targetSymbolUse, metadataReferences) ->
                                 let nav =
@@ -92,8 +93,6 @@ type internal FSharpNavigableSymbolSource(metadataAsSource) =
                         // The NavigableSymbols API accepts 'null' when there's nothing to navigate to.
                         return null
                 }
-                // Async
-                // --> Async
                 |> Async.map Option.toObj
                 |> RoslynHelpers.StartAsyncAsTask cancellationToken
 
diff --git a/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs b/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
index 45220c8cae8..9173dd5f863 100644
--- a/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
+++ b/vsintegration/src/FSharp.Editor/Navigation/NavigationBarItemService.fs
@@ -10,7 +10,7 @@ open Microsoft.CodeAnalysis.ExternalAccess.FSharp.Editor
 
 open FSharp.Compiler.EditorServices
 
-type internal NavigationBarSymbolItem(text, glyph, spans, childItems: FSharpNavigationBarItem[] MaybeNull) =
+type internal NavigationBarSymbolItem(text, glyph, spans, childItems) =
     inherit FSharpNavigationBarItem(text, glyph, spans, childItems)
 
 [)>]
diff --git a/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs b/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
index 16437f1caee..c8e893070a5 100644
--- a/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
+++ b/vsintegration/src/FSharp.Editor/QuickInfo/QuickInfoProvider.fs
@@ -107,7 +107,7 @@ type internal FSharpAsyncQuickInfoSource
     interface IAsyncQuickInfoSource with
         override _.Dispose() = () // no cleanup necessary
 
-        override _.GetQuickInfoItemAsync(session: IAsyncQuickInfoSession, cancellationToken: CancellationToken) : Task =
+        override _.GetQuickInfoItemAsync(session: IAsyncQuickInfoSession, cancellationToken: CancellationToken) : Task =
             asyncMaybe {
                 let document =
                     textBuffer.CurrentSnapshot.GetOpenDocumentInCurrentContextWithChanges()
diff --git a/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj b/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj
index b6fe3b58b46..d21d6e3c6eb 100644
--- a/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj
+++ b/vsintegration/tests/FSharp.Editor.Tests/FSharp.Editor.Tests.fsproj
@@ -50,7 +50,6 @@
     
     
     
-    
   
 
   

From 69715144e6f61e26f23aea87f03908a872fc4281 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Fri, 28 Apr 2023 18:39:33 +0100
Subject: [PATCH 111/112] minimize diff

---
 src/Compiler/Checking/ConstraintSolver.fs   | 14 ++---
 src/Compiler/Checking/TypeHierarchy.fs      | 70 ++++++++++-----------
 src/Compiler/CodeGen/EraseUnions.fs         |  8 +--
 src/Compiler/CodeGen/IlxGen.fs              |  4 +-
 src/Compiler/TypedTree/TypedTreeOps.fs      | 17 ++---
 vsintegration/src/FSharp.VS.FSI/fsiBasis.fs |  5 +-
 6 files changed, 60 insertions(+), 58 deletions(-)

diff --git a/src/Compiler/Checking/ConstraintSolver.fs b/src/Compiler/Checking/ConstraintSolver.fs
index c0f8433591d..e8fa1fa673f 100644
--- a/src/Compiler/Checking/ConstraintSolver.fs
+++ b/src/Compiler/Checking/ConstraintSolver.fs
@@ -1315,18 +1315,18 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
         if evalTupInfoIsStruct tupInfo1 <> evalTupInfoIsStruct tupInfo2 then ErrorD (ConstraintSolverError(FSComp.SR.tcTupleStructMismatch(), csenv.m, m2)) else
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
 
+    | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2) ->
+        SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () ->
+        SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2)
+
     | TType_fun (domainTy1, rangeTy1, nullness1), TType_fun (domainTy2, rangeTy2, nullness2) ->
-        SolveFunTypeEqn csenv ndeep m2 trace None domainTy1 domainTy2 rangeTy1 rangeTy2 ++ (fun () -> 
+        SolveFunTypeEqn csenv ndeep m2 trace None domainTy1 domainTy2 rangeTy1 rangeTy2 ++ (fun () ->
            SolveNullnessEquiv csenv m2 trace ty1 ty2 nullness1 nullness2
         )
 
-    | TType_measure ms1, TType_measure ms2 -> 
+    | TType_measure ms1, TType_measure ms2 ->
         UnifyMeasures csenv trace ms1 ms2
 
-    | TType_anon (anonInfo1, l1),TType_anon (anonInfo2, l2) -> 
-        SolveAnonInfoEqualsAnonInfo csenv m2 anonInfo1 anonInfo2 ++ (fun () -> 
-        SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2)
-
     | TType_forall(tps1, bodyTy1), TType_forall(tps2, bodyTy2) -> 
         if tps1.Length <> tps2.Length then localAbortD else
         let aenv = aenv.BindEquivTypars tps1 tps2 
@@ -1334,7 +1334,7 @@ and SolveTypeEqualsType (csenv:ConstraintSolverEnv) ndeep m2 (trace: OptionalTra
         if not (typarsAEquiv g aenv tps1 tps2) then localAbortD else
         SolveTypeEqualsTypeKeepAbbrevs csenv ndeep m2 trace bodyTy1 bodyTy2 
 
-    | TType_ucase (uc1, l1)  , TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2  -> 
+    | TType_ucase (uc1, l1)  , TType_ucase (uc2, l2) when g.unionCaseRefEq uc1 uc2 ->
         SolveTypeEqualsTypeEqns csenv ndeep m2 trace None l1 l2
 
     | _  -> localAbortD
diff --git a/src/Compiler/Checking/TypeHierarchy.fs b/src/Compiler/Checking/TypeHierarchy.fs
index 16bc5e16fbf..f3e20033a2e 100644
--- a/src/Compiler/Checking/TypeHierarchy.fs
+++ b/src/Compiler/Checking/TypeHierarchy.fs
@@ -42,44 +42,44 @@ let GetSuperTypeOfType g amap m ty =
 #endif
 
     let resBeforeNull = 
-      match metadataOfTy g ty with
+        match metadataOfTy g ty with
 #if !NO_TYPEPROVIDERS
-      | ProvidedTypeMetadata info ->
-        let st = info.ProvidedType
-        let superOpt = st.PApplyOption((fun st -> match st.BaseType with null -> None | t -> Some (nonNull t)), m)
-        match superOpt with
-        | None -> None
-        | Some super -> Some(ImportProvidedType amap m super)
+        | ProvidedTypeMetadata info ->
+            let st = info.ProvidedType
+            let superOpt = st.PApplyOption((fun st -> match st.BaseType with null -> None | t -> Some (nonNull t)), m)
+            match superOpt with
+            | None -> None
+            | Some super -> Some(ImportProvidedType amap m super)
 #endif
-      | ILTypeMetadata (TILObjectReprData(scoref, _, tdef)) ->
-        let tinst = argsOfAppTy g ty
-        match tdef.Extends with
-        | None -> None
-        | Some ilTy -> Some (RescopeAndImportILType scoref amap m tinst ilTy)
-
-      | FSharpOrArrayOrByrefOrTupleOrExnTypeMetadata ->
-        if isFSharpObjModelTy g ty || isFSharpExceptionTy g ty then
-            let tcref = tcrefOfAppTy g ty
-            Some (instType (mkInstForAppTy g ty) (superOfTycon g tcref.Deref))
-        elif isArrayTy g ty then
-            Some g.system_Array_ty
-        elif isRefTy g ty && not (isObjTy g ty) then
-            Some g.obj_ty
-        elif isStructTupleTy g ty then
-            Some g.system_Value_ty
-        elif isFSharpStructOrEnumTy g ty then
-            if isFSharpEnumTy g ty then
-                Some g.system_Enum_ty
-            else
+        | ILTypeMetadata (TILObjectReprData(scoref, _, tdef)) ->
+            let tinst = argsOfAppTy g ty
+            match tdef.Extends with
+            | None -> None
+            | Some ilTy -> Some (RescopeAndImportILType scoref amap m tinst ilTy)
+
+        | FSharpOrArrayOrByrefOrTupleOrExnTypeMetadata ->
+            if isFSharpObjModelTy g ty || isFSharpExceptionTy g ty then
+                let tcref = tcrefOfAppTy g ty
+                Some (instType (mkInstForAppTy g ty) (superOfTycon g tcref.Deref))
+            elif isArrayTy g ty then
+                Some g.system_Array_ty
+            elif isRefTy g ty && not (isObjTy g ty) then
+                Some g.obj_ty
+            elif isStructTupleTy g ty then
                 Some g.system_Value_ty
-        elif isStructAnonRecdTy g ty then
-            Some g.system_Value_ty
-        elif isAnonRecdTy g ty then
-            Some g.obj_ty
-        elif isRecdTy g ty || isUnionTy g ty then
-            Some g.obj_ty
-        else
-            None
+            elif isFSharpStructOrEnumTy g ty then
+                if isFSharpEnumTy g ty then
+                    Some g.system_Enum_ty
+                else
+                    Some g.system_Value_ty
+            elif isStructAnonRecdTy g ty then
+                Some g.system_Value_ty
+            elif isAnonRecdTy g ty then
+                Some g.obj_ty
+            elif isRecdTy g ty || isUnionTy g ty then
+                Some g.obj_ty
+            else
+                None
     match resBeforeNull with 
     | Some superTy ->
         let nullness = nullnessOfTy g ty
diff --git a/src/Compiler/CodeGen/EraseUnions.fs b/src/Compiler/CodeGen/EraseUnions.fs
index 9d4d9bcefe6..58c82e4d9bb 100644
--- a/src/Compiler/CodeGen/EraseUnions.fs
+++ b/src/Compiler/CodeGen/EraseUnions.fs
@@ -1006,7 +1006,7 @@ let convAlternativeDef
                                     [ mkILParamNamed ("obj", altTy) ],
                                     mkMethodBody (false, [], 3, debugProxyCode, None, imports)
                                 ))
-                                    .With(customAttrs = mkILCustomAttrs[GetDynamicDependencyAttribute g 0x660 baseTy])
+                                    .With(customAttrs = mkILCustomAttrs [GetDynamicDependencyAttribute g 0x660 baseTy])
                                 |> addMethodGeneratedAttrs
 
                             let debugProxyGetterMeths =
@@ -1128,7 +1128,7 @@ let convAlternativeDef
 
                         let basicCtorMeth =
                             (mkILStorageCtor (basicCtorInstrs, altTy, basicCtorFields, basicCtorAccess, attr, imports))
-                                .With(customAttrs = mkILCustomAttrs[GetDynamicDependencyAttribute g 0x660 baseTy])
+                                .With(customAttrs = mkILCustomAttrs [GetDynamicDependencyAttribute g 0x660 baseTy])
                             |> addMethodGeneratedAttrs
 
                         let altTypeDef =
@@ -1261,7 +1261,7 @@ let mkClassUnionDef
                             cud.DebugPoint,
                             cud.DebugImports
                         ))
-                            .With(customAttrs = mkILCustomAttrs[GetDynamicDependencyAttribute g 0x660 baseTy])
+                            .With(customAttrs = mkILCustomAttrs [GetDynamicDependencyAttribute g 0x660 baseTy])
                         |> addMethodGeneratedAttrs
 
                     let props, meths =
@@ -1319,7 +1319,7 @@ let mkClassUnionDef
                     cud.DebugPoint,
                     cud.DebugImports
                 ))
-                    .With(customAttrs = mkILCustomAttrs[GetDynamicDependencyAttribute g 0x7E0 baseTy])
+                    .With(customAttrs = mkILCustomAttrs [GetDynamicDependencyAttribute g 0x7E0 baseTy])
                 |> addMethodGeneratedAttrs
             ]
 
diff --git a/src/Compiler/CodeGen/IlxGen.fs b/src/Compiler/CodeGen/IlxGen.fs
index 0db2e1af8b0..66cd89d14e2 100644
--- a/src/Compiler/CodeGen/IlxGen.fs
+++ b/src/Compiler/CodeGen/IlxGen.fs
@@ -2065,7 +2065,7 @@ type AnonTypeGenerationTable() =
 
             let ilCtorDef =
                 (mkILSimpleStorageCtorWithParamNames (ilBaseTySpec, ilTy, [], flds, ILMemberAccess.Public, None, None))
-                    .With(customAttrs = mkILCustomAttrs[GetDynamicDependencyAttribute g 0x660 ilTy])
+                    .With(customAttrs = mkILCustomAttrs [GetDynamicDependencyAttribute g 0x660 ilTy])
 
             // Create a tycon that looks exactly like a record definition, to help drive the generation of equality/comparison code
             let m = range0
@@ -11013,7 +11013,7 @@ and GenTypeDef cenv mgbuf lazyInitInfo eenv m (tycon: Tycon) =
                                 None,
                                 eenv.imports
                             ))
-                                .With(customAttrs = mkILCustomAttrs[GetDynamicDependencyAttribute g 0x660 ilThisTy])
+                                .With(customAttrs = mkILCustomAttrs [GetDynamicDependencyAttribute g 0x660 ilThisTy])
 
                         yield ilMethodDef
                         // FSharp 1.0 bug 1988: Explicitly setting the ComVisible(true) attribute on an F# type causes an F# record to be emitted in a way that enables mutation for COM interop scenarios
diff --git a/src/Compiler/TypedTree/TypedTreeOps.fs b/src/Compiler/TypedTree/TypedTreeOps.fs
index 85e6fb14e53..f29a11ef0ea 100644
--- a/src/Compiler/TypedTree/TypedTreeOps.fs
+++ b/src/Compiler/TypedTree/TypedTreeOps.fs
@@ -2444,8 +2444,9 @@ and accFreeInTypeLeftToRight g cxFlag thruFlag acc ty =
         let racc = accFreeInTypeLeftToRight g cxFlag thruFlag emptyFreeTyparsLeftToRight r
         unionFreeTyparsLeftToRight (boundTyparsLeftToRight g cxFlag thruFlag tps racc) acc
 
-    | TType_measure unt -> 
-        List.foldBack (fun (tp, _) acc -> accFreeTyparRefLeftToRight g cxFlag thruFlag acc tp) (ListMeasureVarOccsWithNonZeroExponents unt) acc
+    | TType_measure unt ->
+        let mvars = ListMeasureVarOccsWithNonZeroExponents unt
+        List.foldBack (fun (tp, _) acc -> accFreeTyparRefLeftToRight g cxFlag thruFlag acc tp) mvars acc
 
 and accFreeInTupInfoLeftToRight _g _cxFlag _thruFlag acc unt = 
     match unt with 
@@ -3925,27 +3926,27 @@ module DebugPrint =
            let tcL = layoutTyconRef tcref
            auxTyparsL env tcL prefix tinst
 
-        | TType_app (tcref, tinst, nullness) -> 
+        | TType_app (tcref, tinst, nullness) ->
            let prefix = tcref.IsPrefixDisplay
            let tcL = layoutTyconRef tcref
            let coreL = auxTyparsL env tcL prefix tinst
            auxAddNullness coreL nullness
 
-        | TType_tuple (_tupInfo, tys) -> 
+        | TType_tuple (_tupInfo, tys) ->
             sepListL (wordL (tagText "*")) (List.map (auxTypeAtomL env) tys) |> wrap
 
-        | TType_fun (domainTy, rangeTy, nullness) -> 
+        | TType_fun (domainTy, rangeTy, nullness) ->
            let coreL = ((auxTypeAtomL env domainTy ^^ wordL (tagText "->")) --- auxTypeL env rangeTy)  |> wrap
            auxAddNullness coreL nullness
 
         | TType_var (typar, nullness) ->
-           let coreL = auxTyparWrapL env isAtomic typar 
+           let coreL = auxTyparWrapL env isAtomic typar
            auxAddNullness coreL nullness
 
-        | TType_anon (anonInfo, tys) -> 
+        | TType_anon (anonInfo, tys) ->
            braceBarL (sepListL (wordL (tagText ";")) (List.map2 (fun nm ty -> wordL (tagField nm) --- auxTypeAtomL env ty) (Array.toList anonInfo.SortedNames) tys))
 
-        | TType_measure unt -> 
+        | TType_measure unt ->
 #if DEBUG
           leftL (tagText "{") ^^
           (match global_g with
diff --git a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
index 8e4d3974761..771b9c0c979 100644
--- a/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
+++ b/vsintegration/src/FSharp.VS.FSI/fsiBasis.fs
@@ -38,11 +38,12 @@ module internal Guids =
     let guidFSharpProjectPkgString      = "91A04A73-4F2C-4E7C-AD38-C1A68E7DA05C" // FSI-LINKAGE-POINT: when packaged in project system
 
     []
-    /// "35A5E6B8-4012-41fc-A652-2CDC56D74E9F"
+
+    // "35A5E6B8-4012-41fc-A652-2CDC56D74E9F"
     let guidFsiLanguageService          = "35A5E6B8-4012-41fc-A652-2CDC56D74E9F"        // The FSI lang service
 
     []
-    /// "dee22b65-9761-4a26-8fb2-759b971d6dfc"
+    // "dee22b65-9761-4a26-8fb2-759b971d6dfc"
     let guidFsiSessionToolWindow        = "dee22b65-9761-4a26-8fb2-759b971d6dfc"
 
     // FSI Package command set

From 4b74a6c29e9dacf7ec01d246593c794b56584618 Mon Sep 17 00:00:00 2001
From: Don Syme 
Date: Sat, 29 Apr 2023 00:03:14 +0100
Subject: [PATCH 112/112] protect assembly exploration and more minimization

---
 FSharp.Profiles.props                          | 18 +++++++++++-------
 src/Compiler/Checking/NameResolution.fs        |  6 ++++--
 src/Compiler/FSharp.Compiler.Service.fsproj    |  2 --
 src/FSharp.Build/FSharpCommandLineBuilder.fs   |  2 +-
 src/FSharp.Build/Fsc.fs                        | 11 -----------
 src/FSharp.Core/FSharp.Core.fsproj             |  7 -------
 .../FSharp.DependencyManager.Nuget.fsproj      |  5 -----
 7 files changed, 16 insertions(+), 35 deletions(-)

diff --git a/FSharp.Profiles.props b/FSharp.Profiles.props
index 0d6d0cc4158..8511e20b8d9 100644
--- a/FSharp.Profiles.props
+++ b/FSharp.Profiles.props
@@ -8,25 +8,29 @@
     false
   
 
+  
+    
+    false
+  
+
   
     BUILDING_WITH_LKG;NO_CHECKNULLS;$(DefineConstants)
   
 
-	
-  	$(OtherFlags) /langversion:preview
-	  $(OtherFlags) /checknulls
+  
+    $(OtherFlags) /langversion:preview /checknulls
   
 
   
-  	$(OtherFlags) /langversion:preview
+    $(OtherFlags) /langversion:preview
     
     $(NoWarn);3271
     $(DefineConstants);NO_CHECKNULLS
   
 
-	
-		NO_NULLCHECKING_LIB_SUPPORT;$(DefineConstants)
-	
+  
+    NO_NULLCHECKING_LIB_SUPPORT;$(DefineConstants)
+  
 
   
     
diff --git a/src/Compiler/Checking/NameResolution.fs b/src/Compiler/Checking/NameResolution.fs
index 4853fdbd71a..ece21b62df9 100644
--- a/src/Compiler/Checking/NameResolution.fs
+++ b/src/Compiler/Checking/NameResolution.fs
@@ -540,8 +540,10 @@ let private GetCSharpStyleIndexedExtensionMembersForTyconRef (amap: Import.Impor
         let ty = generalizedTyconRef g tcrefOfStaticClass
       
         let minfos =
-            GetImmediateIntrinsicMethInfosOfType (None, AccessorDomain.AccessibleFromSomeFSharpCode) g amap m ty
-            |> List.filter (IsMethInfoPlainCSharpStyleExtensionMember g m true)
+            protectAssemblyExploration [] (fun () ->
+                GetImmediateIntrinsicMethInfosOfType (None, AccessorDomain.AccessibleFromSomeFSharpCode) g amap m ty
+                |> List.filter (IsMethInfoPlainCSharpStyleExtensionMember g m true)
+            )
 
         if IsTyconRefUsedForCSharpStyleExtensionMembers g m tcrefOfStaticClass || not minfos.IsEmpty then
             let pri = NextExtensionMethodPriority()
diff --git a/src/Compiler/FSharp.Compiler.Service.fsproj b/src/Compiler/FSharp.Compiler.Service.fsproj
index e2a734fef42..5fe3bcb0861 100644
--- a/src/Compiler/FSharp.Compiler.Service.fsproj
+++ b/src/Compiler/FSharp.Compiler.Service.fsproj
@@ -14,8 +14,6 @@
     true
     $(DefineConstants);COMPILER
     true
-    
-    false
     $(DefineConstants);FSHARPCORE_USE_PACKAGE
     $(OtherFlags) --extraoptimizationloops:1
     
diff --git a/src/FSharp.Build/FSharpCommandLineBuilder.fs b/src/FSharp.Build/FSharpCommandLineBuilder.fs
index 552ca4cd49f..488e2444717 100644
--- a/src/FSharp.Build/FSharpCommandLineBuilder.fs
+++ b/src/FSharp.Build/FSharpCommandLineBuilder.fs
@@ -14,7 +14,7 @@ do ()
 
 // Shim to match nullness checking library support in preview
 []
-module Utils = 
+module Utils =
 #if NO_CHECKNULLS
     /// Match on the nullness of an argument.
     let inline (|Null|NonNull|) (x: 'T) : Choice =
diff --git a/src/FSharp.Build/Fsc.fs b/src/FSharp.Build/Fsc.fs
index b0e7fb7f779..5c44fdb8991 100644
--- a/src/FSharp.Build/Fsc.fs
+++ b/src/FSharp.Build/Fsc.fs
@@ -95,17 +95,6 @@ type public Fsc() as this =
     let mutable utf8output: bool = false
     let mutable useReflectionFreeCodeGen: bool = false
 
-    let mutable toolPath: string =
-        let locationOfThisDll =
-            try
-                Some(Path.GetDirectoryName(typeof.Assembly.Location))
-            with _ ->
-                None
-
-        match FSharpEnvironment.BinFolderOfDefaultFSharpCompiler(locationOfThisDll) with
-        | Some s -> s
-        | None -> ""
-
     /// Trim whitespace ... spaces, tabs, newlines,returns, Double quotes and single quotes
     let wsCharsToTrim = [| ' '; '\t'; '\"'; '\'' |]
 
diff --git a/src/FSharp.Core/FSharp.Core.fsproj b/src/FSharp.Core/FSharp.Core.fsproj
index 8c49afc75ff..54736d35ae9 100644
--- a/src/FSharp.Core/FSharp.Core.fsproj
+++ b/src/FSharp.Core/FSharp.Core.fsproj
@@ -10,9 +10,6 @@
     $(NoWarn);1204 
     true
     $(DefineConstants);FSHARP_CORE
-    BUILDING_WITH_LKG;$(DefineConstants)
-    $(OtherFlags) --langversion:preview
-    true 
     
     $(OtherFlags) --warnon:3218
     
@@ -26,15 +23,11 @@
     
     $(OtherFlags) --nowarn:3511
     
-    $(OtherFlags) --nowarn:3511 --nowarn:3513
-    
-    preview
     $(OtherFlags) --nowarn:3513
     $(OtherFlags) --compiling-fslib --compiling-fslib-40 --maxerrors:100 --extraoptimizationloops:1
     
     true
     true
-    false
     true
     FSharp.Core
     $(FSCorePackageVersion)
diff --git a/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj b/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
index 55033db7389..c0d27860b6b 100644
--- a/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
+++ b/src/FSharp.DependencyManager.Nuget/FSharp.DependencyManager.Nuget.fsproj
@@ -12,11 +12,6 @@
     true 
   
 
-  
-    
-    false
-    $(DefineConstants);NO_CHECKNULLS
-  
   
   
     true